GLiCID/guix-glicid
7
0
Fork 0
mirror of https://gitlab.univ-nantes.fr/glicid-public/guix-glicid.git synced 2025-04-29 21:58:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

reformatting and cleaning repo

Browse source
This commit is contained in:
Jean-François GUILLAUME 2025-02-10 12:20:43 +00:00
commit 1f01ad06a7
42 changed files with 10407 additions and 11840 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
glicid/packages/algebra.scm
View file

@ -1,20 +1,17 @@
(define-module (glicid packages algebra) (define-module (glicid packages algebra)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (gnu packages algebra) #:use-module (gnu packages algebra)
#:use-module (gnu packages commencement)) #:use-module (gnu packages commencement))
(define-public fftw-openmpi-with-fortran (define-public fftw-openmpi-with-fortran
(package (package
(inherit fftw-openmpi) (inherit fftw-openmpi)
(name "fftw-openmpi-with-fortran") (name "fftw-openmpi-with-fortran")
(version "3.3.10") (version "3.3.10")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://www.fftw.org/fftw-" version (uri (string-append "https://www.fftw.org/fftw-" version ".tar.gz"))
".tar.gz")) (sha256 (base32 "0rv4w90b65b2kvjpj8g9bdkl4xqc42q20f5bzpxdrkajk1a35jan"))))
(sha256 (inputs `(("gfortran-toolchain" ,gfortran-toolchain)
(base32 ,@(package-inputs fftw-openmpi)))))
"0rv4w90b65b2kvjpj8g9bdkl4xqc42q20f5bzpxdrkajk1a35jan"))))
(inputs `(("gfortran-toolchain" ,gfortran-toolchain)
,@(package-inputs fftw-openmpi)))))

201
glicid/packages/backup.scm
View file

@ -1,107 +1,106 @@
(define-module (glicid packages backup) (define-module (glicid packages backup)
#:use-module (glicid packages crates-imported) #:use-module (glicid packages crates-imported)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix build-system cargo) #:use-module (guix build-system cargo)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages crates-io) #:use-module (gnu packages crates-io)
#:use-module (gnu packages crates-compression) #:use-module (gnu packages crates-compression)
#:use-module (gnu packages crates-web) #:use-module (gnu packages crates-web)
#:use-module (gnu packages crates-check) #:use-module (gnu packages crates-check)
) )
(define-public rust-rustic-rs-0.9 (define-public rust-rustic-rs-0.9
(package (package
(name "rust-rustic-rs") (name "rust-rustic-rs")
(version "0.9.5") (version "0.9.5")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (crate-uri "rustic-rs" version)) (uri (crate-uri "rustic-rs" version))
(file-name (string-append name "-" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz"))
(sha256 (sha256
(base32 "0w9gqxbj9cfpi6isvfv7as14scwfjblmfsm0cxyfs43a8nd7s22g")))) (base32 "0w9gqxbj9cfpi6isvfv7as14scwfjblmfsm0cxyfs43a8nd7s22g"))))
(build-system cargo-build-system) (build-system cargo-build-system)
(arguments (arguments
`(#:cargo-inputs (("rust-abscissa-core" ,rust-abscissa-core-0.8) `(#:cargo-inputs (("rust-abscissa-core" ,rust-abscissa-core-0.8)
("rust-aho-corasick" ,rust-aho-corasick-1) ("rust-aho-corasick" ,rust-aho-corasick-1)
("rust-anyhow" ,rust-anyhow-1) ("rust-anyhow" ,rust-anyhow-1)
("rust-bytes" ,rust-bytes-1) ("rust-bytes" ,rust-bytes-1)
("rust-bytesize" ,rust-bytesize-1) ("rust-bytesize" ,rust-bytesize-1)
("rust-cached" ,rust-cached-0.54) ("rust-cached" ,rust-cached-0.54)
("rust-chrono" ,rust-chrono-0.4) ("rust-chrono" ,rust-chrono-0.4)
("rust-clap" ,rust-clap-4) ("rust-clap" ,rust-clap-4)
("rust-clap-complete" ,rust-clap-complete-4) ("rust-clap-complete" ,rust-clap-complete-4)
("rust-comfy-table" ,rust-comfy-table-7) ("rust-comfy-table" ,rust-comfy-table-7)
("rust-conflate" ,rust-conflate-0.3) ("rust-conflate" ,rust-conflate-0.3)
("rust-convert-case" ,rust-convert-case-0.6) ("rust-convert-case" ,rust-convert-case-0.6)
("rust-crossterm" ,rust-crossterm-0.28) ("rust-crossterm" ,rust-crossterm-0.28)
("rust-ctrlc" ,rust-ctrlc-3) ("rust-ctrlc" ,rust-ctrlc-3)
("rust-dateparser" ,rust-dateparser-0.2) ("rust-dateparser" ,rust-dateparser-0.2)
("rust-dav-server" ,rust-dav-server-0.7) ("rust-dav-server" ,rust-dav-server-0.7)
("rust-derive-more" ,rust-derive-more-1) ("rust-derive-more" ,rust-derive-more-1)
("rust-dialoguer" ,rust-dialoguer-0.11) ("rust-dialoguer" ,rust-dialoguer-0.11)
("rust-directories" ,rust-directories-5) ("rust-directories" ,rust-directories-5)
("rust-displaydoc" ,rust-displaydoc-0.2) ("rust-displaydoc" ,rust-displaydoc-0.2)
("rust-flate2" ,rust-flate2-1) ("rust-flate2" ,rust-flate2-1)
("rust-fuse-mt" ,rust-fuse-mt-0.6) ("rust-fuse-mt" ,rust-fuse-mt-0.6)
("rust-futures" ,rust-futures-0.3) ("rust-futures" ,rust-futures-0.3)
("rust-gethostname" ,rust-gethostname-0.5) ("rust-gethostname" ,rust-gethostname-0.5)
("rust-globset" ,rust-globset-0.4) ("rust-globset" ,rust-globset-0.4)
("rust-human-panic" ,rust-human-panic-2) ("rust-human-panic" ,rust-human-panic-2)
("rust-humantime" ,rust-humantime-2) ("rust-humantime" ,rust-humantime-2)
("rust-indicatif" ,rust-indicatif-0.17) ("rust-indicatif" ,rust-indicatif-0.17)
("rust-itertools" ,rust-itertools-0.13) ("rust-itertools" ,rust-itertools-0.13)
("rust-jaq-core" ,rust-jaq-core-2) ("rust-jaq-core" ,rust-jaq-core-2)
("rust-jaq-json" ,rust-jaq-json-1) ("rust-jaq-json" ,rust-jaq-json-1)
("rust-jaq-std" ,rust-jaq-std-2) ("rust-jaq-std" ,rust-jaq-std-2)
("rust-jemallocator-global" ,rust-jemallocator-global-0.3) ("rust-jemallocator-global" ,rust-jemallocator-global-0.3)
("rust-libc" ,rust-libc-0.2) ("rust-libc" ,rust-libc-0.2)
("rust-log" ,rust-log-0.4) ("rust-log" ,rust-log-0.4)
("rust-mimalloc" ,rust-mimalloc-0.1) ("rust-mimalloc" ,rust-mimalloc-0.1)
("rust-open" ,rust-open-5) ("rust-open" ,rust-open-5)
("rust-ratatui" ,rust-ratatui-0.29) ("rust-ratatui" ,rust-ratatui-0.29)
("rust-rhai" ,rust-rhai-1) ("rust-rhai" ,rust-rhai-1)
("rust-rustic-backend" ,rust-rustic-backend-0.5) ("rust-rustic-backend" ,rust-rustic-backend-0.5)
("rust-rustic-core" ,rust-rustic-core-0.7) ("rust-rustic-core" ,rust-rustic-core-0.7)
("rust-scopeguard" ,rust-scopeguard-1) ("rust-scopeguard" ,rust-scopeguard-1)
("rust-self-update" ,rust-self-update-0.39) ("rust-self-update" ,rust-self-update-0.39)
("rust-semver" ,rust-semver-1) ("rust-semver" ,rust-semver-1)
("rust-serde" ,rust-serde-1) ("rust-serde" ,rust-serde-1)
("rust-serde-json" ,rust-serde-json-1) ("rust-serde-json" ,rust-serde-json-1)
("rust-serde-with" ,rust-serde-with-3) ("rust-serde-with" ,rust-serde-with-3)
("rust-simplelog" ,rust-simplelog-0.12) ("rust-simplelog" ,rust-simplelog-0.12)
("rust-tar" ,rust-tar-0.4) ("rust-tar" ,rust-tar-0.4)
("rust-thiserror" ,rust-thiserror-2) ("rust-thiserror" ,rust-thiserror-2)
("rust-tokio" ,rust-tokio-1) ("rust-tokio" ,rust-tokio-1)
("rust-toml" ,rust-toml-0.8) ("rust-toml" ,rust-toml-0.8)
("rust-tui-textarea" ,rust-tui-textarea-0.7) ("rust-tui-textarea" ,rust-tui-textarea-0.7)
("rust-warp" ,rust-warp-0.3) ("rust-warp" ,rust-warp-0.3)
("rust-zip" ,rust-zip-2)) ("rust-zip" ,rust-zip-2))
#:cargo-development-inputs (("rust-abscissa-core" ,rust-abscissa-core-0.8) #:cargo-development-inputs (("rust-abscissa-core" ,rust-abscissa-core-0.8)
("rust-assert-cmd" ,rust-assert-cmd-2) ("rust-assert-cmd" ,rust-assert-cmd-2)
("rust-cfg-if" ,rust-cfg-if-1) ("rust-cfg-if" ,rust-cfg-if-1)
("rust-dircmp" ,rust-dircmp-0.2) ("rust-dircmp" ,rust-dircmp-0.2)
("rust-flate2" ,rust-flate2-1) ("rust-flate2" ,rust-flate2-1)
("rust-insta" ,rust-insta-1) ("rust-insta" ,rust-insta-1)
("rust-predicates" ,rust-predicates-3) ("rust-predicates" ,rust-predicates-3)
("rust-pretty-assertions" ,rust-pretty-assertions-1) ("rust-pretty-assertions" ,rust-pretty-assertions-1)
("rust-quickcheck" ,rust-quickcheck-1) ("rust-quickcheck" ,rust-quickcheck-1)
("rust-quickcheck-macros" ,rust-quickcheck-macros-1) ("rust-quickcheck-macros" ,rust-quickcheck-macros-1)
("rust-rstest" ,rust-rstest-0.23) ("rust-rstest" ,rust-rstest-0.23)
("rust-rustic-testing" ,rust-rustic-testing-0.3) ("rust-rustic-testing" ,rust-rustic-testing-0.3)
("rust-tar" ,rust-tar-0.4) ("rust-tar" ,rust-tar-0.4)
("rust-tempfile" ,rust-tempfile-3) ("rust-tempfile" ,rust-tempfile-3)
("rust-toml" ,rust-toml-0.8)))) ("rust-toml" ,rust-toml-0.8))))
(native-inputs (list pkg-config)) (native-inputs (list pkg-config))
(inputs (list (list zstd "lib"))) (inputs (list (list zstd "lib")))
(home-page "https://rustic.cli.rs/") (home-page "https://rustic.cli.rs/")
(synopsis "rustic - fast, encrypted, deduplicated backups powered by Rust") (synopsis "rustic - fast, encrypted, deduplicated backups powered by Rust")
(description (description "This package provides rustic - fast, encrypted, deduplicated backups powered by Rust.")
"This package provides rustic - fast, encrypted, deduplicated backups powered by Rust.") (license (list license:asl2.0 license:expat))))
(license (list license:asl2.0 license:expat))))
rust-rustic-rs-0.9 rust-rustic-rs-0.9

26
glicid/packages/base.scm
View file

@ -1,16 +1,14 @@
(define-module (glicid packages base)) (define-module (glicid packages base)
#:use-module (guix packages)
(use-modules (guix packages) (gnu packages cpp) (gnu packages base) (gnu packages pcre)) #:use-module (gnu packages cpp)
#:use-module (gnu packages base)
#:use-module (gnu packages pcre)
)
(define-public grep-glicid (define-public grep-glicid
(package (package
(inherit grep) (inherit grep)
(name "grep-glicid") (name "grep-glicid")
(inputs (list pcre2)) (inputs (list pcre2))
(arguments (arguments
`(#:configure-flags `(#:configure-flags (list "--enable-perl-regexp") ))))
(list "--enable-perl-regexp")
))))
grep-glicid

178
glicid/packages/benchmark.scm
View file

@ -1,115 +1,77 @@
(define-module (glicid packages benchmark) (define-module (glicid packages benchmark)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module ((guix licenses) #:use-module ((guix licenses) #:prefix license:)
#:prefix license:) #:use-module (guix packages)
#:use-module (guix packages) #:use-module ((gnu packages benchmark) #:prefix gnu:)
#:use-module ((gnu packages benchmark) #:use-module (gnu packages commencement)
#:prefix gnu:) #:use-module (gnu packages compression)
#:use-module (gnu packages commencement) #:use-module (gnu packages mpi)
#:use-module (gnu packages compression) #:use-module (glicid packages mpi)
#:use-module (gnu packages mpi) #:use-module (glicid packages gcc)
#:use-module (glicid packages mpi) #:use-module (glicid utils)
#:use-module (glicid packages gcc) )
#:use-module (glicid utils))
(define-public intel-mpi-benchmarks/openmpi-2021.3 (define-public intel-mpi-benchmarks/openmpi-2021.3
(package (package
(inherit gnu:intel-mpi-benchmarks/openmpi) (inherit gnu:intel-mpi-benchmarks/openmpi)
(name "intel-mpi-benchmarks-upstream") (name "intel-mpi-benchmarks-upstream")
(version "2021.3") (version "2021.3")
(source (origin (source (origin
(inherit (package-source gnu:intel-mpi-benchmarks/openmpi)) (inherit (package-source gnu:intel-mpi-benchmarks/openmpi))
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/intel/mpi-benchmarks") (url "https://github.com/intel/mpi-benchmarks")
(commit (string-append "IMB-v" version)))) (commit (string-append "IMB-v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256 (base32 "04kczch2hlfzbgk929vcxx480kc6raba8rbz246j7d26k1z1zh8h"))))))
(base32
"04kczch2hlfzbgk929vcxx480kc6raba8rbz246j7d26k1z1zh8h"))))))
;(define-public intel-mpi-benchmarks/openmpi-2021.3-libfabric-rdma
; (transform-package (
; (instead-of "openmpi" openmpi-glicid-waves)
; intel-mpi-benchmarks/openmpi-2021.3
; ) "fab+rdma+ucx+psm2")
;)
;(define intel-mpi-benchmark-transform-gcc-11
; (gcc11-instead-of-gcc intel-mpi-benchmarks/openmpi-2021.3-libfabric-rdma)
;)
;(define intel-mpi-benchmarks/openmpi-2021.3-gcc-11
; (package
; (inherit intel-mpi-benchmark-transform-gcc-11)
; (version (string-append (package-version intel-mpi-benchmark-transform-gcc-11) "-gcc-11" ))
; )
;)
;(define-public intel-mpi-benchmarks/openmpi-2021.3-waves
; (transform-package ((instead-of "openmpi" openmpi-glicid-waves)
; intel-mpi-benchmarks/openmpi-2021.3) "waves"))
(define-public stream-benchmarks (define-public stream-benchmarks
(package (package
(name "stream-benchmarks") (name "stream-benchmarks")
(version "5.10-jh") (version "5.10-jh")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/jeffhammond/STREAM.git") (url "https://github.com/jeffhammond/STREAM.git")
(commit "HEAD"))) (commit "HEAD")))
(sha256 (sha256 (base32 "1b5ka2h6rhp2103app6p0vq29y7qixcli9w874hb33y05ggjin8m"))
(base32 (file-name (string-append name "-" version "-checkout"))))
"1b5ka2h6rhp2103app6p0vq29y7qixcli9w874hb33y05ggjin8m")) (build-system gnu-build-system)
(file-name (string-append name "-" version "-checkout")))) (arguments
(build-system gnu-build-system) `(#:phases (modify-phases %standard-phases
(arguments (delete 'configure)
`(#:phases (modify-phases %standard-phases (delete 'check)
(delete 'configure) ;no configure (replace 'install
(delete 'check) ;no check (lambda* (#:key outputs #:allow-other-keys)
(replace 'install (let ((bin (string-append (assoc-ref outputs "out")
(lambda* (#:key outputs #:allow-other-keys) "/bin")))
;; Le Makefile du paquet ne fournit pas de règle « install » (install-file "stream_c.exe" bin)
;; alors on le fait nous-mêmes. (install-file "stream_f.exe" bin) #t))))))
(let ((bin (string-append (assoc-ref outputs "out") (inputs `(("gfortran-toolchain" ,gfortran-toolchain)))
"/bin"))) (synopsis "STREAM benchmark")
(install-file "stream_c.exe" bin) (description "STREAM benchmark")
(install-file "stream_f.exe" bin) #t)))))) (home-page "https://")
(inputs `(("gfortran-toolchain" ,gfortran-toolchain))) (license license:gpl2+)))
(synopsis "STREAM benchmark")
(description "STREAM benchmark")
(home-page "https://")
(license license:gpl2+) ;check…
))
;;defined by gricad / PA Boutier
(define-public osu-benchmarks (define-public osu-benchmarks
(package (package
(name "osu-benchmarks") (name "osu-benchmarks")
(version "5.8") (version "5.8")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "https://mvapich.cse.ohio-state.edu/download/mvapich/osu-micro-benchmarks-" version ".tgz"))
"https://mvapich.cse.ohio-state.edu/download/mvapich/osu-micro-benchmarks-" (sha256 (base32 "19a4wg0msipibkxsi8i0c34d07512yfaj2k37dxg5541ysdw690f"))))
version ".tgz")) (build-system gnu-build-system)
(sha256 (arguments
(base32 `(#:phases (modify-phases %standard-phases
"19a4wg0msipibkxsi8i0c34d07512yfaj2k37dxg5541ysdw690f")))) (add-after 'unpack 'setenv
(build-system gnu-build-system) (lambda _
(arguments (setenv "CC" (which "mpicc"))
`(#:phases (modify-phases %standard-phases (setenv "CXX" (which "mpic++")) #t)))))
(add-after 'unpack 'setenv (propagated-inputs `(("openmpi" ,openmpi)))
(lambda _ (synopsis "OSU micro benchmarks")
(setenv "CC" (description "OSU micro benchmark for mpi")
(which "mpicc")) (home-page "https://mvapich.cse.ohio-state.edu/benchmarks/")
(setenv "CXX" (license license:gpl2+)))
(which "mpic++")) #t)))))
(propagated-inputs `(("openmpi" ,openmpi)))
(synopsis "OSU micro benchmarks")
(description "OSU micro benchmark for mpi")
(home-page "https://mvapich.cse.ohio-state.edu/benchmarks/")
(license license:gpl2+)))

134
glicid/packages/caddy.scm
View file

@ -12,7 +12,6 @@
#:use-module (gnu packages golang-check) #:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-web) #:use-module (gnu packages golang-web)
#:use-module (gnu packages golang-xyz) #:use-module (gnu packages golang-xyz)
) )
(define %caddy-version "2.9.1") (define %caddy-version "2.9.1")
@ -70,76 +69,71 @@
(license license:expat))) (license license:expat)))
(define-public go-github-com-akavel-rsrc (define-public go-github-com-akavel-rsrc
(package (package
(name "go-github-com-akavel-rsrc") (name "go-github-com-akavel-rsrc")
(version "0.10.2") (version "0.10.2")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/akavel/rsrc") (url "https://github.com/akavel/rsrc")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256 (base32 "1frdxqdnk923p4245lk0wwqrxsdy8aj2qxl3m0zfgnh02vfz3hs2"))))
(base32 "1frdxqdnk923p4245lk0wwqrxsdy8aj2qxl3m0zfgnh02vfz3hs2")))) (build-system go-build-system)
(build-system go-build-system) (arguments
(arguments (list
(list #:import-path "github.com/akavel/rsrc"))
#:import-path "github.com/akavel/rsrc")) (home-page "https://github.com/akavel/rsrc")
(home-page "https://github.com/akavel/rsrc") (synopsis #f)
(synopsis #f) (description #f)
(description #f) (license license:expat)))
(license license:expat)))
(define-public go-github-com-josephspurrier-goversioninfo (define-public go-github-com-josephspurrier-goversioninfo
(package (package
(name "go-github-com-josephspurrier-goversioninfo") (name "go-github-com-josephspurrier-goversioninfo")
(version "1.4.1") (version "1.4.1")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/josephspurrier/goversioninfo") (url "https://github.com/josephspurrier/goversioninfo")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256 (base32 "02nqhkvsxi69ny64j81x1k142fir2ps68fypi3z2hr4wd3x4i1l9"))))
(base32 "02nqhkvsxi69ny64j81x1k142fir2ps68fypi3z2hr4wd3x4i1l9")))) (build-system go-build-system)
(build-system go-build-system) (arguments
(arguments (list
(list #:import-path "github.com/josephspurrier/goversioninfo"))
#:import-path "github.com/josephspurrier/goversioninfo")) (propagated-inputs (list go-github-com-stretchr-testify
(propagated-inputs (list go-github-com-stretchr-testify go-github-com-akavel-rsrc))
go-github-com-akavel-rsrc)) (home-page "https://github.com/josephspurrier/goversioninfo")
(home-page "https://github.com/josephspurrier/goversioninfo") (synopsis "GoVersionInfo")
(synopsis "GoVersionInfo") (description "Package goversioninfo creates a syso file which contains Microsoft Version
(description Information and an optional icon.")
"Package goversioninfo creates a syso file which contains Microsoft Version (license license:expat)))
Information and an optional icon.")
(license license:expat)))
(define-public go-github-com-caddyserver-xcaddy (define-public go-github-com-caddyserver-xcaddy
(package (package
(name "go-github-com-caddyserver-xcaddy") (name "go-github-com-caddyserver-xcaddy")
(version "0.4.2") (version "0.4.2")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/caddyserver/xcaddy") (url "https://github.com/caddyserver/xcaddy")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256 (base32 "1452m1wksxmhy00rdkpnh55y8bxyxxcldapvp0fzpsyv82kfmsz1"))))
(base32 "1452m1wksxmhy00rdkpnh55y8bxyxxcldapvp0fzpsyv82kfmsz1")))) (build-system go-build-system)
(build-system go-build-system) (arguments
(arguments (list
(list #:import-path "github.com/caddyserver/xcaddy"))
#:import-path "github.com/caddyserver/xcaddy")) (propagated-inputs (list go-github-com-josephspurrier-goversioninfo
(propagated-inputs (list go-github-com-josephspurrier-goversioninfo go-github-com-google-shlex
go-github-com-google-shlex go-github-com-masterminds-semver-v3))
go-github-com-masterminds-semver-v3)) (home-page "https://github.com/caddyserver/xcaddy")
(home-page "https://github.com/caddyserver/xcaddy") (synopsis "- Custom Caddy Builder")
(synopsis "- Custom Caddy Builder") (description "This command line tool and associated Go package makes it easy to make custom
(description builds of the @@url{https://github.com/caddyserver/caddy,Caddy Web Server}.")
"This command line tool and associated Go package makes it easy to make custom (license license:asl2.0)))
builds of the @@url{https://github.com/caddyserver/caddy,Caddy Web Server}.")
(license license:asl2.0)))

620
glicid/packages/clam.scm
View file

@ -1,620 +0,0 @@
(define-module (glicid packages clam)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (gnu packages linux)
#:use-module (gnu packages virtualization)
#:use-module (gnu packages storage)
#:use-module (gnu packages gcc)
#:use-module (glicid packages glicid)
#:use-module (guix build-system python)
#:use-module ((guix licenses)
#:prefix license:)
#:use-module (guix git-download)
#:use-module (gnu packages python)
#:use-module (guix build-system python)
#:use-module (gnu packages python-web)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages python-crypto)
#:use-module (gnu packages check)
#:use-module (guix build-system copy)
#:use-module (gnu packages django)
#:use-module (gnu packages time)
#:use-module (gnu packages databases)
#:use-module (gnu packages python-build) ;setup-tools moved here.
)
;(define-public python-pytest-runner-4.5.1
; (package
; (name "python-pytest-runner")
; (version "4.5.1")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "pytest-runner" version))
; (sha256
; (base32
; "1vzilbayx5mznsdm1r258m3616374p6kvhsbj4j6238j9djkvjyi"))))
; (build-system python-build-system)
; (arguments
; '(;; FIXME: The test suite requires 'python-flake8' and 'python-black',
; ;; but that introduces a circular dependency.
; #:tests? #f
; #:phases (modify-phases %standard-phases
; (replace 'check
; (lambda* (#:key tests? #:allow-other-keys)
; (if tests?
; (invoke "pytest" "-vv")
; (format #t "test suite not run~%"))
; #t)))))
; (native-inputs
; `(("python-setuptools-scm" ,python-setuptools-scm)))
; (home-page "https://github.com/pytest-dev/pytest-runner")
; (synopsis "Invoke py.test as a distutils command")
; (description
; "This package provides a @command{pytest-runner} command that
;@file{setup.py} files can use to run tests.")
; (license license:expat)))
;
;(define-public python-keycloak-client-0.2.3
;(package
; (name "python-keycloak-client")
; (version "0.2.3")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "python-keycloak-client" version))
; (sha256
; (base32
; "0gw6wj1rlacfpgbp4b2wyp68ccrh713438qjpv11x6bnlcnf52x3"))))
; (build-system python-build-system) ;; FIXME: Tests require specific "pytest",
; ;; we don't have it for the moment.
; (arguments
; '(#:tests? #f))
;
;
; (propagated-inputs
; `(("python-jose" ,python-jose)
; ("python-pytest-runner-4.5.1", python-pytest-runner-4.5.1)
; ("python-requests" ,python-requests)))
; (native-inputs
; `(("python-bumpversion" ,python-bumpversion)
; ("python-pytest-runner-4.5.1", python-pytest-runner-4.5.1)
; ("python-twine" ,python-twine)))
; (home-page
; "https://github.com/Peter-Slump/python-keycloak-client")
; (synopsis "Install Python Keycloak client.")
; (description "Install Python Keycloak client.")
; (license license:expat))
;
;)
;
;
;(define-public glicid-django-keycloak
; (package
; (name "glicid-django-keycloak")
; (version "v0.1.2-bird")
; (source
; (origin
; (method git-fetch)
; (uri
; (git-reference
; (url "https://oauth2:glpat-RsX2GjsD2WrzXubiJeou@gitlab.univ-nantes.fr/CCIPL/stages/2021/django-keycloak.git") (commit version)
; )
; )
;
; (file-name (git-file-name name version))
; (sha256
; (base32
; "0l380q6z504nndjl15cb5lkghpmm6f3rs4bgwy8sx5s12xz2sbck"
; )
; )
; )
; )
;
; (build-system python-build-system)
; ;; XXX: The git repository has no tags, and the PyPI releases do not
; ;; contain tests.
; (arguments '(#:tests? #f))
; (native-inputs `(("python-keycloak-client" , python-keycloak-client-0.2.3)
; ("python-ecdsa", python-ecdsa)
; ))
; (home-page "https://blabla")
; (synopsis "blabla")
; (description
; "This package provides a single-file minifier for CSS, HTML, and JavaScript.")
; ;; XXX: The README just says "GNU GPL and GNU LGPL and MIT". From
; ;; <https://github.com/juancarlospaco/css-html-js-minify/issues/9> it
; ;; looks like the user can choose a license.
; (license (list license:gpl3+ license:lgpl3+ license:expat))
;
; )
;)
;
;
;(define-public python-django-autocomplete-light
;(package
; (name "python-django-autocomplete-light")
; (version "3.8.2")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-autocomplete-light" version))
; (sha256
; (base32
; "145snirk0a7bgcgwisn5fzmb0w4m88zf6r55m2biz3wsnmqymw15"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; pb with django ?
; (native-inputs `(("python-django", python-django)))
; (propagated-inputs `(("python-six" ,python-six)))
; (home-page
; "http://django-autocomplete-light.rtfd.org")
; (synopsis "Fresh autocompletes for Django")
; (description "Fresh autocompletes for Django")
; (license license:expat))
;)
;
;(define-public python-django-icons
;
;(package
; (name "python-django-icons")
; (version "4.0.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-icons" version))
; (sha256
; (base32
; "06r0d68qknqa7p44nss6wzdcawakyr7ildgyl6mp5md9xb8klbah"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; django pb
; (propagated-inputs
; `(("python-django" ,python-django)
; ("python-importlib-metadata"
; ,python-importlib-metadata)))
; (home-page
; "https://github.com/zostera/django-icons")
; (synopsis "Icons for Django")
; (description "Icons for Django")
; (license #f))
;
;)
;
;(define-public python-django-admin-row-actions
;(package
; (name "python-django-admin-row-actions")
; (version "0.0.5")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-admin-row-actions" version))
; (sha256
; (base32
; "0rz71a54lj73wfi56flfh5m5fi7ah1cl8fph1h8y386s0am8plpz"))))
; (build-system python-build-system)
;
; (native-inputs `(("python-django", python-django)))
; (arguments '(#:tests? #f)) ; iteration problem
;
; (propagated-inputs `(("python-six" ,python-six)))
; (home-page
; "https://github.com/DjangoAdminHackers/django-admin-row-actions")
; (synopsis "django admin row actions")
; (description "django admin row actions")
; (license #f))
;)
;
;(define-public python-django-bootstrap4
;(package
; (name "python-django-bootstrap4")
; (version "3.0.1")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-bootstrap4" version))
; (sha256
; (base32
; "0azcalm95yh713fm1bmsqd73iz53fhmyajsg3fly6mmvffs7zjf5"))))
; (build-system python-build-system)
; (native-inputs `(("python-django", python-django)))
;(arguments '(#:tests? #f)) ; gdal not found.
; (propagated-inputs
; `(("python-beautifulsoup4" ,python-beautifulsoup4)
; ("python-django" ,python-django)
; ("python-importlib-metadata"
; ,python-importlib-metadata)))
; (home-page
; "https://github.com/zostera/django-bootstrap4")
; (synopsis "Bootstrap 4 for Django")
; (description "Bootstrap 4 for Django")
; (license #f))
;
;
;
;)
;
;(define-public python-django-mathfilters
;(package
; (name "python-django-mathfilters")
; (version "1.0.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-mathfilters" version))
; (sha256
; (base32
; "01sbnrznai6sz4w4qs7ld35039l7q5wh5zawwy1kd2gwdppr5f69"))))
; (build-system python-build-system)
; (native-inputs `(("python-django", python-django)))
;; (arguments '(#:tests? #f)) ; iteration problem
; (home-page
; "https://github.com/dbrgn/django-mathfilters")
; (synopsis
; "A set of simple math filters for Django")
; (description
; "A set of simple math filters for Django")
; (license license:expat))
;
;)
;
;(define-public python-tablib
;(package
; (name "python-tablib")
; (version "3.0.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "tablib" version))
; (sha256
; (base32
; "03f1z6jq6rf67gwhbm9ma4rydm8h447a5nh5lcs5l8jg8l4aqg7q"))))
; (build-system python-build-system)
;; (arguments '(#:tests? #f)) ; need setuptools ?
; (native-inputs `(("python-setuptools-scm", python-setuptools-scm)))
; (home-page "https://tablib.readthedocs.io")
; (synopsis
; "Format agnostic tabular data library (XLS, JSON, YAML, CSV)")
; (description
; "Format agnostic tabular data library (XLS, JSON, YAML, CSV)")
; (license license:expat))
;
;
;)
;
;(define-public python-markuppy
;
;(package
; (name "python-markuppy")
; (version "1.14")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "MarkupPy" version))
; (sha256
; (base32
; "0pqdmpxbr8iq22b4css2gz5z6s01ddpzyj25x27kgbs2lp0f5phs"))))
; (build-system python-build-system)
; (home-page
; "https://github.com/tylerbakke/MarkupPy")
; (synopsis "An HTML/XML generator")
; (description "An HTML/XML generator")
; (license license:expat))
;
;
;)
;
;(define-public python-xlwt
;(package
; (name "python-xlwt")
; (version "1.3.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "xlwt" version))
; (sha256
; (base32
; "123c2pdamshkq75wwvck8fq0cjq1843xd3x9qaiz2a4vg9qi56f5"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; code error
; (home-page "http://www.python-excel.org/")
; (synopsis "Library to create spreadsheet files compatible with MS Excel 97/2000/XP/2003 XLS files, on any platform, with Python 2.6, 2.7, 3.3+")
; (description "Library to create spreadsheet files compatible with MS Excel 97/2000/XP/2003 XLS files, on any platform, with Python 2.6, 2.7, 3.3+")
; (license license:bsd-3))
;
;)
;
;(define-public python-django-import-export
;(package
; (name "python-django-import-export")
; (version "2.5.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-import-export" version))
; (sha256
; (base32
; "0j0gsj18bkkmbn262qj2syla80vncvqn49bllwxvcgw0zhxh1763"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; django error
; (native-inputs `(("python-markuppy", python-markuppy)
; ("python-odfpy",python-odfpy)
; ("python-xlwt",python-xlwt)
; ("python-xlrd",python-xlrd)
; ("python-pyyaml",python-pyyaml)
; ("python-openpyxl",python-openpyxl)
; ))
; (propagated-inputs
; `(("python-diff-match-patch"
; ,python-diff-match-patch)
; ("python-django" ,python-django)
; ("python-tablib" ,python-tablib)
; ))
; (home-page
; "https://github.com/django-import-export/django-import-export")
; (synopsis
; "Django application and library for importing and exporting data with included admin integration.")
; (description
; "Django application and library for importing and exporting data with included admin integration.")
; (license license:bsd-3))
;
;
;)
;
;(define-public python-django-timezone-field
;(package
; (name "python-django-timezone-field")
; (version "4.1.2")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-timezone-field" version))
; (sha256
; (base32
; "1pxrs6mkayr2rqxj8q4wdfrdhw1dnzvwkacajdjy6q6ha8jcdyng"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; needs rest-framework ?
; (propagated-inputs
; `(("python-django" ,python-django)
; ("python-pytz" ,python-pytz)))
; (home-page
; "http://github.com/mfogel/django-timezone-field/")
; (synopsis
; "A Django app providing database and form fields for pytz timezone objects.")
; (description
; "A Django app providing database and form fields for pytz timezone objects.")
; (license license:bsd-3))
;
;
;)
;
;
;(define-public python-crontab
;(package
; (name "python-crontab")
; (version "2.5.1")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "python-crontab" version))
; (sha256
; (base32
; "0cccrqc10r8781ba81x8r2frs3pl2m4hkm599k5358ak0xr7xgjb"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; AssertionError: 2 != 0 : Windows shell command not found!
;
; (propagated-inputs
; `(("python-dateutil" ,python-dateutil)))
; (home-page
; "https://gitlab.com/doctormo/python-crontab/")
; (synopsis "Python Crontab API")
; (description "Python Crontab API")
; (license #f))
;
;
;)
;
;(define-public python-click-repl
;
;(package
; (name "python-click-repl")
; (version "0.1.6")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "click-repl" version))
; (sha256
; (base32
; "1mcmz95595nrp4r58spy1ac993db26hk4q97isghbmn4md99vwmr"))))
; (build-system python-build-system)
; (propagated-inputs
; `(("python-click" ,python-click)
; ("python-prompt-toolkit" ,python-prompt-toolkit)
; ("python-six" ,python-six)))
; (home-page
; "https://github.com/untitaker/click-repl")
; (synopsis "REPL plugin for Click")
; (description "REPL plugin for Click")
; (license license:expat))
;)
;
;
;(define-public python-click-didyoumean
;
;(package
; (name "python-click-didyoumean")
; (version "0.0.3")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "click-didyoumean" version))
; (sha256
; (base32
; "1svaza5lpvdbmyrx5xi0riqzq4hb9wnlpqrg6r8zy14pbi42j8hi"))))
; (build-system python-build-system)
; (propagated-inputs
; `(("python-click" ,python-click)))
; (home-page
; "https://github.com/timofurrer/click-didyoumean")
; (synopsis
; "Enable git-like did-you-mean feature in click.")
; (description
; "Enable git-like did-you-mean feature in click.")
; (license #f))
;
;)
;
;(define-public python-pytest-celery
;
;(package
; (name "python-pytest-celery")
; (version "0.0.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "pytest-celery" version))
; (sha256
; (base32
; "01pli108qqiiyrn8qsqqabcpazrzj27r7cji9wgglsk76by61l6g"))))
; (build-system python-build-system)
; (propagated-inputs
; `(("python-celery" ,python-celery-5.1.0)))
; (home-page
; "https://github.com/graingert/pytest-celery")
; (synopsis
; "pytest-celery a shim pytest plugin to enable celery.contrib.pytest")
; (description
; "pytest-celery a shim pytest plugin to enable celery.contrib.pytest")
; (license license:bsd-3))
;
;)
;
;(define-public python-celery-5.1.0
;
;(package
; (name "python-celery")
; (version "5.1.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "celery" version))
; (sha256
; (base32
; "110ix1h9axnc5dwzyswi1cvypzbr38p1jb1msyf1ikvq8p063w35"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; circular depedency
; (propagated-inputs
; `(("python-billiard" ,python-billiard)
; ("python-click" ,python-click)
; ("python-click-didyoumean"
; ,python-click-didyoumean)
; ("python-click-plugins" ,python-click-plugins)
; ("python-click-repl" ,python-click-repl)
; ("python-kombu" ,python-kombu)
; ("python-pytz" ,python-pytz)
; ("python-setuptools" ,python-setuptools)
; ("python-vine" ,python-vine)))
; ; (native-inputs
; ; `(("python-pytest-celery" ,python-pytest-celery))) ;; circular depedency !!
; (home-page "http://celeryproject.org")
; (synopsis "Distributed Task Queue.")
; (description "Distributed Task Queue.")
; (license license:bsd-3))
;
;)
;
;(define-public python-django-celery-beat
;
;(package
; (name "python-django-celery-beat")
; (version "2.2.0")
; (source
; (origin
; (method url-fetch)
; (uri (pypi-uri "django-celery-beat" version))
; (sha256
; (base32
; "0hx5ig1g0naagkmh39xbb64hhckd3b3pm12g9z03zig72pxkm8dq"))))
; (build-system python-build-system)
; (arguments '(#:tests? #f)) ; needs much more up to date python-vine
;
; ; (native-inputs `(("python-vine", python-vine)))
; (propagated-inputs
; `(("python-celery" ,python-celery-5.1.0)
; ("python-crontab" ,python-crontab)
; ("python-django" ,python-django)
; ("python-django-timezone-field"
; ,python-django-timezone-field)))
; (home-page
; "https://github.com/celery/django-celery-beat")
; (synopsis "Database-backed Periodic Tasks.")
; (description "Database-backed Periodic Tasks.")
; (license license:bsd-3))
;
;)
;
;(define-public glicid-clam
; (package
; (name "glicid-clam")
; (version "v0.0.1")
; (source
; (origin
; (method git-fetch)
; (uri
; (git-reference
; (url "https://oauth2:glpat-RsX2GjsD2WrzXubiJeou@gitlab.univ-nantes.fr/CCIPL/stages/2021/cluster_account_manager.git") (commit version)
; )
; )
;
; (file-name (git-file-name name version))
; (sha256
; (base32
; "1x8q8wfl3p430dw8cawvfw4a4jjqw80gdg6zm90wmiad1f1lgd6r"
; )
; )
; )
; )
;; (build-system python-build-system)
; (build-system copy-build-system)
; ;; XXX: The git repository has no tags, and the PyPI releases do not
; ;; contain tests.
; (arguments '(
;
;;#:tests? #f
;; #:use-setuptools? #f ; uses custom distutils 'install' command
; #:phases
; (modify-phases %standard-phases
; (add-before 'reset-gzip-timestamps 'make-files-writable
; (lambda* (#:key outputs #:allow-other-keys)
; (let ((out (assoc-ref outputs "out")))
; (for-each make-file-writable
; (find-files out "\\.gz$"))
; #t))))))
;; )
;; )
; (propagated-inputs `(("python-keycloak-client" , python-keycloak-client-0.2.3)
; ("python-ecdsa", python-ecdsa)
; ("python-django", python-django)
; ("python-celery", python-celery-5.1.0)
; ("python-django-auth-ldap",python-django-auth-ldap)
; ("python-django-autocomplete-light",python-django-autocomplete-light)
; ("python-django-admin-row-actions", python-django-admin-row-actions)
; ("python-django-bootstrap4",python-django-bootstrap4)
; ("python-django-icons",python-django-icons)
; ("python-django-mathfilters",python-django-mathfilters)
; ("python-django-import-export",python-django-import-export)
; ("python-django-celery-beat",python-django-celery-beat)
; ("python-psycopg2",python-psycopg2)
; ("python-magic",python-magic)
;
; ))
; (home-page "https://blabla")
; (synopsis "blabla")
; (description
; "This package provides a single-file minifier for CSS, HTML, and JavaScript.")
; ;; XXX: The README just says "GNU GPL and GNU LGPL and MIT". From
; ;; <https://github.com/juancarlospaco/css-html-js-minify/issues/9> it
; ;; looks like the user can choose a license.
; (license (list license:gpl3+ license:lgpl3+ license:expat))
;
; )
;)

72
glicid/packages/cluster.scm
View file

@ -1,39 +1,31 @@
(define-module (glicid packages cluster) (define-module (glicid packages cluster)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (gnu packages networking) #:use-module (gnu packages networking)
#:use-module ((gnu packages cluster) #:use-module ((gnu packages cluster)
#:prefix gnu:) #:prefix gnu:)
#:use-module (glicid utils)) #:use-module (glicid utils))
(define-public keepalived-upstream-2.2.8 (define-public keepalived-upstream-2.2.8
(package (package
(inherit gnu:keepalived) (inherit gnu:keepalived)
(name "keepalived-upstream") (name "keepalived-upstream")
(version "2.2.8") (version "2.2.8")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "http://www.keepalived.org/software/keepalived-" version ".tar.gz"))
"http://www.keepalived.org/software/keepalived-" version (sha256 (base32 "1dhvg9x976k4nnygxyv2gr55jfd88459kgiiqva9bwvl56v2x245"))))))
".tar.gz"))
(sha256
(base32
"1dhvg9x976k4nnygxyv2gr55jfd88459kgiiqva9bwvl56v2x245"))))))
(define-public keepalived-upstream-2.3.1 (define-public keepalived-upstream-2.3.1
(package (package
(inherit gnu:keepalived) (inherit gnu:keepalived)
(name "keepalived-upstream") (name "keepalived-upstream")
(version "2.3.1") (version "2.3.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "http://www.keepalived.org/software/keepalived-" version ".tar.gz"))
"http://www.keepalived.org/software/keepalived-" version (sha256 (base32 "18raqq15xxf5hlrqhk39prq9xdfiv9px2nlrs43273lrzndvdx4j"))))))
".tar.gz"))
(sha256
(base32
"18raqq15xxf5hlrqhk39prq9xdfiv9px2nlrs43273lrzndvdx4j"))))))
(define local:keepalived (define local:keepalived
@ -42,13 +34,13 @@
(latest-version local:keepalived gnu:keepalived)) (latest-version local:keepalived gnu:keepalived))
(define-public keepalived-glicid (define-public keepalived-glicid
(package (package
(inherit keepalived-latest) (inherit keepalived-latest)
(name "keepalived-glicid") (name "keepalived-glicid")
(version (string-append (package-version keepalived-latest) "-glicid")) (version (string-append (package-version keepalived-latest) "-glicid"))
(arguments (arguments
`(#:configure-flags (list (string-append "--enable-snmp") `(#:configure-flags (list (string-append "--enable-snmp")
(string-append "--enable-snmp-checker") (string-append "--enable-snmp-checker")
(string-append "--enable-snmp-rfc")))) (string-append "--enable-snmp-rfc"))))
(inputs (modify-inputs (package-inputs keepalived-latest) (inputs (modify-inputs (package-inputs keepalived-latest)
(prepend net-snmp))))) (prepend net-snmp)))))

3
glicid/packages/containers.scm
View file

@ -37,5 +37,4 @@
(substitute* "Makefile" (("install: install.bin install.remote install.man install.systemd") "install: install.bin install.remote install.systemd")))))) (substitute* "Makefile" (("install: install.bin install.remote install.man install.systemd") "install: install.bin install.remote install.systemd"))))))
(inputs `(("fuse-overlayfs" ,fuse-overlayfs) ,@(package-inputs gnu:podman))) (inputs `(("fuse-overlayfs" ,fuse-overlayfs) ,@(package-inputs gnu:podman)))
(native-inputs (list bats git go-1.20 pkg-config python)) (native-inputs (list bats git go-1.20 pkg-config python))
(propagated-inputs (list fuse-overlayfs gnu:slirp4netns iptables)) (propagated-inputs (list fuse-overlayfs gnu:slirp4netns iptables))))
))

44
glicid/packages/cpp.scm
View file

@ -1,32 +1,20 @@
(define-module (glicid packages cpp)) (define-module (glicid packages cpp)
#:use-module (guix packages)
(use-modules (guix packages) (gnu packages cpp)) #:use-module (gnu packages cpp)
)
(define-public reproc-with-cpp (define-public reproc-with-cpp
(package (package
(inherit reproc) (inherit reproc)
(name "reproc-with-cpp") (name "reproc-with-cpp")
(arguments (arguments
;; No tests. `(#:tests? #f
`(#:tests? #f #:configure-flags `("-DBUILD_SHARED_LIBS=1" "-DREPROC++=1")))))
;; Build the shared library instead of a static one.
#:configure-flags `("-DBUILD_SHARED_LIBS=1" "-DREPROC++=1")))
))
(define-public reproc-with-cpp-static (define-public reproc-with-cpp-static
(package (package
(inherit reproc) (inherit reproc)
(name "reproc-with-cpp-static") (name "reproc-with-cpp-static")
(arguments (arguments
;; No tests. `(#:tests? #f
`(#:tests? #f #:configure-flags `("-DREPROC++=1")))))
;; Build the shared library instead of a static one.
#:configure-flags `("-DREPROC++=1")))
))

17123
glicid/packages/crates-imported.scm
View file

File diff suppressed because it is too large Load diff

202
glicid/packages/cups.scm
View file

@ -1,110 +1,104 @@
(define-module (glicid packages cups) (define-module (glicid packages cups)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages algebra) #:use-module (gnu packages algebra)
#:use-module (gnu packages autotools) #:use-module (gnu packages autotools)
#:use-module (gnu packages avahi) #:use-module (gnu packages avahi)
#:use-module (gnu packages base) #:use-module (gnu packages base)
#:use-module (gnu packages bash) #:use-module (gnu packages bash)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages crypto) #:use-module (gnu packages crypto)
#:use-module (gnu packages fonts) ; font-dejavu #:use-module (gnu packages fonts)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages ghostscript) #:use-module (gnu packages ghostscript)
#:use-module (gnu packages glib) #:use-module (gnu packages glib)
#:use-module (gnu packages groff) #:use-module (gnu packages groff)
#:use-module (gnu packages image) #:use-module (gnu packages image)
#:use-module (gnu packages libusb) #:use-module (gnu packages libusb)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages pdf) #:use-module (gnu packages pdf)
#:use-module (gnu packages perl) #:use-module (gnu packages perl)
#:use-module (gnu packages photo) #:use-module (gnu packages photo)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages polkit) #:use-module (gnu packages polkit)
#:use-module (gnu packages pretty-print) #:use-module (gnu packages pretty-print)
#:use-module (gnu packages python) #:use-module (gnu packages python)
#:use-module (gnu packages python-xyz) #:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt) #:use-module (gnu packages qt)
#:use-module (gnu packages scanner) #:use-module (gnu packages scanner)
#:use-module (gnu packages tls) #:use-module (gnu packages tls)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system meson) #:use-module (guix build-system meson)
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix gexp) #:use-module (guix gexp)
#: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 (srfi srfi-1) #:use-module (srfi srfi-1)
#:use-module (ice-9 match) #:use-module (ice-9 match)
#:use-module (gnu packages cups) #:use-module (gnu packages cups)
#:use-module (gnu packages)
#:use-module (gnu packages algebra)
#:use-module (gnu packages) #:use-module (gnu packages python-xyz)
#:use-module (gnu packages algebra) #:use-module (gnu packages qt)
#:use-module (gnu packages python-xyz) #:use-module (gnu packages scanner)
#:use-module (gnu packages qt) #:use-module (gnu packages time)
#:use-module (gnu packages scanner) #:use-module (gnu packages tls)
#:use-module (gnu packages time) #:use-module (guix build-system gnu)
#:use-module (gnu packages tls) #:use-module (guix build-system python)
#:use-module (guix build-system gnu) )
#:use-module (guix build-system python)
)
(define-public gutenprint (define-public gutenprint
(package (package
(name "gutenprint") (name "gutenprint")
(version "5.3.4") (version "5.3.4")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://sourceforge/gimp-print/" name "-" (uri (string-append "mirror://sourceforge/gimp-print/" name "-" (version-major+minor version) "/" version "/" name "-" version ".tar.xz"))
(version-major+minor version) "/" version "/" (sha256 (base32 "0fq2y9sx37d342fihp1ys9kf4sr2j5nc1kl33j9sirmqs80sfi6v"))))
name "-" version ".tar.xz")) (build-system gnu-build-system)
(sha256 (arguments
(base32 "0fq2y9sx37d342fihp1ys9kf4sr2j5nc1kl33j9sirmqs80sfi6v")))) `(#:test-target "check-parallel"
(build-system gnu-build-system) #:configure-flags (list "--enable-cups-level3-ppds"
(arguments "--enable-globalized-cups-ppds"
`(#:test-target "check-parallel" "--enable-cups-ppds"
#:configure-flags (list "--enable-cups-level3-ppds" "--enable-cups-1_2-enhancements")
"--enable-globalized-cups-ppds" #:phases
"--enable-cups-ppds" (modify-phases %standard-phases
"--enable-cups-1_2-enhancements") (delete 'check)
#:phases (add-before 'configure 'fix-paths
(modify-phases %standard-phases (lambda* (#:key outputs native-inputs #:allow-other-keys)
(delete 'check) ; works, but takes ages ! (substitute* "Makefile.in"
(("/usr/bin/time") "time"))
(add-before 'configure 'fix-paths (let ((out (assoc-ref outputs "out")))
(lambda* (#:key outputs native-inputs #:allow-other-keys) (substitute* (find-files "." "^(Makefile|Makefile\\.in|configure)$")
(substitute* "Makefile.in" (("^(\\s*)cups_conf_serverbin(\\s*)=(.+)$")
(("/usr/bin/time") "time")) (string-append "cups_conf_serverbin=" out "/lib/cups\n"))
(let ((out (assoc-ref outputs "out"))) (("^(\\s*)cups_conf_serverroot(\\s*)=(.+)$")
(substitute* (find-files "." "^(Makefile|Makefile\\.in|configure)$") (string-append "cups_conf_serverroot=" out "/etc/cups\n"))
(("^(\\s*)cups_conf_serverbin(\\s*)=(.+)$") (("^(\\s*)cups_conf_datadir(\\s*)=(.+)$")
(string-append "cups_conf_serverbin=" out "/lib/cups\n")) (string-append "cups_conf_datadir=" out "/share/cups\n")))
(("^(\\s*)cups_conf_serverroot(\\s*)=(.+)$") (substitute* "src/cups/Makefile.in"
(string-append "cups_conf_serverroot=" out "/etc/cups\n")) (("^(\\s*)bindir(\\s*)=(.+)$")
(("^(\\s*)cups_conf_datadir(\\s*)=(.+)$") (string-append "bindir = " out "/bin\n"))
(string-append "cups_conf_datadir=" out "/share/cups\n"))) (("^(\\s*)sbindir(\\s*)=(.+)$")
(substitute* "src/cups/Makefile.in" (string-append "sbindir = " out "/sbin\n")))
(("^(\\s*)bindir(\\s*)=(.+)$") #t))))))
(string-append "bindir = " out "/bin\n")) (native-inputs
(("^(\\s*)sbindir(\\s*)=(.+)$") (list perl
(string-append "sbindir = " out "/sbin\n"))) time))
#t)))))) (inputs
(native-inputs (list cups-minimal))
(list perl (synopsis "Printer drivers for CUPS")
time)) (description "This package provides printer drivers for CUPS.
(inputs This project also maintains an enhanced Print plug-in for GIMP 2.x from
(list cups-minimal)) the same code base. This driver supports widespread inkjet printers by major vendors,
(synopsis "Printer drivers for CUPS") including Canon, Epson, Fujitsu, SONY, @dots{}")
(description "This package provides printer drivers for CUPS. (home-page "http://gimp-print.sourceforge.net/")
This project also maintains an enhanced Print plug-in for GIMP 2.x from (license license:gpl2+)))
the same code base. This driver supports widespread inkjet printers by major vendors,
including Canon, Epson, Fujitsu, SONY, @dots{}")
(home-page "http://gimp-print.sourceforge.net/")
(license license:gpl2+)))

29
glicid/packages/databases.scm
View file

@ -29,22 +29,21 @@
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)
,@(package-inputs gnu:postgresql-15))))) ,@(package-inputs gnu:postgresql-15)))))
; not yet public as the checks fails on jsonb_jsonpath
(define postgresql-17 (define postgresql-17
(package (package
(inherit postgresql-16) (inherit postgresql-16)
(name "postgresql") (name "postgresql")
(version "17.0") (version "17.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://ftp.postgresql.org/pub/source/v" version "/postgresql-" version ".tar.bz2")) (uri (string-append "https://ftp.postgresql.org/pub/source/v" version "/postgresql-" version ".tar.bz2"))
(sha256 (base32 "1ph9j60nxwcslpdji4q0snc3932bn8xrpbfvi0jvdmpxq0qn29vy")))) (sha256 (base32 "1ph9j60nxwcslpdji4q0snc3932bn8xrpbfvi0jvdmpxq0qn29vy"))))
(inputs `(("icu4c" ,icu4c) (inputs `(("icu4c" ,icu4c)
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)
("bison" ,bison) ("bison" ,bison)
("flex" ,flex) ("flex" ,flex)
("json-c" ,json-c) ("json-c" ,json-c)
,@(package-inputs postgresql-16))))) ,@(package-inputs postgresql-16)))))
(define-public timescaledb (define-public timescaledb
(package (package

101
glicid/packages/dns.scm
View file

@ -36,8 +36,7 @@
(arguments (arguments
`( `(
#:configure-flags #:configure-flags
(list "--with-sysroot=/" (list "--with-sysroot=/" (string-append "--with-pkcs11=" (assoc-ref %build-inputs "p11-kit")))
(string-append "--with-pkcs11=" (assoc-ref %build-inputs "p11-kit")))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'strip 'move-to-utils (add-after 'strip 'move-to-utils
@ -64,52 +63,52 @@
(define-public rust-hickory-dns-0.24 (define-public rust-hickory-dns-0.24
(package (package
(name "rust-hickory-dns") (name "rust-hickory-dns")
(version "0.24.0") (version "0.24.0")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (crate-uri "hickory-dns" version)) (uri (crate-uri "hickory-dns" version))
(file-name (string-append name "-" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz"))
(sha256 (sha256
(base32 "0lxa0yz7fng4gjbgqcjxfbfsw62lwamgfhzzf44cimi0vmk092yb")))) (base32 "0lxa0yz7fng4gjbgqcjxfbfsw62lwamgfhzzf44cimi0vmk092yb"))))
(build-system cargo-build-system) (build-system cargo-build-system)
(arguments (arguments
`(#:tests? #f ;Error: No such file or directory (os error 2) `(#:tests? #f ;Error: No such file or directory (os error 2)
#:cargo-inputs (("rust-clap" ,rust-clap-4) #:cargo-inputs (("rust-clap" ,rust-clap-4)
("rust-futures-util" ,rust-futures-util-0.3) ("rust-futures-util" ,rust-futures-util-0.3)
("rust-hickory-client" ,rust-hickory-client-0.24) ("rust-hickory-client" ,rust-hickory-client-0.24)
("rust-hickory-proto" ,rust-hickory-proto-0.24) ("rust-hickory-proto" ,rust-hickory-proto-0.24)
("rust-hickory-server" ,rust-hickory-server-0.24) ("rust-hickory-server" ,rust-hickory-server-0.24)
("rust-rustls" ,rust-rustls-0.21) ("rust-rustls" ,rust-rustls-0.21)
("rust-time" ,rust-time-0.3) ("rust-time" ,rust-time-0.3)
("rust-tokio" ,rust-tokio-1) ("rust-tokio" ,rust-tokio-1)
("rust-tracing" ,rust-tracing-0.1) ("rust-tracing" ,rust-tracing-0.1)
("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3)) ("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3))
#:features (list "dns-over-https-rustls") ; YD #:features (list "dns-over-https-rustls") ; YD
#:cargo-development-inputs (("rust-hickory-proto" ,rust-hickory-proto-0.24) #:cargo-development-inputs (("rust-hickory-proto" ,rust-hickory-proto-0.24)
("rust-hickory-resolver" ,rust-hickory-resolver-0.24) ("rust-hickory-resolver" ,rust-hickory-resolver-0.24)
("rust-native-tls" ,rust-native-tls-0.2) ("rust-native-tls" ,rust-native-tls-0.2)
("rust-regex" ,rust-regex-1) ("rust-regex" ,rust-regex-1)
("rust-webpki-roots" ,rust-webpki-roots-0.25)))) ("rust-webpki-roots" ,rust-webpki-roots-0.25))))
(inputs (list openssl-3.0)) ;; shouldn't be necessary (inputs (list openssl-3.0)) ;; shouldn't be necessary
(home-page "https://hickory-dns.org/") (home-page "https://hickory-dns.org/")
(synopsis (synopsis
"Hickory DNS is a safe and secure DNS server with DNSSEC support. "Hickory DNS is a safe and secure DNS server with DNSSEC support.
Eventually this could be a replacement for BIND9. The DNSSEC support allows Eventually this could be a replacement for BIND9. The DNSSEC support allows
for live signing of all records, in it does not currently support for live signing of all records, in it does not currently support
records signed offline. The server supports dynamic DNS with SIG0 authenticated records signed offline. The server supports dynamic DNS with SIG0 authenticated
requests. Hickory DNS is based on the Tokio and Futures libraries, which means requests. Hickory DNS is based on the Tokio and Futures libraries, which means
it should be easily integrated into other software that also use those it should be easily integrated into other software that also use those
libraries. libraries.
") ")
(description (description
"Hickory DNS is a safe and secure DNS server with DNSSEC support. Eventually "Hickory DNS is a safe and secure DNS server with DNSSEC support. Eventually
this could be a replacement for BIND9. The DNSSEC support allows for live this could be a replacement for BIND9. The DNSSEC support allows for live
signing of all records, in it does not currently support records signed offline. signing of all records, in it does not currently support records signed offline.
The server supports dynamic DNS with SIG0 authenticated requests. Hickory DNS The server supports dynamic DNS with SIG0 authenticated requests. Hickory DNS
is based on the Tokio and Futures libraries, which means it should be easily is based on the Tokio and Futures libraries, which means it should be easily
integrated into other software that also use those libraries.") integrated into other software that also use those libraries.")
(license (list license:expat license:asl2.0) (license (list license:expat license:asl2.0)
))) )))

11
glicid/packages/fabric-management.scm
View file

@ -1,11 +0,0 @@
(define-module (glicid packages fabric-management)
#:use-module (guix download)
#:use-module (guix packages)
#:use-module ((gnu packages fabric-management)
#:prefix gnu:)
#:use-module (glicid packages linux)
#:use-module (glicid utils)
)
;; obsolete packages deleted

168
glicid/packages/file-systems.scm
View file

@ -1,99 +1,75 @@
(define-module (glicid packages file-systems) (define-module (glicid packages file-systems)
#:use-module ((guix licenses) #:use-module ((guix licenses) #:prefix license:)
#:prefix license:) #:use-module (guix packages)
#:use-module (guix packages) #:use-module (guix download)
#:use-module (guix download) #:use-module (guix git-download)
#:use-module (guix git-download) #:use-module (guix utils)
#:use-module (guix utils) #:use-module (guix build-system gnu)
#:use-module (guix build-system gnu) #:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages linux)
#:use-module (gnu packages linux) #:use-module (gnu packages onc-rpc)
#:use-module (gnu packages onc-rpc) #:use-module (gnu packages xml)
#:use-module (gnu packages xml) #:use-module (gnu packages kerberos)
#:use-module (gnu packages kerberos) #:use-module (gnu packages nfs)
#:use-module (gnu packages nfs) #:use-module (gnu packages openldap)
#:use-module (gnu packages openldap) #:use-module (gnu packages tls)
#:use-module (gnu packages tls) #:use-module (gnu packages bison)
#:use-module (gnu packages bison) #:use-module (gnu packages flex)
#:use-module (gnu packages flex) #:use-module (gnu packages flex)
#:use-module (gnu packages flex) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages pkg-config) )
)
(define-public autofs-glicid (define-public autofs-glicid
(package (package
(name "autofs-glicid") (name "autofs-glicid")
(version "5.1.8") (version "5.1.8")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://kernel.org/linux/daemons/autofs/" (uri (string-append "mirror://kernel.org/linux/daemons/autofs/" "v" (version-major version) "/" "autofs-" version ".tar.xz"))
"v" (sha256 (base32 "1zf0fgf6kr9amxq5amlgsp1v13sizwl3wvx2xl7b4r2nhmci0gdk"))))
(version-major version) (build-system gnu-build-system)
"/" (arguments
"autofs-" `(#:configure-flags (list "--enable-ignore-busy"
version "--enable-sloppy-mount"
".tar.xz")) "--with-libtirpc"
(sha256 (string-append "--with-openldap=" (assoc-ref %build-inputs "openldap"))
(base32 (string-append "--with-sasl=" (assoc-ref %build-inputs "cyrus-sasl"))
"1zf0fgf6kr9amxq5amlgsp1v13sizwl3wvx2xl7b4r2nhmci0gdk")))) )
(build-system gnu-build-system) #:tests? #f
(arguments #:phases (modify-phases %standard-phases
`(#:configure-flags (list "--enable-ignore-busy" ;during shutdown (add-before 'configure 'fix-hard-coded-search-path
"--enable-sloppy-mount" ;support mount(8) -s (lambda _
"--with-libtirpc" (substitute* "configure"
(string-append "--with-openldap=" (("^searchpath=\".*\"")
(assoc-ref %build-inputs "searchpath=\"$PATH\""))))
"openldap")) (add-before 'configure 'fix-rpath
(string-append "--with-sasl=" (lambda* (#:key outputs #:allow-other-keys)
(assoc-ref %build-inputs (let ((out (assoc-ref outputs "out")))
"cyrus-sasl")) (substitute* "Makefile.rules"
;; "HAVE_SSS_AUTOFS=1" ; required to make sssldir click (("^AUTOFS_LIB_LINK.*=" match)
;; (string-append "sssldir=" (string-append match " -Wl,-rpath=" out "/lib"))))))
;; (assoc-ref %build-inputs "sssd") (add-before 'install 'omit-obsolete-lookup_nis.so-link
;; "/lib/sssd/modules") (lambda _
) (substitute* "modules/Makefile"
#:tests? #f ;no test suite (("ln -fs lookup_yp.so" match)
#:phases (modify-phases %standard-phases (string-append "# " match))))))))
(add-before 'configure 'fix-hard-coded-search-path (native-inputs (list bison flex pkg-config rpcsvc-proto))
(lambda _ (inputs (list cyrus-sasl
(substitute* "configure" e2fsprogs
(("^searchpath=\".*\"") libtirpc
"searchpath=\"$PATH\"")))) libxml2
(add-before 'configure 'fix-rpath mit-krb5
(lambda* (#:key outputs #:allow-other-keys) nfs-utils
(let ((out (assoc-ref outputs "out"))) openldap
(substitute* "Makefile.rules" openssl
(("^AUTOFS_LIB_LINK.*=" match) util-linux))
(string-append match " -Wl,-rpath=" out "/lib")))))) (home-page "https://www.kernel.org/pub/linux/daemons/autofs/")
(add-before 'install 'omit-obsolete-lookup_nis.so-link (synopsis "Kernel-based automounter for Linux")
;; Building lookup_yp.so depends on $(YPCLNT) but this doesn't, (description
;; leading to a make error. Since it's broken, comment it out. "Autofs is a kernel-based automounter for use with the Linux autofs4
(lambda _ module. It automatically mounts selected file systems when they are used and
(substitute* "modules/Makefile" unmounts them after a set period of inactivity. This provides
(("ln -fs lookup_yp.so" match) centrally-managed, consistent file names for users and applications, even in a
(string-append "# " match)))))))) large and/or frequently changing (network) environment.")
(native-inputs (list bison flex pkg-config rpcsvc-proto)) (license (list license:bsd-3
(inputs (list cyrus-sasl license:gpl2+))))
e2fsprogs ;for e[234]fsck
libtirpc
libxml2 ;needed for LDAP, SASL
mit-krb5 ;needed for LDAP, SASL
nfs-utils ;for mount.nfs
openldap
openssl ;needed for SASL
;; sssd
util-linux)) ;for mount, umount
;; XXX A directory index is the closest thing this has to a home page.
(home-page "https://www.kernel.org/pub/linux/daemons/autofs/")
(synopsis "Kernel-based automounter for Linux")
(description
"Autofs is a kernel-based automounter for use with the Linux autofs4
module. It automatically mounts selected file systems when they are used and
unmounts them after a set period of inactivity. This provides
centrally-managed, consistent file names for users and applications, even in a
large and/or frequently changing (network) environment.")
;; fedfs/ is GPL-2-only but not built.
(license (list license:bsd-3 ;modules/cyrus-sasl.c
license:gpl2+))))
; the rest

164
glicid/packages/gcc.scm
View file

@ -1,125 +1,93 @@
(define-module (glicid packages gcc) (define-module (glicid packages gcc)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (gnu packages commencement) ; for make-gcc-toolchain #:use-module (gnu packages commencement)
#:use-module (gnu packages gcc) ; for gcc-11 #:use-module (gnu packages gcc)
) )
;; beware : access to internal functions… this is probably not the right way to do it …
(define custom-gcc (define custom-gcc
(@@ (gnu packages gcc) custom-gcc)) (@@ (gnu packages gcc) custom-gcc))
(define %generic-search-paths (define %generic-search-paths
(@@ (gnu packages gcc) %generic-search-paths)) (@@ (gnu packages gcc) %generic-search-paths))
;; now define-public normally hiden versions
(define-public gfortran-12 (define-public gfortran-12
(hidden-package (custom-gcc gcc-12 "gfortran" (hidden-package (custom-gcc gcc-12 "gfortran" '("fortran") %generic-search-paths)))
'("fortran") %generic-search-paths)))
(define make-gcc-toolchain (define make-gcc-toolchain
(@@ (gnu packages commencement) make-gcc-toolchain )) ; discouraged, find better alternative (@@ (gnu packages commencement) make-gcc-toolchain ))
(define-public gfortran-toolchain-12 (define-public gfortran-toolchain-12
(package (package
(inherit (make-gcc-toolchain gfortran-12)) (inherit (make-gcc-toolchain gfortran-12))
(synopsis "Complete GCC tool chain for fortran lang development") (synopsis "Complete GCC tool chain for fortran lang development")
(description (description
"This package provides a complete GCC tool chain for "This package provides a complete GCC tool chain for
fortran lang development to be installed in user profiles. This includes fortran lang development to be installed in user profiles. This includes
fortran, as well as libc (headers and binaries, plus debugging symbols fortran, as well as libc (headers and binaries, plus debugging symbols
in the @code{debug} output), and binutils."))) in the @code{debug} output), and binutils.")))
(define-public gfortran-13 (define-public gfortran-13
(hidden-package (custom-gcc gcc-13 "gfortran" (hidden-package (custom-gcc gcc-13 "gfortran"
'("fortran") %generic-search-paths))) '("fortran") %generic-search-paths)))
(define-public gfortran-toolchain-13 (define-public gfortran-toolchain-13
(package (package
(inherit (make-gcc-toolchain gfortran-13)) (inherit (make-gcc-toolchain gfortran-13))
(synopsis "Complete GCC tool chain for fortran lang development") (synopsis "Complete GCC tool chain for fortran lang development")
(description (description
"This package provides a complete GCC tool chain for "This package provides a complete GCC tool chain for
fortran lang development to be installed in user profiles. This includes fortran lang development to be installed in user profiles. This includes
fortran, as well as libc (headers and binaries, plus debugging symbols fortran, as well as libc (headers and binaries, plus debugging symbols
in the @code{debug} output), and binutils."))) in the @code{debug} output), and binutils.")))
(define-public gfortran-14 (define-public gfortran-14
(hidden-package (custom-gcc gcc-14 "gfortran" (hidden-package (custom-gcc gcc-14 "gfortran"
'("fortran") %generic-search-paths))) '("fortran") %generic-search-paths)))
(define-public gfortran-toolchain-14 (define-public gfortran-toolchain-14
(package (package
(inherit (make-gcc-toolchain gfortran-14)) (inherit (make-gcc-toolchain gfortran-14))
(synopsis "Complete GCC tool chain for fortran lang development") (synopsis "Complete GCC tool chain for fortran lang development")
(description (description
"This package provides a complete GCC tool chain for "This package provides a complete GCC tool chain for
fortran lang development to be installed in user profiles. This includes fortran lang development to be installed in user profiles. This includes
fortran, as well as libc (headers and binaries, plus debugging symbols fortran, as well as libc (headers and binaries, plus debugging symbols
in the @code{debug} output), and binutils."))) in the @code{debug} output), and binutils.")))
(define-public gfortran-11 (define-public gfortran-11
(hidden-package (custom-gcc gcc-11 "gfortran" (hidden-package (custom-gcc gcc-11 "gfortran"
'("fortran") %generic-search-paths))) '("fortran") %generic-search-paths)))
(define-public gfortran-toolchain-11 (define-public gfortran-toolchain-11
(package (package
(inherit (make-gcc-toolchain gfortran-11)) (inherit (make-gcc-toolchain gfortran-11))
(synopsis "Complete GCC tool chain for fortran lang development") (synopsis "Complete GCC tool chain for fortran lang development")
(description (description
"This package provides a complete GCC tool chain for "This package provides a complete GCC tool chain for
fortran lang development to be installed in user profiles. This includes fortran lang development to be installed in user profiles. This includes
fortran, as well as libc (headers and binaries, plus debugging symbols fortran, as well as libc (headers and binaries, plus debugging symbols
in the @code{debug} output), and binutils."))) in the @code{debug} output), and binutils.")))
;; gfortran@10 and gfortran-toolchain@10 are defaults
;(define-public gfortran-10
; (hidden-package (custom-gcc gcc-10 "gfortran"
; '("fortran") %generic-search-paths)))
;(define-public gfortran-toolchain-10
; (package
; (inherit (make-gcc-toolchain gfortran-10))
; (synopsis "Complete GCC tool chain for fortran lang development")
; (description
; "This package provides a complete GCC tool chain for
; fortran lang development to be installed in user profiles. This includes
; fortran, as well as libc (headers and binaries, plus debugging symbols
; in the @code{debug} output), and binutils.")))
(define-public gfortran-9 (define-public gfortran-9
(hidden-package (custom-gcc gcc-9 "gfortran" (hidden-package (custom-gcc gcc-9 "gfortran"
'("fortran") %generic-search-paths))) '("fortran") %generic-search-paths)))
(define-public gfortran-toolchain-9 (define-public gfortran-toolchain-9
(package (package
(inherit (make-gcc-toolchain gfortran-9)) (inherit (make-gcc-toolchain gfortran-9))
(synopsis "Complete GCC tool chain for fortran lang development") (synopsis "Complete GCC tool chain for fortran lang development")
(description (description
"This package provides a complete GCC tool chain for "This package provides a complete GCC tool chain for
fortran lang development to be installed in user profiles. This includes fortran lang development to be installed in user profiles. This includes
fortran, as well as libc (headers and binaries, plus debugging symbols fortran, as well as libc (headers and binaries, plus debugging symbols
in the @code{debug} output), and binutils."))) in the @code{debug} output), and binutils.")))
(define-public gfortran-8 (define-public gfortran-8
(hidden-package (custom-gcc gcc-8 "gfortran" (hidden-package (custom-gcc gcc-8 "gfortran"
'("fortran") %generic-search-paths))) '("fortran") %generic-search-paths)))
(define-public gfortran-toolchain-8 (define-public gfortran-toolchain-8
(package (package
(inherit (make-gcc-toolchain gfortran-8)) (inherit (make-gcc-toolchain gfortran-8))
(synopsis "Complete GCC tool chain for fortran lang development") (synopsis "Complete GCC tool chain for fortran lang development")
(description (description
"This package provides a complete GCC tool chain for "This package provides a complete GCC tool chain for
fortran lang development to be installed in user profiles. This includes fortran lang development to be installed in user profiles. This includes
fortran, as well as libc (headers and binaries, plus debugging symbols fortran, as well as libc (headers and binaries, plus debugging symbols
in the @code{debug} output), and binutils."))) in the @code{debug} output), and binutils.")))

548
glicid/packages/glicid.scm
View file

@ -1,375 +1,207 @@
(define-module (glicid packages glicid) (define-module (glicid packages glicid)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix build-system gnu) #:use-module (guix build-system cmake)
#:use-module (guix build-system cmake) #:use-module (guix build-system gnu)
;; #:use-module (guix licenses) #:use-module (guix build-system python)
#:use-module (gnu packages gawk) #:use-module (guix build-system ruby)
#:use-module (gnu packages gcc) #:use-module (gnu packages autotools)
#:use-module (gnu packages commencement) #:use-module (gnu packages bison)
#:use-module (guix build-system python) #:use-module (gnu packages chemistry)
#:use-module ((guix licenses) #:use-module (gnu packages flex)
#:prefix license:) #:use-module (gnu packages fontutils)
#:use-module ((guix utils) #:use-module (gnu packages gcc)
#:select (target-64bit?)) #:use-module (gnu packages image)
#:use-module (gnu packages) #:use-module (gnu packages messaging)
#:use-module (gnu packages admin) #:use-module (gnu packages mpi)
#:use-module (gnu packages autotools) #:use-module (gnu packages networking)
#:use-module (gnu packages base) #:use-module (gnu packages perl)
#:use-module (gnu packages freeipmi) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages linux) #:use-module (gnu packages ruby)
#:use-module (gnu packages mpi) #:use-module (gnu packages sphinx)
#:use-module (gnu packages perl) #:use-module (gnu packages xorg)
#:use-module (gnu packages pkg-config) #:use-module ((guix licenses) #:prefix license:)
#: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-librdkafka-09 (define-public glicid-librdkafka-09
(package (package
(inherit librdkafka) (inherit librdkafka)
(name "glicid-librdkafka-09") (name "glicid-librdkafka-09")
(version "0.9.2") (version "0.9.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "https://github.com/edenhill/librdkafka/archive/v" version ".tar.gz"))
"https://github.com/edenhill/librdkafka/archive/v" version (sha256 (base32 "0938yn1msaq8xcj5z7b3jcdy6rslh9kxmvz01r8rdcgbarlvchy2"))))))
".tar.gz"))
(sha256
(base32
"0938yn1msaq8xcj5z7b3jcdy6rslh9kxmvz01r8rdcgbarlvchy2"))))))
(define-public glicid-x2go (define-public glicid-x2go
(package (package
(name "glicid-x2go") (name "glicid-x2go")
(version "4.1.0.3") (version "4.1.0.3")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "https://code.x2go.org/releases/source/x2goserver/x2goserver-" version ".tar.gz"))
"https://code.x2go.org/releases/source/x2goserver/x2goserver-" (sha256 (base32 "1l6wd708kbipib4ldprfiihqmj4895nifg0bkws4x97majislxk7"))))
version ".tar.gz")) (native-inputs `(("autoconf" ,autoconf)
(sha256 ("automake" ,automake)
(base32 ("libtool" ,libtool)))
"1l6wd708kbipib4ldprfiihqmj4895nifg0bkws4x97majislxk7")))) (inputs `(("perl" ,perl)))
(build-system gnu-build-system)
(native-inputs `(("autoconf" ,autoconf) (synopsis "X2go")
("automake" ,automake) (description "X2go")
("libtool" ,libtool))) (license license:gpl2+) ;not checked
(home-page "https://wiki.x2go.org")))
(inputs `(("perl" ,perl)))
(build-system gnu-build-system)
(synopsis "X2go")
(description "X2go")
(license license:gpl2+) ;not checked
(home-page "https://wiki.x2go.org")))
(define-public glicid-gromacs-openmpi (define-public glicid-gromacs-openmpi
(package (package
(inherit gromacs) (inherit gromacs)
(name "glicid-gromacs-openmpi") (name "glicid-gromacs-openmpi")
(inputs `(("openmpi" ,openmpi) (inputs `(("openmpi" ,openmpi)
;; ("openssh", openssh) ;; only for tests... disabled now ,@(package-inputs gromacs)))
,@(package-inputs gromacs))) (build-system cmake-build-system)
(build-system cmake-build-system) (arguments
`(#:configure-flags (list "-DGMX_DEVELOPER_BUILD=on"
(arguments "-DGMX_USE_LMFIT=EXTERNAL"
`(#:configure-flags (list "-DGMX_DEVELOPER_BUILD=on" ;Needed to run tests "-DGMX_BUILD_OWN_FFTW=off"
;; Unbundling "-DGMX_EXTERNAL_BLAS=on"
"-DGMX_USE_LMFIT=EXTERNAL" "-DGMX_EXTERNAL_LAPACK=on"
"-DGMX_BUILD_OWN_FFTW=off" "-DGMX_EXTERNAL_TNG=on"
"-DGMX_EXTERNAL_BLAS=on" "-DGMX_EXTERNAL_ZLIB=on"
"-DGMX_EXTERNAL_LAPACK=on" "-DGMX_EXTERNAL_TINYXML2=on"
"-DGMX_EXTERNAL_TNG=on" "-DGMX_MPI=on"
"-DGMX_EXTERNAL_ZLIB=on" "-DCMAKE_C_COMPILER=mpicc"
"-DGMX_EXTERNAL_TINYXML2=on" "-DCMAKE_CXX_COMPILER=mpicxx"
;; special glicid "-DGMX_DOUBLE=off"
"-DGMX_MPI=on" "-DGMX_OPENMP=on"
"-DCMAKE_C_COMPILER=mpicc" "-DGMX_SIMD=AVX2_256"
"-DCMAKE_CXX_COMPILER=mpicxx" (string-append "-DTinyXML2_DIR=" (assoc-ref %build-inputs "tinyxml2"))
"-DGMX_DOUBLE=off" (string-append "-DSPHINX_EXECUTABLE_VERSION="
"-DGMX_OPENMP=on" ,(package-version python-sphinx)))
"-DGMX_SIMD=AVX2_256" #:tests? #f
(string-append "-DTinyXML2_DIR=" #:phases (modify-phases %standard-phases
(assoc-ref %build-inputs (add-after 'unpack 'fixes
"tinyxml2")) (lambda* (#:key inputs #:allow-other-keys)
;; Workaround for cmake/FindSphinx.cmake version parsing that does (delete-file-recursively "src/external/lmfit")
;; not understand the guix-wrapped `sphinx-build --version' answer (delete-file-recursively "src/external/clFFT")
(string-append "-DSPHINX_EXECUTABLE_VERSION=" (delete-file-recursively "src/external/fftpack")
,(package-version python-sphinx))) (delete-file-recursively "src/external/build-fftw")
#:tests? #f (delete-file-recursively "src/external/tng_io")
#:phases (modify-phases %standard-phases (delete-file-recursively "src/external/tinyxml2")
(add-after 'unpack 'fixes (delete-file-recursively "src/external/googletest")
(lambda* (#:key inputs #:allow-other-keys) (copy-recursively (assoc-ref inputs "googletest-source") "src/external/googletest")
;; Still bundled: part of gromacs, source behind registration (substitute* "src/gromacs/hardware/tests/hardwaretopology.cpp"
;; but free software anyways (("TEST\\(HardwareTopologyTest, HwlocExecute\\)")
;; (delete-file-recursively "src/external/vmd_molfile") "void __guix_disabled()"))
;; Still bundled: threads-based OpenMPI-compatible fallback #t)))))))
;; designed to be bundled like that
;; (delete-file-recursively "src/external/thread_mpi")
;; Unbundling
(delete-file-recursively "src/external/lmfit")
(delete-file-recursively "src/external/clFFT")
(delete-file-recursively "src/external/fftpack")
(delete-file-recursively "src/external/build-fftw")
(delete-file-recursively "src/external/tng_io")
(delete-file-recursively "src/external/tinyxml2")
(delete-file-recursively "src/external/googletest")
(copy-recursively (assoc-ref inputs "googletest-source")
"src/external/googletest")
;; This test warns about the build host hardware, disable
(substitute* "src/gromacs/hardware/tests/hardwaretopology.cpp"
(("TEST\\(HardwareTopologyTest, HwlocExecute\\)")
"void __guix_disabled()"))
#t)))))
)
)
(define-public glicid-python-nbxmpp (define-public glicid-python-nbxmpp
(package (package
(inherit python-nbxmpp) (inherit python-nbxmpp)
(name "glicid-python-nbxmpp") (name "glicid-python-nbxmpp")
(version "1.0.2") (version "1.0.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "nbxmpp" version)) (uri (pypi-uri "nbxmpp" version))
(sha256 (sha256 (base32 "0vw5drr077w9ks4crnw6pwa4735ycyjdcm54knc3w4in4x5027wr")))) ))
(base32
"0vw5drr077w9ks4crnw6pwa4735ycyjdcm54knc3w4in4x5027wr"))))
))
; no more useful
;(define-public glicid-specific-hdf5
; (package
; (inherit hdf5-1.12)
; (name "glicid-specific-hdf5")
; ;; (arguments
; ;; `(#:tests? #f)
; ;; )
; (native-inputs `(("gcc" ,gcc-11)
; ("gfortran" ,gfortran-11)
; ,@(package-native-inputs hdf5-1.12)))))
(define-public glicid-motif (define-public glicid-motif
(package (package
(name "glicid-motif") (name "glicid-motif")
(version "2.3.8") (version "2.3.8")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
;; (uri (string-append "https://sourceforge.net/projects/motif/files/Motif%202.3.8%20Source%20Code/motif-2.3.8.tar.gz/download")) (uri (string-append "mirror://sourceforge/motif/Motif%202.3.8%20Source%20Code/motif-2.3.8.tar.gz"))
;; (uri (string-append "mirror://sourceforge/motif/files/Motif%202.3.8%20Source%20Code/motif-2.3.8.tar.gz")) (file-name (string-append name "-" version ".tar.gz"))
(uri (string-append (sha256 (base32 "1rxwkrhmj8sfg7dwmkhq885valwqbh26d79033q7vb7fcqv756w5"))))
"mirror://sourceforge/motif/Motif%202.3.8%20Source%20Code/motif-2.3.8.tar.gz")) (build-system gnu-build-system)
(file-name (string-append name "-" version ".tar.gz")) (arguments
`(#:make-flags
(sha256 (list (string-append "PREFIX=" %output)
(base32 (string-append "CPPFLAGS=-I" (assoc-ref %build-inputs "freetype") "/include/freetype2")
"1rxwkrhmj8sfg7dwmkhq885valwqbh26d79033q7vb7fcqv756w5")))) "V=1")))
(build-system gnu-build-system) (inputs `(("libxext" ,libxext)
("libx11" ,libx11)
(arguments ("freetype" ,freetype)
`(#:make-flags ("libxft" ,libxft)
;; #:make-flags ("xbitmaps" ,xbitmaps)
(list (string-append "PREFIX=" %output) ("pkg-config" ,pkg-config)
;; (string-append "CC=" ,(cc-for-target)) ("flex" ,flex)
;; Xft.h #includes <ft2build.h> without ‘freetype2/’. The Makefile ("bison" ,bison)
;; works around this by hard-coding /usr/include & $PREFIX. ("libxt" ,libxt)))
(string-append "CPPFLAGS=-I" (synopsis "Motif")
(assoc-ref %build-inputs "freetype") (description "Motif ")
"/include/freetype2") (home-page "https://sourceforge.net/untested")
"V=1"))) (license license:gpl2+)))
(inputs `(("libxext" ,libxext)
("libx11" ,libx11)
("freetype" ,freetype)
("libxft" ,libxft)
("xbitmaps" ,xbitmaps)
("pkg-config" ,pkg-config)
("flex" ,flex)
("bison" ,bison)
("libxt" ,libxt)))
(synopsis "Motif")
(description "Motif ")
(home-page "https://sourceforge.net/untested")
(license license:gpl2+) ;probably not !!!
))
(define-public glicid-xmgrace (define-public glicid-xmgrace
(package (package
(name "glicid-xmgrace") (name "glicid-xmgrace")
(version "5.1.25") (version "5.1.25")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url (url "https://oauth2:glpat-RsX2GjsD2WrzXubiJeou@gitlab.univ-nantes.fr/CCIPL/legacy_code_mirror/grace.git")
"https://oauth2:glpat-RsX2GjsD2WrzXubiJeou@gitlab.univ-nantes.fr/CCIPL/legacy_code_mirror/grace.git") (commit (string-append "v" version))))
(commit (string-append "v" version)))) (file-name (git-file-name name version))
(file-name (git-file-name name version)) (sha256 (base32 "1wb8v0q8xa2akas0swpgdgw1s66i50k7kh1g2f894hnk91fzx56z"))))
(sha256 (build-system gnu-build-system)
(base32 (arguments
"1wb8v0q8xa2akas0swpgdgw1s66i50k7kh1g2f894hnk91fzx56z")))) `(#:phases (modify-phases %standard-phases
(build-system gnu-build-system) (add-after 'configure 'patch-/bin/sh
(lambda _
(arguments (substitute* '("Make.conf")
`(#:phases (modify-phases %standard-phases (("/bin/sh")
(add-after 'configure 'patch-/bin/sh (which "bash"))))))))
(lambda _ (inputs `(("libx11" ,libx11)
(substitute* '("Make.conf") ("libxft" ,libxft)
(("/bin/sh") ("libxt" ,libxt)
(which "bash")))))))) ("libxpm" ,libxpm)
("libxext" ,libxext)
(inputs `(("libx11" ,libx11) ("autoconf" ,autoconf)
("libxft" ,libxft) ("glicid-motif" ,glicid-motif)
("libxt" ,libxt) ("fontconfig" ,fontconfig)
("libxpm" ,libxpm) ("gfortran" ,gfortran)
("libxext" ,libxext) ("libjpeg-turbo" ,libjpeg-turbo) ))
("autoconf" ,autoconf) (synopsis "Xmgrace")
("glicid-motif" ,glicid-motif) (description "xmgrace")
("fontconfig" ,fontconfig) (home-page "https://sourceforge.net/untested")
("gfortran" ,gfortran) (license license:gpl2+) ))
("libjpeg-turbo" ,libjpeg-turbo)
;; ("libxmhtml", libxmhtml)
))
(synopsis "Xmgrace")
(description "xmgrace")
(home-page "https://sourceforge.net/untested")
(license license:gpl2+) ; probably not
))
(use-modules (guix packages))
(use-modules (guix download))
(use-modules (gnu packages ruby))
(use-modules (guix build-system ruby))
;(use-modules (guix licenses))
(define-public ruby-asciidoctor-revealjs (define-public ruby-asciidoctor-revealjs
(package (package
(name "ruby-asciidoctor-revealjs") (name "ruby-asciidoctor-revealjs")
(version "4.1.0") (version "4.1.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (rubygems-uri "asciidoctor-revealjs" version)) (uri (rubygems-uri "asciidoctor-revealjs" version))
(sha256 (sha256
(base32 (base32
"03vmbcc3x059h17ry4qwk1p0yar9wgh87l2qssi307gy45cjw2mq")))) "03vmbcc3x059h17ry4qwk1p0yar9wgh87l2qssi307gy45cjw2mq"))))
(build-system ruby-build-system) (build-system ruby-build-system)
(arguments (arguments
'(#:tests? #f)) '(#:tests? #f))
(propagated-inputs `(("ruby-asciidoctor" ,ruby-asciidoctor) (propagated-inputs `(("ruby-asciidoctor" ,ruby-asciidoctor)
;; ("ruby-concurrent-ruby" ,ruby-concurrent-ruby) ("ruby-concurrent" ,ruby-concurrent)
("ruby-concurrent" ,ruby-concurrent) ("ruby-asciidoctor-kroki" ,ruby-asciidoctor-kroki)
("ruby-asciidoctor-kroki" ,ruby-asciidoctor-kroki) ("ruby-thread-safe" ,ruby-thread-safe)))
("ruby-thread-safe" ,ruby-thread-safe))) (synopsis "Converts AsciiDoc documents into HTML5 presentations designed to be executed by the reveal.js presentation framework.")
(synopsis (description "Converts AsciiDoc documents into HTML5 presentations designed to be executed by the reveal.js presentation framework.")
"Converts AsciiDoc documents into HTML5 presentations designed to be executed by the reveal.js presentation framework.") (home-page "https://github.com/asciidoctor/asciidoctor-reveal.js")
(description (license license:expat)))
"Converts AsciiDoc documents into HTML5 presentations designed to be executed by the reveal.js presentation framework.")
(home-page "https://github.com/asciidoctor/asciidoctor-reveal.js")
(license license:expat)))
(define-public ruby-asciidoctor-kroki (define-public ruby-asciidoctor-kroki
(package (package
(name "ruby-asciidoctor-kroki") (name "ruby-asciidoctor-kroki")
(version "0.4.0") (version "0.4.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (rubygems-uri "asciidoctor-kroki" version)) (uri (rubygems-uri "asciidoctor-kroki" version))
(sha256 (sha256 (base32 "13gx22xld4rbxxirnsxyrsajy9v666r8a4ngms71611af5afgk6w"))))
(base32 (build-system ruby-build-system)
"13gx22xld4rbxxirnsxyrsajy9v666r8a4ngms71611af5afgk6w")))) (arguments
(build-system ruby-build-system) '(#:tests? #f))
(arguments (propagated-inputs `(("ruby-asciidoctor" ,ruby-asciidoctor)))
'(#:tests? #f)) (synopsis "An extension for Asciidoctor to convert diagrams to images using https://kroki.io")
(propagated-inputs `(("ruby-asciidoctor" ,ruby-asciidoctor))) (description "An extension for Asciidoctor to convert diagrams to images using https://kroki.io")
(synopsis (home-page "https://github.com/Mogztter/asciidoctor-kroki")
"An extension for Asciidoctor to convert diagrams to images using https://kroki.io") (license license:expat)))
(description
"An extension for Asciidoctor to convert diagrams to images using https://kroki.io")
(home-page "https://github.com/Mogztter/asciidoctor-kroki")
(license license:expat)))
;; python-glances is now upstreamed as glances in python-xyz
;;; glicid.scm ends here

54
glicid/packages/gnome.scm
View file

@ -1,45 +1,15 @@
(define-module (glicid packages gnome) (define-module (glicid packages gnome)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (gnu packages sssd) #:use-module (gnu packages sssd)
#:use-module (gnu packages gnome) #:use-module (gnu packages gnome)
#:use-module (glicid utils) #:use-module (glicid utils)
#:use-module (glicid packages vpn)) #:use-module (glicid packages vpn))
(define-public glicid-terminator (define-public glicid-terminator
(package (package
(inherit terminator) (inherit terminator)
(name "glicid-terminator") (name "glicid-terminator")
(propagated-inputs `(("sssd" ,sssd) (propagated-inputs `(("sssd" ,sssd)
,@(package-propagated-inputs terminator))))) ,@(package-propagated-inputs terminator)))))
;; guix defined version is now on par or newer…
;(define-public network-manager-openconnect-upstream
; (package
; (inherit network-manager-openconnect)
; (name "network-manager-openconnect-upstream")
; (version "1.2.8")
;; (version "1.2.7")
; (source (origin
; (method url-fetch)
; (uri (string-append
; "mirror://gnome/sources/NetworkManager-openconnect/"
; (version-major+minor version)
; "/NetworkManager-openconnect-" version ".tar.xz"))
; (sha256
; (base32
; "1k6d6cv2c9v8gf0f2js6cklr3ijhaanbz0nhvlwy5n42bmwamvax"))))
; )
;)
;(define-public network-manager-openconnect-glicid
; (transform-package
; (
; (instead-of "openconnect" openconnect-upstream)
; network-manager-openconnect
; ) "glicid"
; )
;)

354
glicid/packages/golang.scm
View file

@ -6,194 +6,194 @@
#:use-module (guix packages)) #:use-module (guix packages))
(define-public go-github-com-fatih-color-1.9.0 (define-public go-github-com-fatih-color-1.9.0
(package (package
(name "go-github-com-fatih-color") (name "go-github-com-fatih-color")
(version "1.9.0") (version "1.9.0")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/fatih/color") (url "https://github.com/fatih/color")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"086z8ssmr1fn9ba4mqnw7pnccfpys6l5yfhvycv1gdrsk7n27mvs")))) "086z8ssmr1fn9ba4mqnw7pnccfpys6l5yfhvycv1gdrsk7n27mvs"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "github.com/fatih/color")) '(#:import-path "github.com/fatih/color"))
(propagated-inputs `(("go-github-com-mattn-go-isatty-0.0.11" ,go-github-com-mattn-go-isatty-0.0.11) (propagated-inputs `(("go-github-com-mattn-go-isatty-0.0.11" ,go-github-com-mattn-go-isatty-0.0.11)
("go-github-com-mattn-go-colorable-0.1.4" ,go-github-com-mattn-go-colorable-0.1.4))) ("go-github-com-mattn-go-colorable-0.1.4" ,go-github-com-mattn-go-colorable-0.1.4)))
(home-page "https://github.com/fatih/color") (home-page "https://github.com/fatih/color")
(synopsis "color") (synopsis "color")
(description (description
"Package color is an ANSI color package to output colorized or SGR defined output "Package color is an ANSI color package to output colorized or SGR defined output
to the standard output. The API can be used in several way, pick one that suits to the standard output. The API can be used in several way, pick one that suits
you.") you.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-pbnjay-memory-0.0.0-20190104145345-974d429e7ae4 (define-public go-github-com-pbnjay-memory-0.0.0-20190104145345-974d429e7ae4
(package (package
(name "go-github-com-pbnjay-memory") (name "go-github-com-pbnjay-memory")
(version "0.0.0-20190104145345-974d429e7ae4") (version "0.0.0-20190104145345-974d429e7ae4")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/pbnjay/memory") (url "https://github.com/pbnjay/memory")
(commit (go-version->git-ref version)))) (commit (go-version->git-ref version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0kazg5psdn90pqadrzma5chdwh0l2by9z31sspr47gx93fhjmkkq")))) "0kazg5psdn90pqadrzma5chdwh0l2by9z31sspr47gx93fhjmkkq"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "github.com/pbnjay/memory")) '(#:import-path "github.com/pbnjay/memory"))
(home-page "https://github.com/pbnjay/memory") (home-page "https://github.com/pbnjay/memory")
(synopsis "memory") (synopsis "memory")
(description (description
"Package memory provides a single method reporting total system memory accessible "Package memory provides a single method reporting total system memory accessible
to the kernel.") to the kernel.")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-golang-org-x-sys-0.0.0-20190222072716-a9d3bda3a223 (define-public go-golang-org-x-sys-0.0.0-20190222072716-a9d3bda3a223
(package (package
(name "go-golang-org-x-sys") (name "go-golang-org-x-sys")
(version "0.0.0-20190222072716-a9d3bda3a223") (version "0.0.0-20190222072716-a9d3bda3a223")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://go.googlesource.com/sys") (url "https://go.googlesource.com/sys")
(commit (go-version->git-ref version)))) (commit (go-version->git-ref version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1w45zc13xrjzl19s1sx74r5mg3lf2z2nm13wygcdq5r5pyjlhdz9")))) "1w45zc13xrjzl19s1sx74r5mg3lf2z2nm13wygcdq5r5pyjlhdz9"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "golang.org/x/sys")) '(#:import-path "golang.org/x/sys"))
(home-page "https://golang.org/x/sys") (home-page "https://golang.org/x/sys")
(synopsis "sys") (synopsis "sys")
(description (description
"This repository holds supplemental Go packages for low-level interactions with "This repository holds supplemental Go packages for low-level interactions with
the operating system.") the operating system.")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-github-com-mattn-go-isatty-0.0.8 (define-public go-github-com-mattn-go-isatty-0.0.8
(package (package
(name "go-github-com-mattn-go-isatty") (name "go-github-com-mattn-go-isatty")
(version "0.0.8") (version "0.0.8")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/mattn/go-isatty") (url "https://github.com/mattn/go-isatty")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0rqfh1rj6f5wm8p2ky7inm8g10152p7w6n2cli17kf9gad797i8h")))) "0rqfh1rj6f5wm8p2ky7inm8g10152p7w6n2cli17kf9gad797i8h"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "github.com/mattn/go-isatty")) '(#:import-path "github.com/mattn/go-isatty"))
(propagated-inputs `(("go-golang-org-x-sys-0.0.0-20190222072716-a9d3bda3a223" ,go-golang-org-x-sys-0.0.0-20190222072716-a9d3bda3a223))) (propagated-inputs `(("go-golang-org-x-sys-0.0.0-20190222072716-a9d3bda3a223" ,go-golang-org-x-sys-0.0.0-20190222072716-a9d3bda3a223)))
(home-page "https://github.com/mattn/go-isatty") (home-page "https://github.com/mattn/go-isatty")
(synopsis "go-isatty") (synopsis "go-isatty")
(description "Package isatty implements interface to isatty") (description "Package isatty implements interface to isatty")
(license license:expat))) (license license:expat)))
(define-public go-github-com-mattn-go-colorable-0.1.4 (define-public go-github-com-mattn-go-colorable-0.1.4
(package (package
(name "go-github-com-mattn-go-colorable") (name "go-github-com-mattn-go-colorable")
(version "0.1.4") (version "0.1.4")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/mattn/go-colorable") (url "https://github.com/mattn/go-colorable")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1yxcz08kminqr1221zxpibnbzfcgs3fafin0z9zqb3gqvf74jywz")))) "1yxcz08kminqr1221zxpibnbzfcgs3fafin0z9zqb3gqvf74jywz"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "github.com/mattn/go-colorable")) '(#:import-path "github.com/mattn/go-colorable"))
(propagated-inputs `(("go-github-com-mattn-go-isatty-0.0.8" ,go-github-com-mattn-go-isatty-0.0.8))) (propagated-inputs `(("go-github-com-mattn-go-isatty-0.0.8" ,go-github-com-mattn-go-isatty-0.0.8)))
(home-page "https://github.com/mattn/go-colorable") (home-page "https://github.com/mattn/go-colorable")
(synopsis "go-colorable") (synopsis "go-colorable")
(description "Colorable writer for windows.") (description "Colorable writer for windows.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-mattn-go-isatty-0.0.11 (define-public go-github-com-mattn-go-isatty-0.0.11
(package (package
(name "go-github-com-mattn-go-isatty") (name "go-github-com-mattn-go-isatty")
(version "0.0.11") (version "0.0.11")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/mattn/go-isatty") (url "https://github.com/mattn/go-isatty")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0h671sv7hfprja495kavazkalkx7xzaqksjh13brcnwq67ijrali")))) "0h671sv7hfprja495kavazkalkx7xzaqksjh13brcnwq67ijrali"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "github.com/mattn/go-isatty")) '(#:import-path "github.com/mattn/go-isatty"))
(propagated-inputs `(("go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037" ,go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037))) (propagated-inputs `(("go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037" ,go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037)))
(home-page "https://github.com/mattn/go-isatty") (home-page "https://github.com/mattn/go-isatty")
(synopsis "go-isatty") (synopsis "go-isatty")
(description "Package isatty implements interface to isatty") (description "Package isatty implements interface to isatty")
(license license:expat))) (license license:expat)))
(define-public go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037 (define-public go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037
(package (package
(name "go-golang-org-x-sys") (name "go-golang-org-x-sys")
(version "0.0.0-20191026070338-33540a1f6037") (version "0.0.0-20191026070338-33540a1f6037")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://go.googlesource.com/sys") (url "https://go.googlesource.com/sys")
(commit (go-version->git-ref version)))) (commit (go-version->git-ref version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0fjcv0vzvi6za0b4xmnk3932pr9f9gczzf03y0kgq3ry9rqg169y")))) "0fjcv0vzvi6za0b4xmnk3932pr9f9gczzf03y0kgq3ry9rqg169y"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "golang.org/x/sys")) '(#:import-path "golang.org/x/sys"))
(home-page "https://golang.org/x/sys") (home-page "https://golang.org/x/sys")
(synopsis "sys") (synopsis "sys")
(description (description
"This repository holds supplemental Go packages for low-level interactions with "This repository holds supplemental Go packages for low-level interactions with
the operating system.") the operating system.")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-github-com-timescale-timescaledb-tune-0.14.3 (define-public go-github-com-timescale-timescaledb-tune-0.14.3
(package (package
(name "go-github-com-timescale-timescaledb-tune") (name "go-github-com-timescale-timescaledb-tune")
(version "0.14.3") (version "0.14.3")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/timescale/timescaledb-tune") (url "https://github.com/timescale/timescaledb-tune")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"02miqianhfw1qysyig2apdw6wgc72izbjwaqzm7jhfcnnw1vq21i")))) "02miqianhfw1qysyig2apdw6wgc72izbjwaqzm7jhfcnnw1vq21i"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
'(#:import-path "github.com/timescale/timescaledb-tune")) '(#:import-path "github.com/timescale/timescaledb-tune"))
(propagated-inputs `(("go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037" ,go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037) (propagated-inputs `(("go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037" ,go-golang-org-x-sys-0.0.0-20191026070338-33540a1f6037)
("go-github-com-mattn-go-isatty-0.0.11" ,go-github-com-mattn-go-isatty-0.0.11) ("go-github-com-mattn-go-isatty-0.0.11" ,go-github-com-mattn-go-isatty-0.0.11)
("go-github-com-mattn-go-colorable-0.1.4" ,go-github-com-mattn-go-colorable-0.1.4) ("go-github-com-mattn-go-colorable-0.1.4" ,go-github-com-mattn-go-colorable-0.1.4)
("go-github-com-pbnjay-memory-0.0.0-20190104145345-974d429e7ae4" ,go-github-com-pbnjay-memory-0.0.0-20190104145345-974d429e7ae4) ("go-github-com-pbnjay-memory-0.0.0-20190104145345-974d429e7ae4" ,go-github-com-pbnjay-memory-0.0.0-20190104145345-974d429e7ae4)
("go-github-com-fatih-color-1.9.0" ,go-github-com-fatih-color-1.9.0))) ("go-github-com-fatih-color-1.9.0" ,go-github-com-fatih-color-1.9.0)))
(home-page "https://github.com/timescale/timescaledb-tune") (home-page "https://github.com/timescale/timescaledb-tune")
(synopsis "timescaledb-tune") (synopsis "timescaledb-tune")
(description (description
"@@code{timescaledb-tune} is a program for tuning a "@@code{timescaledb-tune} is a program for tuning a
@@url{https://github.com/timescale/timescaledb-tune/blob/v0.14.3/timescale/timescaledb,TimescaleDB} @@url{https://github.com/timescale/timescaledb-tune/blob/v0.14.3/timescale/timescaledb,TimescaleDB}
database to perform its best based on the host's resources such as memory and database to perform its best based on the host's resources such as memory and
number of CPUs. It parses the existing @@code{postgresql.conf} file to ensure number of CPUs. It parses the existing @@code{postgresql.conf} file to ensure
that the TimescaleDB extension is appropriately installed and provides that the TimescaleDB extension is appropriately installed and provides
recommendations for memory, parallelism, WAL, and other settings.") recommendations for memory, parallelism, WAL, and other settings.")
(license license:asl2.0))) (license license:asl2.0)))

49
glicid/packages/jupyter.scm
View file

@ -1,49 +0,0 @@
(define-module (glicid packages jupyter)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix packages)
#:use-module (guix build-system python)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages check)
#:use-module (gnu packages python-xyz)
; #:use-module ((guix-science packages jupyter) #:prefix gs:)
)
;(define-public python-jupyterhub
; (package
; (inherit gs:python-jupyterhub)
; (name "python-jupyterhub")
; (version "4.0.0")
; (source (origin
; (method url-fetch)
; (uri (pypi-uri "jupyterhub" version))
; (sha256 (base32 "0rx82hmwi6m2c7q8mw8a7r45j8245schln5vq1q2nzcswjb2karc"))))))
;(define-public python-batchspawner
; (package
; (name "python-batchspawner")
; (version "1.2.0")
; (source (origin
; (method url-fetch)
; (uri (pypi-uri "batchspawner" version))
; (sha256 (base32 "089f18s79kb2983wy4vb3vcwynmw7pzxmv0jwfhjgxd3yfs4p4mi"))))
; (build-system python-build-system)
; (propagated-inputs (list python-async-generator python-jinja2 python-jupyterhub python-pytest))
; (home-page "http://jupyter.org")
; (synopsis "Batchspawner: A spawner for Jupyterhub to spawn notebooks using batch resource managers.")
; (description "Batchspawner: A spawner for Jupyterhub to spawn notebooks using batch resource managers.")
; (license license:bsd-3)))
;(define-public python-batchspawner-git
; (package
; (inherit python-batchspawner)
; (name "python-batchspawner")
; (version "d5f9a0b")
; (source
; (origin
; (method git-fetch)
; (uri (git-reference
; (url "https://github.com/jupyterhub/batchspawner")
; (commit version)))
; (sha256 (base32 "03z1ww5qlwjn3xs3lf9b78yrqq7kd6rd5bh2kn377md391hz09f7"))))))

26
glicid/packages/linux.scm
View file

@ -1,26 +0,0 @@
(define-module (glicid packages linux)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix utils)
#:use-module (guix git-download)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system gnu)
#:use-module (guix build-system go)
#:use-module (gnu packages)
#: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 linux)
#:use-module (gnu system uuid)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages autotools)
#:use-module (gnu packages python)
#:use-module (gnu packages tls)
#:use-module (glicid packages golang)
#:use-module (glicid utils))
;; lots of obsolete packages deleted

390
glicid/packages/maths.scm
View file

@ -1,296 +1,140 @@
(define-module (glicid packages maths) (define-module (glicid packages maths)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix utils) #:use-module (glicid utils)
#:use-module ((gnu packages maths) #:prefix gnu:) #:use-module (guix utils)
#:use-module (gnu packages commencement) #:use-module (guix gexp)
#:use-module (gnu packages mpi) #:use-module ((gnu packages maths) #:prefix gnu:)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (gnu packages) #:use-module (guix build-system cmake)
#:use-module (gnu packages compression) #:use-module (gnu packages commencement)
#:use-module (guix build-system cmake) #:use-module (gnu packages compression)
#:use-module ((guix licenses) #:prefix license:) #:use-module (gnu packages mpi)
#:use-module (glicid utils) #:use-module ((guix licenses) #:prefix license:)
#:use-module (ice-9 regex) )
#:use-module (ice-9 match)
#:use-module (guix gexp)
#:use-module ((guix build utils) #:select (alist-replace))
#:use-module (guix build-system ant)
#:use-module (guix build-system copy)
#:use-module (guix build-system dune)
#:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system gnu)
#:use-module (guix build-system meson)
#:use-module (guix build-system ocaml)
#:use-module (guix build-system perl)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system python)
#:use-module (guix build-system ruby)
#:use-module (gnu packages algebra)
#:use-module (gnu packages audio)
#:use-module (gnu packages autotools)
#:use-module (gnu packages backup)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
#:use-module (gnu packages bison)
#:use-module (gnu packages boost)
#:use-module (gnu packages calendar)
#:use-module (gnu packages check)
#:use-module (gnu packages cmake)
#:use-module (gnu packages coq)
#:use-module (gnu packages curl)
#:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages cpp)
#:use-module (gnu packages datamash)
#:use-module (gnu packages dbm)
#:use-module (gnu packages documentation)
#:use-module (gnu packages elf)
#:use-module (gnu packages emacs)
#:use-module (gnu packages file)
#:use-module (gnu packages flex)
#:use-module (gnu packages fltk)
#:use-module (gnu packages fontutils)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages gettext)
#:use-module (gnu packages gcc)
#:use-module (gnu packages gd)
#:use-module (gnu packages ghostscript)
#:use-module (gnu packages glib)
#:use-module (gnu packages gperf)
#:use-module (gnu packages graphviz)
#:use-module (gnu packages groff)
#:use-module (gnu packages gtk)
#:use-module (gnu packages icu4c)
#:use-module (gnu packages image)
#:use-module (gnu packages image-processing)
#:use-module (gnu packages java)
#:use-module (gnu packages less)
#:use-module (gnu packages lisp)
#:use-module (gnu packages linux)
#:use-module (gnu packages llvm)
#:use-module (gnu packages logging)
#:use-module (gnu packages lua)
#:use-module (gnu packages gnome)
#:use-module (gnu packages guile)
#:use-module (gnu packages xorg)
#:use-module (gnu packages gl)
#:use-module (gnu packages imagemagick)
#:use-module (gnu packages m4)
#:use-module (gnu packages mpi)
#:use-module (gnu packages multiprecision)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages netpbm)
#:use-module (gnu packages ocaml)
#:use-module (gnu packages onc-rpc)
#:use-module (gnu packages parallel)
#:use-module (gnu packages pcre)
#:use-module (gnu packages popt)
#:use-module (gnu packages perl)
#:use-module (gnu packages prolog)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages pulseaudio)
#:use-module (gnu packages python)
#:use-module (gnu packages python-build)
#:use-module (gnu packages python-science)
#:use-module (gnu packages python-web)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt)
#:use-module (gnu packages readline)
#:use-module (gnu packages ruby)
#:use-module (gnu packages tbb)
#:use-module (gnu packages scheme)
#:use-module (gnu packages serialization)
#:use-module (gnu packages shells)
#:use-module (gnu packages simulation)
#:use-module (gnu packages sphinx)
#:use-module (gnu packages sqlite)
#:use-module (gnu packages swig)
#:use-module (gnu packages tcl)
#:use-module (gnu packages texinfo)
#:use-module (gnu packages tex)
#:use-module (gnu packages time)
#:use-module (gnu packages tls)
#:use-module (gnu packages version-control)
#:use-module (gnu packages wxwidgets)
#:use-module (gnu packages xdisorg)
#:use-module (gnu packages xml)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26))
(define-public scalapack-upstream
(package
(inherit gnu:scalapack)
(name "scalapack-upstream")
(version "2.1.0-new-upstream")
(source (origin
(method git-fetch)
(uri (git-reference
(url
"https://oauth2:glpat-RsX2GjsD2WrzXubiJeou@gitlab.univ-nantes.fr/CCIPL/legacy_code_mirror/scalapack.git")
(commit "myv2.0.2")))
(file-name "scalapack-univ-myv2")
;; (patches (search-patches "scalapack-blacs-mpi-deprecations.patch"))
(sha256
(base32
"1ccic46psf2hl9wsyflvkn5rxg8k17q578m9mzimvm9brbggf0na"))))
(arguments
`(#:configure-flags `("-DBUILD_SHARED_LIBS:BOOL=YES")
#:phases (modify-phases %standard-phases
(add-before 'check 'mpi-setup
,%openmpi-setup))))))
(define local:scalapack (define-public scalapack-upstream
scalapack-upstream) (package
(define-public scalapack-latest (inherit gnu:scalapack)
(latest-version local:scalapack gnu:scalapack)) (name "scalapack-upstream")
(version "2.1.0-new-upstream")
(source (origin
(method git-fetch)
(uri (git-reference
(url
"https://oauth2:glpat-RsX2GjsD2WrzXubiJeou@gitlab.univ-nantes.fr/CCIPL/legacy_code_mirror/scalapack.git")
(commit "myv2.0.2")))
(file-name "scalapack-univ-myv2")
(sha256 (base32 "1ccic46psf2hl9wsyflvkn5rxg8k17q578m9mzimvm9brbggf0na"))))
(arguments
`(#:configure-flags `("-DBUILD_SHARED_LIBS:BOOL=YES")
#:phases (modify-phases %standard-phases
(add-before 'check 'mpi-setup
,%openmpi-setup))))))
(define local:scalapack scalapack-upstream)
(define-public scalapack-latest (latest-version local:scalapack gnu:scalapack))
(define-public openblas-upstream-0.3.15 (define-public openblas-upstream-0.3.15
(package (package
(inherit gnu:openblas) (inherit gnu:openblas)
(name "openblas-upstream") (name "openblas-upstream")
(version "0.3.15") (version "0.3.15")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "https://github.com/xianyi/OpenBLAS/releases/download/v" version "/OpenBLAS-" version ".tar.gz"))
"https://github.com/xianyi/OpenBLAS/releases/download/v" (sha256 (base32 "1gjbkrsh6n28hdp2ciyjigc8vg764d2r0jbzl63v753mjzn9va9h"))))))
version "/OpenBLAS-" version ".tar.gz"))
(sha256
(base32
"1gjbkrsh6n28hdp2ciyjigc8vg764d2r0jbzl63v753mjzn9va9h"))))))
(define-public hdf5-glicid (define-public hdf5-glicid
(package (package
(inherit gnu:hdf5-parallel-openmpi) (inherit gnu:hdf5-parallel-openmpi)
(name "hdf5-glicid") (name "hdf5-glicid")
(inputs (modify-inputs (package-inputs gnu:hdf5-parallel-openmpi) (inputs (modify-inputs (package-inputs gnu:hdf5-parallel-openmpi)
(prepend gfortran-toolchain))))) (prepend gfortran-toolchain)))))
(define local:openblas (define local:openblas openblas-upstream-0.3.15)
openblas-upstream-0.3.15) (define-public scalapack-latest (latest-version local:openblas gnu:openblas))
(define-public scalapack-latest
(latest-version local:openblas gnu:openblas))
(use-modules (guix packages))
(use-modules (guix download))
(use-modules (gnu packages linux))
(use-modules (gnu packages gcc))
(use-modules (gnu packages compression))
;(use-modules (gnu packages glicid))
(use-modules (guix git-download))
(use-modules (guix build-system cmake))
(use-modules ((guix licenses)
#:prefix license:))
(define-public libsolv-upstream (define-public libsolv-upstream
(package (package
(name "libsolv") (name "libsolv")
(version "0.7.23") (version "0.7.23")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/openSUSE/libsolv.git") (url "https://github.com/openSUSE/libsolv.git")
(commit version))) (commit version)))
(file-name (string-append name "-" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz"))
(sha256 (sha256 (base32 "12z63kcna9swh3vzxk3sac0l4by5z8q22wip9cyq5b7wp9m3hn4b"))))
(base32 "12z63kcna9swh3vzxk3sac0l4by5z8q22wip9cyq5b7wp9m3hn4b")))) (build-system cmake-build-system)
(inputs (list zlib))
(home-page "https://github.com/openSUSE/libsolv")
(build-system cmake-build-system) (synopsis "libsolv, a free package dependency solver using a satisfiability algorithm.")
(inputs (list zlib)) (description "libsolv, a free package dependency solver using a satisfiability algorithm.")
(home-page "https://github.com/openSUSE/libsolv") (license license:bsd-3)) )
(synopsis "libsolv, a free package dependency solver using a satisfiability algorithm.")
(description "libsolv, a free package dependency solver using a satisfiability algorithm.")
(license license:bsd-3))
)
(define-public glicid-dealii (define-public glicid-dealii
(package (package
(inherit gnu:dealii) (inherit gnu:dealii)
(version "9.6.0") (version "9.6.0")
(name "glicid-dealii") (name "glicid-dealii")
(arguments (arguments
(list #:build-type "Release" ; Only Debug, Release or DebugRelease. (list #:build-type "Release"
;; The tests take too long and must be explicitly enabled with #:tests? #f
;; "make setup_tests". #:configure-flags
;; See https://www.dealii.org/developer/developers/testsuite.html. #~(let ((doc (string-append #$output:doc "/share/doc/"
;; (They can also be run for an already installed deal.II.) #$name "-" #$version)))
#:tests? #f (list "-DDEAL_II_COMPONENT_DOCUMENTATION=OFF"
#:configure-flags (string-append "-DCMAKE_CXX_FLAGS='-march=znver3'")
#~(let ((doc (string-append #$output:doc "/share/doc/" (string-append "-DDEAL_II_DOCREADME_RELDIR=" doc)
#$name "-" #$version))) (string-append "-DDEAL_II_DOCHTML_RELDIR=" doc "/html")
(list "-DDEAL_II_COMPONENT_DOCUMENTATION=OFF" "-DDEAL_II_COMPILE_EXAMPLES=OFF"
(string-append "-DCMAKE_CXX_FLAGS='-march=znver3'") (string-append "-DDEAL_II_EXAMPLES_RELDIR=" doc
(string-append "-DDEAL_II_DOCREADME_RELDIR=" doc) "/examples")))
(string-append "-DDEAL_II_DOCHTML_RELDIR=" doc "/html") #:phases
;; Don't compile the examples because the source and #~(modify-phases %standard-phases
;; CMakeLists.txt are installed anyway, allowing users to (add-after 'set-paths 'unset-cpath
;; do so for themselves. (lambda _
"-DDEAL_II_COMPILE_EXAMPLES=OFF" (unsetenv "CPATH")))
(string-append "-DDEAL_II_EXAMPLES_RELDIR=" doc (add-after 'install 'remove-build-logs
"/examples"))) (lambda _
#:phases (let ((doc (string-append #$output:doc "/share/doc/"
#~(modify-phases %standard-phases #$name "-" #$version)))
;; Without unsetting CPATH, the build fails with the following (for-each delete-file
;; error (similar to <https://bugs.gnu.org/30756>): (map (lambda (f) (string-append doc "/" f))
;; '("detailed.log" "summary.log"))))))))) ))
;; /gnu/store/…-gcc-11.3.0/include/c++/math.h:30:16: fatal error: math.h: No such file or directory
;; 30 | # include_next <math.h>
;; | ^~~~~~~~
;;
;; Why does unsetting CPATH magically fix the error?
;; TODO: Properly fix this issue.
(add-after 'set-paths 'unset-cpath
(lambda _
(unsetenv "CPATH")))
(add-after 'install 'remove-build-logs
;; These build logs leak the name of the build directory by
;; storing the values of CMAKE_SOURCE_DIR and
;; CMAKE_BINARY_DIR.
(lambda _
(let ((doc (string-append #$output:doc "/share/doc/"
#$name "-" #$version)))
(for-each delete-file
(map (lambda (f) (string-append doc "/" f))
'("detailed.log" "summary.log")))))))))
))
(define trilinos-for-dealii-openmpi (define trilinos-for-dealii-openmpi
(@@ (gnu packages maths) trilinos-for-dealii-openmpi)) (@@ (gnu packages maths) trilinos-for-dealii-openmpi))
(define-public glicid-dealii-openmpi (define-public glicid-dealii-openmpi
(package (package
(inherit glicid-dealii) (inherit glicid-dealii)
(name "glicid-dealii-openmpi") (name "glicid-dealii-openmpi")
(inputs (inputs
(modify-inputs (package-inputs glicid-dealii) (modify-inputs (package-inputs glicid-dealii)
(delete "arpack") (delete "arpack")
(prepend gnu:arpack-ng-openmpi (prepend gnu:arpack-ng-openmpi
gnu:metis gnu:metis
gnu:scalapack))) gnu:scalapack)))
(propagated-inputs (propagated-inputs
(modify-inputs (package-propagated-inputs glicid-dealii) (modify-inputs (package-propagated-inputs glicid-dealii)
(delete "hdf5" "kokkos" "sundials") (delete "hdf5" "kokkos" "sundials")
(prepend gnu:hdf5-parallel-openmpi (prepend gnu:hdf5-parallel-openmpi
openmpi openmpi
gnu:p4est-openmpi gnu:p4est-openmpi
gnu:petsc-openmpi gnu:petsc-openmpi
gnu:slepc-openmpi gnu:slepc-openmpi
gnu:sundials-openmpi gnu:sundials-openmpi
trilinos-for-dealii-openmpi))) trilinos-for-dealii-openmpi)))
(arguments (arguments
(substitute-keyword-arguments (package-arguments glicid-dealii) (substitute-keyword-arguments (package-arguments glicid-dealii)
((#:configure-flags flags) ((#:configure-flags flags)
#~(cons "-DDEAL_II_WITH_MPI=ON" #$flags)) #~(cons "-DDEAL_II_WITH_MPI=ON" #$flags))
((#:phases phases #~%standard-phases) ((#:phases phases #~%standard-phases)
#~(modify-phases #$phases #~(modify-phases #$phases
;; The build failure fixed by this phase does not manifest when (delete 'unset-cpath)))))
;; Kokkos is included via Trilinos. (synopsis "Finite element library (with MPI support)")))
(delete 'unset-cpath)))))
(synopsis "Finite element library (with MPI support)")))

6
glicid/packages/monitoring.scm
View file

@ -17,8 +17,6 @@
(method url-fetch) (method url-fetch)
(uri (string-append "https://cdn.zabbix.com/zabbix/sources/stable/" (version-major+minor version) "/zabbix-" version ".tar.gz")) (uri (string-append "https://cdn.zabbix.com/zabbix/sources/stable/" (version-major+minor version) "/zabbix-" version ".tar.gz"))
(sha256 (base32 %zabbix-hash)) (sha256 (base32 %zabbix-hash))
;; YD upstream now able to cope with 2.17 timescaledb
;; (patches (search-patches "glicid/packages/patches/glicid-zabbix-timescaledb-2.17.patch"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(substitute* '("src/zabbix_proxy/proxy.c" "src/zabbix_server/server.c") '(substitute* '("src/zabbix_proxy/proxy.c" "src/zabbix_server/server.c")
@ -34,8 +32,6 @@
(method url-fetch) (method url-fetch)
(uri (string-append "https://cdn.zabbix.com/zabbix/sources/stable/" (version-major+minor version) "/zabbix-" version ".tar.gz")) (uri (string-append "https://cdn.zabbix.com/zabbix/sources/stable/" (version-major+minor version) "/zabbix-" version ".tar.gz"))
(sha256 (base32 %zabbix-hash)) (sha256 (base32 %zabbix-hash))
;; YD upstream now able to cope with 2.17 timescaledb
;; (patches (search-patches "glicid/packages/patches/glicid-zabbix-timescaledb-2.17.patch"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(substitute* '("src/zabbix_proxy/proxy.c" "src/zabbix_server/server.c") '(substitute* '("src/zabbix_proxy/proxy.c" "src/zabbix_server/server.c")
@ -51,8 +47,6 @@
(method url-fetch) (method url-fetch)
(uri (string-append "https://cdn.zabbix.com/zabbix/sources/stable/" (version-major+minor version) "/zabbix-" version ".tar.gz")) (uri (string-append "https://cdn.zabbix.com/zabbix/sources/stable/" (version-major+minor version) "/zabbix-" version ".tar.gz"))
(sha256 (base32 %zabbix-hash)) (sha256 (base32 %zabbix-hash))
;; YD upstream now able to cope with 2.17 timescaledb
;; (patches (search-patches "glicid/packages/patches/glicid-zabbix-timescaledb-2.17.patch"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(substitute* '("src/zabbix_proxy/proxy.c" "src/zabbix_server/server.c") '(substitute* '("src/zabbix_proxy/proxy.c" "src/zabbix_server/server.c")

27
glicid/packages/mpi.scm
View file

@ -1,18 +1,15 @@
(define-module (glicid packages mpi) (define-module (glicid packages mpi)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module ((gnu packages mpi) #:use-module ((gnu packages mpi) #:prefix gnu:)
#:prefix gnu:) #:use-module (glicid packages linux)
#:use-module (glicid packages linux) #:use-module (glicid packages fabric-management)
#:use-module (glicid packages fabric-management) #:use-module (glicid utils)
#:use-module (glicid utils) #:use-module (guix utils)
#:use-module (guix utils) #:use-module (glicid packages parallel)
#:use-module (glicid packages parallel) #:use-module (gnu packages))
#:use-module (gnu packages))
(define-public openmpi-glicid (define-public openmpi-glicid
(package
(package (inherit gnu:openmpi-4)
(inherit gnu:openmpi-4) (name "openmpi-glicid")))
(name "openmpi-glicid")
))

124
glicid/packages/nfs.scm
View file

@ -1,67 +1,63 @@
(define-module (glicid packages nfs) (define-module (glicid packages nfs)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module ((guix licenses) #:use-module ((guix licenses)
#:prefix license:) #:prefix license:)
#:use-module (gnu packages perl) #:use-module (gnu packages perl)
#:use-module (gnu packages shells) #:use-module (gnu packages shells)
#:use-module (gnu packages python) #:use-module (gnu packages python)
#:use-module (gnu packages kerberos) #:use-module (gnu packages kerberos)
#:use-module (gnu packages gsasl) #:use-module (gnu packages gsasl)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages onc-rpc) #:use-module (gnu packages onc-rpc)
#:use-module (gnu packages flex) #:use-module (gnu packages flex)
#:use-module (gnu packages bison) #:use-module (gnu packages bison)
#:use-module (gnu packages datastructures) #:use-module (gnu packages datastructures)
#:use-module (gnu packages file-systems) #:use-module (gnu packages file-systems)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages jemalloc) #:use-module (gnu packages jemalloc)
#:use-module (gnu packages storage) #:use-module (gnu packages storage)
;; #:use-module (glicid packages storage) ;; #:use-module (glicid packages storage)
) )
(define-public nfs-ganesha (define-public nfs-ganesha
(package (package
(name "nfs-ganesha") (name "nfs-ganesha")
(version "3.5") (version "3.5")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/nfs-ganesha/nfs-ganesha.git") (url "https://github.com/nfs-ganesha/nfs-ganesha.git")
(commit (string-append "V" version)) (commit (string-append "V" version))
(recursive? #t))) (recursive? #t)))
(sha256 (sha256 (base32 "0rdg3mjqrr4a8mywxkfis25gkbn4fylw42hg1d9cvp4dwrjk3hl4"))
(base32 (file-name (string-append name "-" version "-checkout"))))
"0rdg3mjqrr4a8mywxkfis25gkbn4fylw42hg1d9cvp4dwrjk3hl4")) (build-system cmake-build-system)
(file-name (string-append name "-" version "-checkout")))) (arguments
(build-system cmake-build-system) `(#:configure-flags (list (string-append "-DLIB_INSTALL_DIR=" (assoc-ref %outputs "out") "/lib"))
(arguments #:phases (modify-phases %standard-phases
`(#:configure-flags (list (string-append "-DLIB_INSTALL_DIR=" (add-after 'unpack 'chdir
(assoc-ref %outputs "out") (lambda _
"/lib")) (chdir "src") #t)))))
#:phases (modify-phases %standard-phases (inputs `(("perl" ,perl)
(add-after 'unpack 'chdir ("oksh" ,oksh)
(lambda _ ("python-3" ,python-3)
(chdir "src") #t))))) ("mit-krb5" ,mit-krb5)
(inputs `(("perl" ,perl) ("gss" ,gss)
("oksh" ,oksh) ("pkg-config" ,pkg-config)
("python-3" ,python-3) ("jemalloc" ,jemalloc)
("mit-krb5" ,mit-krb5) ("ceph:lib" ,ceph "lib")
("gss" ,gss) ("libnfsidmap" ,libnfsidmap)
("pkg-config" ,pkg-config) ("libnfs" ,libnfs)
("jemalloc" ,jemalloc) ("liburcu" ,liburcu)
("ceph:lib" ,ceph "lib") ("bison" ,bison)
("libnfsidmap" ,libnfsidmap) ("flex" ,flex)
("libnfs" ,libnfs) ("libnsl" ,libnsl)
("liburcu" ,liburcu) ("util-linux" ,util-linux "lib")))
("bison" ,bison) (synopsis "nfs-ganesha")
("flex" ,flex) (description "NFS-Ganesha.")
("libnsl" ,libnsl) (home-page "https://")
("util-linux" ,util-linux "lib"))) (license license:gpl3+)))
(synopsis "nfs-ganesha")
(description "NFS-Ganesha.")
(home-page "https://")
(license license:gpl3+)))

6
glicid/packages/openldap.scm
View file

@ -31,7 +31,7 @@
(uri (list (string-append "https://www.openldap.org/software/download/OpenLDAP/openldap-release/openldap-" version ".tgz"))) (uri (list (string-append "https://www.openldap.org/software/download/OpenLDAP/openldap-release/openldap-" version ".tgz")))
(sha256 (base32 "184ywcpw9gbrllp1a1q9a6g7aq583phxnhj4cd1lv622yn69jbh8")))) (sha256 (base32 "184ywcpw9gbrllp1a1q9a6g7aq583phxnhj4cd1lv622yn69jbh8"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (list argon2 cyrus-sasl openssl libevent libxcrypt libltdl lz4 perl snappy unixodbc wiredtiger zlib)) ;; YD : was libgcrypt ?? but broken (Sept 2024) (inputs (list argon2 cyrus-sasl openssl libevent libxcrypt libltdl lz4 perl snappy unixodbc wiredtiger zlib))
(native-inputs (list bdb groff libtool pkg-config)) (native-inputs (list bdb groff libtool pkg-config))
(arguments `( (arguments `(
#:tests? #f #:tests? #f
@ -69,9 +69,7 @@
(sha256 (base32 "050fzcmxmf6y15dlcffc4gxr3wkk7fliqqwhlwqzbjwk8vkn3mn6")))) (sha256 (base32 "050fzcmxmf6y15dlcffc4gxr3wkk7fliqqwhlwqzbjwk8vkn3mn6"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:configure-flags (list (string-append "--with-pam-seclib-dir=" `(#:configure-flags (list (string-append "--with-pam-seclib-dir=" (assoc-ref %outputs "out") "/lib/security/")
(assoc-ref %outputs "out")
"/lib/security/")
"--with-ldap-conf-file=/etc/nslcd.conf") "--with-ldap-conf-file=/etc/nslcd.conf")
#:phases (modify-phases %standard-phases #:phases (modify-phases %standard-phases
(add-after 'unpack 'override-nslcd.conf-install-path (add-after 'unpack 'override-nslcd.conf-install-path

67
glicid/packages/perf-monitoring.scm
View file

@ -1,42 +1,35 @@
(define-module (glicid packages perf-monitoring) (define-module (glicid packages perf-monitoring)
#:use-module (guix) #:use-module (guix)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages ncurses) #:use-module (gnu packages ncurses)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages xdisorg) #:use-module (gnu packages xdisorg)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:export (nvtop)) #:export (nvtop))
(package (package
(name "nvtop") (name "nvtop")
(version "3.0.2") (version "3.0.2")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://github.com/Syllo/nvtop/archive/refs/tags/" version ".tar.gz")) (uri (string-append "https://github.com/Syllo/nvtop/archive/refs/tags/" version ".tar.gz"))
(file-name (string-append name "-" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz"))
(sha256 (sha256 (base32 "005f9dsaf3w0nck1r0h9mznv4svav8bc4l28f0h57zkmssi4byk3"))))
(base32 (build-system cmake-build-system)
"005f9dsaf3w0nck1r0h9mznv4svav8bc4l28f0h57zkmssi4byk3")))) (arguments
(build-system cmake-build-system) `(#:tests? #f ; No tests available
(arguments #:configure-flags '("-DNVIDIA_SUPPORT=ON" "-DINTEL_SUPPORT=ON" "-DAMDGPU_SUPPORT=ON" "-DMSM_SUPPORT=ON")))
`(#:tests? #f ; No tests available (inputs
#:configure-flags '("-DNVIDIA_SUPPORT=ON" "-DINTEL_SUPPORT=ON" "-DAMDGPU_SUPPORT=ON" "-DMSM_SUPPORT=ON")
)
)
(inputs
`(("ncurses" ,ncurses) `(("ncurses" ,ncurses)
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)
("eudev" ,eudev) ("eudev" ,eudev)
("libdrm" , libdrm) ("libdrm" , libdrm)))
)) (home-page "https://github.com/Syllo/nvtop")
(home-page "https://github.com/Syllo/nvtop") (synopsis "NVIDIA GPUs htop like monitoring tool")
(synopsis "NVIDIA GPUs htop like monitoring tool") (description "Nvtop is a htop-like monitoring tool for NVIDIA GPUs. It can show a quick overview of the GPU usage and the list of processes using the GPU.")
(description "Nvtop is a htop-like monitoring tool for NVIDIA GPUs. It can show a quick overview of the GPU usage and the list of processes using the GPU.") (license license:expat))
(license license:expat)
)

40
glicid/packages/perl.scm
View file

@ -1,25 +1,21 @@
(define-module (glicid packages perl) (define-module (glicid packages perl)
#:use-module (guix build-system perl) #:use-module (guix build-system perl)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix utils)) #:use-module (guix utils))
(define-public perl-extutils-embed (define-public perl-extutils-embed
(package (package
(name "perl-extutils-embed") (name "perl-extutils-embed")
(version "1.14") (version "1.14")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "mirror://cpan/authors/id/D/DO/DOUGM/ExtUtils-Embed-" version ".tar.gz"))
"mirror://cpan/authors/id/D/DO/DOUGM/ExtUtils-Embed-" (sha256 (base32 "1w55q0wz6i4k9p500mc4wmr8jndnczb6qqrd2m1mrnx13v2mbr7h"))))
version ".tar.gz")) (build-system perl-build-system)
(sha256 (arguments
(base32 '(#:tests? #f))
"1w55q0wz6i4k9p500mc4wmr8jndnczb6qqrd2m1mrnx13v2mbr7h")))) (home-page "https://metacpan.org/release/ExtUtils-Embed")
(build-system perl-build-system) (synopsis "Utilities for embedding Perl in C/C++ applications")
(arguments (description "Utilities for embedding Perl in C/C++ applications")
'(#:tests? #f)) (license #f)))
(home-page "https://metacpan.org/release/ExtUtils-Embed")
(synopsis "Utilities for embedding Perl in C/C++ applications")
(description "Utilities for embedding Perl in C/C++ applications")
(license #f)))

658
glicid/packages/php.scm
View file

@ -1,386 +1,278 @@
(define-module (glicid packages php) (define-module (glicid packages php)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages algebra) #:use-module (gnu packages algebra)
#:use-module (gnu packages aspell) #:use-module (gnu packages aspell)
#:use-module (gnu packages base) #:use-module (gnu packages base)
#:use-module (gnu packages bison) #:use-module (gnu packages bison)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages crypto) #:use-module (gnu packages crypto)
#:use-module (gnu packages curl) #:use-module (gnu packages curl)
#:use-module (gnu packages cyrus-sasl) #:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages databases) #:use-module (gnu packages databases)
#:use-module (gnu packages dbm) #:use-module (gnu packages dbm)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages gd) #:use-module (gnu packages gd)
#:use-module (gnu packages gettext) #:use-module (gnu packages gettext)
#:use-module (gnu packages gnupg) #:use-module (gnu packages gnupg)
#:use-module (gnu packages icu4c) #:use-module (gnu packages icu4c)
#:use-module (gnu packages image) #:use-module (gnu packages image)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages multiprecision) #:use-module (gnu packages multiprecision)
#:use-module (gnu packages openldap) #:use-module (gnu packages openldap)
#:use-module (gnu packages pcre) #:use-module (gnu packages pcre)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages readline) #:use-module (gnu packages readline)
#:use-module (gnu packages sqlite) #:use-module (gnu packages sqlite)
#:use-module (gnu packages textutils) #:use-module (gnu packages textutils)
#:use-module (gnu packages tls) #:use-module (gnu packages tls)
#:use-module (gnu packages web) #:use-module (gnu packages web)
#:use-module (gnu packages xml) #:use-module (gnu packages xml)
#:use-module (gnu packages xorg) #:use-module (gnu packages xorg)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module ((guix licenses) #:prefix license:)) #:use-module ((guix licenses) #:prefix license:))
(define-public php (define-public php
(package (package
(name "php") (name "php")
(version "7.4.30") (version "7.4.30")
(home-page "https://secure.php.net/") (home-page "https://secure.php.net/")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append home-page "distributions/" (uri (string-append home-page "distributions/"
"php-" version ".tar.xz")) "php-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"03d7icwys4ikl45q3rgsxv1m3i7kfxhykpx75nn7jzn6697s6wpa")) "03d7icwys4ikl45q3rgsxv1m3i7kfxhykpx75nn7jzn6697s6wpa"))
(patches (search-patches "glicid/packages/patches/php-bug-74093-test.patch" (patches (search-patches "glicid/packages/patches/php-bug-74093-test.patch"
"glicid/packages/patches/php-curl-compat.patch")) "glicid/packages/patches/php-curl-compat.patch"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(with-directory-excursion "ext" '(with-directory-excursion "ext"
(for-each delete-file-recursively (for-each delete-file-recursively
;; Some of the bundled libraries have no proper upstream. '("gd/libgd"
;; Ideally we'd extract these out as separate packages: "pcre/pcre2lib"
;;"mbstring/libmbfl" "xmlrpc/libxmlrpc"))))))
;;"date/lib" (build-system gnu-build-system)
;;"bcmath/libbcmath" (arguments
;;"fileinfo/libmagic" ; a patched version of libmagic `(#:configure-flags
'("gd/libgd" (let-syntax ((with (syntax-rules ()
"pcre/pcre2lib" ((_ option input)
"xmlrpc/libxmlrpc")))))) (string-append option "="
(build-system gnu-build-system) (assoc-ref %build-inputs input))))))
(arguments (list (with "--with-bz2" "bzip2")
`(#:configure-flags (with "--with-curl" "curl")
(let-syntax ((with (syntax-rules () (with "--with-gdbm" "gdbm")
((_ option input) (with "--with-gettext" "libc")
(string-append option "=" (with "--with-gmp" "gmp")
(assoc-ref %build-inputs input)))))) (with "--with-ldap" "openldap")
(list (with "--with-bz2" "bzip2") (with "--with-ldap-sasl" "cyrus-sasl")
(with "--with-curl" "curl") (with "--with-pdo-pgsql" "postgresql")
(with "--with-gdbm" "gdbm") (with "--with-pdo-sqlite" "sqlite")
(with "--with-gettext" "libc") ; libintl.h (with "--with-pgsql" "postgresql")
(with "--with-gmp" "gmp") (with "--with-pspell" "aspell")
(with "--with-ldap" "openldap") (with "--with-readline" "readline")
(with "--with-ldap-sasl" "cyrus-sasl") (with "--with-sodium" "libsodium")
(with "--with-pdo-pgsql" "postgresql") (with "--with-sqlite3" "sqlite")
(with "--with-pdo-sqlite" "sqlite") (with "--with-tidy" "tidy")
(with "--with-pgsql" "postgresql") (with "--with-xsl" "libxslt")
;; PHP’s Pspell extension, while retaining its current name, (with "--with-zlib-dir" "zlib")
;; now uses the Aspell library. "--with-external-pcre"
(with "--with-pspell" "aspell") "--with-external-gd"
(with "--with-readline" "readline") "--with-iconv"
(with "--with-sodium" "libsodium") "--with-openssl"
(with "--with-sqlite3" "sqlite") "--with-mysqli"
(with "--with-tidy" "tidy") "--with-pdo-mysql"
(with "--with-xsl" "libxslt") "--with-zip"
(with "--with-zlib-dir" "zlib") "--with-zlib"
;; We could add "--with-snmp", but it requires netsnmp that "--enable-bcmath"
;; we don't have a package for. It is used to build the snmp "--enable-calendar"
;; extension of php. "--enable-dba=shared"
"--with-external-pcre" "--enable-exif"
"--with-external-gd" "--enable-flatfile"
"--with-iconv" "--enable-fpm"
"--with-openssl" "--enable-ftp"
"--with-mysqli" ; Required for, e.g. wordpress "--enable-gd"
"--with-pdo-mysql" "--enable-inifile"
"--with-zip" "--enable-intl"
"--with-zlib" "--enable-mbstring"
"--enable-bcmath" ; Required for, e.g. Zabbix frontend "--enable-pcntl"
"--enable-calendar" "--enable-sockets"))
"--enable-dba=shared" #:phases
"--enable-exif" (modify-phases %standard-phases
"--enable-flatfile" (add-after 'unpack 'do-not-record-build-flags
"--enable-fpm" (lambda _
"--enable-ftp" (substitute* "scripts/php-config.in"
"--enable-gd" (("@CONFIGURE_OPTIONS@") "")
"--enable-inifile" (("@PHP_LDFLAGS@") ""))
"--enable-intl" (with-fluids ((%default-port-encoding "ISO-8859-1"))
"--enable-mbstring" (substitute* "main/build-defs.h.in"
"--enable-pcntl" (("@CONFIGURE_COMMAND@") "(omitted)")))))
"--enable-sockets")) (add-before 'build 'patch-/bin/sh
#:phases (lambda _
(modify-phases %standard-phases (substitute* '("run-tests.php" "ext/standard/proc_open.c")
(add-after 'unpack 'do-not-record-build-flags (("/bin/sh") (which "sh")))))
(lambda _ (add-before 'check 'prepare-tests
;; Prevent configure flags from being stored and causing (lambda _
;; unnecessary runtime dependencies. (with-fluids ((%default-port-encoding "ISO-8859-1"))
(substitute* "scripts/php-config.in" (substitute* '("ext/mbstring/tests/mb_send_mail02.phpt"
(("@CONFIGURE_OPTIONS@") "") "ext/mbstring/tests/mb_send_mail04.phpt"
(("@PHP_LDFLAGS@") "")) "ext/mbstring/tests/mb_send_mail05.phpt"
;; This file has ISO-8859-1 encoding. "ext/mbstring/tests/mb_send_mail06.phpt")
(with-fluids ((%default-port-encoding "ISO-8859-1")) (("/bin/cat") (which "cat"))))
(substitute* "main/build-defs.h.in" (substitute* '("ext/mbstring/tests/mb_send_mail01.phpt"
(("@CONFIGURE_COMMAND@") "(omitted)"))))) "ext/mbstring/tests/mb_send_mail03.phpt"
(add-before 'build 'patch-/bin/sh "ext/mbstring/tests/bug52681.phpt"
(lambda _ "ext/standard/tests/general_functions/bug34794.phpt"
(substitute* '("run-tests.php" "ext/standard/proc_open.c") "ext/standard/tests/general_functions/bug44667.phpt"
(("/bin/sh") (which "sh"))))) "ext/standard/tests/general_functions/proc_open.phpt")
(add-before 'check 'prepare-tests (("/bin/cat") (which "cat")))
(lambda _ (delete-file "ext/mbstring/tests/mb_send_mail07.phpt")
;; Some of these files have ISO-8859-1 encoding, whereas others (substitute* "ext/standard/tests/streams/bug60602.phpt"
;; use ASCII, so we can't use a "catch-all" find-files here. (("'ls'") (string-append "'" (which "ls") "'")))
(with-fluids ((%default-port-encoding "ISO-8859-1")) ,@(if (string-prefix? "arm" (or (%current-system)
(substitute* '("ext/mbstring/tests/mb_send_mail02.phpt" (%current-target-system)))
"ext/mbstring/tests/mb_send_mail04.phpt" '((for-each delete-file
"ext/mbstring/tests/mb_send_mail05.phpt" (list
"ext/mbstring/tests/mb_send_mail06.phpt") "ext/calendar/tests/unixtojd_error1.phpt"
(("/bin/cat") (which "cat")))) "ext/fileinfo/tests/cve-2014-3538-nojit.phpt"
(substitute* '("ext/mbstring/tests/mb_send_mail01.phpt" "ext/pcntl/tests/pcntl_unshare_01.phpt"
"ext/mbstring/tests/mb_send_mail03.phpt" "ext/pcre/tests/bug76514.phpt"
"ext/mbstring/tests/bug52681.phpt" "ext/pcre/tests/preg_match_error3.phpt"
"ext/standard/tests/general_functions/bug34794.phpt" "ext/pcre/tests/cache_limit.phpt"
"ext/standard/tests/general_functions/bug44667.phpt" "ext/sockets/tests/socket_getopt.phpt"
"ext/standard/tests/general_functions/proc_open.phpt") "ext/sockets/tests/socket_sendrecvmsg_error.phpt"
(("/bin/cat") (which "cat"))) "ext/standard/tests/general_functions/var_export-locale.phpt"
"ext/standard/tests/general_functions/var_export_basic1.phpt"
;; The encoding of this file is not recognized, so we simply drop it. "ext/intl/tests/timezone_getErrorCodeMessage_basic.phpt"
(delete-file "ext/mbstring/tests/mb_send_mail07.phpt") "ext/intl/tests/timezone_getOffset_error.phpt"
"sapi/cli/tests/cli_process_title_unix.phpt"
(substitute* "ext/standard/tests/streams/bug60602.phpt" "sapi/cli/tests/upload_2G.phpt"
(("'ls'") (string-append "'" (which "ls") "'"))) "Zend/tests/concat_003.phpt")))
'())
,@(if (string-prefix? "arm" (or (%current-system) ,@(if (target-ppc64le?)
(%current-target-system))) '((for-each delete-file
;; Drop tests known to fail on armhf. (list
'((for-each delete-file "sapi/phpdbg/tests/watch_001.phpt"
(list "sapi/phpdbg/tests/watch_003.phpt"
"ext/calendar/tests/unixtojd_error1.phpt" "sapi/phpdbg/tests/watch_004.phpt"
;; arm can be a lot slower, so a time-related test fails "sapi/phpdbg/tests/watch_005.phpt"
"ext/fileinfo/tests/cve-2014-3538-nojit.phpt" "sapi/phpdbg/tests/watch_006.phpt")))
"ext/pcntl/tests/pcntl_unshare_01.phpt" '())
"ext/pcre/tests/bug76514.phpt" (for-each delete-file
"ext/pcre/tests/preg_match_error3.phpt" '("ext/posix/tests/posix_getgrgid.phpt"
"ext/pcre/tests/cache_limit.phpt" "ext/posix/tests/posix_getgrnam_basic.phpt"
"ext/sockets/tests/socket_getopt.phpt" "ext/sockets/tests/bug63000.phpt"
"ext/sockets/tests/socket_sendrecvmsg_error.phpt" "ext/sockets/tests/socket_shutdown.phpt"
"ext/standard/tests/general_functions/var_export-locale.phpt" "ext/sockets/tests/socket_send.phpt"
"ext/standard/tests/general_functions/var_export_basic1.phpt" "ext/sockets/tests/mcast_ipv4_recv.phpt"
"ext/intl/tests/timezone_getErrorCodeMessage_basic.phpt" "ext/standard/tests/general_functions/getservbyname_basic.phpt"
"ext/intl/tests/timezone_getOffset_error.phpt" "ext/standard/tests/general_functions/getservbyport_basic.phpt"
"sapi/cli/tests/cli_process_title_unix.phpt" "ext/standard/tests/general_functions/getservbyport_variation1.phpt"
"sapi/cli/tests/upload_2G.phpt" "ext/standard/tests/network/getprotobyname_basic.phpt"
"Zend/tests/concat_003.phpt"))) "ext/standard/tests/network/getprotobynumber_basic.phpt"
'()) "ext/standard/tests/strings/setlocale_basic1.phpt"
"ext/standard/tests/strings/setlocale_basic2.phpt"
,@(if (target-ppc64le?) "ext/standard/tests/strings/setlocale_basic3.phpt"
;; Drop tests known to fail on powerpc64le. "ext/standard/tests/strings/setlocale_variation1.phpt"
'((for-each delete-file "ext/standard/tests/file/disk_free_space_basic.phpt"
(list "ext/standard/tests/file/lstat_stat_variation8.phpt"
;; phpdbg watchpoints don't work. "ext/date/tests/bug73837.phpt"
;; Bug tracked upstream at: "ext/gd/tests/bug39780_extern.phpt"
;; https://bugs.php.net/bug.php?id=81408 "ext/gd/tests/libgd00086_extern.phpt"
"sapi/phpdbg/tests/watch_001.phpt" "ext/gd/tests/bug45799.phpt"
"sapi/phpdbg/tests/watch_003.phpt" "ext/gd/tests/createfromwbmp2_extern.phpt"
"sapi/phpdbg/tests/watch_004.phpt" "ext/gd/tests/bug65148.phpt"
"sapi/phpdbg/tests/watch_005.phpt" "ext/gd/tests/bug66590.phpt"
"sapi/phpdbg/tests/watch_006.phpt"))) "ext/gd/tests/bug70102.phpt"
'()) "ext/gd/tests/bug73869.phpt"
"ext/gd/tests/webp_basic.phpt"
;; Drop tests that are known to fail. "ext/gd/tests/imagecreatefromstring_webp.phpt"
(for-each delete-file "ext/gd/tests/bug77269.phpt"
'("ext/posix/tests/posix_getgrgid.phpt" ; Requires /etc/group. "ext/gd/tests/xpm2gd.phpt"
"ext/posix/tests/posix_getgrnam_basic.phpt" ; Requires /etc/group. "ext/gd/tests/xpm2jpg.phpt"
"ext/sockets/tests/bug63000.phpt" ; Fails to detect OS. "ext/gd/tests/xpm2png.phpt"
"ext/sockets/tests/socket_shutdown.phpt" ; Requires DNS. "ext/gd/tests/bug77479.phpt"
"ext/sockets/tests/socket_send.phpt" ; Likewise. "ext/gd/tests/bug77973.phpt"
"ext/sockets/tests/mcast_ipv4_recv.phpt" ; Requires multicast. "ext/gd/tests/bug79067.phpt"
;; These needs /etc/services. "ext/gd/tests/bug79068.phpt"
"ext/standard/tests/general_functions/getservbyname_basic.phpt" "ext/iconv/tests/bug52211.phpt"
"ext/standard/tests/general_functions/getservbyport_basic.phpt" "ext/iconv/tests/bug60494.phpt"
"ext/standard/tests/general_functions/getservbyport_variation1.phpt" "ext/iconv/tests/iconv_strlen_error2.phpt"
;; And /etc/protocols. "ext/iconv/tests/iconv_substr_error2.phpt"
"ext/standard/tests/network/getprotobyname_basic.phpt" "ext/iconv/tests/iconv_strpos_error2.phpt"
"ext/standard/tests/network/getprotobynumber_basic.phpt" "ext/iconv/tests/iconv_strrpos_error2.phpt"
;; And exotic locales. "ext/iconv/tests/bug76249.phpt"
"ext/standard/tests/strings/setlocale_basic1.phpt" "ext/curl/tests/bug61948-unix.phpt"
"ext/standard/tests/strings/setlocale_basic2.phpt" "ext/standard/tests/file/bug41655_1.phpt"
"ext/standard/tests/strings/setlocale_basic3.phpt" "ext/standard/tests/file/glob_variation5.phpt"
"ext/standard/tests/strings/setlocale_variation1.phpt" "ext/gd/tests/bug43073.phpt"
;; This failing test is skipped on PHP's Travis CI as it is "ext/gd/tests/bug48732-mb.phpt"
;; supposedly inaccurate. "ext/gd/tests/bug48732.phpt"
"ext/standard/tests/file/disk_free_space_basic.phpt" "ext/gd/tests/bug48801-mb.phpt"
;; The following test erroneously expect the link "ext/gd/tests/bug48801.phpt"
;; count of a sub-directory to increase compared to "ext/gd/tests/bug53504.phpt"
;; its parent. "ext/gd/tests/bug73272.phpt"
"ext/standard/tests/file/lstat_stat_variation8.phpt" "ext/iconv/tests/bug48147.phpt"
;; This tests whether microseconds ‘differ enough’ and "ext/iconv/tests/bug51250.phpt"
;; fails inconsistently on ‘fast’ machines. "ext/iconv/tests/iconv_mime_encode.phpt"
"ext/date/tests/bug73837.phpt" "ext/standard/tests/file/bug43008.phpt"
"ext/pdo_sqlite/tests/bug_42589.phpt"
;; XXX: These gd tests fails. Likely because our version "ext/pcre/tests/bug79846.phpt"
;; is different from the (patched) bundled one. "ext/pcre/tests/bug80118.phpt"
;; Here, gd quits immediately after "fatal libpng error"; while the "ext/standard/tests/general_functions/proc_nice_basic.phpt"
;; test expects it to additionally return a "setjmp" error and warning. "Zend/tests/bug74093.phpt"))
"ext/gd/tests/bug39780_extern.phpt" (substitute* "ext/openssl/tests/bug80747.phpt"
"ext/gd/tests/libgd00086_extern.phpt" ((".*error:%s:key size too small.*" match)
;; Extra newline in gd-png output. (string-append "%s\n" match "%s\n")))
"ext/gd/tests/bug45799.phpt" (setenv "SKIP_ONLINE_TESTS" "1")
;; Test expects generic "gd warning" but gets the actual function name. (setenv "REPORT_EXIT_STATUS" "1")
"ext/gd/tests/createfromwbmp2_extern.phpt" (setenv "SKIP_IO_CAPTURE_TESTS" "1"))))
;; This bug should have been fixed in gd 2.2.2. #:test-target "test"))
;; Is it a regression? (inputs
"ext/gd/tests/bug65148.phpt" `(("aspell" ,aspell)
;; This bug should have been fixed in the gd 2.2 ("bzip2" ,bzip2)
;; series. Perhaps a regression introduced by gd ("curl" ,curl)
;; 2.3.0? ("cyrus-sasl" ,cyrus-sasl)
"ext/gd/tests/bug66590.phpt" ("gd" ,gd)
;; This bug should have been fixed in the php-5.5 ("gdbm" ,gdbm)
;; series. Perhaps a regression introduced by gd ("gmp" ,gmp)
;; 2.3.0? ("gnutls" ,gnutls)
"ext/gd/tests/bug70102.phpt" ("icu4c" ,icu4c)
;; This bug should have been fixed in the php-5.6 ("libgcrypt" ,libgcrypt)
;; series. Perhaps a regression introduced by gd ("libpng" ,libpng)
;; 2.3.0? ("libsodium" ,libsodium)
"ext/gd/tests/bug73869.phpt" ("libxml2" ,libxml2)
;; Some WebP related tests fail. ("libxslt" ,libxslt)
"ext/gd/tests/webp_basic.phpt" ("libx11" ,libx11)
"ext/gd/tests/imagecreatefromstring_webp.phpt" ("libzip" ,libzip)
;; Expected error message, but from the wrong function ("oniguruma" ,oniguruma)
"ext/gd/tests/bug77269.phpt" ("openldap" ,openldap)
;; TODO: Enable these when libgd is built with xpm support. ("openssl" ,openssl-1.1)
"ext/gd/tests/xpm2gd.phpt" ("pcre" ,pcre2)
"ext/gd/tests/xpm2jpg.phpt" ("postgresql" ,postgresql)
"ext/gd/tests/xpm2png.phpt" ("readline" ,readline)
;; Whitespace difference, probably caused by a very ("sqlite" ,sqlite)
;; long store path ("tidy" ,tidy)
"ext/gd/tests/bug77479.phpt" ("zlib" ,zlib)))
;; Expected invalid XBM but got EOF before image was (native-inputs
;; complete. It's a warning in both cases and test `(("pkg-config" ,pkg-config)
;; result is the same. ("bison" ,bison)
"ext/gd/tests/bug77973.phpt" ("gettext" ,gettext-minimal)
;; Test expects uninitialized value to be false, but ("procps" ,procps)))
;; instead gets "resource(5) of type (gd)". (synopsis "PHP programming language")
"ext/gd/tests/bug79067.phpt" (description
;; The following test fails with "The image size "PHP (PHP Hypertext Processor) is a server-side (CGI) scripting
;; differs: expected 114x115, got 117x117". language designed primarily for web development but is also used as
"ext/gd/tests/bug79068.phpt" a general-purpose programming language. PHP code may be embedded into
HTML code, or it can be used in combination with various web template
;; XXX: These iconv tests have the expected outcome, systems, web content management systems and web frameworks.")
;; but with different error messages. (license (list
;; Expects "illegal character", instead gets "unknown error (84)". (license:non-copyleft "file://LICENSE")
"ext/iconv/tests/bug52211.phpt" (license:non-copyleft "file://Zend/LICENSE")
"ext/iconv/tests/bug60494.phpt" license:lgpl2.1
;; Expects "wrong charset", gets unknown error (22). license:lgpl2.1+
"ext/iconv/tests/iconv_strlen_error2.phpt" license:bsd-2
"ext/iconv/tests/iconv_substr_error2.phpt" license:expat))))
;; Expects conversion error, gets "error condition Termsig=11".
"ext/iconv/tests/iconv_strpos_error2.phpt"
"ext/iconv/tests/iconv_strrpos_error2.phpt"
;; Expects "invalid multibyte sequence" but got
;; "unknown error".
"ext/iconv/tests/bug76249.phpt"
;; XXX: These test failures appear legitimate, needs investigation.
;; open_basedir() restriction failure.
"ext/curl/tests/bug61948-unix.phpt"
;; Expects a false boolean, gets empty array from glob().
"ext/standard/tests/file/bug41655_1.phpt"
"ext/standard/tests/file/glob_variation5.phpt"
;; The test expects an Array, but instead get the contents(?).
"ext/gd/tests/bug43073.phpt"
;; imagettftext() returns wrong coordinates.
"ext/gd/tests/bug48732-mb.phpt"
"ext/gd/tests/bug48732.phpt"
;; Similarly for imageftbbox().
"ext/gd/tests/bug48801-mb.phpt"
"ext/gd/tests/bug48801.phpt"
;; Different expected output from imagecolorallocate().
"ext/gd/tests/bug53504.phpt"
;; Wrong image size after scaling an image.
"ext/gd/tests/bug73272.phpt"
;; Expects iconv to detect illegal characters, instead gets
;; "unknown error (84)" and heap corruption(!).
"ext/iconv/tests/bug48147.phpt"
;; Expects illegal character ".", gets "=?utf-8?Q?."
"ext/iconv/tests/bug51250.phpt"
;; iconv throws "buffer length exceeded" on some string checks.
"ext/iconv/tests/iconv_mime_encode.phpt"
;; file_get_contents(): iconv stream filter
;; ("ISO-8859-1"=>"UTF-8") unknown error.
"ext/standard/tests/file/bug43008.phpt"
;; Table data not created in sqlite(?).
"ext/pdo_sqlite/tests/bug_42589.phpt"
;; Expects an Array with 3 preg_matches; gets 0.
"ext/pcre/tests/bug79846.phpt"
;; Expects an empty Array; gets one with " " in it.
"ext/pcre/tests/bug80118.phpt"
;; Renicing a process fails in the build environment.
"ext/standard/tests/general_functions/proc_nice_basic.phpt"
;; Can fail on fast machines?
"Zend/tests/bug74093.phpt"))
;; Accomodate two extra openssl errors flanking the expected one:
;; random number generator:RAND_{load,write}_file:Cannot open file
;; This is due to an invalid $HOME, but changing it in the test
;; still prints the first one & changing it globally is overkill.
(substitute* "ext/openssl/tests/bug80747.phpt"
((".*error:%s:key size too small.*" match)
(string-append "%s\n" match "%s\n")))
;; Skip tests requiring network access.
(setenv "SKIP_ONLINE_TESTS" "1")
;; Without this variable, 'make test' passes regardless of failures.
(setenv "REPORT_EXIT_STATUS" "1")
;; Skip tests requiring I/O facilities that are unavailable in the
;; build environment
(setenv "SKIP_IO_CAPTURE_TESTS" "1"))))
#:test-target "test"))
(inputs
`(("aspell" ,aspell)
("bzip2" ,bzip2)
("curl" ,curl)
("cyrus-sasl" ,cyrus-sasl)
("gd" ,gd)
("gdbm" ,gdbm)
("gmp" ,gmp)
("gnutls" ,gnutls)
("icu4c" ,icu4c)
("libgcrypt" ,libgcrypt)
("libpng" ,libpng)
("libsodium" ,libsodium)
("libxml2" ,libxml2)
("libxslt" ,libxslt)
("libx11" ,libx11)
("libzip" ,libzip)
("oniguruma" ,oniguruma)
("openldap" ,openldap)
("openssl" ,openssl-1.1)
("pcre" ,pcre2)
("postgresql" ,postgresql)
("readline" ,readline)
("sqlite" ,sqlite)
("tidy" ,tidy)
("zlib" ,zlib)))
(native-inputs
`(("pkg-config" ,pkg-config)
("bison" ,bison)
("gettext" ,gettext-minimal)
("procps" ,procps))) ; for tests
(synopsis "PHP programming language")
(description
"PHP (PHP Hypertext Processor) is a server-side (CGI) scripting
language designed primarily for web development but is also used as
a general-purpose programming language. PHP code may be embedded into
HTML code, or it can be used in combination with various web template
systems, web content management systems and web frameworks." )
(license (list
(license:non-copyleft "file://LICENSE") ; The PHP license.
(license:non-copyleft "file://Zend/LICENSE") ; The Zend license.
license:lgpl2.1 ; ext/mbstring/libmbfl
license:lgpl2.1+ ; ext/bcmath/libbcmath
license:bsd-2 ; ext/fileinfo/libmagic
license:expat)))) ; ext/date/lib
php

147
glicid/packages/python-science.scm
View file

@ -1,86 +1,77 @@
(define-module (glicid packages python-science) (define-module (glicid packages python-science)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module ((guix licenses) #:use-module ((guix licenses) #:prefix license:)
#:prefix license:) #:use-module (gnu packages python-xyz)
#:use-module (gnu packages python-xyz) #:use-module (gnu packages python-crypto)
#:use-module (gnu packages python-crypto) #:use-module (gnu packages python-build)
#:use-module (gnu packages python-build) #:use-module (gnu packages check)
#:use-module (gnu packages check) #:use-module (gnu packages geo)
#:use-module (gnu packages geo) #:use-module (gnu packages python-check))
#:use-module (gnu packages python-check))
(define-public python-snuggs (define-public python-snuggs
(package (package
(name "python-snuggs") (name "python-snuggs")
(version "1.4.7") (version "1.4.7")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "snuggs" version)) (uri (pypi-uri "snuggs" version))
(sha256 (sha256 (base32 "0yv1wayrw9g6k0c2f721kha7wsv0s1fdlxpf5x7f34iqzq9z272h"))))
(base32 (build-system python-build-system)
"0yv1wayrw9g6k0c2f721kha7wsv0s1fdlxpf5x7f34iqzq9z272h")))) (propagated-inputs (list python-numpy python-pyparsing))
(build-system python-build-system) (native-inputs (list python-hypothesis python-pytest))
(propagated-inputs (list python-numpy python-pyparsing)) (home-page "https://github.com/mapbox/snuggs")
(native-inputs (list python-hypothesis python-pytest)) (synopsis "Snuggs are s-expressions for Numpy")
(home-page "https://github.com/mapbox/snuggs") (description "Snuggs are s-expressions for Numpy")
(synopsis "Snuggs are s-expressions for Numpy") (license license:expat)))
(description "Snuggs are s-expressions for Numpy")
(license license:expat)))
(define-public python-affine (define-public python-affine
(package (package
(name "python-affine") (name "python-affine")
(version "2.3.1") (version "2.3.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "affine" version)) (uri (pypi-uri "affine" version))
(sha256 (sha256 (base32 "1l5x66jdrlhaxp9fllkjzfq3bz4xx1a0yknrzycszmks2mkdwxnn"))))
(base32 (build-system python-build-system)
"1l5x66jdrlhaxp9fllkjzfq3bz4xx1a0yknrzycszmks2mkdwxnn")))) (native-inputs (list python-coveralls python-flake8 python-pydocstyle
(build-system python-build-system) python-pytest python-pytest-cov))
(native-inputs (list python-coveralls python-flake8 python-pydocstyle (home-page "https://github.com/sgillies/affine")
python-pytest python-pytest-cov)) (synopsis "Matrices describing affine transformation of the plane.")
(home-page "https://github.com/sgillies/affine") (description "Matrices describing affine transformation of the plane.")
(synopsis "Matrices describing affine transformation of the plane.") (license license:bsd-3)))
(description "Matrices describing affine transformation of the plane.")
(license license:bsd-3)))
;; un tout petit peu de modifications à faire ici
(define-public python-rasterio (define-public python-rasterio
(package (package
(name "python-rasterio") (name "python-rasterio")
(version "1.3.4") (version "1.3.4")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "rasterio" version)) (uri (pypi-uri "rasterio" version))
(sha256 (sha256 (base32 "1a21k86g325ks0vllzn9ry6pf8gch45bs9z9iq5z1v3na90731ss"))))
(base32 (build-system python-build-system)
"1a21k86g325ks0vllzn9ry6pf8gch45bs9z9iq5z1v3na90731ss")))) (arguments
(build-system python-build-system) '(#:tests? #f))
(arguments
'(#:tests? #f))
(propagated-inputs (list python-affine (propagated-inputs (list python-affine
python-attrs python-attrs
python-certifi python-certifi
python-click python-click
python-click-plugins python-click-plugins
python-cligj python-cligj
python-numpy python-numpy
python-setuptools python-setuptools
python-snuggs)) python-snuggs))
(native-inputs (list python-boto3 (native-inputs (list python-boto3
python-hypothesis python-hypothesis
python-packaging python-packaging
python-pytest python-pytest
python-pytest-cov python-pytest-cov
python-cython python-cython
gdal gdal
python-shapely)) python-shapely))
(home-page "https://github.com/rasterio/rasterio") (home-page "https://github.com/rasterio/rasterio")
(synopsis "Fast and direct raster I/O for use with Numpy and SciPy") (synopsis "Fast and direct raster I/O for use with Numpy and SciPy")
(description "Fast and direct raster I/O for use with Numpy and SciPy") (description "Fast and direct raster I/O for use with Numpy and SciPy")
(license license:bsd-3))) (license license:bsd-3)))

49
glicid/packages/python-xyz.scm
View file

@ -4,7 +4,7 @@
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages version-control) #:use-module (gnu packages version-control)
#:use-module (gnu packages python-web) #:use-module (gnu packages python-web)
#:use-module (gnu packages check) #:use-module (gnu packages check)
#:use-module (gnu packages python-build) #:use-module (gnu packages python-build)
@ -42,8 +42,7 @@
(propagated-inputs (list python-markupsafe)) (propagated-inputs (list python-markupsafe))
(home-page "https://palletsprojects.com/p/jinja/") (home-page "https://palletsprojects.com/p/jinja/")
(synopsis "A very fast and expressive template engine.") (synopsis "A very fast and expressive template engine.")
(description (description "This package provides a very fast and expressive template engine.")
"This package provides a very fast and expressive template engine.")
(license #f))) (license #f)))
(define-public python-pyyaml (define-public python-pyyaml
@ -68,9 +67,7 @@
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "setuptools_scm" version)) (uri (pypi-uri "setuptools_scm" version))
(sha256 (sha256 (base32 "09wg4zg30ir1c2cvwqipaz3hwaxz503fgw5zdvaxgakilx2q6l3c"))))
(base32
"09wg4zg30ir1c2cvwqipaz3hwaxz503fgw5zdvaxgakilx2q6l3c"))))
(build-system python-build-system) (build-system python-build-system)
(propagated-inputs (list python-importlib-metadata python-packaging (propagated-inputs (list python-importlib-metadata python-packaging
python-setuptools python-tomli python-setuptools python-tomli
@ -82,27 +79,19 @@
(license license:expat))) (license license:expat)))
(define-public python-podman-compose (define-public python-podman-compose
(package (package
(name "podman-compose") (name "podman-compose")
(version "1.0.6") (version "1.0.6")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "podman-compose" version)) (uri (pypi-uri "podman-compose" version))
(sha256 (sha256 (base32 "1rd29mysfdlbvn0m9zfyp2n0v5lch0bsj4fmzyjaal6akw23bcid"))))
(base32 "1rd29mysfdlbvn0m9zfyp2n0v5lch0bsj4fmzyjaal6akw23bcid")))) (build-system pyproject-build-system)
(build-system pyproject-build-system) (propagated-inputs (list python-dotenv python-pyyaml slirp4netns iptables))
(propagated-inputs (list python-dotenv python-pyyaml slirp4netns iptables)) (native-inputs (list python-black python-flake8 python-pre-commit
(native-inputs (list python-black python-flake8 python-pre-commit python-pylint))
python-pylint)) (home-page "https://github.com/containers/podman-compose")
(home-page "https://github.com/containers/podman-compose") (synopsis "A script to run docker-compose.yml using podman")
(synopsis "A script to run docker-compose.yml using podman") (description "This package provides a script to run docker-compose.yml using podman")
(description (license #f)))
"This package provides a script to run docker-compose.yml using podman")
(license #f))
)

2
glicid/packages/r.scm
View file

@ -1,5 +1,3 @@
(define-module (glicid packages r)) (define-module (glicid packages r))
(define-public R (@@ (gnu packages statistics) r-with-tests)) (define-public R (@@ (gnu packages statistics) r-with-tests))
R

254
glicid/packages/science.scm
View file

@ -1,157 +1,125 @@
(define-module (glicid packages science) (define-module (glicid packages science)
#:use-module (guix licenses) #:use-module (guix licenses)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (guix build utils) #:use-module (guix build utils)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages qt) #:use-module (gnu packages qt)
#:use-module (gnu packages gl) #:use-module (gnu packages gl)
#:use-module (gnu packages boost) #:use-module (gnu packages boost)
#:use-module (gnu packages algebra) #:use-module (gnu packages algebra)
#:use-module (gnu packages gdb) #:use-module (gnu packages gdb)
#:use-module (gnu packages sqlite) #:use-module (gnu packages sqlite)
#:use-module (gnu packages image-processing) #:use-module (gnu packages image-processing)
#:use-module (gnu packages graphics) #:use-module (gnu packages graphics)
#:use-module (gnu packages maths) #:use-module (gnu packages maths)
#:use-module (gnu packages mpi) #:use-module (gnu packages mpi)
#:use-module (gnu packages python) #:use-module (gnu packages python)
; #:use-module (past packages python) #:use-module (gnu packages python-xyz)
#:use-module (gnu packages python-xyz) #:use-module (gnu packages sphinx)
#:use-module (gnu packages sphinx) #:use-module (gnu packages commencement)
#:use-module (gnu packages commencement) #:use-module (gnu packages graphviz)
#:use-module (gnu packages graphviz) #:use-module (gnu packages multiprecision)
#:use-module (gnu packages multiprecision) #:use-module (glicid packages mpi)
#:use-module (glicid packages mpi) #:use-module (glicid utils))
#:use-module (glicid utils))
(define-public loki (define-public loki
(package (package
(name "loki") (name "loki")
(version "0.1.7") (version "0.1.7")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
"https://downloads.sourceforge.net/project/loki-lib/Loki/Loki%200.1.7/loki-" "https://downloads.sourceforge.net/project/loki-lib/Loki/Loki%200.1.7/loki-"
version ".zip")) version ".zip"))
(sha256 (sha256 (base32 "0p23k4dipk5nnfpvhhqj9apz8rhnd62qdydjmzx8q78sxpwims4w"))))
(base32 (build-system gnu-build-system)
"0p23k4dipk5nnfpvhhqj9apz8rhnd62qdydjmzx8q78sxpwims4w")))) (inputs `(("gcc-toolchain" ,gcc-toolchain)))
(build-system gnu-build-system) (synopsis "Loki is a C++ library of designs, containing flexible implementations of common design patterns and idioms.")
(inputs `(("gcc-toolchain" ,gcc-toolchain))) (description "Loki is the name of a C++ software library written by Andrei Alexandrescu as part of his book Modern C++ Design.
(synopsis The library makes extensive use of C++ template metaprogramming and implements several commonly used tools: typelist, functor, singleton, smart pointer, object factory, visitor and multimethods.")
"Loki is a C++ library of designs, containing flexible implementations of common design patterns and idioms.") (home-page "http://loki-lib.sourceforge.net/index.php?n=Main.HomePage")
(description (license gpl3+)))
"Loki is the name of a C++ software library written by Andrei Alexandrescu as part of his book Modern C++ Design.
The library makes extensive use of C++ template metaprogramming and implements several commonly used tools: typelist, functor, singleton, smart pointer, object factory, visitor and multimethods.")
(home-page "http://loki-lib.sourceforge.net/index.php?n=Main.HomePage")
(license gpl3+)))
;; was commented out… guix repl is ok… so uncomment right now
(define-public yade-2022.01a (define-public yade-2022.01a
(package (package
(name "yade") (name "yade")
(version "2022.01a") (version "2022.01a")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "https://gitlab.com/yade-dev/trunk/-/archive/2022.01a/trunk-" version ".tar.gz"))
"https://gitlab.com/yade-dev/trunk/-/archive/2022.01a/trunk-" (sha256 (base32 "0k4hnvi70cqzl0q54kkbij6jwxydhfwcacp9s49n3fkaf1dihxiv"))))
version ".tar.gz")) (build-system cmake-build-system)
(sha256 (arguments
(base32 `(#:configure-flags (list "-DENABLE_POTENTIAL_BLOCKS=OFF"
"0k4hnvi70cqzl0q54kkbij6jwxydhfwcacp9s49n3fkaf1dihxiv")))) (string-append "-DCMAKE_INSTALL_PREFIX=" (assoc-ref %outputs "out"))
(build-system cmake-build-system) (string-append "-DQGLVIEWER_INCLUDE_DIR=" (assoc-ref %build-inputs "libqglviewer")))
(arguments #:phases (modify-phases %standard-phases
`(#:configure-flags (list "-DENABLE_POTENTIAL_BLOCKS=OFF" (add-after 'unpack 'post-unpack
(string-append "-DCMAKE_INSTALL_PREFIX=" (lambda* (#:key outputs inputs #:allow-other-keys)
(assoc-ref %outputs "out")) (mkdir-p "./build")
(string-append "-DQGLVIEWER_INCLUDE_DIR=" (chdir "./build")))
(assoc-ref %build-inputs (replace 'configure
"libqglviewer"))) (lambda* (#:key inputs outputs configure-flags
;; (string-append "-DQGLVIEWER_INCLUDE_DIR=" #:allow-other-keys)
;; libqglviewer)))) (let ((out (assoc-ref outputs "out")))
#:phases (modify-phases %standard-phases (apply invoke "cmake" "../" configure-flags)))))
(add-after 'unpack 'post-unpack #:tests? #f))
(lambda* (#:key outputs inputs #:allow-other-keys) (propagated-inputs `(("gdb" ,gdb)
(mkdir-p "./build") ("sqlite" ,sqlite)
(chdir "./build"))) ("openmpi" ,openmpi)
(replace 'configure ("python" ,python)
(lambda* (#:key inputs outputs configure-flags ("python-numpy" ,python-numpy)
#:allow-other-keys) ("python-matplotlib" ,python-matplotlib)
(let ((out (assoc-ref outputs "out"))) ("python-sphinx" ,python-sphinx)
(apply invoke "cmake" "../" configure-flags))))) ("python-ipython" ,python-ipython)
#:tests? #f)) ("python-mpi4py" ,python-mpi4py)
;; (lambda _ (invoke ("python-mpmath" ,python-mpmath)
;; "cmake" "../trunk" ("python-pygraphviz" ,python-pygraphviz)
;; configure-flags)))))) ("python-xlib" ,python-xlib)
(propagated-inputs `(("gdb" ,gdb) ("python-future" ,python-future)
("sqlite" ,sqlite) ("python-pyqt" ,python-pyqt)
("openmpi" ,openmpi) ("python-pyqtwebengine" ,python-pyqtwebengine)
("python" ,python) ;; beware python 3.10 is *NOT* supported ("python-qtpy" ,python-qtpy)))
("python-numpy" ,python-numpy) (inputs `(("boost" ,boost)
("python-matplotlib" ,python-matplotlib) ("qtbase-5" ,qtbase-5)
("python-sphinx" ,python-sphinx) ("freeglut" ,freeglut)
("python-ipython" ,python-ipython) ("gts" ,gts)
("python-mpi4py" ,python-mpi4py) ("pkg-config" ,pkg-config)
("python-mpmath" ,python-mpmath) ("libqglviewer" ,libqglviewer)
("python-pygraphviz" ,python-pygraphviz) ("eigen" ,eigen)
("python-xlib" ,python-xlib) ("openblas" ,openblas)
("python-future" ,python-future) ("suitesparse" ,suitesparse)
("python-pyqt" ,python-pyqt) ("gcc-toolchain" ,gcc-toolchain)
("python-pyqtwebengine" ,python-pyqtwebengine) ("metis" ,metis)
("python-qtpy" ,python-qtpy))) ("cgal" ,cgal)
(inputs `(("boost" ,boost) ("qtsvg" ,qtsvg)
("qtbase-5" ,qtbase-5) ("qtwebengine" ,qtwebengine)
;; ("qt" ,qt) ("mpfr" ,mpfr)))
("freeglut" ,freeglut)
("gts" ,gts)
("pkg-config" ,pkg-config)
("libqglviewer" ,libqglviewer)
("eigen" ,eigen)
;; ("loki" ,loki)
;; ("vtk" ,vtk)
;; ("qtwebkit" ,qtwebkit)
("openblas" ,openblas)
("suitesparse" ,suitesparse)
("gcc-toolchain" ,gcc-toolchain)
("metis" ,metis)
("cgal" ,cgal)
("qtsvg" ,qtsvg)
("qtwebengine" ,qtwebengine)
("mpfr" ,mpfr)))
(synopsis (synopsis "Yade is an extensible open-source framework for discrete numerical models, focused on Discrete Element Method.")
"Yade is an extensible open-source framework for discrete numerical models, focused on Discrete Element Method.") (description "Yade is an extensible open-source framework for discrete numerical models, focused on Discrete Element Method. The computation parts are written in c++ using flexible object model, allowing independent implementation of new algorithms and interfaces. Python is used for rapid and concise scene construction, simulation control, postprocessing and debugging.")
(description (home-page "https://www.yade-dem.org/")
"Yade is an extensible open-source framework for discrete numerical models, focused on Discrete Element Method. The computation parts are written in c++ using flexible object model, allowing independent implementation of new algorithms and interfaces. Python is used for rapid and concise scene construction, simulation control, postprocessing and debugging.") (license gpl3+)))
(home-page "https://www.yade-dem.org/")
(license gpl3+)))
(define-public yade-2023.02a (define-public yade-2023.02a
(package (package
(inherit yade-2022.01a) (inherit yade-2022.01a)
(version "2023.02a") (version "2023.02a")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append "https://gitlab.com/yade-dev/trunk/-/archive/2023.02a/trunk-" version ".tar.gz"))
"https://gitlab.com/yade-dev/trunk/-/archive/2023.02a/trunk-" (sha256 (base32 "1hdhxyaqdavrwpvam759835zyhn49c777kclz9p720pjlw55lszp"))))))
version ".tar.gz"))
(sha256
(base32
"1hdhxyaqdavrwpvam759835zyhn49c777kclz9p720pjlw55lszp"))))))
(define-public yade yade-2022.01a) (define-public yade yade-2022.01a)
(define-public yade-glicid-waves (define-public yade-glicid-waves
(package (package
; (inherit (transform-package ((instead-of "openmpi-glicid-waves" openmpi) (inherit yade)
; yade) "waves")) (name "yade-glicid-waves")))
(inherit yade)
(name "yade-glicid-waves")))

10
glicid/packages/serialization.scm
View file

@ -4,8 +4,8 @@
(use-modules (guix packages) ( gnu packages serialization)) (use-modules (guix packages) ( gnu packages serialization))
(define-public yaml-cpp-static (define-public yaml-cpp-static
(package (package
(inherit yaml-cpp) (inherit yaml-cpp)
(name "yaml-cpp-static") (name "yaml-cpp-static")
(arguments (arguments
'(#:configure-flags '("-DYAML_BUILD_SHARED_LIBS=OFF"))))) '(#:configure-flags '("-DYAML_BUILD_SHARED_LIBS=OFF")))))

82
glicid/packages/storage.scm
View file

@ -2,62 +2,38 @@
(use-modules (guix packages) (use-modules (guix packages)
(guix git-download) (guix git-download)
(guix download) (guix download)
; (guix utils)
(gnu packages) (gnu packages)
(gnu packages storage) (gnu packages storage)
(gnu packages crypto) (gnu packages crypto)
(gnu packages python-xyz) ; wcwidth (gnu packages python-xyz)
(gnu packages linux) ; liburing (gnu packages linux)
) )
(define-public ceph-upstream (define-public ceph-upstream
(package (package
(inherit ceph) (inherit ceph)
(name "ceph-upstream") (name "ceph-upstream")
; (version "17.2.7releasetag") (version "17.2.7")
(version "17.2.7") (source (origin
; (source (origin (method url-fetch)
(uri (string-append "https://download.ceph.com/tarballs/ceph-" version ".tar.gz"))
; (method git-fetch) (sha256 (base32 "1612424yrf39dz010ygz8k5x1vc8731549ckfj1r39dg00m62klp"))
; (uri (git-reference (patches
; (url "https://github.com/ceph/ceph.git") (search-patches "ceph-disable-cpu-optimizations.patch"))
; (commit "b12291d110049b2f35e32e0de30d70e9a4c060d2") ;; last version 20240906 (modules '((guix build utils)))
;; (branch "quincy") (snippet
; '(for-each delete-file-recursively
; (recursive? #t))) '(
; (file-name version) "src/arrow"
(source (origin "src/c-ares"
(method url-fetch) "src/fmt"
(uri (string-append "https://download.ceph.com/tarballs/ceph-" "src/googletest"
version ".tar.gz")) "src/rapidjson"
"src/spdk"
(sha256 "src/rocksdb"
(base32 "src/utf8proc")))))
"1612424yrf39dz010ygz8k5x1vc8731549ckfj1r39dg00m62klp")) (inputs (modify-inputs (package-inputs ceph) (append liburing libxcrypt)))
(patches (native-inputs (modify-inputs (package-native-inputs ceph)
(search-patches (append python-wcwidth)))))
"ceph-disable-cpu-optimizations.patch"))
(modules '((guix build utils)))
(snippet
'(for-each delete-file-recursively
'(;; TODO: Unbundle these:
"src/arrow"
;;"src/isa-l"
;;"src/lua"
;;"src/xxHash"
;;"src/zstd"
;;"src/civetweb"
"src/c-ares"
"src/fmt"
"src/googletest"
"src/rapidjson"
"src/spdk"
"src/rocksdb"
; "src/boost" ; inexistant ??
"src/utf8proc")))))
(inputs (modify-inputs (package-inputs ceph) (append liburing libxcrypt)))
(native-inputs (modify-inputs (package-native-inputs ceph)
(append python-wcwidth)))))

6
glicid/packages/virtualization.scm
View file

@ -8,10 +8,8 @@
#:use-module (guix download) #:use-module (guix download)
#:use-module (glicid utils)) #:use-module (glicid utils))
(define-public qemu-latest (define-public qemu-latest qemu)
qemu) (define-public qemu-minimal-latest qemu-minimal)
(define-public qemu-minimal-latest
qemu-minimal)
(define-public qemu-with-rbd (define-public qemu-with-rbd
(package (package

2
glicid/packages/vpn.scm
View file

@ -63,5 +63,3 @@ Secure. NetBird enables secure remote access by applying granular access policie
(description "netbird client ui program. dirty version from github artifacts.") (description "netbird client ui program. dirty version from github artifacts.")
(home-page %netbird-homepage) (home-page %netbird-homepage)
(license license:expat))) (license license:expat)))
netbird-cli

2
glicid/services/parallel.scm
View file

@ -80,7 +80,7 @@
(system? #t) (system? #t)
(comment "slurm server user") (comment "slurm server user")
(uid 567) ;«magic number…» (uid 567) ;«magic number…»
; (group 567) ;«magic number…» ; (group 567) ;«magic number…»
(home-directory "/var/spool/slurm") (home-directory "/var/spool/slurm")
(shell (file-append bash "/bin/bash")))) (shell (file-append bash "/bin/bash"))))

5
glicid/services/rc-local.scm
View file

@ -11,15 +11,12 @@
rc-local-configuration? rc-local-configuration?
rc-local-service rc-local-service
rc-local-service-type rc-local-service-type
%default-rc-multiplelocal-conf %default-rc-multiplelocal-conf
rc-multiplelocal-configuration rc-multiplelocal-configuration
rc-multiplelocal-configuration? rc-multiplelocal-configuration?
rc-multiplelocal-service rc-multiplelocal-service
rc-multiplelocal-service-type rc-multiplelocal-service-type
))
))
(define %default-rc-local-conf (define %default-rc-local-conf
(plain-file "rc-local" " (plain-file "rc-local" "

64
glicid/services/virtualization.scm
View file

@ -1,47 +1,37 @@
(define-module (glicid services virtualization) (define-module (glicid services virtualization)
#:use-module (gnu services) #:use-module (gnu services)
#:use-module (gnu services shepherd) #:use-module (gnu services shepherd)
#:use-module ((gnu services virtualization) #:prefix gnu:) #:use-module ((gnu services virtualization) #:prefix gnu:)
#:use-module ((gnu packages virtualization) #:prefix gnu:) #:use-module ((gnu packages virtualization) #:prefix gnu:)
; #:use-module (guix records) #:use-module (guix gexp)
; #:use-module (guix utils) #:use-module (gnu services configuration)
#:use-module (guix gexp) ;; file-like? #:export (qemu-guest-agent-service-type)
#:use-module (gnu services configuration) ;; define-configuration )
(define gnu:qemu-guest-agent-configuration-qemu (@@ (gnu services virtualization) qemu-guest-agent-configuration-qemu))
#:export (qemu-guest-agent-service-type) (define gnu:qemu-guest-agent-configuration-device (@@ (gnu services virtualization) qemu-guest-agent-configuration-device))
)
(define gnu:qemu-guest-agent-configuration-qemu (@@ (gnu services virtualization) qemu-guest-agent-configuration-qemu))
(define gnu:qemu-guest-agent-configuration-device (@@ (gnu services virtualization) qemu-guest-agent-configuration-device))
(define (qemu-guest-agent-shepherd-service config) (define (qemu-guest-agent-shepherd-service config)
(let ((qemu (gnu:qemu-guest-agent-configuration-qemu config)) (let ((qemu (gnu:qemu-guest-agent-configuration-qemu config))
(device (gnu:qemu-guest-agent-configuration-device config))) (device (gnu:qemu-guest-agent-configuration-device config)))
(list (list
(shepherd-service (shepherd-service
(provision '(qemu-guest-agent)) (provision '(qemu-guest-agent))
(requirement '(udev)) ;; GLiCID (requirement '(udev))
(documentation "Run the QEMU guest agent.")
(documentation "Run the QEMU guest agent.") (start #~(make-forkexec-constructor
(start #~(make-forkexec-constructor `(,(string-append #$qemu "/bin/qemu-ga")
`(,(string-append #$qemu "/bin/qemu-ga") "--statedir" "/var/run"
"--statedir" "/var/run" ,@(if (string-null? #$device)
,@(if (string-null? #$device) '()
'() (list "--path" #$device)))
(list "--path" #$device))) #:log-file "/var/log/qemu-ga.log"))
#:log-file "/var/log/qemu-ga.log")) (stop #~(make-kill-destructor))))))
(stop #~(make-kill-destructor))))))
(define qemu-guest-agent-service-type (define qemu-guest-agent-service-type
(service-type (service-type
(inherit gnu:qemu-guest-agent-service-type) (inherit gnu:qemu-guest-agent-service-type)
(extensions (extensions
(list (service-extension shepherd-root-service-type (list (service-extension shepherd-root-service-type
qemu-guest-agent-shepherd-service))) qemu-guest-agent-shepherd-service)))))
))

120
glicid/system/file-systems.scm
View file

@ -1,63 +1,61 @@
(define-module (glicid system file-systems) (define-module (glicid system file-systems)
#:use-module (gnu system file-systems) #:use-module (gnu system file-systems)
#:export (%cgroups) )
)
(define %cgroups (define-public %cgroups
(append (list (append (list
(file-system (file-system
(device "none") (device "none")
(mount-point "/run/systemd") (mount-point "/run/systemd")
(type "tmpfs") (type "tmpfs")
(check? #f) (check? #f)
(flags '(no-suid no-dev no-exec)) (flags '(no-suid no-dev no-exec))
(options "mode=0755") (options "mode=0755")
(create-mount-point? #t) (create-mount-point? #t)
) )
(file-system (file-system
(device "none") (device "none")
(mount-point "/run/user") (mount-point "/run/user")
(type "tmpfs") (type "tmpfs")
(check? #f) (check? #f)
(flags '(no-suid no-dev no-exec)) (flags '(no-suid no-dev no-exec))
(options "mode=0755") (options "mode=0755")
(create-mount-point? #t) (create-mount-point? #t)
) )
(file-system (file-system
(device "cgroup") (device "cgroup")
(mount-point "/sys/fs/cgroup/hugetlb") (mount-point "/sys/fs/cgroup/hugetlb")
(type "cgroup") (type "cgroup")
(check? #f) (check? #f)
(options "hugetlb") (options "hugetlb")
(create-mount-point? #t) (create-mount-point? #t)
(dependencies (list (car %control-groups))) (dependencies (list (car %control-groups)))
) )
(file-system (file-system
(device "cgroup") (device "cgroup")
(mount-point "/sys/fs/cgroup/net_cls") (mount-point "/sys/fs/cgroup/net_cls")
(type "cgroup") (type "cgroup")
(check? #f) (check? #f)
(options "net_cls") (options "net_cls")
(create-mount-point? #t) (create-mount-point? #t)
(dependencies (list (car %control-groups))) (dependencies (list (car %control-groups)))
) )
(file-system (file-system
(device "cgroup") (device "cgroup")
(mount-point "/sys/fs/cgroup/net_prio") (mount-point "/sys/fs/cgroup/net_prio")
(type "cgroup") (type "cgroup")
(check? #f) (check? #f)
(options "net_prio") (options "net_prio")
(create-mount-point? #t) (create-mount-point? #t)
(dependencies (list (car %control-groups))) (dependencies (list (car %control-groups)))
) )
(file-system (file-system
(device "cgroup") (device "cgroup")
(mount-point "/sys/fs/cgroup/systemd") (mount-point "/sys/fs/cgroup/systemd")
(type "cgroup") (type "cgroup")
(check? #f) (check? #f)
(options "none,name=systemd") (options "none,name=systemd")
(create-mount-point? #t) (create-mount-point? #t)
(dependencies (list (car %control-groups))) (dependencies (list (car %control-groups)))
) )
) %control-groups ) ) %control-groups ))
)

44
glicid/utils.scm
View file

@ -6,33 +6,27 @@
#:use-module (glicid packages gcc) #:use-module (glicid packages gcc)
#:use-module (gnu packages commencement) #:use-module (gnu packages commencement)
#:use-module (gnu packages) #:use-module (gnu packages)
#:export ( )
latest-version
gcc11-instead-of-gcc
transform-package
instead-of
touch
))
(define (latest-version v1 v2) (define-public (latest-version v1 v2)
(case (version-compare (package-version v1) (package-version v2)) (case (version-compare (package-version v1) (package-version v2))
((>) v1) ((>) v1)
((=) v1) ((=) v1)
((<) v2))) ((<) v2)))
(define gcc11-instead-of-gcc (define-public gcc11-instead-of-gcc
(package-input-rewriting (package-input-rewriting
`((,gcc-toolchain . ,gcc-toolchain-11) `((,gcc-toolchain . ,gcc-toolchain-11)
(,gfortran-toolchain . ,gfortran-toolchain-11) (,gfortran-toolchain . ,gfortran-toolchain-11)
))) )))
(define (transform-package original-package suffix) (define-public (transform-package original-package suffix)
(package (package
(inherit original-package) (inherit original-package)
(name (string-append (package-name original-package) "-" suffix )))) (name (string-append (package-name original-package) "-" suffix ))))
(define (instead-of package-a-spec package-b) (define-public (instead-of package-a-spec package-b)
(package-input-rewriting/spec `( (,package-a-spec . ,(const package-b))))) (package-input-rewriting/spec `( (,package-a-spec . ,(const package-b)))))
(define (touch filename) (define-public (touch filename)
(call-with-output-file file-name (const #t))) (call-with-output-file file-name (const #t)))