1
0
forked from tribes/guix

Compare commits

..

1 Commits

Author SHA1 Message Date
Ricardo Wurmus bab1880fca gnu: Add dexed.
* gnu/packages/audio.scm (dexed): New variable.

Change-Id: I0769a822060e85cfb902fe79525dce4a7e2d169a
2026-02-06 21:40:34 +01:00
682 changed files with 99453 additions and 105890 deletions
+3 -3
View File
@@ -37,13 +37,13 @@ Tick a box by changing it from [ ] to [x].
```
- Package **addition**
- [ ] The packages includes tests when available.
- [ ] Fixed errors reported by `guix lint` (`./pre-inst-env guix lint PACKAGE ...`).
- [ ] Verified cryptographic signature provided by upstream.
- [ ] The packages don't use bundled copies of software.
- [ ] Synopsis and description are written in conformance with [the guidelines](https://guix.gnu.org/manual/devel/en/html_node/Synopses-and-Descriptions.html).
- [ ] Commit messages follow [the "ChangeLog" style](https://www.gnu.org/prep/standards/html_node/Change-Logs.html).
- [ ] The change doesn't break `guix pull` (`guix pull --url=/path/to/your/checkout --profile=/tmp/guix.master --disable-authentication`).
- [ ] Commit messages follow [the "ChangeLog" style](https://www.gnu.org/prep/standards/html_node/Change-Logs.html).
- [ ] The change doesn't break `guix pull` (`guix pull --url=/path/to/your/checkout --profile=/tmp/guix.master --disable-authentication`).
- Successfully cross-compiled to the following target(s) (this is optional):
- [ ] x86_64-linux-gnu
+3 -70
View File
@@ -10,7 +10,6 @@ gnu/packages/machine-learning\.scm @guix/ai
gnu/packages/audio\.scm @guix/audio
gnu/packages/fluidplug\.scm @guix/audio
gnu/packages/music\.scm @guix/audio
gnu/packages/xiph\.scm @guix/audio
gnu/packages/elixir(-.+|)\.scm$ @guix/beam
@@ -28,14 +27,6 @@ gnu/packages/bootstrap\.scm @guix/bootstrap
gnu/packages/commencement\.scm @guix/bootstrap
gnu/packages/mes\.scm @guix/bootstrap
gnu/packages/assembly\.scm @guix/build-tools
gnu/packages/autogen\.scm @guix/build-tools
gnu/packages/autotools\.scm @guix/build-tools
gnu/packages/bison\.scm @guix/build-tools
gnu/packages/m4\.scm @guix/build-tools
gnu/packages/oyacc\.scm @guix/build-tools
gnu/packages/re2c\.scm @guix/build-tools
gnu/build-system/cmake\.scm @guix/cpp
gnu/build/cmake-build-system\.scm @guix/cpp
gnu/packages/c\.scm @guix/cpp
@@ -143,14 +134,12 @@ guix/build-system/gnu\.scm @guix/core-packages
gnu/packages/(.*-|)crypto\.scm$ @guix/crypto
gnu/packages/cryptsetup\.scm @guix/crypto
gnu/packages/cybersecurity\.scm @guix/crypto
gnu/packages/gnupg\.scm @guix/crypto
gnu/packages/nettle\.scm @guix/crypto
gnu/packages/password-utils\.scm @guix/crypto
gnu/packages/security-token\.scm @guix/crypto
gnu/packages/ssh\.scm @guix/crypto
gnu/packages/tls\.scm @guix/crypto
gnu/packages/vpn\.scm @guix/crypto
gnu/packages/debian\.scm @guix/debian
@@ -195,7 +184,6 @@ gnu/packages/glib\.scm @guix/gnome
gnu/packages/gstreamer\.scm @guix/gnome
gnu/packages/gtk\.scm @guix/gnome
gnu/packages/gnome\.scm @guix/gnome
gnu/packages/gnome-circle\.scm @guix/gnome
gnu/packages/gnome-xyz\.scm @guix/gnome
gnu/packages/webkit\.scm @guix/gnome
gnu/services/desktop\.scm @guix/gnome
@@ -244,8 +232,6 @@ gnu/packages/oneapi\.scm @guix/hpc
gnu/packages/opencl\.scm @guix/hpc
gnu/packages/parallel\.scm @guix/hpc
gnu/packages/rocm\.scm @guix/hpc
gnu/packages/rocm-tools\.scm @guix/hpc
gnu/packages/rocm-libs\.scm @guix/hpc
gnu/packages/sycl\.scm @guix/hpc
gnu/packages/tbb\.scm @guix/hpc
gnu/packages/vulkan\.scm @guix/hpc
@@ -301,9 +287,6 @@ gnu/packages/fcitx5\.scm @guix/localization
gnu/packages/fonts\.scm @guix/localization
gnu/packages/ibus\.scm @guix/localization
gnu/packages/lua\.scm @guix/lua
gnu/packages/luanti\.scm @guix/lua
gnu/packages/lxqt\.scm @guix/lxqt
gnu/packages/mate\.scm @guix/mate
@@ -325,39 +308,18 @@ guix/import/opam\.scm @guix/ocaml
guix/scripts/import/opam\.scm @guix/ocaml
tests/import/opam\.scm @guix/ocaml
gnu/packages/perl(-.+|)\.scm$ @guix/perl
guix/build/perl-build-system\.scm @guix/perl
guix/build/rakudo-build-system\.scm @guix/perl
guix/build-system/perl\.scm @guix/perl
guix/build-system/rakudo\.scm @guix/perl
guix/import/cpan\.scm @guix/perl
guix/scripts/import/cpan\.scm @guix/perl
gnu/packages/django\.scm @guix/python
gnu/packages/jupyter\.scm @guix/python
gnu/packages/python(-.+|)\.scm$ @guix/python
gnu/packages/sphinx\.scm @guix/python
gnu/packages/tryton\.scm @guix/python
guix/build-system/pyproject\.scm @guix/python
guix/build-system/python\.scm @guix/python
guix/build/pyproject-build-system\.scm @guix/python
guix/build-system/pyproject\.scm @guix/python
guix/build/python-build-system\.scm @guix/python
guix/build/toml\.scm @guix/python
guix/build-system/python\.scm @guix/python
guix/import/pypi\.scm @guix/python
guix/scripts/import/pypi\.scm @guix/python
tests/import/pypi\.scm @guix/python
tests/toml\.scm @guix/python
gnu/ci\.scm @guix/qa-packages
gnu/packages/benchmark\.scm @guix/qa-packages
gnu/packages/check\.scm @guix/qa-packages
gnu/packages/ci\.scm @guix/qa-packages
gnu/packages/code\.scm @guix/qa-packages
gnu/packages/debug\.scm @guix/qa-packages
gnu/packages/dezyne\.scm @guix/qa-packages
gnu/packages/libunwind\.scm @guix/qa-packages
gnu/services/ci\.scm @guix/qa-packages
gnu/tests/ci\.scm @guix/qa-packages
gnu/packages/qt\.scm @guix/qt
guix/build-system/qt\.scm @guix/qt
@@ -407,7 +369,6 @@ gnu/packages/graph\.scm @guix/science
gnu/packages/lean\.scm @guix/science
gnu/packages/maths\.scm @guix/science
gnu/packages/medical\.scm @guix/science
gnu/packages/physics\.scm @guix/science
gnu/packages/sagemath\.scm @guix/science
gnu/packages/statistics\.scm @guix/science
@@ -420,7 +381,7 @@ gnu/packages/antivirus\.scm @guix/sysadmin
gnu/packages/apparmor\.scm @guix/sysadmin
gnu/packages/authentication\.scm @guix/sysadmin
gnu/packages/cluster\.scm @guix/sysadmin
gnu/packages/configuration-management\.scm @guix/sysadmin
gnu/packages/configuration-management @guix/sysadmin
gnu/packages/databases\.scm @guix/sysadmin
gnu/packages/distributed\.scm @guix/sysadmin
gnu/packages/dns\.scm @guix/sysadmin
@@ -440,25 +401,6 @@ gnu/packages/task-runners\.scm @guix/sysadmin
gnu/packages/terraform\.scm @guix/sysadmin
gnu/packages/virtualization\.scm @guix/sysadmin
gnu/packages/vnc\.scm @guix/sysadmin
gnu/services/admin\.scm @guix/sysadmin
gnu/services/authentication\.scm @guix/sysadmin
gnu/services/databases\.scm @guix/sysadmin
gnu/services/dns\.scm @guix/sysadmin
gnu/services/high-availability\.scm @guix/sysadmin
gnu/services/kerberos\.scm @guix/sysadmin
gnu/services/monitoring\.scm @guix/sysadmin
gnu/services/nfs\.scm @guix/sysadmin
gnu/services/samba\.scm @guix/sysadmin
gnu/services/virtualization\.scm @guix/sysadmin
gnu/services/vnc\.scm @guix/sysadmin
gnu/tests/databases\.scm @guix/sysadmin
gnu/tests/dns\.scm @guix/sysadmin
gnu/tests/high-availability\.scm @guix/sysadmin
gnu/tests/monitoring\.scm @guix/sysadmin
gnu/tests/nfs\.scm @guix/sysadmin
gnu/tests/samba\.scm @guix/sysadmin
gnu/tests/virtualization\.scm @guix/sysadmin
gnu/tests/vnc\.scm @guix/sysadmin
gnu/build/jami-service\.scm @guix/telephony
gnu/packages/jami\.scm @guix/telephony
@@ -480,15 +422,6 @@ tests/import/texlive\.scm @guix/tex
etc/news\.scm @guix/translations
po/ @guix/translations
gnu/packages/version-control\.scm @guix/vcs
gnu/services/version-control\.scm @guix/vcs
gnu/tests/version-control\.scm @guix/vcs
guix/build/bzr\.scm @guix/vcs
guix/build/cvs\.scm @guix/vcs
guix/build/git\.scm @guix/vcs
guix/build/hg\.scm @guix/vcs
guix/build/svn\.scm @guix/vcs
gnu/packages/xfce\.scm @guix/xfce
gnu/packages/zig\.scm @guix/zig
+35 -35
View File
@@ -14,7 +14,7 @@
# Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
# Copyright © 2018 Alex Vong <alexvong1995@gmail.com>
# Copyright © 2019, 2023 Efraim Flashner <efraim@flashner.co.il>
# Copyright © 2020, 2021, 2023, 2025, 2026 Maxim Cournoyer <maxim@guixotic.coop>
# Copyright © 2020, 2021, 2023, 2025 Maxim Cournoyer <maxim@guixotic.coop>
# Copyright © 2021 Chris Marusich <cmmarusich@gmail.com>
# Copyright © 2021 Andrew Tropin <andrew@trop.in>
# Copyright © 2023 Clément Lassieur <clement@lassieur.org>
@@ -268,6 +268,7 @@ MODULES = \
guix/build/kconfig.scm \
guix/build/linux-module-build-system.scm \
guix/build/store-copy.scm \
guix/build/json.scm \
guix/build/pack.scm \
guix/build/utils.scm \
guix/build/union.scm \
@@ -454,12 +455,13 @@ AUX_FILES = \
gnu/packages/aux-files/findclass.php \
gnu/packages/aux-files/guix.vim \
gnu/packages/aux-files/guix-nvim.vim \
gnu/packages/aux-files/linux-libre/6.19-arm64.conf \
gnu/packages/aux-files/linux-libre/6.19-i686.conf \
gnu/packages/aux-files/linux-libre/6.19-x86_64.conf \
gnu/packages/aux-files/linux-libre/6.18-arm64.conf \
gnu/packages/aux-files/linux-libre/6.18-i686.conf \
gnu/packages/aux-files/linux-libre/6.18-x86_64.conf \
gnu/packages/aux-files/linux-libre/6.17-arm64.conf \
gnu/packages/aux-files/linux-libre/6.17-i686.conf \
gnu/packages/aux-files/linux-libre/6.17-riscv.conf \
gnu/packages/aux-files/linux-libre/6.17-x86_64.conf \
gnu/packages/aux-files/linux-libre/6.12-arm.conf \
gnu/packages/aux-files/linux-libre/6.12-arm64.conf \
gnu/packages/aux-files/linux-libre/6.12-i686.conf \
@@ -481,6 +483,10 @@ AUX_FILES = \
gnu/packages/aux-files/linux-libre/5.10-arm64.conf \
gnu/packages/aux-files/linux-libre/5.10-i686.conf \
gnu/packages/aux-files/linux-libre/5.10-x86_64.conf \
gnu/packages/aux-files/linux-libre/5.4-arm.conf \
gnu/packages/aux-files/linux-libre/5.4-arm64.conf \
gnu/packages/aux-files/linux-libre/5.4-i686.conf \
gnu/packages/aux-files/linux-libre/5.4-x86_64.conf \
gnu/packages/aux-files/ovmf/51-edk2-ovmf-2m-raw-x64-nosb.json \
gnu/packages/aux-files/pack-audit.c \
gnu/packages/aux-files/python/sanity-check.py \
@@ -492,6 +498,7 @@ AUX_FILES = \
# Templates, examples.
EXAMPLES = \
gnu/system/examples/asus-c201.tmpl \
gnu/system/examples/bare-bones.tmpl \
gnu/system/examples/bare-hurd.tmpl \
gnu/system/examples/bare-hurd64.tmpl \
@@ -1262,49 +1269,42 @@ cuirass-jobs: $(GOBJECTS)
.PHONY: clean-go make-go as-derivation
.PHONY: update-guix-package update-NEWS cuirass-jobs release
if in_git_p
# Git auto-configuration.
.git/hooks/:
$(AM_V_at)if test -d .git; then \
mkdir "$@"; \
fi
# Note: the following git commands may fail and produce empty variables,
# e.g. when working on a work tree in a container.
GIT_HOOKS_DIR := $(shell git rev-parse --git-path hooks 2>/dev/null)
GIT_CONFIG_FILE := $(shell git rev-parse --git-path config 2>/dev/null)
$(GIT_HOOKS_DIR):
if [ -n "$(GIT_HOOKS_DIR)" ]; then mkdir -p "$@"; fi
.git/hooks/%: etc/git/% | .git/hooks/
$(AM_V_at)if test -d .git; then \
cp "$<" "$@"; \
fi
$(GIT_HOOKS_DIR)/%: etc/git/% | $(GIT_HOOKS_DIR)/
if [ -n "$(GIT_HOOKS_DIR)" ]; then cp "$<" "$@"; fi
$(GIT_CONFIG_FILE): etc/git/gitconfig
if [ -n "$(GIT_CONFIG_FILE)" ]; then \
git config --fixed-value --replace-all include.path \
../etc/git/gitconfig ../etc/git/gitconfig; \
.git/config: etc/git/gitconfig
$(AM_V_at)if command -v git >/dev/null && test -d .git; then \
git config --fixed-value --replace-all include.path \
../etc/git/gitconfig ../etc/git/gitconfig; \
fi
COMMIT_MSG_MAGIC = VGhpcyBpcyB0aGUgY29tbWl0LW1zZyBob29rIG9mIEd1aXg=
$(GIT_HOOKS_DIR)/commit-msg: etc/git/commit-msg | $(GIT_HOOKS_DIR)
if [ -n "$(GIT_HOOKS_DIR)" ]; then \
if test -f $@ && ! grep -qF $(COMMIT_MSG_MAGIC) $@; then \
mkdir -p $@.d && mv $@ $@.d && \
echo user commit-msg hook moved to $@.d/commit-msg; \
fi && \
cp etc/git/commit-msg $@; \
.git/hooks/commit-msg: etc/git/commit-msg | .git/hooks/
$(AM_V_at)if test -d .git; then \
if test -f $@ && ! grep -qF $(COMMIT_MSG_MAGIC) $@; then \
mkdir -p $@.d && mv $@ $@.d && \
@ echo user commit-msg hook moved to $@.d/commit-msg; \
fi; \
cp etc/git/commit-msg $@; \
fi
# Convenience targets.
GIT_HOOKS_SOURCE_FILES := $(shell find etc/git -type f -executable)
.PHONY: git-config git-hooks invalidate-hooks
git-hooks: $(addprefix $(GIT_HOOKS_DIR)/,$(notdir $(GIT_HOOKS_SOURCE_FILES)))
git-config: $(GIT_CONFIG_FILE) git-hooks
# The etc/git/ config files are not distributed and have no use when building
# from a tarball. Do not add dependencies on these to *_DATA when building
# from a tarball, as that breaks the build.
if in_git_p
nodist_noinst_DATA = \
$(GIT_HOOKS_DIR)/pre-push \
$(GIT_HOOKS_DIR)/post-merge \
$(GIT_CONFIG_FILE) \
$(GIT_HOOKS_DIR)/commit-msg
.git/hooks/pre-push \
.git/hooks/post-merge \
.git/config \
.git/hooks/commit-msg
endif
# Downloading up-to-date PO files.
-4
View File
@@ -14,10 +14,6 @@ Copyright © 2026 Noé Lopez <noelopez@free.fr>
Please send Guix bug reports to bug-guix@gnu.org.
* Changes in 1.6.0 (since 1.5.0)
** Distribution
*** GNOME updated to version 48
* Changes in 1.5.0 (since 1.4.0)
** Package management
*** New rpm format for the guix pack command
+1 -14
View File
@@ -111,9 +111,6 @@ build daemon, from within the generated build program."
#~(begin
(use-modules (ice-9 match))
;; To avoid lots of readlink calls
(fluid-set! %file-port-name-canonicalization #f)
(eval-when (expand load eval)
;; (gnu packages …) modules are going to be looked up
;; under SOURCE. (guix config) is looked up in FRONT.
@@ -172,13 +169,6 @@ build daemon, from within the generated build program."
;; build output.
(connect sock AF_UNIX build-output)
(when (integer? proto)
;; port->connection doesn't setup buffering, so
;; do this here
(setvbuf (store-connection-socket store)
'block
%default-store-connection-buffer-size))
(display
(and=>
;; Silence autoload warnings and the likes.
@@ -249,9 +239,6 @@ Display a spinner when nothing happens."
#:rest rest)
"Return a derivation that unpacks SOURCE into STORE and compiles Scheme
files."
;; Avoid lots of readlink calls
(fluid-set! %file-port-name-canonicalization #f)
;; Build the build program and then use it as a trampoline to build from
;; SOURCE.
(mlet %store-monad ((build (build-program source version guile-version
@@ -337,7 +324,7 @@ files."
(message (format #f "You found a bug: the program '~a'
failed to compute the derivation for Guix (version: ~s; system: ~s;
host version: ~s; pull-version: ~s).
Please report the COMPLETE output above to <~a>.~%"
Please report the COMPLETE output above by email to <~a>.~%"
(derivation->output-path build)
version system %guix-version pull-version
%guix-bug-report-address))))))))))))
-7
View File
@@ -20,9 +20,6 @@
(use-modules (srfi srfi-26))
;; Avoid lots of readlink calls
(fluid-set! %file-port-name-canonicalization #f)
;; Add ~/.config/guix/current to the search path.
(eval-when (expand load eval)
(and=> (or (getenv "XDG_CONFIG_HOME")
@@ -44,10 +41,6 @@
(match (command-line)
((program source)
;; The build procedure outputs to this port, so setup buffering to avoid
;; one char per syscall.
(setvbuf (current-error-port) 'line)
(with-error-handling
(with-store store
(let* ((script (string-append source "/build-aux/build-self.scm"))
+3 -3
View File
@@ -128,13 +128,13 @@ COMMIT. PROC receives the temporary directory file name as an argument."
(define %guix-git-repo-push-url-regexp
"(git.guix.gnu.org|codeberg.org/guix|git@codeberg.org:guix)/guix(.git)? \\(push\\)")
(define (with-input-pipe-to-string prog . args)
(let* ((input-pipe (apply open-pipe* OPEN_READ prog args))
(define-syntax-rule (with-input-pipe-to-string prog arg ...)
(let* ((input-pipe (open-pipe* OPEN_READ prog arg ...))
(output (get-string-all input-pipe))
(exit-val (status:exit-val (close-pipe input-pipe))))
(unless (zero? exit-val)
(error (format #f "Command ~s exited with non-zero exit status: ~s"
(string-join (cons prog args)) exit-val)))
(string-join (list prog arg ...)) exit-val)))
(string-trim-both output)))
(define (find-origin-remote)
+145 -123
View File
@@ -25,6 +25,7 @@ choice.
* Running the Test Suite:: Testing Guix.
* Running Guix Before It Is Installed:: Hacker tricks.
* The Perfect Setup:: The right tools.
* Alternative Setups:: Other possible tools that do the job.
* Source Tree Structure:: Source code guided tour.
* Packaging Guidelines:: Growing the distribution.
* Coding Style:: Hygiene of the contributor.
@@ -66,7 +67,7 @@ GNU Guix depends on the following packages:
@itemize
@item @url{https://gnu.org/software/guile/, GNU Guile}, version 3.0.x,
version 3.0.9 or later;
@item @url{https://codeberg.org/guile-gcrypt/guile-gcrypt, Guile-Gcrypt}, version
@item @url{https://notabug.org/cwebber/guile-gcrypt, Guile-Gcrypt}, version
0.1.0 or later;
@item
@uref{https://gitlab.com/gnutls/guile/, Guile-GnuTLS} (@pxref{Guile
@@ -75,11 +76,11 @@ gnutls-guile, GnuTLS-Guile})@footnote{The Guile bindings to
@uref{https://gnutls.org/, GnuTLS} were distributed as part of GnuTLS
until version 3.7.8 included.};
@item
@uref{https://codeberg.org/guile-sqlite3/guile-sqlite3, Guile-SQLite3}, version 0.1.0
@uref{https://notabug.org/guile-sqlite3/guile-sqlite3, Guile-SQLite3}, version 0.1.0
or later;
@item @uref{https://codeberg.org/guile-compression/guile-zlib, Guile-zlib},
@item @uref{https://notabug.org/guile-zlib/guile-zlib, Guile-zlib},
version 0.1.0 or later;
@item @uref{https://codeberg.org/guile-compression/guile-lzlib, Guile-lzlib};
@item @uref{https://notabug.org/guile-lzlib/guile-lzlib, Guile-lzlib};
@item @uref{https://www.nongnu.org/guile-avahi/, Guile-Avahi};
@item
@uref{https://gitlab.com/guile-git/guile-git, Guile-Git}, version 0.10.0
@@ -101,7 +102,7 @@ Support for build offloading (@pxref{Daemon Offload Setup}) and
version 0.13.0 or later.
@item
@uref{https://codeberg.org/guile-compression/guile-zstd, Guile-zstd}, for zstd
@uref{https://notabug.org/guile-zstd/guile-zstd, Guile-zstd}, for zstd
compression and decompression in @command{guix publish} and for
substitutes (@pxref{Invoking guix publish}).
@@ -535,64 +536,14 @@ to build again each time you update a package file, run
@node The Perfect Setup
@section The Perfect Setup
@cindex editor setup, for Scheme
@cindex Scheme code editing
All configuration and development in Guix is done in the Scheme
language. Like all languages of the Lisp family, Scheme has a simple
syntax. The perfect setup is one where the editor you choose makes
working with that syntax seamless and pleasant; for that it must
absolutely support a few things for Scheme:
@itemize
@item
automatic indentation, such that hitting the ``Enter'' key (or
@kbd{RET}) places cursor ``at the right place'' on the next line;
@item
``parentheses matching'', allowing you to jump from a closing
parenthesis to the corresponding opening parenthesis and vice-versa;
@item
syntax highlighting, so that keywords are visually distinguishable.
@end itemize
The following optional features can make your life easier:
@itemize
@item
structural editing of Scheme syntax;
@item
Guile integration so you can easily evaluate code, jump to procedure
definitions, view documentation, and so on.
@end itemize
The following sections look at editor setups that are known to work
well. Do share your setup for these and other editors for inclusion in
this manual! @xref{Submitting Patches}.
@menu
* Emacs:: Best-of-breed editor for Scheme code.
* Guile Studio:: First step in your transition to Emacs.
* Vim and NeoVim:: Classical Unix editors.
@end menu
@node Emacs
@subsection Emacs
@url{https://www.gnu.org/software/emacs, Emacs} is probably the most
widely used editor in the community; it is also the one that,
historically, has always had excellent support for Lisp languages, being
itself a Lisp implementation!
@quotation Note
If you are just getting started with Emacs, @pxref{Guile Studio} for a
smooth way to start your transition.
@end quotation
Just like for Guile hacking (@pxref{Using Guile in Emacs,,, guile, Guile
Reference Manual}), Emacs works best when empowered by the wonderful
@url{https://nongnu.org/geiser/, Geiser}. To set that up, run:
The Perfect Setup to hack on Guix is basically the perfect setup used
for Guile hacking (@pxref{Using Guile in Emacs,,, guile, Guile Reference
Manual}). First, you need more than an editor, you need
@url{https://www.gnu.org/software/emacs, Emacs}, empowered by the
wonderful @url{https://nongnu.org/geiser/, Geiser}. To set that up, run:
@example
guix install emacs guile emacs-geiser emacs-geiser-guile emacs-guix
guix install emacs guile emacs-geiser emacs-geiser-guile
@end example
Geiser allows for interactive and incremental development from within
@@ -611,15 +562,6 @@ facilities to directly operate on the syntax tree, such as raising an
s-expression or wrapping it, swallowing or rejecting the following
s-expression, etc.
Cherry on the cake: the Emacs-Guix package provides a convenient
interface to many commands---e.g., it lets you browse packages, install
or remove packages, and so on---as well as development helpers that
enhance @code{scheme-mode} and Geiser. @xref{Introduction,,,
emacs-guix, Emacs-Guix Reference Manual}, to make sure you don't miss
out!
@unnumberedsubsubsec Taming Boilerplate with Templates
@cindex code snippets
@cindex templates
@cindex reducing boilerplate
@@ -659,8 +601,6 @@ trigger string @code{origin...}, which can be expanded further. The
@code{origin} snippet in turn may insert other trigger strings ending on
@code{...}, which also can be expanded further.
@unnumberedsubsubsec Updating Copyright Lines
@cindex insert or update copyright
@cindex @code{M-x guix-copyright}
@cindex @code{M-x copyright-update}
@@ -689,30 +629,104 @@ copyright-update}. If you want to do it automatically after each buffer
save then add @code{(add-hook 'after-save-hook 'copyright-update)} in
Emacs.
@unnumberedsubsubsec Referencing Bug Reports
@node Viewing Bugs within Emacs
@subsection Viewing Bugs within Emacs
@cindex bug references, Emacs
Emacs has a nice minor mode called @code{bug-reference}, which can be
used to follow link to issues and pull requests such as @samp{#1234} or
@samp{guix/guix#1234} (@pxref{Bug Reference,,, emacs, The GNU Emacs
Manual}). To set it up, enable it in the relevant modes:
Emacs has a nice minor mode called @code{bug-reference}, which, when
combined with @samp{emacs-debbugs} (the Emacs package), can be used to
open links such as @samp{<https://bugs.gnu.org/58697>} or
@samp{<https://issues.guix.gnu.org/58697>} as bug report buffers. From
there you can easily consult the email thread via the Gnus interface,
reply or modify the bug status, all without leaving the comfort of
Emacs! Below is a sample configuration to add to your @file{~/.emacs}
configuration file:
@lisp
;;; Bug references.
(require 'bug-reference)
(add-hook 'prog-mode-hook #'bug-reference-prog-mode)
(add-hook 'gnus-mode-hook #'bug-reference-mode)
(add-hook 'erc-mode-hook #'bug-reference-mode)
;; Add extra hooks for your mail user agent: Gnus, mu4e, etc.
(add-hook 'gnus-summary-mode-hook #'bug-reference-mode)
(add-hook 'gnus-article-mode-hook #'bug-reference-mode)
;;; This extends the default expression (the top-most, first expression
;;; provided to 'or') to also match URLs such as
;;; <https://issues.guix.gnu.org/58697> or <https://bugs.gnu.org/58697>.
;;; It is also extended to detect "Fixes: #NNNNN" git trailers.
(setq bug-reference-bug-regexp
(rx (group (or (seq word-boundary
(or (seq (char "Bb") "ug"
(zero-or-one " ")
(zero-or-one "#"))
(seq (char "Pp") "atch"
(zero-or-one " ")
"#")
(seq (char "Ff") "ixes"
(zero-or-one ":")
(zero-or-one " ") "#")
(seq "RFE"
(zero-or-one " ") "#")
(seq "PR "
(one-or-more (char "a-z+-")) "/"))
(group (one-or-more (char "0-9"))
(zero-or-one
(seq "#" (one-or-more
(char "0-9"))))))
(seq (? "<") "https://bugs.gnu.org/"
(group-n 2 (one-or-more (char "0-9")))
(? ">"))
(seq (? "<") "https://issues.guix.gnu.org/"
(? "issue/")
(group-n 2 (one-or-more (char "0-9")))
(? ">"))))))
(setq bug-reference-url-format "https://issues.guix.gnu.org/%s")
(require 'debbugs)
(require 'debbugs-browse)
(add-hook 'bug-reference-mode-hook #'debbugs-browse-mode)
(add-hook 'bug-reference-prog-mode-hook #'debbugs-browse-mode)
;; The following allows Emacs Debbugs user to open the issue directly within
;; Emacs.
(setq debbugs-browse-url-regexp
(rx line-start
"http" (zero-or-one "s") "://"
(or "debbugs" "issues.guix" "bugs")
".gnu.org" (one-or-more "/")
(group (zero-or-one "cgi/bugreport.cgi?bug="))
(group-n 3 (one-or-more digit))
line-end))
;; Change the default when run as 'M-x debbugs-gnu'.
(setq debbugs-gnu-default-packages '("guix" "guix-patches"))
;; Show feature requests.
(setq debbugs-gnu-default-severities
'("serious" "important" "normal" "minor" "wishlist"))
@end lisp
When working from a Git checkout of Guix, setup is automatic:
@code{bug-reference} automatically detects that the project is hosted on
Codeberg@footnote{
@c 'vc-git-repository-url' is used by
@c 'bug-reference-setup-from-vc-alist', which checks for one of these
@c names for the remote.
As of Emacs@tie{}30.2, auto-detection works if and
only if the Git remote is called @code{upstream} or @code{origin}.} and
infers the issue and pull request URL from there.
For more information, refer to @ref{Bug Reference,,, emacs, The GNU
Emacs Manual} and @ref{Minor Mode,,, debbugs-ug, The Debbugs User
Guide}.
@node Alternative Setups
@section Alternative Setups
Alternative setups than Emacs may let you work on Guix with a
similar development experience and they might work better with the
tools you currently use or help you make the transition to Emacs.
The options listed below only provide the alternatives to the Emacs
based setup, which is the most widely used in the Guix community. If
you want to really understand how the perfect setup for Guix development
is supposed to work, we encourage you to read the section before this
regardless of the editor you choose to use.
@menu
* Guile Studio:: First step in your transition to Emacs.
* Vim and NeoVim:: When you are evil to the root.
@end menu
@node Guile Studio
@subsection Guile Studio
@@ -730,9 +744,9 @@ Guile Studio comes with Geiser preinstalled and prepared for action.
@node Vim and NeoVim
@subsection Vim and NeoVim
@cindex Vim, for Scheme code editing
Vim (and NeoVim) are also packaged in Guix, in case these popular modal
editors are more to your taste.
Vim (and NeoVim) are also packaged in Guix, just in case you decided
to go for the evil path.
@example
guix install vim
@@ -1500,30 +1514,37 @@ satisfied.
@subsection Python Modules
@cindex python
The standard way to generate a package definition is to use
@code{guix import pypi <name>}, where @var{name} is the name of the
Python package on @url{https://pypi.org, PyPI}, see @pxref{Invoking guix
import}. Please check with @code{guix lint <package-name>} that the
generated package is valid.
We currently package Python 2 and Python 3, under the Scheme variable names
@code{python-2} and @code{python} as explained in @ref{Version Numbers}.
To avoid confusion and naming clashes with other programming languages, it
seems desirable that the name of a package for a Python module contains
the word @code{python}.
To avoid confusion and naming clashes with other programming languages,
Python module packages should be prefixed with @code{python-}.
Some modules are compatible with only one version of Python, others with
both. If the package Foo is compiled with Python 3, we name it
@code{python-foo}. If it is compiled with Python 2, we name it
@code{python2-foo}. Python 2 packages are being removed from the
distribution; please do no not submit any new Python 2 packages.
If a project already contains the word @code{python}, please do not
repeat it; for instance, the module python-dateutil is packaged under
the name @code{python-dateutil}. If the project name starts with
@code{py}, it is kept and prefixed as described above (e.g.@:
@code{python-pytz}).
If a project already contains the word @code{python}, we drop this;
for instance, the module python-dateutil is packaged under the names
@code{python-dateutil} and @code{python2-dateutil}. If the project name
starts with @code{py} (e.g.@: @code{pytz}), we keep it and prefix it as
described above.
@quotation Note
The standard build system for Python packages is Guix's implementation
of the @url{https://peps.python.org/pep-0517/, formal Python standard}
for specifying build requirements: @var{pyproject-build-system}.
The @var{python-build-system} which corresponds to the way Python
packages were built before PEP517, using the informally specified
@file{setup.py} file, is now deprecated. @var{pyproject-build-system}
will eventually be deprecated and renamed into
@var{python-build-system} after its removal.
Currently there are two different build systems for Python packages in Guix:
@var{python-build-system} and @var{pyproject-build-system}. For the
longest time, Python packages were built from an informally specified
@file{setup.py} file. That worked amazingly well, considering Python's
success, but was difficult to build tooling around. As a result, a host
of alternative build systems emerged and the community eventually settled on a
@url{https://peps.python.org/pep-0517/, formal standard} for specifying build
requirements. @var{pyproject-build-system} is Guix's implementation of this
standard. It is considered ``experimental'' in that it does not yet support
all the various PEP-517 @emph{build backends}, but you are encouraged to try
it for new Python packages and report any problems. It will eventually be
deprecated and merged into @var{python-build-system}.
@end quotation
@subsubsection Specifying Dependencies
@@ -1535,20 +1556,21 @@ package source tree, with varying degrees of accuracy: in the
@file{requirements.txt}, or in @file{tox.ini} (the latter mostly for
test dependencies).
When editing a recipe for a Python package, the goal is to map these
dependencies to the appropriate type of ``input'' (@pxref{package
Your mission, when writing a recipe for a Python package, is to map
these dependencies to the appropriate type of ``input'' (@pxref{package
Reference, inputs}). Although the @code{pypi} importer normally does a
good job (@pxref{Invoking guix import}), please verify the following
check list to determine which dependency goes where.
good job (@pxref{Invoking guix import}), you may want to check the
following check list to determine which dependency goes where.
@itemize
@item
Python is packaged @emph{without} @code{setuptools} and @code{pip}
installed per default.
We currently package Python with @code{setuptools} and @code{pip}
installed per default. This is about to change, and users are encouraged
to use @code{python-toolchain} if they want a build environment for Python.
@command{guix lint} will warn if @code{pip} or other unneeded
native-inputs are added.
@command{guix lint} will warn if @code{setuptools} or @code{pip} are
added as native-inputs because they are generally not necessary.
@item
Python dependencies required at run time go into
@@ -1563,9 +1585,9 @@ Python packages required only at build time---e.g., those listed under
for testing---e.g., those in @code{tests_require} or @file{tox.ini}---go into
@code{native-inputs}. The rationale is that (1) they do not need to be
propagated because they are not needed at run time, and (2) in a
cross-compilation context, it's the target ``native'' input.
cross-compilation context, it's the ``native'' input that we'd want.
Examples are the @code{pytest}, @code{mock}, and @code{stestr} test
Examples are the @code{pytest}, @code{mock}, and @code{nose} test
frameworks. Of course if any of these packages is also required at
run-time, it needs to go to @code{propagated-inputs}.
@@ -2496,8 +2518,8 @@ For example, to list all open issues on @code{guix-patches}, hit:
For a more convenient (shorter) way to access both the bugs and patches
submissions, you may want to configure the
@code{debbugs-gnu-default-packages} and
@code{debbugs-gnu-default-severities} Emacs variables (@pxref{Minor
Mode,,, debbugs-ug, The Debbugs User Guide}).
@code{debbugs-gnu-default-severities} Emacs variables (@pxref{Viewing
Bugs within Emacs}).
To search for bugs, @samp{@kbd{M-x} debbugs-gnu-guix-search} can be
used.
-3
View File
@@ -523,9 +523,6 @@ info sicp
You'll find more books, tutorials and other resources at
@url{https://schemers.org/}.
@xref{The Perfect Setup,,, guix, GNU Guix Reference Manual}, on how to
set up your editor for Scheme hacking.
@end quotation
+59 -942
View File
File diff suppressed because it is too large Load Diff
+1 -52
View File
@@ -2,58 +2,7 @@
# Modified by Ludovic Courtès <ludo@gnu.org> for the GNU Guix manual.
# Further modified by Tomas Volf <~@wolfsden.cz>.
htmlxrefversion=2026-02-23.07; # UTC
# Override URLs of manuals provided by the Documentation Center.
DOCUMENTATION_CENTER = https://doc.guix.gnu.org
bash mono ${DOCUMENTATION_CENTER}/bash/latest/en/bash.html
bash node ${DOCUMENTATION_CENTER}/bash/latest/en/html_node
binutils mono ${DOCUMENTATION_CENTER}/binutils/latest/en/binutils.html
binutils node ${DOCUMENTATION_CENTER}/binutils/latest/en/html_node
cuirass mono ${DOCUMENTATION_CENTER}/cuirass/latest/en/cuirass.html
cuirass node ${DOCUMENTATION_CENTER}/cuirass/latest/en/html_node
emacs-guix mono ${DOCUMENTATION_CENTER}/emacs-guix/latest/en/emacs-guix.html
emacs-guix node ${DOCUMENTATION_CENTER}/emacs-guix/latest/en/html_node
fibers mono ${DOCUMENTATION_CENTER}/fibers/latest/en/fibers.html
fibers node ${DOCUMENTATION_CENTER}/fibers/latest/en/html_node
gash mono ${DOCUMENTATION_CENTER}/gash/latest/en/gash.html
gash node ${DOCUMENTATION_CENTER}/gash/latest/en/html_node
gcrypt mono ${DOCUMENTATION_CENTER}/gcrypt/latest/en/gcrypt.html
gcrypt node ${DOCUMENTATION_CENTER}/gcrypt/latest/en/html_node
gdb mono ${DOCUMENTATION_CENTER}/gdb/latest/en/gdb.html
gdb node ${DOCUMENTATION_CENTER}/gdb/latest/en/html_node
geiser mono ${DOCUMENTATION_CENTER}/geiser/latest/en/geiser.html
geiser node ${DOCUMENTATION_CENTER}/geiser/latest/en/html_node
grub mono ${DOCUMENTATION_CENTER}/grub/latest/en/grub.html
grub node ${DOCUMENTATION_CENTER}/grub/latest/en/html_node
guile-avahi mono ${DOCUMENTATION_CENTER}/guile-avahi/latest/en/guile-avahi.html
guile-avahi node ${DOCUMENTATION_CENTER}/guile-avahi/latest/en/html_node
guile-gcrypt mono ${DOCUMENTATION_CENTER}/guile-gcrypt/latest/en/guile-gcrypt.html
guile-gcrypt node ${DOCUMENTATION_CENTER}/guile-gcrypt/latest/en/html_node
guile-gnutls mono ${DOCUMENTATION_CENTER}/guile-gnutls/latest/en/guile-gnutls.html
guile-gnutls node ${DOCUMENTATION_CENTER}/guile-gnutls/latest/en/html_node
guile-library mono ${DOCUMENTATION_CENTER}/guile-library/latest/en/guile-library.html
guile-library node ${DOCUMENTATION_CENTER}/guile-library/latest/en/html_node
guile mono ${DOCUMENTATION_CENTER}/guile/latest/en/guile.html
guile-netlink mono ${DOCUMENTATION_CENTER}/guile-netlink/latest/en/guile-netlink.html
guile-netlink node ${DOCUMENTATION_CENTER}/guile-netlink/latest/en/html_node
guile node ${DOCUMENTATION_CENTER}/guile/latest/en/html_node
guile-ssh mono ${DOCUMENTATION_CENTER}/guile-ssh/latest/en/guile-ssh.html
guile-ssh node ${DOCUMENTATION_CENTER}/guile-ssh/latest/en/html_node
inetutils mono ${DOCUMENTATION_CENTER}/inetutils/latest/en/inetutils.html
inetutils node ${DOCUMENTATION_CENTER}/inetutils/latest/en/html_node
libc mono ${DOCUMENTATION_CENTER}/libc/latest/en/libc.html
libc node ${DOCUMENTATION_CENTER}/libc/latest/en/html_node
mes mono ${DOCUMENTATION_CENTER}/mes/latest/en/mes.html
mes node ${DOCUMENTATION_CENTER}/mes/latest/en/html_node
r5rs mono ${DOCUMENTATION_CENTER}/r5rs/latest/en/r5rs.html
r5rs node ${DOCUMENTATION_CENTER}/r5rs/latest/en/html_node
recutils mono ${DOCUMENTATION_CENTER}/recutils/latest/en/recutils.html
recutils node ${DOCUMENTATION_CENTER}/recutils/latest/en/html_node
shepherd mono ${DOCUMENTATION_CENTER}/shepherd/latest/en/shepherd.html
shepherd node ${DOCUMENTATION_CENTER}/shepherd/latest/en/html_node
htmlxrefversion=2026-01-22.12; # UTC
# Copyright 2010-2020, 2022 Free Software Foundation, Inc.
#
+1 -1
View File
@@ -51,7 +51,7 @@ profile guix-daemon @{guix_storedir}/*-{guix-daemon,guix}-*/bin/guix-daemon flag
@{guix_storedir}/** rwlmkux,
owner /tmp/** rwux,
owner /tmp/** rw,
@{PROC}/@{pid}/fd/ r,
+1 -5
View File
@@ -796,14 +796,10 @@ export PATH="$GUIX_PROFILE/bin${PATH:+:}$PATH"
# trailing colon so the system default search path is used.
export INFOPATH="$GUIX_PROFILE/share/info:${INFOPATH:-}"
export MANPATH="$GUIX_PROFILE/share/man:${MANPATH:-}"
# Expose the latest Guix modules to Guile so guix shell and repls spawned by
# e.g. Geiser work out of the box.
export GUILE_LOAD_PATH="$GUIX_PROFILE/share/guile/site/3.0${GUILE_LOAD_PATH:+:$GUILE_LOAD_PATH}"
export GUILE_LOAD_COMPILED_PATH="$GUIX_PROFILE/lib/guile/3.0/site-ccache${GUILE_LOAD_COMPILED_PATH:+:$GUILE_LOAD_COMPILED_PATH}"
# User's default profile, if it exists
GUIX_PROFILE="$HOME/.guix-profile"
if [ -f "$GUIX_PROFILE/etc/profile" ]; then
if [ -L "$GUIX_PROFILE" ]; then
. "$GUIX_PROFILE/etc/profile"
# see info '(guix) Application Setup'
+3 -1
View File
@@ -45,7 +45,9 @@
(_ #f)))
(define guix-dependencies
(filter-map input->package (package-direct-inputs guix)))
(filter-map input->package
(fold alist-delete (package-direct-inputs guix)
'("glibc-utf8-locales" "graphviz" "po4a"))))
(define (package-without-tests p)
(package/inherit p
+2 -70
View File
@@ -5,7 +5,7 @@
;; Copyright © 2019, 2020 Miguel Ángel Arruga Vivas <rosen644835@gmail.com>
;; Copyright © 2019, 2020 Konrad Hinsen <konrad.hinsen@fastmail.net>
;; Copyright © 2019, 2020, 2021, 2023 Julien Lepiller <julien@lepiller.eu>
;; Copyright © 20192026 Florian Pelz <pelzflorian@pelzflorian.de>
;; Copyright © 20192025 Florian Pelz <pelzflorian@pelzflorian.de>
;; Copyright © 2020, 2022 Marius Bakke <marius@gnu.org>
;; Copyright © 2020, 2021 Mathieu Othacehe <m.othacehe@gmail.com>
;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
@@ -27,13 +27,12 @@
;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr>
;; Copyright © 2024 Sebastian Dümcke <code@sam-d.com>
;; Copyright © 2025-2026 Anderson Torres <anderson.torres.8519@gmail.com>
;; Copyright © 2025 Anderson Torres <anderson.torres.8519@gmail.com>
;; Copyright © 2025 Roman Scherer <roman@burningswell.com>
;; Copyright © 2025 Jelle Licht <jlicht@fsfe.org>
;; Copyright © 2025 Rivulet Cedar <rivulet_cedar@yeah.net>
;; Copyright © 2025 jgart <jgart@dismail.de>
;; Copyright © 2025 Steve George <steve@futurile.net>
;; Copyright © 2026 Noé Lopez <noelopez@free.fr>
;;
;; Copying and distribution of this file, with or without modification, are
@@ -43,73 +42,6 @@
(channel-news
(version 0)
(entry (commit "b52ce9041ad58aeababd2d50d3e72bc23dffff60")
(title
(en "GNOME 48 is now available")
(fr "GNOME 48 maintenant disponible")
(pt "GNOME 48 já está disponível")
(de "GNOME 48 jetzt verfügbar"))
(body
(en "The GNOME desktop was updated from version 46 to 48, bringing
accent colors, an improved Files (Nautilus) application, a new image
viewer (Loupe), and more:
@itemize
@item @url{https://release.gnome.org/47/, GNOME 47 release notes}
@item @url{https://release.gnome.org/48/, GNOME 48 release notes}
@end itemize")
(fr "La version 48 de lenvironnement de bureau GNOME est maintenant
disponible. Les nouvelles fonctionnalitées incluent: les couleurs daccent,
lapplication Fichiers (Nautilus) améliorée, un nouveau visionneur
dimages (Loupe), et plus:
@itemize
@item @url{https://release.gnome.org/47/, GNOME 47 release notes}
@item @url{https://release.gnome.org/48/, GNOME 48 release notes}
@end itemize")
(pt "GNOME desktop foi atualizado da versão 46 para a 48, trazendo
cores acentuadas, um aplicativo de arquivos (Nautilus) melhorado, um novo
visualizador de imagens (Loupe), e mais:
@itemize
@item @url{https://release.gnome.org/47/, Notas de lançamento do GNOME 47}
@item @url{https://release.gnome.org/48/, Notas de lançamento do GNOME 48}
@end itemize")
(de "Die GNOME-Desktopumgebung wurde von Version 46 auf 48
aktualisiert. Neue Funktionen in dieser Version sind die Möglichkeit, eine
Akzentfarbe zu wählen, Verbesserungen in der Dateien-Anwendung (Nautilus), ein
neuer Bildbetrachter (Loupe), und mehr. Für eine ausführlichere Liste an
Änderungen, siehe:
@itemize
@item @url{https://release.gnome.org/47/, GNOME 47 release notes}
@item @url{https://release.gnome.org/48/, GNOME 48 release notes}
@end itemize")))
(entry (commit "d659fe8666c4bc38fcbdbe7b7a35101f2d7cc41b")
(title
(en "Potential security vulnerability in glibc")
(de "Mögliche Sicherheitslücke in glibc")
(pt "Potencial vulnerabilidade de segurança em glibc"))
(body
(en "Guix adds the environment variable @code{GUIX_LOCPATH} to glibc,
however it was not added to potentially unsafe variables to be unset in
privileged environments. A CVE number is pending for this issue. This has
been fixed with a graft to glibc and users should update all profiles,
reconfigure their system, and reboot.")
(de "Guix fügt die Umgebungsvariable @code{GUIX_LOCPATH} zu glibc
hinzu, aber sie wurde nicht zu den möglicherweise unsicheren Variablen
hinzugefügt, die in privilegierten Umgebungen zurückgesetzt werden. Eine
CVE-Nummer hierfür wird noch zugewiesen. Um den Fehler zu beheben, stellen
wir eine Veredelung für glibc bereit; Nutzerinnen und Nutzer sollten all ihre
Profile aktualisieren, ihr System rekonfigurieren und neustarten.")
(pt "Guix adiciona a variável de ambiente @code{GUIX_LOCPATH} à
glibc, todavia ela não foi adicionada às variáveis potencialmente inseguras
a serem desabilitadas em ambientes privilegiados. Este incidente está
pendente de um identificador CVE. Isto foi resolvido com um enxerto à glibc,
e os usuários devem atualizar todos os seus perfis, reconfigurando seu
sistema e reiniciando-o.")))
(entry (commit "6d4cb99a15da7f4fd55f956c55f4f4aacfcc7742")
(title
(en "@code{%desktop-services} now includes GDM on AArch64")
+1 -1
View File
@@ -33,7 +33,7 @@
"node-build-system"
"ocaml-build-system"
"perl-build-system"
"pyproject-build-system"
"python-build-system"
"qt-build-system"
"r-build-system"
"rakudo-build-system"
+15 -145
View File
@@ -474,7 +474,6 @@ already exists. Lookup team IDs among CURRENT-TEAMS."
#:description "Audio related packages."
#:scope (list "gnu/packages/audio.scm"
"gnu/packages/fluidplug.scm"
"gnu/packages/music.scm"
"gnu/packages/xiph.scm")))
(define-team beam
@@ -505,18 +504,6 @@ of Rebar and Mix build systems and Hex.pm importer."
"gnu/packages/commencement.scm"
"gnu/packages/mes.scm")))
(define-team build-tools
(team 'build-tools
#:name "Build tools team"
#:description "Build tools and parser generators."
#:scope (list "gnu/packages/assembly.scm"
"gnu/packages/autogen.scm"
"gnu/packages/autotools.scm"
"gnu/packages/bison.scm"
"gnu/packages/m4.scm"
"gnu/packages/oyacc.scm"
"gnu/packages/re2c.scm")))
(define-team c++
(team 'c++
#:name "C/C++ team"
@@ -709,7 +696,6 @@ GLib/GIO, GTK, GStreamer and Webkit."
"gnu/packages/gstreamer.scm"
"gnu/packages/gtk.scm"
"gnu/packages/gnome.scm"
"gnu/packages/gnome-circle.scm"
"gnu/packages/gnome-xyz.scm"
"gnu/packages/webkit.scm"
"gnu/services/desktop.scm"
@@ -784,8 +770,6 @@ the haskell-build-system."
"gnu/packages/opencl.scm"
"gnu/packages/parallel.scm"
"gnu/packages/rocm.scm"
"gnu/packages/rocm-tools.scm"
"gnu/packages/rocm-libs.scm"
"gnu/packages/sycl.scm"
"gnu/packages/tbb.scm"
"gnu/packages/vulkan.scm")))
@@ -887,14 +871,6 @@ asdf-build-system."
"gnu/packages/fonts.scm"
"gnu/packages/ibus.scm")))
(define-team lua
(team 'lua
#:name "Lua team"
#:description
"Lua, Fennel, and related packages."
#:scope (list "gnu/packages/lua.scm"
"gnu/packages/luanti.scm")))
(define-team lxqt
(team 'lxqt
#:name "LXQt team"
@@ -942,21 +918,6 @@ importer, and the ocaml-build-system."
"guix/scripts/import/opam.scm"
"tests/import/opam.scm")))
(define-team perl
(team 'perl
#:name "Perl and Raku team"
#:description
"Perl & Raku packages, the \"cpan\" importer, and the
perl-build-system as well as the rakudo-build-system."
#:scope
(list (make-regexp* "^gnu/packages/perl(-.+|)\\.scm$")
"guix/build/perl-build-system.scm"
"guix/build/rakudo-build-system.scm"
"guix/build-system/perl.scm"
"guix/build-system/rakudo.scm"
"guix/import/cpan.scm"
"guix/scripts/import/cpan.scm")))
(define-team python
(team 'python
#:name "Python team"
@@ -968,32 +929,13 @@ perl-build-system as well as the rakudo-build-system."
(make-regexp* "^gnu/packages/python(-.+|)\\.scm$")
"gnu/packages/sphinx.scm"
"gnu/packages/tryton.scm"
"guix/build-system/pyproject.scm"
"guix/build-system/python.scm"
"guix/build/pyproject-build-system.scm"
"guix/build-system/pyproject.scm"
"guix/build/python-build-system.scm"
"guix/build/toml.scm" ;temporary, until other build system will use it
"guix/build-system/python.scm"
"guix/import/pypi.scm"
"guix/scripts/import/pypi.scm"
"tests/import/pypi.scm"
"tests/toml.scm")))
(define-team qa-packages
(team 'qa-packages
#:name "Team for quality assurance packages"
#:description
"Quality assurance software (CI/CD, testing, analysis;
no direct relation to Guix's QA)."
#:scope (list "gnu/ci.scm"
"gnu/packages/benchmark.scm"
"gnu/packages/check.scm"
"gnu/packages/ci.scm"
"gnu/packages/code.scm"
"gnu/packages/debug.scm"
"gnu/packages/dezyne.scm"
"gnu/packages/libunwind.scm"
"gnu/services/ci.scm"
"gnu/tests/ci.scm")))
"tests/import/pypi.scm")))
(define-team qt
(team 'qt
@@ -1077,14 +1019,12 @@ release."
"Secrets, passwords, cryptography and security related packages."
#:scope (list (make-regexp* "^gnu/packages/(.*-|)crypto\\.scm$")
"gnu/packages/cryptsetup.scm"
"gnu/packages/cybersecurity.scm"
"gnu/packages/gnupg.scm"
"gnu/packages/nettle.scm"
"gnu/packages/password-utils.scm"
"gnu/packages/security-token.scm"
"gnu/packages/ssh.scm"
"gnu/packages/tls.scm"
"gnu/packages/vpn.scm")))
"gnu/packages/tls.scm")))
(define-team science
(team 'science
@@ -1100,7 +1040,6 @@ packages (e.g. Astronomy, Chemistry, Math, Physics etc.)"
"gnu/packages/lean.scm"
"gnu/packages/maths.scm"
"gnu/packages/medical.scm"
"gnu/packages/physics.scm"
"gnu/packages/sagemath.scm"
"gnu/packages/statistics.scm")))
@@ -1123,7 +1062,7 @@ packages (e.g. Astronomy, Chemistry, Math, Physics etc.)"
"gnu/packages/apparmor.scm"
"gnu/packages/authentication.scm"
"gnu/packages/cluster.scm"
"gnu/packages/configuration-management.scm"
"gnu/packages/configuration-management"
"gnu/packages/databases.scm"
"gnu/packages/distributed.scm"
"gnu/packages/dns.scm"
@@ -1142,26 +1081,7 @@ packages (e.g. Astronomy, Chemistry, Math, Physics etc.)"
"gnu/packages/task-runners.scm"
"gnu/packages/terraform.scm"
"gnu/packages/virtualization.scm"
"gnu/packages/vnc.scm"
"gnu/services/admin.scm"
"gnu/services/authentication.scm"
"gnu/services/databases.scm"
"gnu/services/dns.scm"
"gnu/services/high-availability.scm"
"gnu/services/kerberos.scm"
"gnu/services/monitoring.scm"
"gnu/services/nfs.scm"
"gnu/services/samba.scm"
"gnu/services/virtualization.scm"
"gnu/services/vnc.scm"
"gnu/tests/databases.scm"
"gnu/tests/dns.scm"
"gnu/tests/high-availability.scm"
"gnu/tests/monitoring.scm"
"gnu/tests/nfs.scm"
"gnu/tests/samba.scm"
"gnu/tests/virtualization.scm"
"gnu/tests/vnc.scm")))
"gnu/packages/vnc.scm")))
(define-team telephony
(team 'telephony
@@ -1197,20 +1117,6 @@ the \"texlive\" importer."
#:scope (list "etc/news.scm"
(make-regexp* "^po/"))))
(define-team vcs
(team 'vcs
#:name "Version control team"
#:description
"Version control packages, services, and Guix download backends."
#:scope (list "gnu/packages/version-control.scm"
"gnu/services/version-control.scm"
"gnu/tests/version-control.scm"
"guix/build/bzr.scm"
"guix/build/cvs.scm"
"guix/build/git.scm"
"guix/build/hg.scm"
"guix/build/svn.scm")))
(define-team xfce
(team 'xfce
#:name "Xfce team"
@@ -1246,7 +1152,7 @@ the \"texlive\" importer."
(define-member (person "Andreas Enge"
"andreas@enge.fr"
"enge")
bootstrap c++ core-packages crypto lxqt science tex)
bootstrap core-packages crypto lxqt science tex)
(define-member (person "Tanguy Le Carrour"
"tanguy@bioneland.org"
@@ -1306,7 +1212,7 @@ the \"texlive\" importer."
(define-member (person "Liliana Marie Prikler"
"liliana.prikler@gmail.com"
"lilyp")
emacs games gnome qa-packages)
emacs games gnome)
(define-member (person "Ricardo Wurmus"
"rekado@elephly.net"
@@ -1323,11 +1229,6 @@ the \"texlive\" importer."
"abcdw")
home emacs)
(define-member (person "Trevor Richards"
"trev@trevdev.ca"
"trevdev")
emacs lisp)
(define-member (person "pukkamustard"
"pukkamustard@posteo.net"
"pukkamustard")
@@ -1351,7 +1252,7 @@ the \"texlive\" importer."
(define-member (person "Vagrant Cascadian"
"vagrant@debian.org"
"vagrantc")
debian embedded kernel)
debian embedded)
(define-member (person "Vagrant Cascadian" ;XXX: duplicate
"vagrant@reproducible-builds.org"
@@ -1371,7 +1272,7 @@ the \"texlive\" importer."
(define-member (person "Munyoki Kilyungi"
"me@bonfacemunyoki.com"
"BonfaceKilz")
python guile)
python lisp)
(define-member (person "Gabriel Wicki"
"gabriel@erlikon.ch"
@@ -1426,7 +1327,7 @@ the \"texlive\" importer."
(define-member (person "Janneke Nieuwenhuizen"
"janneke@gnu.org"
"janneke")
bootstrap build-tools core-packages home hurd installer qa-packages)
bootstrap core-packages home hurd installer)
(define-member (person "Ian Eure"
"ian@retrospec.tv"
@@ -1436,7 +1337,7 @@ the \"texlive\" importer."
(define-member (person "Zheng Junjie"
"z572@z572.online"
"Z572")
core-packages)
core-packages qt kde)
(define-member (person "Sughosha"
"sughosha@disroot.org"
@@ -1505,7 +1406,7 @@ the \"texlive\" importer."
(define-member (person "Rodion Goritskov"
"rodion@goritskov.com"
"rodion-goritskov")
games java kde kernel release)
release)
(define-member (person "Jason Conroy"
"jconroy@tscripta.net"
@@ -1545,7 +1446,7 @@ the \"texlive\" importer."
(define-member (person "Nguyễn Gia Phong"
"cnx@loang.net"
"cnx")
build-tools python qa-packages sysadmin vcs)
python sysadmin)
(define-member (person "Lilah Tascheter"
"lilah@lunabee.space"
@@ -1590,43 +1491,12 @@ the \"texlive\" importer."
(define-member (person "Wilko Meyer"
"w@wmeyer.eu"
"theesm")
kernel perl)
kernel)
(define-member (person "Untrusem"
"mysticmoksh@riseup.net"
"untrusem")
mozilla)
(define-member (person "David Thompson"
"dthompson2@worcester.edu"
"flockofbirbs")
guile)
(define-member (person "Sergio Pastor Pérez"
"sergio.pastorperez@gmail.com"
"pastor")
guile hpc kde)
(define-member (person "Carlo Zancanaro"
"carlo@zancanaro.id.au"
"czan")
lua ruby)
(define-member (person "Folât Pjêrsômêj"
"folaht@protonmail.com"
"folaht")
documentation)
(define-member (person "Thanos Apollo"
"public@thanosapollo.org"
"thanosapollo")
vcs)
(define-member (person "Ashish SHUKLA"
"ashish.is@lostca.se"
"group")
vcs)
(define (find-team name)
(or (hash-ref %teams (string->symbol name))
+1 -3
View File
@@ -73,9 +73,7 @@ C < ':'
NL < '\n'")
(define %names
'(("adwaita-fonts" . "font-adwaita")
("pygobject" . "python-pygobject")
("pyatspi" . "python-pyatspi")))
'(("adwaita-fonts" . "font-adwaita")))
(define (parse-releng data)
"Return the complete parse tree for DATA, a string representing the content of
-34
View File
@@ -1,34 +0,0 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2026 jgart <jgart@dismail.de>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This file returns a manifest of packages built using the go-build-system.
;;; It is used to assist continuous integration of the go-team branch.
(use-modules (guix packages)
(guix profiles)
(guix build-system))
(manifest
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (or (eq? 'go (build-system-name (package-build-system package)))
(string=? "go" (package-name package)))
(cons package lst)
lst))
'())))
-36
View File
@@ -1,36 +0,0 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2026 jgart <jgart@dismail.de>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This file returns a manifest of packages built using the perl-build-system.
;;; It is used to assist continuous integration of the perl-team branch.
(use-modules (guix packages)
(guix profiles)
(guix build-system))
(manifest
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (or (eq? 'perl (build-system-name (package-build-system package)))
(eq? 'rakudo (build-system-name (package-build-system package)))
(string=? "perl" (package-name package))
(string=? "rakudo" (package-name package)))
(cons package lst)
lst))
'())))
+5 -6
View File
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2024, 2026 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -27,9 +27,8 @@
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (and (eq? (build-system-name (package-build-system package))
(quote cargo))
(supported-package? package))
(cons package lst)
lst))
(if (eq? (build-system-name (package-build-system package))
(quote cargo))
(cons package lst)
lst))
(list))))
+16 -15
View File
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2024, 2026 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -17,9 +17,10 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This file returns a manifest of packages built using the cargo-build-system
;;; and the packages which use rust itself as an input. This is a short list of
;;; packages which can be checked to see if a rust update has gone smoothly. It
;;; is used to assist continuous integration of the rust-team branch.
;;; which are NOT prefixed with 'rust-' and the packages which use rust itself
;;; as an input. This is a short list of packages which can be checked to see
;;; if a rust update has gone smoothly. It is used to assist continuous
;;; integration of the rust-team branch.
(use-modules (guix packages)
(guix profiles)
@@ -30,15 +31,15 @@
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (and (supported-package? package)
(or (eq? (build-system-name (package-build-system package))
(quote cargo))
(any
(lambda (pkg)
(member (specification->package "rust") pkg))
(append (package-native-inputs package)
(package-propagated-inputs package)
(package-inputs package)))))
(cons package lst)
lst))
(if (or
(eq? (build-system-name (package-build-system package))
(quote cargo))
(any
(lambda (pkg)
(member (specification->package "rust") pkg))
(append (package-native-inputs package)
(package-propagated-inputs package)
(package-inputs package))))
(cons package lst)
lst))
(list))))
-37
View File
@@ -1,37 +0,0 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2026 jgart <jgart@dismail.de>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This file returns a manifest of packages built using the texlive-build-system.
;;; It is used to assist continuous integration of the tex-team branch.
(use-modules (guix packages)
(guix profiles)
(guix build-system)
(gnu packages tex))
(define %sundry-texlive-packages
(list bibtool
dvisvgm
rubber
texmaker
texstudio
lyx))
(packages->manifest
(cons texlive-scheme-full
%sundry-texlive-packages))
+108
View File
@@ -0,0 +1,108 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019 Timothy Sample <samplet@ngyro.com>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu bootloader depthcharge)
#:use-module (gnu bootloader extlinux)
#:use-module (gnu bootloader)
#:use-module (gnu packages bootloaders)
#:use-module (guix gexp)
#:use-module (guix utils)
#:use-module (ice-9 match)
#:export (depthcharge-bootloader))
(define (signed-kernel kernel kernel-arguments initrd)
(define builder
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils)
(ice-9 binary-ports)
(rnrs bytevectors))
(set-path-environment-variable "PATH" '("bin") (list #$dtc))
;; TODO: These files have to be writable, so we copy them.
;; This can probably be fixed by using a ".its" file, just
;; be careful not to break initrd loading.
(copy-file #$kernel "zImage")
(chmod "zImage" #o755)
(copy-file (string-append (dirname #$kernel) "/lib/dtbs/"
"rk3288-veyron-speedy.dtb")
"rk3288-veyron-speedy.dtb")
(chmod "rk3288-veyron-speedy.dtb" #o644)
(copy-file #$initrd "initrd")
(chmod "initrd" #o644)
(invoke (string-append #$u-boot-tools "/bin/mkimage")
"-D" "-I dts -O dtb -p 2048"
"-f" "auto"
"-A" "arm"
"-O" "linux"
"-T" "kernel"
"-C" "None"
"-d" "zImage"
"-a" "0"
"-b" "rk3288-veyron-speedy.dtb"
"-i" "initrd"
"image.itb")
(call-with-output-file "bootloader.bin"
(lambda (port)
(put-bytevector port (make-bytevector 512 0))))
(with-output-to-file "kernel-arguments"
(lambda ()
(display (string-join (list #$@kernel-arguments)))))
(invoke (string-append #$vboot-utils "/bin/vbutil_kernel")
"--pack" #$output
"--version" "1"
"--vmlinuz" "image.itb"
"--arch" "arm"
"--keyblock" (string-append #$vboot-utils
"/share/vboot-utils/devkeys/"
"kernel.keyblock")
"--signprivate" (string-append #$vboot-utils
"/share/vboot-utils/devkeys/"
"kernel_data_key.vbprivk")
"--config" "kernel-arguments"
"--bootloader" "bootloader.bin"))))
(computed-file "vmlinux.kpart" builder))
(define* (depthcharge-configuration-file config entries
#:key
(system (%current-system))
(old-entries '())
#:allow-other-keys)
(match entries
((entry)
(let ((kernel (menu-entry-linux entry))
(kernel-arguments (menu-entry-linux-arguments entry))
(initrd (menu-entry-initrd entry)))
;; XXX: Make this a symlink.
(signed-kernel kernel kernel-arguments initrd)))
(_ (error "Too many bootloader menu entries!"))))
(define install-depthcharge
#~(lambda (bootloader device mount-point)
(let ((kpart (string-append mount-point
"/boot/depthcharge/vmlinux.kpart")))
(write-file-on-device kpart (stat:size (stat kpart)) device 0))))
(define depthcharge-bootloader
(bootloader
(name 'depthcharge)
(package #f)
(installer install-depthcharge)
(configuration-file "/boot/depthcharge/vmlinux.kpart")
(configuration-file-generator depthcharge-configuration-file)))
+3 -6
View File
@@ -3,7 +3,7 @@
;;; Copyright © 2016 Chris Marusich <cmmarusich@gmail.com>
;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
;;; Copyright © 2017, 2020 Mathieu Othacehe <m.othacehe@gmail.com>
;;; Copyright © 2019, 2020, 2023, 2024, 2026 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2019, 2020, 2023, 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2019, 2020 Miguel Ángel Arruga Vivas <rosen644835@gmail.com>
;;; Copyright © 2020 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2020 Stefan <stefan-guix@vodafonemail.de>
@@ -427,11 +427,8 @@ when booting a root file system on a Btrfs subvolume."
(arguments (menu-entry-multiboot-arguments entry))
;; Choose between device names as understood by Mach's built-in
;; IDE driver ("hdX") and those understood by rumpdisk ("wdX"
;; in the "noide" case). There are no IDE drivers in Mach for
;; hurd64, so always use rumpdisk there.
(rumpdisk? (or (target-hurd64?)
(member "noide" arguments)))
(disk (if rumpdisk? "w" "h"))
;; in the "noide" case).
(disk (if (member "noide" arguments) "w" "h"))
(device-spec (and=> device file-system-device->string))
(device-name (and=> device-spec device-spec->device-name))
(modules (menu-entry-multiboot-modules entry)))
+6
View File
@@ -41,6 +41,7 @@
u-boot-cubietruck-bootloader
u-boot-firefly-rk3399-bootloader
u-boot-mx6cuboxi-bootloader
u-boot-nintendo-nes-classic-edition-bootloader
u-boot-novena-bootloader
u-boot-orangepi-r1-plus-lts-rk3328-bootloader
u-boot-orangepi-zero2w-bootloader
@@ -254,6 +255,11 @@ is BLOCK-SIZE * COUNT, or FILE size if COUNT is not given."
(inherit u-boot-bootloader)
(disk-image-installer install-rockchip-u-boot)))
(define u-boot-nintendo-nes-classic-edition-bootloader
(bootloader
(inherit u-boot-allwinner-bootloader)
(package u-boot-nintendo-nes-classic-edition)))
(define u-boot-a20-olinuxino-lime-bootloader
(bootloader
(inherit u-boot-allwinner-bootloader)
+31 -60
View File
@@ -37,7 +37,6 @@
#:use-module (guix i18n)
#:use-module (rnrs io ports)
#:use-module (rnrs bytevectors)
#:use-module (ice-9 exceptions)
#:use-module (ice-9 match)
#:use-module (ice-9 rdelim)
#:use-module (ice-9 regex)
@@ -46,8 +45,6 @@
#:autoload (system repl repl) (start-repl)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:export (disk-partitions
partition-label-predicate
partition-uuid-predicate
@@ -68,9 +65,6 @@
cleanly-unmounted-ext2?
partition-lookup-error?
&partition-lookup-error
bind-mount
system*/tty
@@ -1188,10 +1182,6 @@ were found."
(define find-partition-by-luks-uuid
(find-partition luks-partition-uuid-predicate))
(define-condition-type &partition-lookup-error &condition
partition-lookup-error?
(spec partition-lookup-error-spec))
(define (canonicalize-device-spec spec)
"Return the device name corresponding to SPEC, which can be a <uuid>, a
@@ -1211,25 +1201,22 @@ file name or an nfs-root containing ':/')."
;; Some devices take a bit of time to appear, most notably USB
;; storage devices. Thus, wait for the device to appear.
(if (> count max-trials)
(raise (condition
(&partition-lookup-error
(spec (fmt spec)))))
(error "failed to resolve partition" (fmt spec))
(begin
(format #t "waiting for partition '~a' to appear...~%"
(fmt spec))
(sleep 1)
(loop (+ 1 count))))))))
(define (device-exists? device)
(and (file-exists? device)
device))
(match spec
((? string?)
(if (string-prefix? "/dev/" spec)
(if (or (string-contains spec ":/") ;nfs
(and (>= (string-length spec) 2)
(equal? (string-take spec 2) "//")) ;cifs
(string=? spec "none"))
spec ; do not resolve NFS / CIFS / tmpfs devices
;; Nothing to do, but wait until SPEC shows up.
(resolve device-exists? spec identity)
spec)) ; do not resolve NFS / CIFS / tmpfs devices
(resolve identity spec identity)))
((? file-system-label?)
;; Resolve the label.
(resolve find-partition-by-label
@@ -1332,14 +1319,6 @@ corresponds to the symbols listed in FLAGS."
(()
0))))
(define kind-and-args-exception?
(exception-predicate &exception-with-kind-and-args))
(define (system-error? exception)
"Return true if EXCEPTION is a Guile 'system-error exception."
(and (kind-and-args-exception? exception)
(eq? 'system-error (exception-kind exception))))
(define* (mount-file-system fs #:key (root "/root")
(check? (file-system-check? fs))
(skip-check-if-clean?
@@ -1360,8 +1339,8 @@ corresponds to the symbols listed in FLAGS."
(host-part (string-take source idx))
;; Strip [] from around host if present
(host (match (string-split host-part (string->char-set "[]"))
(("" h "") h)
((h) h)))
(("" h "") h)
((h) h)))
(inet-addr (host-to-ip host "nfs")))
;; Mounting an NFS file system requires passing the address
;; of the server in the addr= option
@@ -1447,37 +1426,26 @@ corresponds to the symbols listed in FLAGS."
"," 'prefix)
"")))))
(guard (c ((partition-lookup-error? c)
(format (current-error-port)
"could not find the partition: ~a~%"
(partition-lookup-error-spec c))
(unless (file-system-mount-may-fail? fs)
(raise c)))
((system-error? c)
(format (current-error-port)
"could not mount partition ~a: ~a~%"
(file-system-device fs)
(exception-message c))
(unless (file-system-mount-may-fail? fs)
(raise c))))
(let* ((type (file-system-type fs))
(source (canonicalize-device-spec (file-system-device fs)))
(target (string-append root "/"
(file-system-mount-point fs)))
(flags (logior (mount-flags->bit-mask (file-system-flags fs))
(let* ((type (file-system-type fs))
(source (canonicalize-device-spec (file-system-device fs)))
(target (string-append root "/"
(file-system-mount-point fs)))
(flags (logior (mount-flags->bit-mask (file-system-flags fs))
;; For bind mounts, preserve the original flags such
;; as MS_NOSUID, etc. Failing to do that, the
;; MS_REMOUNT call below fails with EPERM.
;; See <https://bugs.gnu.org/46292>
(if (memq 'bind-mount (file-system-flags fs))
(statfs-flags->mount-flags
(file-system-mount-flags (statfs source)))
0)))
(options (file-system-options fs)))
(when check?
(check-file-system source type (not skip-check-if-clean?) repair))
;; For bind mounts, preserve the original flags such
;; as MS_NOSUID, etc. Failing to do that, the
;; MS_REMOUNT call below fails with EPERM.
;; See <https://bugs.gnu.org/46292>
(if (memq 'bind-mount (file-system-flags fs))
(statfs-flags->mount-flags
(file-system-mount-flags (statfs source)))
0)))
(options (file-system-options fs)))
(when check?
(check-file-system source type (not skip-check-if-clean?) repair))
(catch 'system-error
(lambda ()
;; Create the mount point. Most of the time this is a directory, but
;; in the case of a bind mount, a regular file or socket may be
;; needed.
@@ -1506,7 +1474,10 @@ corresponds to the symbols listed in FLAGS."
(when (and (= MS_BIND (logand flags MS_BIND))
(= MS_RDONLY (logand flags MS_RDONLY)))
(let ((flags (logior MS_REMOUNT flags)))
(mount source target type flags options))))))
(mount source target type flags options))))
(lambda args
(or (file-system-mount-may-fail? fs)
(apply throw args))))))
(define %device-name-regexp "/dev/[hsvw]d([abcd])([0-9]*)")
(define %hurd-device-name-regexp "part:([0-9]*):device:[hw]d([0-9]*)")
+7 -9
View File
@@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012-2024, 2026 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017, 2020, 2026 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2012-2024 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017, 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2018, 2019 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2020 Julien Lepiller <julien@lepiller.eu>
;;; Copyright © 2020, 2021 Mathieu Othacehe <othacehe@gnu.org>
@@ -232,18 +232,17 @@ SYSTEM."
(define* (guix-jobs store systems #:key source commit)
"Return a list of jobs for Guix itself."
(define instance
(checkout->channel-instance source
#:url (channel-url %default-guix-channel)
#:commit commit))
(define build
(primitive-load (string-append source "/build-aux/build-self.scm")))
(map
(lambda (system)
(let ((name (string->symbol
(string-append "guix." system)))
(drv (run-with-store store
(channel-instances->derivation (list instance)
#:system system))))
(build source #:version commit #:system system
#:pull-version 1
#:guile-version "2.2"))))
(derivation->job name drv)))
systems))
@@ -255,7 +254,6 @@ SYSTEM."
(define %guix-system-images
(list hurd-barebones-qcow2-image
hurd64-barebones-qcow2-image
pine64-barebones-raw-image
pinebook-pro-barebones-raw-image
novena-barebones-raw-image
-12
View File
@@ -3,7 +3,6 @@
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
;;; Copyright © 2022-2023, 2025 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2023 Carlo Zancanaro <carlo@zancanaro.id.au>
;;; Copyright © 2025 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -52,7 +51,6 @@
home-activation-service-type
home-run-on-change-service-type
home-provenance-service-type
home-gc-root-service-type
literal-string
literal-string?
@@ -759,16 +757,6 @@ environment, and its configuration file, when available.")))
(define sexp->home-provenance sexp->system-provenance)
(define home-provenance system-provenance)
;;;
;;; Garbage collector roots.
;;;
(define home-gc-root-service-type
(service-type
(inherit (system->home-service-type gc-root-service-type))
(default-value '())))
;;;
;;; Searching
+4 -5
View File
@@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2024 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2024, 2026 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;; Copyright © 2024 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -45,9 +45,7 @@
(define %home-dotfiles-excluded
'(".*~"
".*\\.swp"
;; This first / is safe until regexp-exec in directory-contents
;; is passed an absolute file name.
"/\\.git/.*"
"\\.git"
"\\.gitignore"))
(define %home-dotfiles-layouts
@@ -137,7 +135,8 @@ value, excluding files that match any of the patterns configured."
(define (filter-files directory)
(find-files directory
(lambda (file stat)
(not (regexp-exec exclusion-rx file)))))
(not (regexp-exec exclusion-rx
(basename file))))))
(if (and stow? packages (maybe-value-set? packages))
(append-map filter-files
(map (lambda (pkg)
-6
View File
@@ -95,10 +95,6 @@ PulseAudio clients to use PipeWire transparently.")
(list (home-pipewire-pulseaudio-shepherd-service config))
'())))
(define (home-pipewire-profile-service config)
(list (home-pipewire-configuration-pipewire config)
(home-pipewire-configuration-wireplumber config)))
(define (home-pipewire-asoundrc config)
(match-record config <home-pipewire-configuration>
(pipewire extra-content)
@@ -130,8 +126,6 @@ PulseAudio clients to use PipeWire transparently.")
(extensions
(list (service-extension home-shepherd-service-type
home-pipewire-shepherd-services)
(service-extension home-profile-service-type
home-pipewire-profile-service)
(service-extension home-xdg-configuration-files-service-type
home-pipewire-xdg-configuration)))
(description
+17 -6
View File
@@ -102,6 +102,17 @@
;; Convenient value to inherit for extensions.
%empty-sway-configuration))
;; Helper function.
(define (flatmap f l)
(let loop ((lst (reverse l)) (acc '()))
(match lst
(() acc)
((head . tail)
(let* ((h (f head))
(acc (append h acc)))
(loop tail acc))))))
;;;
;;; Definition of configurations.
;;;
@@ -882,13 +893,13 @@
;; Outputs.
#$@(with-heading "Outputs."
(append-map serialize-output
(sway-configuration-outputs conf)))
(flatmap serialize-output
(sway-configuration-outputs conf)))
;; Inputs.
#$@(with-heading "Inputs."
(append-map serialize-input
(sway-configuration-inputs conf)))
(flatmap serialize-input
(sway-configuration-inputs conf)))
;; Bar configuration:
;; If the bar is unset, do not include anything.
@@ -908,8 +919,8 @@
;; Modes.
#$@(with-heading "Modes."
(append-map serialize-mode
(sway-configuration-modes conf)))
(flatmap serialize-mode
(sway-configuration-modes conf)))
;; Startup-Programs.
#$@(with-heading
+3 -4
View File
@@ -233,12 +233,11 @@ force a wifi scan."
(lambda ()
(when (eq? exit-reason 'exit-component)
(cond
((components=? argument exit-button)
(abort-to-prompt 'installer-step 'abort))
((or (components=? argument scan-button)
(null? service-items))
((components=? argument scan-button)
(run-wifi-scan-page)
(run-wifi-page))
((components=? argument exit-button)
(abort-to-prompt 'installer-step 'abort))
((components=? argument listbox)
(let ((result (connect-wifi-service listbox service-items)))
(unless result
+57 -133
View File
@@ -7,7 +7,7 @@
# Copyright © 2016, 2017, 2018 Kei Kebreau <kkebreau@posteo.net>
# Copyright © 2016, 2017 Rene Saavedra <rennes@openmailbox.org>
# Copyright © 2016 Adonay "adfeno" Felipe Nogueira <https://libreplanet.org/wiki/User:Adfeno> <adfeno@openmailbox.org>
# Copyright © 2016-2026 Ricardo Wurmus <rekado@elephly.net>
# Copyright © 2016-2025 Ricardo Wurmus <rekado@elephly.net>
# Copyright © 2016 Ben Woodcroft <donttrustben@gmail.com>
# Copyright © 2016, 2017, 2018, 2019 Alex Vong <alexvong1995@gmail.com>
# Copyright © 2016-2023 Efraim Flashner <efraim@flashner.co.il>
@@ -35,7 +35,7 @@
# Copyright © 2020 Ryan Prior <rprior@protonmail.com>
# Copyright © 2020 Jan Wielkiewicz <tona_kosmicznego_smiecia@interia.pl>
# Copyright © 2020, 2021 Brice Waegeneire <brice@waegenei.re>
# Copyright © 2020, 2023, 2025, 2026 Tanguy Le Carrour <tanguy@bioneland.org>
# Copyright © 2020, 2023, 2025 Tanguy Le Carrour <tanguy@bioneland.org>
# Copyright © 2020 Martin Becze <mjbecze@riseup.net>
# Copyright © 2020 Malte Frank Gerdes <mate.f.gerdes@gmail.com>
# Copyright © 2020, 2023 Vinicius Monego <monego@posteo.net>
@@ -55,7 +55,7 @@
# Copyright © 2022 Hilton Chain <hako@ultrarare.space>
# Copyright © 2022 Alex Griffin <a@ajgrf.com>
# Copyright © 2022 ( <paren@disroot.org>
# Copyright © 2022, 2026 jgart <jgart@dismail.de>
# Copyright © 2022 jgart <jgart@dismail.de>
# Copyright © 2023-2025 Zheng Junjie <z572@z572.online>
# Copyright © 2023 Ivana Drazovic <iv.dra@hotmail.com>
# Copyright © 2023 Andy Tai <atai@atai.org>
@@ -64,10 +64,9 @@
# Copyright © 2023, 2024 gemmaro <gemmaro.dev@gmail.com>
# Copyright © 2023 Herman Rimm <herman@rimm.ee>
# Copyright © 2023 Troy Figiel <troy@troyfigiel.com>
# Copyright © 2024-2026 David Elsing <david.elsing@posteo.net>
# Copyright © 2024, 2025 David Elsing <david.elsing@posteo.net>
# Copyright © 2024 Ashish SHUKLA <ashish.is@lostca.se>
# Copyright © 2024 Fabio Natali <me@fabionatali.com>
# Copyright © 2024 Wilko Meyer <w@wmeyer.eu>
# Copyright © 2024 Noé Lopez <noelopez@free.fr>
# Copyright © 2024 Runciter <runciter@whispers-vpn.org>
# Copyright © 2024 Ashvith Shetty <ashvithshetty10@gmail.com>
@@ -101,6 +100,7 @@ GNU_SYSTEM_MODULES = \
%D%/bootloader/grub.scm \
%D%/bootloader/extlinux.scm \
%D%/bootloader/u-boot.scm \
%D%/bootloader/depthcharge.scm \
%D%/ci.scm \
%D%/compression.scm \
%D%/home.scm \
@@ -155,7 +155,6 @@ GNU_SYSTEM_MODULES = \
%D%/packages/appimage.scm \
%D%/packages/apr.scm \
%D%/packages/arcan.scm \
%D%/packages/array-languages.scm \
%D%/packages/aspell.scm \
%D%/packages/assembly.scm \
%D%/packages/astronomy.scm \
@@ -208,12 +207,11 @@ GNU_SYSTEM_MODULES = \
%D%/packages/commencement.scm \
%D%/packages/compression.scm \
%D%/packages/compton.scm \
%D%/packages/computer-architecture.scm \
%D%/packages/configuration-management.scm \
%D%/packages/conky.scm \
%D%/packages/connman.scm \
%D%/packages/containers.scm \
%D%/packages/convmv.scm \
%D%/packages/codex.scm \
%D%/packages/coq.scm \
%D%/packages/cpio.scm \
%D%/packages/cpp.scm \
@@ -314,6 +312,7 @@ GNU_SYSTEM_MODULES = \
%D%/packages/gd.scm \
%D%/packages/gdb.scm \
%D%/packages/genealogy.scm \
%D%/packages/genimage.scm \
%D%/packages/geo.scm \
%D%/packages/gettext.scm \
%D%/packages/ghostscript.scm \
@@ -322,7 +321,6 @@ GNU_SYSTEM_MODULES = \
%D%/packages/gl.scm \
%D%/packages/glib.scm \
%D%/packages/gnome.scm \
%D%/packages/gnome-circle.scm \
%D%/packages/gnome-xyz.scm \
%D%/packages/gnu-doc.scm \
%D%/packages/gnucash.scm \
@@ -551,12 +549,10 @@ GNU_SYSTEM_MODULES = \
%D%/packages/phabricator.scm \
%D%/packages/php.scm \
%D%/packages/php-xyz.scm \
%D%/packages/physics.scm \
%D%/packages/piet.scm \
%D%/packages/diagram.scm \
%D%/packages/pkg-config.scm \
%D%/packages/plan9.scm \
%D%/packages/playwright.scm \
%D%/packages/plotutils.scm \
%D%/packages/poedit.scm \
%D%/packages/polkit.scm \
@@ -604,8 +600,6 @@ GNU_SYSTEM_MODULES = \
%D%/packages/regex.scm \
%D%/packages/robotics.scm \
%D%/packages/rocm.scm \
%D%/packages/rocm-libs.scm \
%D%/packages/rocm-tools.scm \
%D%/packages/rpc.scm \
%D%/packages/rpm.scm \
%D%/packages/rrdtool.scm \
@@ -740,7 +734,6 @@ GNU_SYSTEM_MODULES = \
%D%/services/cuirass.scm \
%D%/services/cups.scm \
%D%/services/databases.scm \
%D%/services/dav.scm \
%D%/services/dbus.scm \
%D%/services/desktop.scm \
%D%/services/dict.scm \
@@ -812,7 +805,6 @@ GNU_SYSTEM_MODULES = \
%D%/system/vm.scm \
\
%D%/system/images/a20-olinuxino-lime2.scm \
%D%/system/images/am335x-evm.scm \
%D%/system/images/hurd.scm \
%D%/system/images/novena.scm \
%D%/system/images/orangepi-r1-plus-lts-rk3328.scm \
@@ -872,7 +864,6 @@ GNU_SYSTEM_MODULES = \
%D%/tests/install.scm \
%D%/tests/ldap.scm \
%D%/tests/lightdm.scm \
%D%/tests/linux.scm \
%D%/tests/linux-modules.scm \
%D%/tests/mail.scm \
%D%/tests/mcron.scm \
@@ -980,6 +971,10 @@ dist_patch_DATA = \
%D%/packages/patches/adb-add-libraries.patch \
%D%/packages/patches/adb-libssl_11-compatibility.patch \
%D%/packages/patches/accountsservice-extensions.patch \
%D%/packages/patches/aegisub-icu59-include-unistr.patch \
%D%/packages/patches/aegisub-boost68.patch \
%D%/packages/patches/aegisub-boost81.patch \
%D%/packages/patches/aegisub-make43.patch \
%D%/packages/patches/agda-categories-remove-incompatible-flags.patch \
%D%/packages/patches/agda-categories-use-find.patch \
%D%/packages/patches/agda-categories-use-newer-stdlib.patch \
@@ -1004,7 +999,9 @@ dist_patch_DATA = \
%D%/packages/patches/aria2-unbundle-wslay.patch \
%D%/packages/patches/ark-skip-xar-test.patch \
%D%/packages/patches/asli-use-system-libs.patch \
%D%/packages/patches/aspell-CVE-2019-25051.patch \
%D%/packages/patches/aspell-default-dict-dir.patch \
%D%/packages/patches/atf-execute-with-shell.patch \
%D%/packages/patches/ath9k-htc-firmware-binutils.patch \
%D%/packages/patches/ath9k-htc-firmware-gcc.patch \
%D%/packages/patches/ath9k-htc-firmware-gcc-compat.patch \
@@ -1042,7 +1039,6 @@ dist_patch_DATA = \
%D%/packages/patches/biboumi-cmake-ignore-git.patch \
%D%/packages/patches/brasero-fix-gcc-14-build-failure.patch \
%D%/packages/patches/brightnessctl-elogind-support.patch \
%D%/packages/patches/bristol-c99.patch \
%D%/packages/patches/bsd-games-2.17-64bit.patch \
%D%/packages/patches/bsd-games-add-configure-config.patch \
%D%/packages/patches/bsd-games-add-wrapper.patch \
@@ -1058,7 +1054,6 @@ dist_patch_DATA = \
%D%/packages/patches/beignet-correct-file-names.patch \
%D%/packages/patches/bidiv-update-fribidi.patch \
%D%/packages/patches/binutils-boot-2.20.1a.patch \
%D%/packages/patches/binutils-cross-windres.patch \
%D%/packages/patches/binutils-loongson-workaround.patch \
%D%/packages/patches/binutils-mingw-w64-deterministic.patch \
%D%/packages/patches/binutils-2.41-fix-cross.patch \
@@ -1078,10 +1073,10 @@ dist_patch_DATA = \
%D%/packages/patches/calibre-remove-test-unrar.patch \
%D%/packages/patches/calibre-remove-test-import-modules.patch \
%D%/packages/patches/calligra-qt-6.9.patch \
%D%/packages/patches/calls-disable-application-test.patch \
%D%/packages/patches/calls-disable-sip-test.patch \
%D%/packages/patches/camlboot-dynamically-allocate-stack-signal.patch \
%D%/packages/patches/capstone-fix-python-constants.patch \
%D%/packages/patches/cartridges-fix-non-parallel-build.patch \
%D%/packages/patches/catdoc-CVE-2017-11110.patch \
%D%/packages/patches/chez-irregex-import-cond-expand.patch \
%D%/packages/patches/chez-scheme-bin-sh.patch \
@@ -1092,7 +1087,6 @@ dist_patch_DATA = \
%D%/packages/patches/ceph-fix-cmake.patch \
%D%/packages/patches/cf-tool-add-languages.patch \
%D%/packages/patches/chmlib-inttypes.patch \
%D%/packages/patches/cl-ana-pr-49.patch \
%D%/packages/patches/cl-asdf-config-directories.patch \
%D%/packages/patches/clamav-config-llvm-libs.patch \
%D%/packages/patches/clamav-system-tomsfastmath.patch \
@@ -1109,7 +1103,6 @@ dist_patch_DATA = \
%D%/packages/patches/clang-17.0-link-dsymutil-latomic.patch \
%D%/packages/patches/clang-17.0-fix-build-with-gcc-14-on-arm.patch \
%D%/packages/patches/clang-18.0-libc-search-path.patch \
%D%/packages/patches/clang-rocm-default-new-dtags.patch \
%D%/packages/patches/clang-runtime-esan-build-fixes.patch \
%D%/packages/patches/clang-runtime-12-remove-crypt-interceptors.patch \
%D%/packages/patches/clang-runtime-13-glibc-2.36-compat.patch \
@@ -1123,19 +1116,13 @@ dist_patch_DATA = \
%D%/packages/patches/clucene-gcc-14.patch \
%D%/packages/patches/clucene-pkgconfig.patch \
%D%/packages/patches/coda-use-system-libs.patch \
%D%/packages/patches/codex-acp-0.9.2-remove-patch-sections.patch \
%D%/packages/patches/codex-acp-0.9.2-replace-result-flatten.patch \
%D%/packages/patches/codex-0.98.0-remove-patch-sections.patch \
%D%/packages/patches/cogl-fix-double-free.patch \
%D%/packages/patches/collada-dom-boost.patch \
%D%/packages/patches/collectd-5.11.0-noinstallvar.patch \
%D%/packages/patches/collectd-5.11.0-python-3.11.patch \
%D%/packages/patches/combinatorial-blas-awpm.patch \
%D%/packages/patches/combinatorial-blas-io-fix.patch \
%D%/packages/patches/composable-kernel-conditional-kernels.patch \
%D%/packages/patches/compsize-fix-btrfs-progs-compatibility.patch \
%D%/packages/patches/conda-fix-cross-platform-export-tests.patch \
%D%/packages/patches/conda-fix-plugin-settings-test.patch \
%D%/packages/patches/containerd-create-pid-file.patch \
%D%/packages/patches/containerd-fix-includes.patch \
%D%/packages/patches/cool-retro-term-wctype.patch \
@@ -1218,7 +1205,6 @@ dist_patch_DATA = \
%D%/packages/patches/dvdbackup-with-libdvdread-6.1.0+.patch \
%D%/packages/patches/dvd+rw-tools-add-include.patch \
%D%/packages/patches/dwarves-threading-reproducibility.patch \
%D%/packages/patches/efitools-riscv64-support.patch \
%D%/packages/patches/efivar-fix-fprint-format.patch \
%D%/packages/patches/eigen-fix-strict-aliasing-bug.patch \
%D%/packages/patches/einstein-build.patch \
@@ -1229,7 +1215,6 @@ dist_patch_DATA = \
%D%/packages/patches/python-treelib-remove-python2-compat.patch \
%D%/packages/patches/elm-offline-package-registry.patch \
%D%/packages/patches/elm-reactor-static-files.patch \
%D%/packages/patches/emacs-buttercup-1.38-native-comp-spy-on-trampoline-scope.patch \
%D%/packages/patches/emacs-deferred-fix-number-of-arguments.patch \
%D%/packages/patches/emacs-disable-jit-compilation.patch \
%D%/packages/patches/emacs-doc-toc-shell-commands.patch \
@@ -1250,7 +1235,9 @@ dist_patch_DATA = \
%D%/packages/patches/emacs-next-exec-path.patch \
%D%/packages/patches/emacs-next-native-comp-fix-filenames.patch \
%D%/packages/patches/emacs-pasp-mode-quote-file-names.patch \
%D%/packages/patches/emacs-pgtk-super-key-fix.patch \
%D%/packages/patches/emacs-polymode-fix-lexical-variable-error.patch \
%D%/packages/patches/emacs-telega-path-placeholder.patch \
%D%/packages/patches/emacs-telega-test-env.patch \
%D%/packages/patches/emacs-wordnut-require-adaptive-wrap.patch \
%D%/packages/patches/emacs-zoom-image-test-fix.patch \
@@ -1343,7 +1330,6 @@ dist_patch_DATA = \
%D%/packages/patches/freesolid-autotools.patch \
%D%/packages/patches/freesolid-configure.patch \
%D%/packages/patches/freesolid-pkgconfig.patch \
%D%/packages/patches/ftgl-ftcontour-type.patch \
%D%/packages/patches/fulcrum-1.9.1-unbundled-libraries.patch \
%D%/packages/patches/fuse-glibc-2.34.patch \
%D%/packages/patches/fuse-overlapping-headers.patch \
@@ -1371,7 +1357,6 @@ dist_patch_DATA = \
%D%/packages/patches/gcc-cross-environment-variables.patch \
%D%/packages/patches/gcc-cross-gxx-include-dir.patch \
%D%/packages/patches/gcc-fix-texi2pod.patch \
%D%/packages/patches/gcc-hurd-split-stack.patch \
%D%/packages/patches/gcc-libstdc++-newer-gcc.patch \
%D%/packages/patches/gcc-4.8-libsanitizer-fix.patch \
%D%/packages/patches/gcc-4.9-inline.patch \
@@ -1387,6 +1372,7 @@ dist_patch_DATA = \
%D%/packages/patches/gcc-libvtv-runpath.patch \
%D%/packages/patches/gcc-strmov-store-file-names.patch \
%D%/packages/patches/gcc-4-compile-with-gcc-5.patch \
%D%/packages/patches/gcc-4.6-gnu-inline.patch \
%D%/packages/patches/gcc-4.9.3-mingw-gthr-default.patch \
%D%/packages/patches/gcc-5-hurd.patch \
%D%/packages/patches/gcc-5.0-libvtv-runpath.patch \
@@ -1431,6 +1417,7 @@ dist_patch_DATA = \
%D%/packages/patches/gemmi-fix-pegtl-usage.patch \
%D%/packages/patches/gemmi-fix-sajson-types.patch \
%D%/packages/patches/gemrb-remove-ifdef-and-externalize-path-setting-to-cmake.patch \
%D%/packages/patches/genimage-mke2fs-test.patch \
%D%/packages/patches/geoclue-config.patch \
%D%/packages/patches/gettext-libunicode-update.patch \
%D%/packages/patches/ghc-8.0-fall-back-to-madv_dontneed.patch \
@@ -1481,7 +1468,6 @@ dist_patch_DATA = \
%D%/packages/patches/glibc-cross-objcopy.patch \
%D%/packages/patches/glibc-cross-objdump.patch \
%D%/packages/patches/glibc-dl-cache.patch \
%D%/packages/patches/glibc-guix-locpath.patch \
%D%/packages/patches/glibc-hidden-visibility-ldconfig.patch \
%D%/packages/patches/glibc-hurd-clock_gettime_monotonic.patch \
%D%/packages/patches/glibc-hurd-clock_t_centiseconds.patch \
@@ -1510,17 +1496,22 @@ dist_patch_DATA = \
%D%/packages/patches/gnome-control-center-firmware-security.patch \
%D%/packages/patches/gnome-control-center-libexecdir.patch \
%D%/packages/patches/gnome-dictionary-meson-i18n.patch \
%D%/packages/patches/gnome-recipes-rest-in-soup.patch \
%D%/packages/patches/gnome-online-miners-tracker-3.patch \
%D%/packages/patches/gnome-settings-daemon-gc.patch \
%D%/packages/patches/gnome-settings-daemon-screensaver-error.patch \
%D%/packages/patches/gnome-session-support-elogind.patch \
%D%/packages/patches/gnome-tweaks-search-paths.patch \
%D%/packages/patches/gnulib-bootstrap.patch \
%D%/packages/patches/gnumach-div0.patch \
%D%/packages/patches/gnumach-kmsg-overflow.patch \
%D%/packages/patches/gnumach-version.patch \
%D%/packages/patches/gnupg-default-pinentry.patch \
%D%/packages/patches/gnupg-1-build-with-gcc10.patch \
%D%/packages/patches/gnutls-no-which.patch \
%D%/packages/patches/gnutls-skip-trust-store-test.patch \
%D%/packages/patches/gobject-introspection-absolute-shlib-path.patch \
%D%/packages/patches/gobject-introspection-absolute-shlib-path-1.72.patch \
%D%/packages/patches/gobject-introspection-cc.patch \
%D%/packages/patches/gobject-introspection-cc-1.72.patch \
%D%/packages/patches/gobject-introspection-girepository.patch \
%D%/packages/patches/go-fix-script-tests.patch \
%D%/packages/patches/go-gopkg-in-yaml-v3-32bit.patch \
@@ -1541,6 +1532,7 @@ dist_patch_DATA = \
%D%/packages/patches/grfcodec-gcc-compat.patch \
%D%/packages/patches/groovy-add-exceptionutilsgenerator.patch \
%D%/packages/patches/grub-efi-fat-serial-number.patch \
%D%/packages/patches/grub-hurd64.patch \
%D%/packages/patches/grub-setup-root.patch \
%D%/packages/patches/guile-1.8-cpp-4.5.patch \
%D%/packages/patches/guile-2.2-skip-oom-test.patch \
@@ -1580,10 +1572,10 @@ dist_patch_DATA = \
%D%/packages/patches/gtk4-respect-GUIX_GTK4_PATH.patch \
%D%/packages/patches/gtkglext-disable-disable-deprecated.patch \
%D%/packages/patches/gtksourceview-2-add-default-directory.patch \
%D%/packages/patches/gst-plugins-base-null-pointer.patch \
%D%/packages/patches/gzdoom-search-in-installed-share.patch \
%D%/packages/patches/gzdoom-find-system-libgme.patch \
%D%/packages/patches/hare-fallback-cache.patch \
%D%/packages/patches/hare-toolpath.patch \
%D%/packages/patches/hdf4-reproducibility.patch \
%D%/packages/patches/hdf4-shared-fortran.patch \
%D%/packages/patches/hdf5-config-date.patch \
@@ -1598,7 +1590,6 @@ dist_patch_DATA = \
%D%/packages/patches/heimdal-CVE-2022-45142.patch \
%D%/packages/patches/helm-fix-gcc-9-build.patch \
%D%/packages/patches/highlight-gui-data-dir.patch \
%D%/packages/patches/hipblaslt-python-nanobind.patch \
%D%/packages/patches/hplip-usb-timeout.patch \
%D%/packages/patches/http-parser-CVE-2020-8287.patch \
%D%/packages/patches/hubbub-sort-entities.patch \
@@ -1607,8 +1598,9 @@ dist_patch_DATA = \
%D%/packages/patches/hurd-refcounts-assert.patch \
%D%/packages/patches/hurd-rumpdisk-no-hd.patch \
%D%/packages/patches/hurd-startup.patch \
%D%/packages/patches/hurd-streamio-select.patch \
%D%/packages/patches/hurd-proc-zombies.patch \
%D%/packages/patches/hwloc-1-test-btrfs.patch \
%D%/packages/patches/hwloc-add-with-opencl.patch \
%D%/packages/patches/i3lock-blur-fix-build-on-gcc-10.patch \
%D%/packages/patches/i7z-gcc-10.patch \
%D%/packages/patches/icecat-adjust-mozilla-desktop.patch \
@@ -1655,6 +1647,7 @@ dist_patch_DATA = \
%D%/packages/patches/isl-0.11.1-aarch64-support.patch \
%D%/packages/patches/ispell-for-linphone-cmake.patch \
%D%/packages/patches/jami-avutil-link.patch \
%D%/packages/patches/jami-qwindowkit.patch \
%D%/packages/patches/jamvm-1.5.1-aarch64-support.patch \
%D%/packages/patches/jamvm-1.5.1-armv7-support.patch \
%D%/packages/patches/jamvm-2.0.0-aarch64-support.patch \
@@ -1685,6 +1678,8 @@ dist_patch_DATA = \
%D%/packages/patches/jsonnet-include-cstdint-for-gcc-13-builds.patch \
%D%/packages/patches/julia-SOURCE_DATE_EPOCH-mtime.patch \
%D%/packages/patches/julia-Use-MPFR-4.2.patch \
%D%/packages/patches/komikku-python-3.11-compat.patch \
%D%/packages/patches/komikku-future-servers-compat.patch \
%D%/packages/patches/libcall-ui-make-it-installable.patch \
%D%/packages/patches/libcamera-ipa_manager-disable-signature-verification.patch \
%D%/packages/patches/libconfuse-CVE-2022-40320.patch \
@@ -1698,6 +1693,7 @@ dist_patch_DATA = \
%D%/packages/patches/libgeotiff-fix-tests-on-i386.patch \
%D%/packages/patches/libguestfs-syms.patch \
%D%/packages/patches/libinfinity-renew-test-certificate.patch \
%D%/packages/patches/libjami-pkgconf.patch \
%D%/packages/patches/libmaus2-fix-gcc-13-require-include-cstdint.patch \
%D%/packages/patches/libretro-dolphin-emu-data.patch \
%D%/packages/patches/libretro-dolphin-emu-gc-font-tool.patch \
@@ -1707,7 +1703,6 @@ dist_patch_DATA = \
%D%/packages/patches/librewolf-compare-paths.patch \
%D%/packages/patches/librewolf-neuter-locale-download.patch \
%D%/packages/patches/librewolf-use-system-wide-dir.patch \
%D%/packages/patches/libsolv-conda-variant-priorization.patch \
%D%/packages/patches/libvirt-add-install-prefix.patch \
%D%/packages/patches/libvirt-respect-modules-path.patch \
%D%/packages/patches/libzmf-doxygen-1.14.patch \
@@ -1801,14 +1796,9 @@ dist_patch_DATA = \
%D%/packages/patches/libphonenumber-reproducible-build.patch \
%D%/packages/patches/libqalculate-3.8.0-libcurl-ssl-fix.patch \
%D%/packages/patches/libquicktime-ffmpeg.patch \
%D%/packages/patches/libsecret-fix-test-paths.patch \
%D%/packages/patches/libsepol-versioned-docbook.patch \
%D%/packages/patches/libskk-fix-invalid-escape.patch \
%D%/packages/patches/libsoup-auth-digest-fix-crash.patch \
%D%/packages/patches/libsoup-deadlock-in-add_listener_in_thread.patch \
%D%/packages/patches/libsoup-fix-merge-of-ranges.patch \
%D%/packages/patches/libsoup-memory-leak-in-soup_form_decode.patch \
%D%/packages/patches/libsoup-multipart-bounds-check.patch \
%D%/packages/patches/libsoup-use-libdl-instead-of-gmodule.patch \
%D%/packages/patches/libspatialite-libxml2-2.14.patch \
%D%/packages/patches/libtar-CVE-2013-4420.patch \
%D%/packages/patches/libtar-CVE-2021-33643-CVE-2021-33644.patch \
@@ -1828,7 +1818,6 @@ dist_patch_DATA = \
%D%/packages/patches/libutils-remove-damaging-includes.patch \
%D%/packages/patches/libvdpau-va-gl-unbundle.patch \
%D%/packages/patches/libvpx-CVE-2016-2818.patch \
%D%/packages/patches/libvpx-CVE-2026-2447.patch \
%D%/packages/patches/libxcb-path-max.patch \
%D%/packages/patches/libxml2-xpath0-Add-option-xpath0.patch \
%D%/packages/patches/libwpd-gcc-compat.patch \
@@ -1842,6 +1831,7 @@ dist_patch_DATA = \
%D%/packages/patches/linphone-desktop-ispell.patch \
%D%/packages/patches/linphone-desktop-qtkeychain.patch \
%D%/packages/patches/linux-libre-infodocs-target.patch \
%D%/packages/patches/linux-libre-support-for-Pinebook-Pro.patch \
%D%/packages/patches/linux-libre-arm64-mnt-reform-revert-phy-rockchip-samsung.patch \
%D%/packages/patches/linux-libre-arm64-mnt-reform-revert-rk-samsung-hdptx.patch \
%D%/packages/patches/linux-libre-arm64-mnt-reform-revert-vop2-display-modes.patch \
@@ -1859,16 +1849,8 @@ dist_patch_DATA = \
%D%/packages/patches/lua51-pkgconfig.patch \
%D%/packages/patches/luajit-add-riscv64-support.patch \
%D%/packages/patches/lua-liblua-so.patch \
%D%/packages/patches/luajit-search-paths.patch \
%D%/packages/patches/lua-5.1-search-paths.patch \
%D%/packages/patches/lua-5.2-search-paths.patch \
%D%/packages/patches/lua-5.3-search-paths.patch \
%D%/packages/patches/lua-5.4-pkgconfig.patch \
%D%/packages/patches/lua-5.4-liblua-so.patch \
%D%/packages/patches/lua-5.4-search-paths.patch \
%D%/packages/patches/lua-5.x-search-path-helpers.patch \
%D%/packages/patches/lua-lgi-fix-pango.patch \
%D%/packages/patches/lua-lgi-fix-ref.patch \
%D%/packages/patches/luanti-paths.patch \
%D%/packages/patches/lugaru-fix-sound.patch \
%D%/packages/patches/luit-posix.patch \
@@ -1878,7 +1860,6 @@ dist_patch_DATA = \
%D%/packages/patches/mactelnet-remove-init.patch \
%D%/packages/patches/mailutils-variable-lookup.patch \
%D%/packages/patches/mandoc-support-zstd-compression.patch \
%D%/packages/patches/mantid-openmp-cleanup.patch \
%D%/packages/patches/make-impure-dirs.patch \
%D%/packages/patches/makem-replace-git.patch \
%D%/packages/patches/marisa-fix-MARISA_WORD_SIZE.patch \
@@ -1886,8 +1867,6 @@ dist_patch_DATA = \
%D%/packages/patches/mathjax-disable-webpack.patch \
%D%/packages/patches/mathjax-no-a11y.patch \
%D%/packages/patches/mathjax-3.1.2-no-a11y.patch \
%D%/packages/patches/mathjax-4.0.0-disable-webpack.patch \
%D%/packages/patches/mathjax-4.0.0-no-a11y.patch \
%D%/packages/patches/maxima-defsystem-mkdir.patch \
%D%/packages/patches/maven-generate-component-xml.patch \
%D%/packages/patches/maven-generate-javax-inject-named.patch \
@@ -1919,7 +1898,6 @@ dist_patch_DATA = \
%D%/packages/patches/minisat-friend-declaration.patch \
%D%/packages/patches/minisat-install.patch \
%D%/packages/patches/miniz-for-pytorch.patch \
%D%/packages/patches/miopen-zstd.patch \
%D%/packages/patches/mit-krb5-hurd.patch \
%D%/packages/patches/mitm-cache-head-requests.patch \
%D%/packages/patches/mpc123-initialize-ao.patch \
@@ -1970,6 +1948,7 @@ dist_patch_DATA = \
%D%/packages/patches/netsurf-system-utf8proc.patch \
%D%/packages/patches/netsurf-y2038-tests.patch \
%D%/packages/patches/netsurf-longer-test-timeout.patch \
%D%/packages/patches/nextpnr-imgui.patch \
%D%/packages/patches/nhc98-c-update.patch \
%D%/packages/patches/nix-dont-build-html-doc.diff \
%D%/packages/patches/nfs4-acl-tools-0.3.7-fixpaths.patch \
@@ -1999,22 +1978,20 @@ dist_patch_DATA = \
%D%/packages/patches/ocaml-4.07-dynamically-allocate-signal-stack.patch \
%D%/packages/patches/ocaml-4.09-dynamically-allocate-signal-stack.patch \
%D%/packages/patches/ocaml-4.09-multiple-definitions.patch \
%D%/packages/patches/ogs-6.5.7-netcdfconverter.patch \
%D%/packages/patches/omake-fix-non-determinism.patch \
%D%/packages/patches/oneko-remove-nonfree-characters.patch \
%D%/packages/patches/onetbb-other-arches.patch \
%D%/packages/patches/online-judge-tools.patch \
%D%/packages/patches/onnx-1.17.0-for-onnxruntime.patch \
%D%/packages/patches/onnx-optimizer-system-library.patch \
%D%/packages/patches/onnx-1.13.1-use-system-googletest.patch \
%D%/packages/patches/onnx-shared-libraries.patch \
%D%/packages/patches/onnx-skip-model-downloads.patch \
%D%/packages/patches/onnxruntime-1.22.0-splittosequence-bool.patch \
%D%/packages/patches/openbios-aarch64-riscv64-support.patch \
%D%/packages/patches/openboardview-use-system-imgui.patch \
%D%/packages/patches/openboardview-use-system-mpc.patch \
%D%/packages/patches/openbox-add-fix-for-glib2-exposed-segfault.patch \
%D%/packages/patches/openbox-python3.patch \
%D%/packages/patches/opendht-meson-install-headers.patch \
%D%/packages/patches/openexr-2-gcc-14.patch \
%D%/packages/patches/openfst-for-vosk-fix-unique-ptr.patch \
%D%/packages/patches/openjdk-currency-time-bomb.patch \
@@ -2049,7 +2026,6 @@ dist_patch_DATA = \
%D%/packages/patches/openrgb-unbundle-hueplusplus.patch \
%D%/packages/patches/openscad-fix-path-in-expected-test-results-to-acommodate-diff.patch \
%D%/packages/patches/opensles-add-license-file.patch \
%D%/packages/patches/opensp-maxpathlen.patch \
%D%/packages/patches/openssl-1.1-c-rehash-in.patch \
%D%/packages/patches/openssl-3.0-c-rehash-in.patch \
%D%/packages/patches/openssl-hurd64.patch \
@@ -2065,6 +2041,7 @@ dist_patch_DATA = \
%D%/packages/patches/pnet-newer-libgc-fix.patch \
%D%/packages/patches/pnet-newer-texinfo-fix.patch \
%D%/packages/patches/pam-krb5-CVE-2020-10595.patch \
%D%/packages/patches/pango-skip-libthai-test.patch \
%D%/packages/patches/password-store-tree-compat.patch \
%D%/packages/patches/pciutils-hurd64.patch \
%D%/packages/patches/pcsxr-find-harfbuzz.patch \
@@ -2080,6 +2057,7 @@ dist_patch_DATA = \
%D%/packages/patches/podofo-gcc-14.patch \
%D%/packages/patches/pokerth-boost.patch \
%D%/packages/patches/pounce-readable-checks.patch \
%D%/packages/patches/ppsspp-disable-upgrade-and-gold.patch \
%D%/packages/patches/procps-strtod-test.patch \
%D%/packages/patches/prusa-slicer-add-cmake-module.patch \
%D%/packages/patches/prusa-wxwidgets-makefile-fix.patch \
@@ -2088,7 +2066,6 @@ dist_patch_DATA = \
%D%/packages/patches/python-3.12-fix-tests.patch \
%D%/packages/patches/python-accupy-use-matplotx.patch \
%D%/packages/patches/python-accupy-fix-use-of-perfplot.patch \
%D%/packages/patches/python-anyio-unuse-exceptiongroup-in-test.patch \
%D%/packages/patches/python-bed-reader-use-store-samples.patch \
%D%/packages/patches/python-chai-drop-python2.patch \
%D%/packages/patches/python-clarabel-blas.patch \
@@ -2096,13 +2073,11 @@ dist_patch_DATA = \
%D%/packages/patches/python-docrepr-fix-tests.patch \
%D%/packages/patches/python-gpg-setup-72.patch \
%D%/packages/patches/python-hdmedians-replace-nose.patch \
%D%/packages/patches/python-jinja2-fragments-modify-conftest-py.patch \
%D%/packages/patches/python-louvain-fix-test.patch \
%D%/packages/patches/python-mohawk-pytest.patch \
%D%/packages/patches/python-msal-requests.patch \
%D%/packages/patches/python-norns-nose.patch \
%D%/packages/patches/python-numpy-gcc-14.patch \
%D%/packages/patches/python-onnx-asr-0.10.2-bundled-parakeet-model.patch \
%D%/packages/patches/python-random2-getrandbits-test.patch \
%D%/packages/patches/python-pillow-use-zlib-1.3.patch \
%D%/packages/patches/python-pydocstyle-add-support-for-pep701.patch \
@@ -2116,6 +2091,7 @@ dist_patch_DATA = \
%D%/packages/patches/python-sshtunnel-pep518.patch \
%D%/packages/patches/python-zeroc-ice-3.6.5-python-3.11-support.patch \
%D%/packages/patches/qcodeeditor-qt6.patch \
%D%/packages/patches/qgit-2.12-fix-search-style.patch \
%D%/packages/patches/qtdeclarative-5-disable-qmlcache.patch \
%D%/packages/patches/qtdeclarative-disable-qmlcache.patch \
%D%/packages/patches/qtlocation-5.15.8-mapboxgl-gcc13.patch \
@@ -2133,14 +2109,13 @@ dist_patch_DATA = \
%D%/packages/patches/sdl-pango-sans-serif.patch \
%D%/packages/patches/smalltalk-multiplication-overflow.patch \
%D%/packages/patches/soci-mysql-ddl-types.patch \
%D%/packages/patches/solarus-quest-editor-qlementine-reference.patch \
%D%/packages/patches/solarus-launcher-qlementine-and-qtappinstancemanager-reference.patch \
%D%/packages/patches/sqlite-hurd.patch \
%D%/packages/patches/squeak-vm-gcc-14-fix.patch \
%D%/packages/patches/stepmania-ffmpeg-compat.patch \
%D%/packages/patches/stk-5.0.1-fix-typo.patch \
%D%/packages/patches/strace-readlink-tests.patch \
%D%/packages/patches/sunxi-tools-remove-sys-io.patch \
%D%/packages/patches/p11-kit-hurd.patch \
%D%/packages/patches/patch-hurd-path-max.patch \
%D%/packages/patches/perl-5.14-autosplit-default-time.patch \
%D%/packages/patches/perl-5.14-module-pluggable-search.patch \
@@ -2228,7 +2203,6 @@ dist_patch_DATA = \
%D%/packages/patches/python-pillow-CVE-2022-45199.patch \
%D%/packages/patches/python-libxml2-utf8.patch \
%D%/packages/patches/python-memcached-syntax-warnings.patch \
%D%/packages/patches/python-mslice-matplotlib-3.6-compatibility.patch \
%D%/packages/patches/python-packaging-test-arch.patch \
%D%/packages/patches/python-pandas-2-no-pytz_datetime.patch \
%D%/packages/patches/python-property-cached-asyncio-3_11.patch \
@@ -2249,6 +2223,8 @@ dist_patch_DATA = \
%D%/packages/patches/qdigidoc-bundle-config-files.patch \
%D%/packages/patches/qdigidoc-bundle-tsl-files.patch \
%D%/packages/patches/qemu-build-info-manual.patch \
%D%/packages/patches/qemu-glibc-2.27.patch \
%D%/packages/patches/qemu-glibc-2.30.patch \
%D%/packages/patches/qemu-fix-agent-paths.patch \
%D%/packages/patches/qemu-fix-test-virtio-version.patch \
%D%/packages/patches/qemu-disable-aarch64-migration-test.patch \
@@ -2266,62 +2242,9 @@ dist_patch_DATA = \
%D%/packages/patches/quickjs-ng-fix-atomics.pause-on-32-bit.patch \
%D%/packages/patches/quilt-grep-compat.patch \
%D%/packages/patches/qmk-firmware-fix-hacker-dvorak.patch \
%D%/packages/patches/qtwayland-dont-recreate-callbacks.patch \
%D%/packages/patches/qtwayland-cleanup-callbacks.patch \
%D%/packages/patches/qtwayland-update-wayland-xml.patch \
%D%/packages/patches/qtwayland-5.15.18-0001-client-announce-an-output-after-receiving-more-compl.patch \
%D%/packages/patches/qtwayland-5.15.18-0002-fix-issue-with-repeated-window-size-changes.patch \
%D%/packages/patches/qtwayland-5.15.18-0003-client-connect-drags-being-accepted-to-updating-the-.patch \
%D%/packages/patches/qtwayland-5.15.18-0004-client-disconnect-registry-listener-on-destruction.patch \
%D%/packages/patches/qtwayland-5.15.18-0005-client-set-xdgshell-size-hints-before-the-first-comm.patch \
%D%/packages/patches/qtwayland-5.15.18-0006-fix-build.patch \
%D%/packages/patches/qtwayland-5.15.18-0007-fix-remove-listener.patch \
%D%/packages/patches/qtwayland-5.15.18-0008-hook-up-querykeyboardmodifers.patch \
%D%/packages/patches/qtwayland-5.15.18-0009-correctly-detect-if-image-format-is-supported-by-qim.patch \
%D%/packages/patches/qtwayland-5.15.18-0010-client-don-t-always-recreate-frame-callbacks.patch \
%D%/packages/patches/qtwayland-5.15.18-0011-client-always-destroy-frame-callback-in-the-actual-c.patch \
%D%/packages/patches/qtwayland-5.15.18-0012-wayland-client-use-wl_keyboard-to-determine-active-s.patch \
%D%/packages/patches/qtwayland-5.15.18-0013-client-do-not-empty-clipboard-when-a-new-popup-windo.patch \
%D%/packages/patches/qtwayland-5.15.18-0014-client-implement-datadevicev3.patch \
%D%/packages/patches/qtwayland-5.15.18-0015-client-delay-deletion-of-qdrag-object-until-after-we.patch \
%D%/packages/patches/qtwayland-5.15.18-0016-client-avoid-processing-of-events-when-showing-windo.patch \
%D%/packages/patches/qtwayland-5.15.18-0017-handle-registry_global-out-of-constructor.patch \
%D%/packages/patches/qtwayland-5.15.18-0018-connect-flushrequest-after-forceroundtrip.patch \
%D%/packages/patches/qtwayland-5.15.18-0019-move-the-wayland-socket-polling-to-a-separate-event-.patch \
%D%/packages/patches/qtwayland-5.15.18-0020-client-remove-mwaitingforupdatedelivery.patch \
%D%/packages/patches/qtwayland-5.15.18-0021-client-simplify-round-trip-behavior.patch \
%D%/packages/patches/qtwayland-5.15.18-0022-client-fix-opaque-region-setter.patch \
%D%/packages/patches/qtwayland-5.15.18-0023-use-proper-dependencies-in-compile-tests.patch \
%D%/packages/patches/qtwayland-5.15.18-0024-revert-client-remove-mwaitingforupdatedelivery.patch \
%D%/packages/patches/qtwayland-5.15.18-0025-fix-race-condition-on-mwaitingforupdatedelivery.patch \
%D%/packages/patches/qtwayland-5.15.18-0026-use-poll-2-when-reading-from-clipboard.patch \
%D%/packages/patches/qtwayland-5.15.18-0027-reduce-memory-leakage.patch \
%D%/packages/patches/qtwayland-5.15.18-0028-only-close-popup-in-the-the-hierchary.patch \
%D%/packages/patches/qtwayland-5.15.18-0029-check-pointer-for-null-before-use-in-assert.patch \
%D%/packages/patches/qtwayland-5.15.18-0030-use-wl_surface.damage_buffer-on-the-client-side.patch \
%D%/packages/patches/qtwayland-5.15.18-0031-client-clear-focus-on-touch-cancel.patch \
%D%/packages/patches/qtwayland-5.15.18-0032-guard-mresizedirty-by-the-correctmutex.patch \
%D%/packages/patches/qtwayland-5.15.18-0033-fix-compile-tests.patch \
%D%/packages/patches/qtwayland-5.15.18-0034-call-finishdrag-in-qwaylanddatadevice-dragsourcecanc.patch \
%D%/packages/patches/qtwayland-5.15.18-0035-hold-surface-read-lock-throughout-qwaylandeglwindow-.patch \
%D%/packages/patches/qtwayland-5.15.18-0036-keep-toplevel-windows-in-the-top-left-corner-of-the-.patch \
%D%/packages/patches/qtwayland-5.15.18-0037-client-add-f_seal_shrink-seal-to-shm-backing-file.patch \
%D%/packages/patches/qtwayland-5.15.18-0038-client-call-wl_output_release-upon-qwaylandscreen-de.patch \
%D%/packages/patches/qtwayland-5.15.18-0039-client-bump-wl_output-version.patch \
%D%/packages/patches/qtwayland-5.15.18-0040-fix-frame-sync-related-to-unprotected-multithread-ac.patch \
%D%/packages/patches/qtwayland-5.15.18-0041-client-handle-zwp_primary_selection_device_manager_v.patch \
%D%/packages/patches/qtwayland-5.15.18-0042-fixes-the-build-on-centos.patch \
%D%/packages/patches/qtwayland-5.15.18-0043-client-avoid-protocol-error-with-invalid-min-max-siz.patch \
%D%/packages/patches/qtwayland-5.15.18-0044-client-fix-handling-of-qt-blankcursor.patch \
%D%/packages/patches/qtwayland-5.15.18-0045-client-force-a-roundtrip-when-an-xdgoutput-is-not-re.patch \
%D%/packages/patches/qtwayland-5.15.18-0046-destroy-frame-queue-before-display.patch \
%D%/packages/patches/qtwayland-5.15.18-0047-client-fix-crash-on-dnd-updates-after-client-facing-.patch \
%D%/packages/patches/qtwayland-5.15.18-0048-convert-cursor-bitmap-to-supported-format.patch \
%D%/packages/patches/qtwayland-5.15.18-0049-replace-scale-with-devicepixelratio-for-non-integer-.patch \
%D%/packages/patches/qtwayland-5.15.18-0050-client-fix-buffer-damage.patch \
%D%/packages/patches/qtwayland-5.15.18-0051-client-commit-the-initial-surface-state-explicitly.patch \
%D%/packages/patches/qtwayland-5.15.18-0052-tests-fix-tst_xdgshell-minmaxsize.patch \
%D%/packages/patches/qtwayland-5.15.18-0053-client-remove-some-surface-commits.patch \
%D%/packages/patches/qtwayland-5.15.18-0054-client-avoid-locking-resizing-in-qwaylandshmbackings.patch \
%D%/packages/patches/qtwayland-5.15.18-0055-bradient-use-qwaylandwindow-actual-window-title.patch \
%D%/packages/patches/qtwebsockets-6.9-fix-tst_QWebSocket.patch\
%D%/packages/patches/rabbitmq-defaults.patch \
%D%/packages/patches/radare2-fix-meson-build-to-use-sys-qjs.patch \
@@ -2360,7 +2283,6 @@ dist_patch_DATA = \
%D%/packages/patches/rocm-bandwidth-test-fix-external-packages-search.patch \
%D%/packages/patches/rocm-bandwidth-test-fix-hsa-include-file-lookup.patch \
%D%/packages/patches/rocm-bandwidth-test-take-default-gpus-from-environment.patch \
%D%/packages/patches/rocprim-placement-new-delete.patch \
%D%/packages/patches/rottlog-direntry.patch \
%D%/packages/patches/ruby-actionpack-remove-browser-tests.patch \
%D%/packages/patches/ruby-activesupport-fix-deprecation-warning.patch \
@@ -2379,10 +2301,6 @@ dist_patch_DATA = \
%D%/packages/patches/rust-1.70-fix-rustix-build.patch \
%D%/packages/patches/rust-1.78-unwinding-fix.patch \
%D%/packages/patches/rust-1.81-fix-riscv64-bootstrap.patch \
%D%/packages/patches/rust-codex-0.98.0-core-remove-self-dep.patch \
%D%/packages/patches/rust-codex-0.98.0-test-shebangs.patch \
%D%/packages/patches/rust-codex-0.98.0-test-timeout.patch \
%D%/packages/patches/rust-codex-0.98.0-windows-sandbox-protocol-version.patch \
%D%/packages/patches/rust-ring-0.17-ring-core.patch \
%D%/packages/patches/rw-igraph-0.10.patch \
%D%/packages/patches/rxvt-unicode-fix-cursor-position.patch \
@@ -2398,7 +2316,6 @@ dist_patch_DATA = \
%D%/packages/patches/sbcl-burgled-batteries3-fix-signals.patch \
%D%/packages/patches/sbcl-ciel-repl.patch \
%D%/packages/patches/sbcl-clml-fix-types.patch \
%D%/packages/patches/sbcl-cl-posix-mqueue-mqattr-size.patch \
%D%/packages/patches/sbcl-cl-redis-replace-sbcl-specific-calls.patch \
%D%/packages/patches/sbcl-eazy-gnuplot-skip-path-check.patch \
%D%/packages/patches/sbcl-lack-fix-tests.patch \
@@ -2466,12 +2383,10 @@ dist_patch_DATA = \
%D%/packages/patches/tao-fix-parser-types.patch \
%D%/packages/patches/tar-remove-wholesparse-check.patch \
%D%/packages/patches/tar-skip-unreliable-tests.patch \
%D%/packages/patches/taskwarrior-link-taskchampion-cpp-with-sqlite3.patch \
%D%/packages/patches/tbb-gcc-14.patch \
%D%/packages/patches/tbb-other-arches.patch \
%D%/packages/patches/tclxml-3.2-install.patch \
%D%/packages/patches/tcsh-fix-autotest.patch \
%D%/packages/patches/tkremind-fix-fontchooser.patch \
%D%/packages/patches/teensy-loader-cli-help.patch \
%D%/packages/patches/tensorflow-c-api-fix.patch \
%D%/packages/patches/texinfo-headings-single.patch \
@@ -2481,7 +2396,7 @@ dist_patch_DATA = \
%D%/packages/patches/telegram-desktop-unbundle-cppgir.patch \
%D%/packages/patches/telegram-purple-adjust-test.patch \
%D%/packages/patches/telepathy-glib-fix-test.patch \
%D%/packages/patches/tensile-copy-if-not-exist.patch \
%D%/packages/patches/teuchos-remove-duplicate-using.patch \
%D%/packages/patches/texi2html-document-encoding.patch \
%D%/packages/patches/texi2html-i18n.patch \
%D%/packages/patches/texmacs-wayland-hidpi.patch \
@@ -2500,13 +2415,18 @@ dist_patch_DATA = \
%D%/packages/patches/torbrowser-compare-paths.patch \
%D%/packages/patches/torbrowser-use-system-wide-dir.patch \
%D%/packages/patches/torbrowsers-add-store-to-rdd-allowlist.patch \
%D%/packages/patches/tpetra-remove-duplicate-using.patch \
%D%/packages/patches/transcode-ffmpeg.patch \
%D%/packages/patches/transmission-4.0.6-fix-build.patch \
%D%/packages/patches/trytond-add-guix_trytond_path.patch \
%D%/packages/patches/ttf2eot-cstddef.patch \
%D%/packages/patches/turbovnc-custom-paths.patch \
%D%/packages/patches/turbovnc-find-system-packages.patch \
%D%/packages/patches/tuxpaint-stamps-path.patch \
%D%/packages/patches/tvm_fix_cpptest_build.patch \
%D%/packages/patches/twinkle-bcg729.patch \
%D%/packages/patches/u-boot-allow-disabling-openssl.patch \
%D%/packages/patches/u-boot-nintendo-nes-serial.patch \
%D%/packages/patches/ucx-tcp-iface-ioctl.patch \
%D%/packages/patches/uftrace-fix-tests.patch \
%D%/packages/patches/ultrastar-deluxe-no-freesans.patch \
@@ -2558,7 +2478,9 @@ dist_patch_DATA = \
%D%/packages/patches/vagrant-bin-vagrant-silence-warning-about-installer.patch \
%D%/packages/patches/vagrant-Support-system-installed-plugins.patch \
%D%/packages/patches/vagrant-Use-a-private-temporary-dir.patch \
%D%/packages/patches/vala-0.52-fix-valagirparser.patch \
%D%/packages/patches/vboot-utils-fix-format-load-address.patch \
%D%/packages/patches/vboot-utils-fix-tests-show-contents.patch \
%D%/packages/patches/vboot-utils-skip-test-workbuf.patch \
%D%/packages/patches/vcmi-disable-privacy-breach.patch \
%D%/packages/patches/vinagre-newer-freerdp.patch \
%D%/packages/patches/vinagre-newer-rdp-parameters.patch \
@@ -2590,6 +2512,9 @@ dist_patch_DATA = \
%D%/packages/patches/x2goclient-fix-makefile.patch \
%D%/packages/patches/x265-arm-flags.patch \
%D%/packages/patches/x265-4-arm-flags.patch \
%D%/packages/patches/xdg-desktop-portal-disable-portal-tests.patch\
%D%/packages/patches/xdg-desktop-portal-disable-configuration-search-exit.patch\
%D%/packages/patches/xdg-desktop-portal-1.20.3-disable-configuration-search-exit.patch\
%D%/packages/patches/xdg-desktop-portal-wlr-harcoded-length.patch\
%D%/packages/patches/xf86-video-siliconmotion-fix-ftbfs.patch \
%D%/packages/patches/xfig-Enable-error-message-for-missing-libraries.patch \
@@ -2613,7 +2538,6 @@ dist_patch_DATA = \
%D%/packages/patches/xygrib-newer-proj.patch \
%D%/packages/patches/yajl-CVE-2023-33460.patch \
%D%/packages/patches/yggdrasil-extra-config.patch \
%D%/packages/patches/ypsilon-Use-GNU-toolchain-as-default.patch \
%D%/packages/patches/zabbix-agent2-test-timezone-fix.patch \
%D%/packages/patches/zig-0.9-build-respect-PKG_CONFIG-env-var.patch \
%D%/packages/patches/zig-0.9-fix-runpath.patch \
+4 -5
View File
@@ -32,7 +32,6 @@
#:use-module (guix git-download)
#:use-module (guix build-system gnu)
#:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system meson)
#:use-module (gnu packages)
#:use-module (gnu packages autotools)
@@ -110,7 +109,7 @@
(list latex2html
pkg-config
python-wrapper
swig-4.0)))
swig)))
(inputs
(list glib
gtk+-2
@@ -160,11 +159,11 @@ terminals.")
"PYTHON_ROOT=/"
(string-append "TCL_DIR=" #$output "/lib")
"INSTALL_WRITABLE_DIRECTORY=no-thanks")
#:imported-modules (append %glib-or-gtk-build-system-modules
%pyproject-build-system-modules)
#:imported-modules `((guix build python-build-system)
,@%glib-or-gtk-build-system-modules)
#:modules '((guix build utils)
(guix build glib-or-gtk-build-system)
((guix build pyproject-build-system) #:prefix python:))
((guix build python-build-system) #:prefix python:))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-errors
+59 -197
View File
@@ -80,9 +80,6 @@
;;; Copyright © 2025 Luca Kredel <luca.kredel@web.de>
;;; Copyright © 2025 ROCKTAKEY <rocktakey@gmail.com>
;;; Copyright © 2026 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2026 Luis Guilherme Coelho <lgcoelho@disroot.org>
;;; Copyright © 2026 Andy Tai <atai@atai.org>
;;; Copyright © 2026 marderbot <marderbot@tredecimal.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -102,7 +99,6 @@
(define-module (gnu packages admin)
#:use-module (guix build-system cargo)
#:use-module (guix build-system cmake)
#:use-module (guix build-system copy)
#:use-module (guix build-system emacs)
#:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system gnu)
@@ -139,7 +135,6 @@
#:use-module (gnu packages curl)
#:use-module (gnu packages cyrus-sasl)
#:use-module (gnu packages datastructures)
#:use-module (gnu packages dbm)
#:use-module (gnu packages debian)
#:use-module (gnu packages dns)
#:use-module (gnu packages elf)
@@ -227,14 +222,14 @@
(define-public aide
(package
(name "aide")
(version "0.19.3")
(version "0.19.2")
(source
(origin
(method url-fetch)
(uri (string-append "https://github.com/aide/aide/releases/download/v"
version "/aide-" version ".tar.gz"))
(sha256
(base32 "0irz58hmbrq3vci0aixlyap35x59i8nz0whvvl12ihmqnl5if4v5"))))
(base32 "1i3lbsw1mhsnq54bx48zikdiph1ihxn021ca7kmys4b1yh2jnxi3"))))
(build-system gnu-build-system)
(arguments
(list #:configure-flags #~(list "--with-posix-acl"
@@ -336,24 +331,23 @@ characters can be replaced as well, as can UTF-8 characters.")
(define-public hetznercloud-cli
(package
(name "hetznercloud-cli")
(version "1.61.0")
(version "1.50.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hetznercloud/cli")
(commit (string-append "v" version))))
(url "https://github.com/hetznercloud/cli")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1mwiqy05s43faxqv1llk242nikmgb09wy5i7m1kjvkjg0zzjn20s"))))
(base32 "1d0k2g1s5x77kd8wrx8py2g3bqhaxqnm5kgm0dlmzypmfyavssg4"))))
(build-system go-build-system)
(arguments
(list
#:tests? #f
#:tests? #f ; XXX: figure out hot to enable them
#:install-source? #f
#:import-path "github.com/hetznercloud/cli/cmd/hcloud"
#:unpack-path "github.com/hetznercloud/cli"
#:test-subdirs #~(list "../../..."))) ;test the whole library
#:unpack-path "github.com/hetznercloud/cli"))
(native-inputs
(list go-github-com-burntsushi-toml
go-github-com-cheggaaa-pb-v3
@@ -372,10 +366,7 @@ characters can be replaced as well, as can UTF-8 characters.")
go-github-com-swaggest-assertjson
go-go-uber-org-mock
go-golang-org-x-crypto
go-golang-org-x-exp
go-golang-org-x-net
go-golang-org-x-term
go-golang-org-x-text))
go-golang-org-x-term))
(home-page "https://github.com/hetznercloud/cli")
(synopsis "Command-line interface for the Hetzner Cloud service")
(description
@@ -2608,7 +2599,7 @@ features of sudo with a fraction of the codebase.")
(define-public wpa-supplicant-minimal
(package
(name "wpa-supplicant-minimal")
(version "2.11")
(version "2.10")
(source (origin
(method url-fetch)
(uri (string-append
@@ -2616,7 +2607,7 @@ features of sudo with a fraction of the codebase.")
version ".tar.gz"))
(sha256
(base32
"02pwqwdcirnyfmfzrc0xb66qs8gzrpb6905nzcv8w2p3fips0bli"))
"0bvvw7bx149a57llzrwzlpggyym84f8jdd4abwsk0f2b2pjpmpr0"))
(modules '((guix build utils)))
(snippet
'(begin
@@ -2930,7 +2921,7 @@ development, not the kernel implementation of ACPI.")
(define-public s-tui
(package
(name "s-tui")
(version "1.3.0")
(version "1.2.0")
(source
(origin
(method git-fetch)
@@ -2939,11 +2930,12 @@ development, not the kernel implementation of ACPI.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0yqyndavlskzd0v0cby8v477ivyrpqxd58cn708y46yixz7r14h7"))))
(base32 "08mfclgdy6cb8xgp8sc7fpm4qxay37j71b1b3niywi6x206i5m2m"))))
(build-system pyproject-build-system)
(native-inputs
(list python-pytest
python-setuptools))
python-setuptools
python-wheel))
(inputs
(list python-psutil
python-urwid))
@@ -3294,10 +3286,6 @@ specified directories.")
import re
sys.argv[0] = re.sub(r'\\.([^/]*)-real$', r'\\1', sys.argv[0])
")))))
(add-before 'build 'set-HOME
(lambda _
;; Otherwise Ansible fails to create its config directory.
(setenv "HOME" "/tmp")))
(add-after 'install 'replace-symlinks
(lambda _
;; Replace symlinks with duplicate copies of the ansible
@@ -3329,6 +3317,8 @@ sys.argv[0] = re.sub(r'\\.([^/]*)-real$', r'\\1', sys.argv[0])
(replace 'check
(lambda* (#:key inputs outputs tests? test-flags #:allow-other-keys)
(when tests?
;; Otherwise Ansible fails to create its config directory.
(setenv "HOME" "/tmp")
;; The test suite needs to be run with 'ansible-test', which
;; does some extra environment setup. Taken from
;; https://raw.githubusercontent.com/ansible/ansible/\
@@ -3339,7 +3329,7 @@ sys.argv[0] = re.sub(r'\\.([^/]*)-real$', r'\\1', sys.argv[0])
openssl
python-mock
python-pycryptodome
python-pytest-8
python-pytest
python-pytest-forked
python-pytest-mock
python-pytest-xdist
@@ -3835,15 +3825,8 @@ platform-specific methods.")
"0y5w8pl91xapi49ih1pw7h48lac201cj7fm89hkklmzi9m2715gx"))))
(build-system gnu-build-system)
(arguments
(list #:configure-flags
#~(list #$@(cond ((target-aarch64?)
'("--with-aarch64"))
((target-arm32?)
'("--with-arm"))
(else
'()))
"--with-python=no"
"--disable-static")))
`(#:configure-flags (list "--with-python=no"
"--disable-static")))
(inputs
(list openldap gnutls cyrus-sasl))
(synopsis "User-space component to the Linux auditing system")
@@ -4083,7 +4066,7 @@ plug-in architecture to allow monitoring other system metrics.")
(native-inputs
(list go
python-mock
python-pytest-8
python-pytest
python-pytest-mock
python-setuptools
python-wheel))
@@ -4445,7 +4428,7 @@ buffers.")
(define-public igt-gpu-tools
(package
(name "igt-gpu-tools")
(version "2.3")
(version "1.28")
(source
(origin
(method git-fetch)
@@ -4454,7 +4437,7 @@ buffers.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1vyqrsvxraib98r4i6cjmxq7nis480s2ns95v78dscygcci42i8a"))))
(base32 "15mnsgzlpd4jkr2zy3jzx0b021g89fa61b8sdm8rjp27gxqkl8mm"))))
(build-system meson-build-system)
(arguments
`(#:tests? #f ; many of the tests try to load kernel modules
@@ -4741,7 +4724,7 @@ information tool.")
(define-public fastfetch-minimal
(package
(name "fastfetch-minimal")
(version "2.60.0")
(version "2.57.0")
(source
(origin
(method git-fetch)
@@ -4750,7 +4733,7 @@ information tool.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "089577qgxd63zqzd00fz381bfpmj6pwlmy2zfan9r6gbm1jvj4i8"))
(base32 "1cipr083bf8frqijvxnff7bgzvzczxksicaqj0m22avyhzxc7p3d"))
(modules '((guix build utils)))
(snippet '(begin
(delete-file-recursively "src/3rdparty")
@@ -4806,14 +4789,14 @@ system distribution, akin to many similar tools.")
(define-public nnn
(package
(name "nnn")
(version "5.2")
(version "5.1")
(source
(origin
(method url-fetch)
(uri (string-append "https://github.com/jarun/nnn/releases/download/v"
version "/nnn-v" version ".tar.gz"))
(sha256
(base32 "035xn433mqx6wzzwdavv40dk09m4k4m41gzwwd25glbl1widscfb"))))
(base32 "0igc119c1cicravlsh0p715rn7fc0cqjxnhplqw0cbm2xv3g32n8"))))
(build-system gnu-build-system)
(inputs
(list ncurses readline))
@@ -5260,34 +5243,6 @@ support forum. It runs with the @code{/exec} command in most IRC clients.")
(description "This package provides @code{udev} bindings for Python.")
(license license:lgpl2.1)))
(define-public undervolt
(package
(name "undervolt")
(version "0.4.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/georgewhewell/undervolt")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "136j8rqqra84yg57vn3nqwk1b36y9y7sjkynr0fl8pnrb7z8mq0v"))))
(build-system pyproject-build-system)
(arguments
(list #:tests? #f)) ;no tests
(native-inputs
(list python-setuptools))
(home-page "https://github.com/georgewhewell/undervolt")
(synopsis "Undervolt Intel CPUs under Linux")
(description
"Undervolt is a program for undervolting Intel CPUs under Linux. It
works in a similar manner to the Windows program ThrottleStop (i.e, MSR
0x150). A fixed voltage offset may be applied to one of 5 voltage planes,
which overrides systems' temperature target (CPU will throttle when this
temperature is reached).")
(license license:gpl2+)))
(define-public vmtouch
(package
(name "vmtouch")
@@ -5323,7 +5278,7 @@ cache of unix and unix-like systems.")
(define-public solaar
(package
(name "solaar")
(version "1.1.19")
(version "1.1.18")
(source
(origin
(method git-fetch)
@@ -5332,11 +5287,10 @@ cache of unix and unix-like systems.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0pq1wy2m84ma0pg5k200f0fhywvx4qa873v8n5pz56ahc4ddcyk7"))))
(base32 "0wf8rkm9anxr9iw51yxaav9cifpfkf1m4cw7i9rfsq8xb3aa2n9b"))))
(build-system pyproject-build-system)
(native-inputs
(list gobject-introspection
python-pytest
(list python-pytest
python-pytest-mock
python-setuptools
python-typing-extensions
@@ -5344,7 +5298,7 @@ cache of unix and unix-like systems.")
(propagated-inputs
(list python-pygobject
python-pyudev
python-dbus
python-dbus-python
python-evdev
;; For GUI.
python-pyyaml
@@ -5710,7 +5664,7 @@ entries, providing commands to add, remove, comment, and search.")
(define-public nmrpflash
(package
(name "nmrpflash")
(version "0.9.27")
(version "0.9.26")
(source
(origin
(method git-fetch)
@@ -5719,7 +5673,7 @@ entries, providing commands to add, remove, comment, and search.")
(url "https://github.com/jclehner/nmrpflash")
(commit (string-append "v" version))))
(sha256
(base32 "1fi64cqdllxsradh1iczyxsqgn2kcncdfaf94xll30ghpyz06jb2"))
(base32 "19dna96qg32nscvsalgd0xslp3da84aj196cczdm0ixhv1k9pvi3"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
@@ -6325,7 +6279,7 @@ doesn't need a Wayland compositor to be used.")
(define-public libseat
(package
(name "libseat")
(version "0.9.2")
(version "0.9.1")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -6334,7 +6288,7 @@ doesn't need a Wayland compositor to be used.")
(file-name (git-file-name name version))
(sha256
(base32
"1rmi2f38g5zx50zzy5qicy314a5jmzjwdx3giy4yzb7rfwz0hlq7"))))
"1q1ih1f9v5240nlas1gz44giwq4k88p3yikfq7w0a4sw58yr6pz8"))))
(build-system meson-build-system)
(arguments
(list #:configure-flags #~(list "-Dlibseat-logind=elogind"
@@ -6771,39 +6725,36 @@ file or files to several hosts.")
(define-public du-dust
(package
(name "du-dust")
(version "1.2.4")
(version "1.2.0")
(source
(origin
(method url-fetch)
(uri (crate-uri "du-dust" version))
(file-name (string-append name "-" version ".tar.gz"))
(sha256
(base32 "0lksdw44s4fwyfscn79f8c8s3a5ijwfbxny539lgq0fsv5nx6bid"))))
(base32 "1nx3a1vij6m7jkmjybaxpjmwqygh0byjqis94f8lx02i1yyw2w1d"))))
(build-system cargo-build-system)
(arguments
(list
#:imported-modules (append %copy-build-system-modules
%cargo-build-system-modules)
#:modules '((guix build cargo-build-system)
((guix build copy-build-system) #:prefix copy:)
(guix build utils))
#:install-source? #f
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'install-extras
(lambda args
(apply (assoc-ref copy:%standard-phases 'install)
#:install-plan
'(("completions/dust.bash"
"share/bash-completion/completions/dust")
("completions/dust.elv"
"share/elvish/lib/dust")
("completions/dust.fish"
"share/fish/vendor_completions.d/")
("completions/_dust"
"share/zsh/site-functions/")
("man-page/dust.1" "share/man/man1/"))
args))))))
(list #:install-source? #f
#:phases #~(modify-phases %standard-phases
(add-after 'install 'install-extras
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(share (string-append out "/share")))
(install-file "man-page/dust.1"
(string-append share "/man/man1"))
(mkdir-p (string-append out
"/share/bash-completion/completions"))
(copy-file
"completions/dust.bash"
(string-append
out "/share/bash-completion/completions/dust"))
(install-file "completions/dust.fish"
(string-append share
"/fish/vendor_completions.d"))
(install-file "completions/_dust"
(string-append share
"/zsh/site-functions"))))))))
(inputs (cargo-inputs 'du-dust))
(home-page "https://github.com/bootandy/dust")
(synopsis "Graphical disk usage analyzer")
@@ -6896,14 +6847,14 @@ versions of @command{find}, including POSIX, GNU, and *BSD find.")
(define-public rdfind
(package
(name "rdfind")
(version "1.8.0")
(version "1.7.0")
(source
(origin
(method url-fetch)
(uri (string-append "https://rdfind.pauldreik.se/" name "-" version
".tar.gz"))
(sha256
(base32 "0ddgwx9131ba8ym75xnrz2rcy7l1rjdn8yzf6h0xrhic00r0sb8a"))))
(base32 "0afzwhmzlzhzzckd9iwkbx6grrzm5p4vk0zbpz8lz7hx5qan7i3q"))))
(build-system gnu-build-system)
(native-inputs (list which))
(inputs (list nettle))
@@ -7117,61 +7068,6 @@ It shows which process uses the port, and its information like process tree,
working directory, user, pid, command, and so on.")
(license license:asl2.0)))
(define-public radius
(package
(name "radius")
(version "1.7")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://gnu/radius/radius-" version ".tar.xz"))
(sha256
(base32 "0n9k30ma7n9xmjwlvsv9x333g52lfplbpzcyg0vh2wmm423bvy36"))))
(build-system gnu-build-system)
(arguments
(list
#:configure-flags
#~(list "--with-log-dir=/var/log"
#$@(if (target-hurd?)
'()
'("--with-libpam")))
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'skip-failing-tests
(lambda _
(for-each (lambda (test)
(substitute* "tests/testsuite.at"
((test)
"")))
(list "execwait")))))))
(inputs (append (if (target-hurd?)
'()
(list linux-pam util-linux))
(list acl
gawk
gdbm
gettext-minimal
guile-3.0
libxcrypt
readline)))
(native-inputs (list autoconf
bash-minimal
bison
flex
groff
m4
procps
texinfo))
(home-page "https://www.gnu.org/software/radius/")
(synopsis "Authentication and accounting services and daemon")
(description
"GNU Radius is a server for remote user authentication and accounting. It
is generally useful for networks that require a centralized authentication
and accounting services for its workstations. Authentication can be
performed in a variety of ways, such as via @file{/etc/passwd} or credentials
stored in an SQL database.")
(license license:gpl3+)))
(define-public xfel
(package
(name "xfel")
@@ -7211,37 +7107,3 @@ stored in an SQL database.")
(description "This package contains a debugging tool for Allwinner devices
(connects via USB OTG).")
(license license:expat)))
(define-public zzz
(package
(name "zzz")
(version "20250212")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/void-linux/void-runit")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"00nbnjmxwvqj5hf0g00ma26hb29i9mr05g8ls24icp1409c2ykkc"))))
(build-system copy-build-system)
(arguments
(list #:install-plan
#~'(("zzz" "sbin/")
("zzz.8" "share/man/man8/"))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-zzz
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "zzz"
(("flock") (search-input-file inputs "bin/flock"))
(("grep") (search-input-file inputs "bin/grep"))))))))
(inputs
(list grep util-linux))
(home-page "https://github.com/void-linux/void-runit")
(synopsis "Simple script to suspend or hibernate your computer")
(description "Simple script to suspend or hibernate your computer. It
supports hooks before and after suspending.")
(license license:cc0)))
+2 -2
View File
@@ -197,7 +197,7 @@ come from Agda's standard library.")
(define-public agda-stdlib
(package
(name "agda-stdlib")
(version "2.3")
(version "2.1.1")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -206,7 +206,7 @@ come from Agda's standard library.")
(file-name (git-file-name name version))
(sha256
(base32
"17w5vfn5pb2cgfs22zph3jfqnki52ja8y4zwyqj24zwf9rxairr4"))))
"1n742qvlxaj4dprnknvzrr876af6yjfwa4ps1dr4v1h814sg0xz0"))))
(build-system agda-build-system)
(arguments
(list
+41 -26
View File
@@ -73,30 +73,22 @@
(build-system pyproject-build-system)
(arguments
(list
#:test-flags
;; This tests if find_library was called once, but we remove the call in
;; the stage below to make the library find libzbar.
#~(list #$@(map (lambda (test) (string-append "--deselect="
"pyzbar/tests/"
"test_zbar_library.py::"
"TestLoad::"
test))
(list "test_found_non_windows"
"test_not_found_non_windows")))
#:test-backend #~'unittest
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'remove-failing-test
(lambda _
;; This tests if find_library was called once, but we remove
;; the call in the stage below to make the library find libzbar.
(delete-file "pyzbar/tests/test_zbar_library.py")))
(add-before 'build 'set-library-file-name
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "pyzbar/zbar_library.py"
(("find_library\\('zbar'\\)")
(format #f "~s"
(search-input-file inputs "/lib/libzbar.so.0")))))))))
(lambda _
(let ((libzbar #$(this-package-input "zbar")))
(substitute* "pyzbar/zbar_library.py"
(("find_library\\('zbar'\\)")
(string-append "'" libzbar "/lib/libzbar.so.0'")))))))))
(native-inputs
(list pkg-config
python-numpy
python-pillow
python-pytest
python-setuptools))
(list pkg-config python-numpy python-pillow python-setuptools))
(inputs
(list zbar))
(home-page "https://github.com/NaturalHistoryMuseum/pyzbar/")
@@ -219,6 +211,27 @@ integration of this capability into your own programs.")
(home-page "https://github.com/zxing-cpp/zxing-cpp")
(license license:asl2.0)))
;;; This older variant is kept for gst-plugins-bad (see:
;;; https://gitlab.freedesktop.org/gstreamer/gst-plugins-bad/-/issues/1684).
(define-public zxing-cpp-1.2
(package/inherit zxing-cpp
(name "zxing-cpp")
(version "1.2.0")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/zxing-cpp/zxing-cpp")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(patches (search-patches "zxing-cpp-1.2.0-gcc-14.patch"))
(sha256
(base32
"1gjj9c7h634rrmmgzbc7cxjqsxdq0paj6113k02ncjm1s9abk7ik"))))
;; Disable tests to avoid bundled dependencies.
(arguments '(#:tests? #f
#:configure-flags '("-DBUILD_BLACKBOX_TESTS=OFF")))
(native-inputs '())))
(define-public barcode
(package
(name "barcode")
@@ -350,11 +363,12 @@ This package includes the following programs:
(build-system glib-or-gtk-build-system)
(arguments
(list
#:configure-flags
#~(list "--disable-static"
"--without-dbus" ;See <https://github.com/mchehab/zbar/issues/104>
"--with-gtk=auto"
"--with-python=auto")))
#:configure-flags '(list "--disable-static"
"--with-gtk=auto"
"--with-python=auto"
(string-append "--with-dbusconfdir="
(assoc-ref %outputs "out")
"/etc"))))
(native-inputs
(list autoconf
automake
@@ -366,7 +380,8 @@ This package includes the following programs:
pkg-config
python-wrapper))
(inputs
(list imagemagick
(list dbus
imagemagick
libjpeg-turbo
perl
python
+5 -5
View File
@@ -313,7 +313,7 @@ PARI is also available as a C library to allow for faster computations.")
(define-public gp2c
(package
(name "gp2c")
(version "0.0.14pl1")
(version "0.0.14")
(source (origin
(method url-fetch)
(uri (string-append
@@ -321,7 +321,7 @@ PARI is also available as a C library to allow for faster computations.")
version ".tar.gz"))
(sha256
(base32
"1g160xg8p624vg1ms7mz34zrb9132ppwwrpqi4ldqqkqzlhf0p14"))))
"0c3v1g04mkb45xrcrxr9xzp61nnql38k6i6s77i5f14l0b614qdg"))))
(build-system gnu-build-system)
(native-inputs (list perl))
(inputs (list pari-gp))
@@ -557,11 +557,11 @@ fast arithmetic.")
(build-system pyproject-build-system)
(arguments
(list
;; tests: 905 passed
#:test-flags #~(list "--pyargs" "flint")))
(native-inputs
(list pkg-config
python-meson
(list meson-python
pkg-config
python-cython
python-pytest))
(inputs
(list gmp
+3 -2
View File
@@ -426,7 +426,7 @@ various Android core host applications.")
(lambda* (#:key inputs outputs #:allow-other-keys)
(install-file "diagnose_usb.h" (string-append (assoc-ref outputs "out") "/include"))
#t)))))
(native-inputs (list linux-libre-headers-5.15 gcc-11))
(native-inputs (list linux-libre-headers-5.4 gcc-11))
(inputs
(list android-libbase android-libcutils android-liblog openssl))
(home-page "https://developer.android.com/studio/command-line/adb.html")
@@ -1077,7 +1077,7 @@ script that you can put anywhere in your path.")
(source
(origin
(method url-fetch)
(uri (string-append "http://deb.debian.org/debian/pool/main/a/abootimg/"
(uri (string-append "http://http.debian.net/debian/pool/main/a/abootimg/"
"abootimg_" version ".orig.tar.gz"))
(sha256
(base32 "0sfc2k011l1ymv97821w89391gnqdh8pp0haz4sdcm5hx0axv2ba"))))
@@ -1168,6 +1168,7 @@ useful for reverse engineering, analysis of Android applications and more.")
python-croniter
python-cryptography
python-defusedxml
python-importlib-metadata
python-netifaces
python-pytz
python-pyyaml
+2 -1
View File
@@ -83,6 +83,7 @@
(guix build cmake-build-system)
(guix build utils))
#:phases
(with-extensions (list (cargo-guile-json))
#~(modify-phases %standard-phases
(add-after 'unpack 'prepare-cargo-build-system
(lambda args
@@ -111,7 +112,7 @@
(substitute* "unit_tests/CMakeLists.txt"
(("clamd_test\\.py" test)
(string-append
test " -k \"not test_clamd_08_VirusEvent\"")))))))))
test " -k \"not test_clamd_08_VirusEvent\""))))))))))
(native-inputs
(append
(list pkg-config
+1 -1
View File
@@ -93,7 +93,7 @@
perl
python-minimal
ruby
swig-4.0
swig
which))
(home-page "https://apparmor.net")
(synopsis "Linux kernel security module")
+80 -76
View File
@@ -65,16 +65,16 @@
(define-public arcan
(package
(name "arcan")
(version "0.7.1")
(version "0.6.3.3")
(source (origin
(method git-fetch)
(file-name (git-file-name name version))
(uri (git-reference
(url "https://codeberg.org/letoram/arcan")
(url "https://github.com/letoram/arcan")
(commit version)))
(sha256
(base32
"1sn8rljghrw57q99n9hl03pr2ndgkzg4g3p443iaslg42bmww05c"))
"0rbswqqrgh9bkv0fzsswpkfw2zp1a7znwy0abgrxha5vpn13qd8c"))
(modules '((guix build utils)))
(snippet
;; Remove some bundled packages.
@@ -186,83 +186,85 @@ engine with a Lua scripting interface.")
(synopsis "Combined display server, multimedia framework and game engine (SDL)")))
(define-public durden
(let ((commit "43211acd7994836d5c4ba039d7ecc939dcf8a5aa")
(revision "2"))
(package
(name "durden")
(version (git-version "0.6.1" revision commit))
(source
(origin
(method git-fetch)
(file-name (git-file-name name version))
(uri (git-reference
(url "https://github.com/letoram/durden")
(commit commit)))
(sha256
(base32 "1jns4lq959s8ydykm0yg9sddzh74k7fdvjrnbz3z91idb7abl92d"))
(patches (search-patches "durden-shadow-arcan.patch"))))
(build-system copy-build-system)
(arguments
(list
#:install-plan #~'(("durden/" "share/arcan/appl/durden/")
("util/" "share/arcan/appl/durden/util/")
("distr/durden" "bin/durden"))
#:phases #~(modify-phases %standard-phases
(add-after 'unpack 'patch-paths
(lambda* (#:key inputs outputs #:allow-other-keys)
(substitute* "distr/durden"
(("/usr/share/\\$applname")
(string-append (assoc-ref outputs "out")
"/share/arcan/appl"))
(("@ARCAN_STORE_PATH@")
(string-append (assoc-ref inputs "arcan")
"/bin/arcan"))
(("([\\([:blank:]]+)basename " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/basename "))
(("([\\([:blank:]]+)date " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/date "))
(("([\\([:blank:]]+)ln " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/ln "))
(("([\\([:blank:]]+)mkdir " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/mkdir "))
(("([\\([:blank:]]+)true; " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/true; "))
(("([\\([:blank:]]+)\\[ " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/[ "))))))))
(inputs (list arcan coreutils))
(home-page "https://durden.arcan-fe.com/")
(synopsis "Desktop Environment for Arcan")
(description
"Durden is a desktop environment for the Arcan Display Server.
It serves both as a reference showcase on how to take advantage of some of the
features in Arcan, and as an entry to the advanced-user side of the desktop
environment spectrum.")
(license (list license:bsd-3 license:expat license:cc-by3.0
license:cc-by4.0 license:asl2.0)))))
(define-public xarcan
(package
(name "durden")
(name "xarcan")
(version "0.6.3")
(source
(origin
(method git-fetch)
(file-name (git-file-name name version))
(uri (git-reference
(url "https://codeberg.org/letoram/durden")
(url "https://github.com/letoram/xarcan")
(commit version)))
(sha256
(base32 "1w12mdjdbhw13134fj4kv43n1z6vrh1jhg1wc7m5hw82w8ncwqkm"))
(patches (search-patches "durden-shadow-arcan.patch"))))
(build-system copy-build-system)
(arguments
(list
#:install-plan #~'(("durden/" "share/arcan/appl/durden/")
("util/" "share/arcan/appl/durden/util/")
("distr/durden" "bin/durden"))
#:phases #~(modify-phases %standard-phases
(add-after 'unpack 'patch-paths
(lambda* (#:key inputs outputs #:allow-other-keys)
(substitute* "distr/durden"
(("/usr/share/\\$applname")
(string-append (assoc-ref outputs "out")
"/share/arcan/appl"))
(("@ARCAN_STORE_PATH@")
(string-append (assoc-ref inputs "arcan")
"/bin/arcan"))
(("([\\([:blank:]]+)basename " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/basename "))
(("([\\([:blank:]]+)date " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/date "))
(("([\\([:blank:]]+)ln " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/ln "))
(("([\\([:blank:]]+)mkdir " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/mkdir "))
(("([\\([:blank:]]+)true; " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/true; "))
(("([\\([:blank:]]+)\\[ " _ separator)
(string-append separator
(assoc-ref inputs "coreutils")
"/bin/[ "))))))))
(inputs (list arcan coreutils))
(home-page "https://durden.arcan-fe.com/")
(synopsis "Desktop Environment for Arcan")
(description
"Durden is a desktop environment for the Arcan Display Server.
It serves both as a reference showcase on how to take advantage of some of the
features in Arcan, and as an entry to the advanced-user side of the desktop
environment spectrum.")
(license (list license:bsd-3 license:expat license:cc-by3.0
license:cc-by4.0 license:asl2.0))))
(define-public xarcan
(package
(name "xarcan")
(version "0.7.1")
(source
(origin
(method git-fetch)
(file-name (git-file-name name version))
(uri (git-reference
(url "https://codeberg.org/letoram/xarcan")
(commit version)))
(sha256
(base32 "1jpk272y58h94ss6j87i0cl1zlfp4g5803y0kpi09q8yy37icvcg"))))
(base32 "1g24mmwnc45ig0x8jk0v91488k8933w07vxi4305sla56q4n82p4"))))
(build-system meson-build-system)
(arguments
(list
@@ -300,7 +302,6 @@ environment spectrum.")
openssl
pixman
xcb-util
xcb-util-image
xcb-util-wm
xkbcomp
xkeyboard-config
@@ -308,8 +309,11 @@ environment spectrum.")
xtrans))
(home-page "https://arcan-fe.com")
(synopsis "Patched Xserver that bridges connections to Arcan")
(description
"Patched Xserver with a KDrive backend that uses the arcan-shmif
to map Xlib/Xcb/X clients to a running arcan instance. It allows
running an X session as a window under Arcan.")
(description "Patched Xserver with a KDrive backend that uses the arcan-shmif
to map Xlib/Xcb/X clients to a running arcan instance. It allows running an X session
as a window under Arcan.")
(license (list license:bsd-3 license:expat))))
;; Package was merged into arcan in upstream.
(define-deprecated-package arcan-wayland
arcan)
-108
View File
@@ -1,108 +0,0 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2026 Carlos Durán Domínguez <wurt@wurt.eu>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages array-languages)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system go)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix packages)
#:use-module (guix utils)
#:use-module (gnu packages)
#:use-module (gnu packages bash))
;;;
;;; Code:
(define-public goal
(package
(name "goal")
(version "1.5.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://codeberg.org/anaseto/goal")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1ckkjd2hf2v6f8x0ck9brp1ii4q8lcssvvwn7d6l1l5n9kcfjw7n"))))
(build-system go-build-system)
(inputs (list bash-minimal))
(outputs (list "out" "lib"))
(arguments
(list
#:unpack-path "codeberg.org/anaseto/goal"
#:import-path "codeberg.org/anaseto/goal/cmd/goal"
#:build-flags
#~(list "-tags" "full,nosse4") ;disable SSE4.2 optimizations
#:test-flags
#~(list "-skip" "TestSources/version.goal" ;git tests require a repo
"-tags" "full,nosse4")
#:phases
#~(modify-phases %standard-phases
;; Goal requires a shell interpreter.
(add-after 'unpack 'fix-sh-path
(lambda* (#:key unpack-path #:allow-other-keys)
(substitute* (string-append "src/" unpack-path "/os/os.go")
(("/bin/sh")
#$(file-append bash-minimal "/bin/sh")))))
;; Tests require the goal binary.
(add-before 'check 'add-goal-path
(lambda _
(setenv "PATH"
(string-append (getenv "PATH") ":" #$output "/bin"))))
;; Goal is embeddable, but end users typically don't need the source
;; code.
(replace 'install
(lambda* (#:key unpack-path #:allow-other-keys #:rest arguments)
(apply (assoc-ref %standard-phases 'install)
`(,@arguments #:import-path ,unpack-path))
(mkdir-p #$output:lib)
(rename-file (string-append #$output "/src")
(string-append #$output:lib "/src"))))
(add-after 'install 'install-goal-libs-and-documentation
(lambda* (#:key unpack-path inputs #:allow-other-keys #:rest
arguments)
(let ((outdir (string-append #$output "/share/goal/"
#$(version-major version) "/lib")))
(mkdir-p outdir)
(copy-recursively (string-append "src/" unpack-path "/lib")
outdir))
(install-file (string-append "src/" unpack-path "/docs/goal.1")
(string-append #$output "/share/man/man1")))))))
(native-search-paths
(list (search-path-specification
(variable "GOALLIB")
(separator #f)
(files `(,(string-append "share/goal/"
(version-major version) "/lib"))))))
(home-page "https://anaseto.codeberg.page/goal-docs/")
(synopsis "Embeddable scripting array language")
(description
"Goal is an embeddable array programming language with a bytecode
interpreter, written in Go. The command line intepreter can execute scripts
or run in interactive mode. Goal shines the most in common scripting tasks,
like handling columnar data or text processing. It is also suitable for
exploratory programming.")
(license license:isc)))
;;;
;;; Avoid adding new packages to the end of this file. To reduce the chances
;;; of a merge conflict, place them above in alphabetic order.
;;;
+6 -4
View File
@@ -52,7 +52,7 @@
(define-public aspell
(package
(name "aspell")
(version "0.60.8.1")
(version "0.60.8")
(source
(origin
(method url-fetch)
@@ -60,8 +60,9 @@
version ".tar.gz"))
(sha256
(base32
"06yjhwlgpcvbrl5g83qjrpzjwjx7hka5lhsfc3x5gm229nri5nnn"))
(patches (search-patches "aspell-default-dict-dir.patch"))))
"1wi60ankalmh8ds7nplz434jd7j94gdvbahdwsr539rlad8pxdzr"))
(patches (search-patches "aspell-default-dict-dir.patch"
"aspell-CVE-2019-25051.patch"))))
(build-system gnu-build-system)
(arguments
`(#:phases
@@ -77,7 +78,8 @@
(substitute* "common/config.cpp"
(("\"filter-path(.*)DICT_DIR" _ middle)
(string-append "\"filter-path" middle
"\"" libdir "\"")))))))))
"\"" libdir "\"")))
#t))))))
(native-inputs (list perl))
(native-search-paths
+18 -1
View File
@@ -749,7 +749,24 @@ files.")
(list
#:tests? #f ;; XXX: insists on using bundled googletest
#:configure-flags
#~(list "-DBUILD_SHARED_LIBS=ON")))
#~(list "-DBUILD_SHARED_LIBS=ON"
#$@(let ((target (%current-target-system)))
(if target
(cond ((string-prefix? "arm" target)
'("-DCMAKE_SYSTEM_PROCESSOR=arm"))
((string-prefix? "aarch64" target)
'("-DCMAKE_SYSTEM_PROCESSOR=aarch64"))
((string-prefix? "i686" target)
'("-DCMAKE_SYSTEM_PROCESSOR=x86"))
((string-prefix? "x86_64" target)
'("-DCMAKE_SYSTEM_PROCESSOR=x86_64"))
;; 32-bit and 64-bit
((string-prefix? "powerpc" target)
'("-DCMAKE_SYSTEM_PROCESSOR=powerpc"))
((string-prefix? "riscv64" target)
'("-DCMAKE_SYSTEM_PROCESSOR=riscv64"))
(else '()))
'())))))
(home-page "https://github.com/google/cpu_features")
(synopsis "Cross platform C99 library to get cpu features at runtime")
(description
+749 -759
View File
File diff suppressed because it is too large Load Diff
+17 -105
View File
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2015-2026 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2015-2025 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
;;; Copyright © 2015, 2025 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2015 Alex Kost <alezost@gmail.com>
@@ -60,8 +60,6 @@
;;; Copyright © 2025 Isidor Zeuner <guix@quidecco.pl>
;;; Copyright © 2025 Evgenii Klimov <eugene.dev@lipklim.org>
;;; Copyright © 2026 Luis Guilherme Coelho <lgcoelho@disroot.org>
;;; Copyright © 2026 Noé Lopez <noelopez@free.fr>
;;; Copyright © 2026 Carlos Durán Domínguez <wurt@wurt.eu>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -94,7 +92,6 @@
#:use-module (gnu packages cmake)
#:use-module (gnu packages compression)
#:use-module (gnu packages cpp)
#:use-module (gnu packages crypto)
#:use-module (gnu packages curl)
#:use-module (gnu packages dbm)
#:use-module (gnu packages documentation)
@@ -1209,7 +1206,7 @@ PulseAudio clients, featuring:
(define-public ardour
(package
(name "ardour")
(version "9.1")
(version "8.12")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -1226,7 +1223,7 @@ PulseAudio clients, featuring:
namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \"\"; }")))))
(sha256
(base32
"00bramm8dq0ihr376n7l9rg0mjzxmzw6lxvsbsdlrdsimfwsy16p"))
"1cbsgdzhvnjwqgxbjk7ydcqaq6m87qm463ccwlvz1h6wkm1h3270"))
(file-name (git-file-name name version))))
(build-system waf-build-system)
(arguments
@@ -1234,6 +1231,7 @@ namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \
#:configure-flags
'(list "--optimize"
"--no-phone-home" ;don't contact ardour.org
"--no-ytk" ;don't use bundled GTK2
"--freedesktop" ;build .desktop file
"--test" ;build unit tests
"--use-external-libs") ;use system libraries
@@ -1827,7 +1825,7 @@ plugins are provided.")
(string-append #$output "/share/applications/")))))))
(inputs
(list python
python-dbus-1.2
python-dbus
python-jack-client
python-pyqt-6
python-requests))
@@ -3286,7 +3284,7 @@ synchronous execution of all clients, and low latency operation.")
expat
libsamplerate
opus
python-dbus-1.2
python-dbus
readline))
(native-inputs
(list pkg-config))
@@ -3429,7 +3427,7 @@ from being able to mix multiple JACK audio streams.")
(define-public pipemixer
(package
(name "pipemixer")
(version "0.4.1")
(version "0.4.0")
(source
(origin
(method git-fetch)
@@ -3440,21 +3438,10 @@ from being able to mix multiple JACK audio streams.")
(sha256
(base32 "08ji4lg24flzi6g3yaavfq8hz3kr98q2ripk5m4qk9z172qxbbc9"))))
(build-system meson-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-pw-device
(lambda _
(substitute* "src/pw/device.c"
;; TODO: Report upstream:
;; ../source/src/pw/device.c:328:80: error: expected
;; ; before { token
(("iter\\) \\{") "iter); {")))))))
(native-inputs
(list pkg-config))
(inputs
(list libinih ncurses pipewire-minimal-1.4))
(list libinih ncurses pipewire-minimal))
(synopsis "TUI volume control app for pipewire.")
(description "This is a TUI volume control application for pipewire built with
ncurses. Heavily inspired by pulsemixer and pwvucontrol.")
@@ -3553,7 +3540,7 @@ together.")
(method url-fetch)
;; Since the official link is dead,
;; we download the tarball from Debian or Internet Archive.
(uri (list (string-append "http://deb.debian.org"
(uri (list (string-append "http://http.debian.net"
"/debian/pool/main/l/ladspa-sdk/ladspa-sdk_"
version ".orig.tar.gz")
(string-append "https://web.archive.org/web/20140717172251/"
@@ -4915,18 +4902,7 @@ general purpose DVD/HD-DVD/Blu-ray disc dumper.")
version
".tar.gz"))
(sha256 (base32
"074zj8ydp05yy1hjcglfv3hkvj4cm50f9nralka1992pm6yf8yvy"))
(snippet
#~(begin
(use-modules (ice-9 textual-ports))
(let* ((sndlibextra.c "src/sndlibextra.c")
(sndlibextra.c-original
(call-with-input-file sndlibextra.c
get-string-all)))
(call-with-output-file sndlibextra.c
(lambda (port)
(display "#include <stdlib.h>\n" port)
(display sndlibextra.c-original port))))))))
"074zj8ydp05yy1hjcglfv3hkvj4cm50f9nralka1992pm6yf8yvy"))))
(build-system gnu-build-system)
(native-inputs
(list autoconf automake pkg-config libtool))
@@ -6202,56 +6178,6 @@ Python projects to scan and/or tag audio files.")
;; 'setup.py' claims LGPL2+, 'LICENSE' is LGPLv2.1.
(license license:lgpl2.1+)))
(define-public rsgain
(package
(name "rsgain")
(version "3.6")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/complexlogic/rsgain.git")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1bnpmm3bxij0l54i39vr70q3l1gdaac3l4vdv76pcdk9nlydmavn"))
(modules '((guix build utils)))
(snippet
;; Remove bundled dependencies.
#~(delete-file-recursively "src/external"))))
(build-system cmake-build-system)
(arguments
(list
#:tests? #f ;no tests
#:configure-flags
#~(list "-DINSTALL_MANPAGE=ON")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'link-unbundled-libraries
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "CMakeLists.txt"
(("find_package(PkgConfig MODULE REQUIRED)" all)
(string-append all "\nfind_package (CRCpp REQUIRED)")))
(substitute* "src/tag.cpp"
(("external/CRC.h")
"CRC.h")))))))
(native-inputs (list pkg-config gzip))
(inputs
(list crcpp
ffmpeg
fmt
libebur128
libinih
taglib
zlib))
(home-page "https://github.com/complexlogic/rsgain")
(synopsis "ReplayGain 2.0 tagging utility")
(description "This package provides @acronym{rsgain, really simple gain}, a
ReplayGain 2.0 command line utility. rsgain applies loudness metadata tags to
files, while leaving the audio stream untouched. A ReplayGain-compatible player
will dynamically adjust the volume of tagged files during playback.")
(license license:bsd-2)))
(define-public filteraudio
(let ((revision "1")
(commit "2fc669581e2a0ff87fba8de85861b49133306094"))
@@ -6868,7 +6794,7 @@ bluetooth profile.")
(define-public libopenshot-audio
(package
(name "libopenshot-audio")
(version "0.5.0")
(version "0.4.0")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -6877,7 +6803,7 @@ bluetooth profile.")
(file-name (git-file-name name version))
(sha256
(base32
"16nn5bnl27s4hr7vmhmjvh6i6abz6484hwypib49j4vadgdayyhn"))))
"0m6a0g6y464ypcza1wfaik77x26lfdmkb5k735f7v8463r7qhd0m"))))
(build-system cmake-build-system)
(inputs
(list alsa-lib
@@ -7282,7 +7208,7 @@ default and preferred audio driver but also supports native drivers like ALSA.")
;; yabridge-host-32.exe and yabridge-host-32.exe.so. On
;; 64bit system do not enable it since gcc does not
;; support multilib.
(if #$(target-32bit?) "-Dbitbridge=true" '()))
(if (not #$(target-64bit?)) "-Dbitbridge=true" '()))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'copy-vst3sdk
@@ -7662,20 +7588,6 @@ digital radio.")
(home-page "https://www.rowetel.com/?page_id=452")
(license license:lgpl2.1)))
(define-public codec2-1
(package
(inherit codec2)
(version "1.2.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/drowe67/codec2")
(commit version)))
(file-name (git-file-name "codec2" version))
(sha256
(base32 "00rx0p8b01ycb6lgp859cp1x165zf65qpnm72ry5z0fcipi2klzb"))))))
(define-public mbelib
;; No release since 2016, use commit directly.
(let ((commit "9a04ed5c78176a9965f3d43f7aa1b1f5330e771f")
@@ -7687,8 +7599,8 @@ digital radio.")
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/szechyjs/mbelib")
(commit commit)))
(url "https://github.com/szechyjs/mbelib")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0a7xmf87xnjzm5b437j2vnwv39x0ascja1j04c5wj6xs1529gw8h"))))
@@ -8119,7 +8031,7 @@ and DSD streams.")
(define-public qpwgraph
(package
(name "qpwgraph")
(version "0.9.9")
(version "0.9.8")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -8128,7 +8040,7 @@ and DSD streams.")
(file-name (git-file-name name version))
(sha256
(base32
"03001pvcbvr206k00751232gm50x1icf086z8c5hiakl2ym79gwl"))))
"1d45qzjiixjmzjpaa04qvnz69bpf6dhlcq56zrgps507rr413fbx"))))
(build-system cmake-build-system)
(arguments
(list #:tests? #f)) ; no tests
+4 -5
View File
@@ -44,7 +44,7 @@
(define-public libcotp
(package
(name "libcotp")
(version "4.0.0")
(version "3.1.0")
(source
(origin
(method git-fetch)
@@ -53,7 +53,7 @@
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0p5z04klbb3p9ljkz6qmdb4fk9sx79yv7zcac005c0zk875pz1py"))))
(base32 "1lw15blzzds3qq4ydhi6fsk189p1rbvzy5fzz4r3fv6wlmcyyprs"))))
(build-system cmake-build-system)
(arguments `(#:tests? #f))
;; TODO: tests:
@@ -143,6 +143,7 @@ PSKC (RFC6030) to manage secret key data.")
(build-system go-build-system)
(arguments
(list
#:go go-1.23
#:install-source? #f
#:import-path "github.com/google/oauth2l"
#:test-flags
@@ -160,9 +161,7 @@ PSKC (RFC6030) to manage secret key data.")
"TestServiceAccountImpersonationFlow/fetch._sso.*"
"TestStsFlow/fetch._2lo._sts"
"TestStsFlow/fetch._sso._sts")
"|")
;; go 1.24 runs -vet by default, but oauth2l isn't ready
"-vet=off")
"|"))
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'pre-check
+12 -16
View File
@@ -38,29 +38,25 @@ Historically, this used to be the package name followed by \"-autoloads.el\".
As of Emacs 29, the term \"loaddefs\" is preferred over \"autoloads\",
but they function much in the same manner.")
(defun guix-emacs-find-autoloads (directory)
"Return a list of files containing autoload definitions in DIRECTORY.
The files in the list do not have extensions (.el, .elc)."
;; `directory-files' doesn't honor group in regexp.
(delete-dups (mapcar #'file-name-sans-extension
(directory-files directory 'full-name
guix-emacs-autoloads-regexp))))
(defcustom guix-emacs-verbose nil
"Set to true to provide verbose messages, such as when loading packages."
:type 'boolean
:group 'guix-emacs)
(defun guix-emacs-find-autoloads (directory)
"Return a list of files containing autoload definitions in DIRECTORY.
The files in the list do not have extensions (.el, .elc)."
;; `directory-files' doesn't honor group in regexp.
(if (file-directory-p directory)
(delete-dups (mapcar #'file-name-sans-extension
(directory-files directory 'full-name
guix-emacs-autoloads-regexp)))
(when guix-emacs-verbose
(message "Ignoring nonexistent load-path directory: %s" directory)
nil)))
(defun guix-emacs--load-file-no-error (file)
"Load FILE, ignoring any errors."
"Load FILE, ignoring any errors"
(load file 'noerror (not guix-emacs-verbose)))
(defsubst guix-emacs--non-core-load-path ()
"Filter out core Elisp directories, which are already handled by Emacs."
(defun guix-emacs--non-core-load-path ()
;; Filter out core Elisp directories, which are already handled by Emacs.
(seq-filter (lambda (dir)
(string-match-p "/share/emacs/site-lisp" dir))
load-path))
@@ -111,7 +107,7 @@ found in `load-path' to discover newly installed packages."
;; If emacs built with tree-sitter, read the value of the environment variable
;; to make tree-sitter grammars available in emacs out-of-the-box.
(with-eval-after-load 'treesit
(when-let* ((grammar-path (getenv "TREE_SITTER_GRAMMAR_PATH")))
(when-let ((grammar-path (getenv "TREE_SITTER_GRAMMAR_PATH")))
(mapcar (lambda (x) (add-to-list 'treesit-extra-load-path x))
(split-string grammar-path ":"))))
File diff suppressed because it is too large Load Diff
File diff suppressed because it is too large Load Diff
File diff suppressed because it is too large Load Diff
File diff suppressed because it is too large Load Diff
File diff suppressed because it is too large Load Diff
-4
View File
@@ -26,7 +26,6 @@
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module (guix download)
#:use-module (guix utils)
#:use-module (guix build-system gnu)
#:use-module (gnu packages)
#:use-module (gnu packages bash)
@@ -81,9 +80,6 @@
(package-supported-systems
libcap))))
'("--disable-autoipd")
'())
,@(if (target-hurd?)
'("CFLAGS=-g -O2 -Wno-error=incompatible-pointer-types")
'()))
#:modules ((srfi srfi-26)
(guix build utils)
+19 -20
View File
@@ -103,7 +103,7 @@
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt)
#:use-module (gnu packages rsync)
#:use-module (gnu packages ruby-xyz)
#:use-module (gnu packages ruby-check)
#:use-module (gnu packages serialization)
#:use-module (gnu packages ssh)
#:use-module (gnu packages time)
@@ -1190,7 +1190,7 @@ additional snapshots).")
(define-public burp
(package
(name "burp")
(version "3.2.0")
(version "2.3.38")
(source
(origin
(method git-fetch)
@@ -1198,23 +1198,21 @@ additional snapshots).")
(url "https://github.com/grke/burp")
(commit version)))
(sha256
(base32 "0wxn59h6685swmr410l08k8baxsc0f2r6djixxddcbyxmlgap54d"))
(base32 "0m0s6rrgxn3l6bad45vyhks6iz6bwvd0f3rzdsc7l28gar79wsj6"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'extend-test-time-outs
;; The defaults are far too low for busy boxes & spinning storage.
(lambda _
(substitute* (find-files "utest" "\\.c$")
(("(tcase_set_timeout\\(tc_core,)[ 0-9]*(\\);.*)$" _ prefix suffix)
(string-append prefix " 3600" suffix "\n"))))))))
`(#:phases
(modify-phases %standard-phases
(add-before 'check 'extend-test-time-outs
;; The defaults are far too low for busy boxes & spinning storage.
(lambda _
(substitute* (find-files "utest" "\\.c$")
(("(tcase_set_timeout\\(tc_core,)[ 0-9]*(\\);.*)$" _ prefix suffix)
(string-append prefix " 3600" suffix "\n")))
#t)))))
(inputs
(list acl
libxcrypt ; it is needed to pass utest/server/test_auth.c:53 and
; utest/builders/build_asfd_mock.c:54
librsync
ncurses ; for the live status monitor
openssl
@@ -1267,7 +1265,7 @@ compression parameters used by Gzip.")
(define-public borgmatic
(package
(name "borgmatic")
(version "2.1.2")
(version "2.0.13")
(source
(origin
;; PyPI archive does not contain NEWS file needed for one test.
@@ -1278,7 +1276,7 @@ compression parameters used by Gzip.")
(file-name (git-file-name name version))
(sha256
(base32
"0vrpl21n6hf3pj0di4n7s36jq64sx24c93j48cmbdgczs8jiwi36"))))
"05w3j4knhsg4w0a0yrz8c7lvz3vp3nf95ddmql9i8mqknjqddm1v"))))
(build-system pyproject-build-system)
(arguments
(list
@@ -1327,7 +1325,7 @@ borgmatic is powered by borg.")
(define-public vorta
(package
(name "vorta")
(version "0.11.3")
(version "0.11.1")
;; The test folder is not included in the PyPI archive.
(source (origin
(method git-fetch)
@@ -1337,7 +1335,7 @@ borgmatic is powered by borg.")
(file-name (git-file-name name version))
(sha256
(base32
"0505id65lbbqj42lp4cvbw1q6v9qjhsnldr72ssv1kyir672j2pr"))))
"16r9ch80i6nfngah634id16fqnmn62ayh60j62zxn5cfivcn3wsq"))))
(build-system pyproject-build-system)
(arguments
(list
@@ -1362,7 +1360,7 @@ borgmatic is powered by borg.")
(string-append "which('" #$(this-package-input "borg")
"/bin/borg')")))))
;; XXX The test suite tries to write to $HOME.
(add-before 'sanity-check 'set-HOME
(add-before 'check 'set-HOME
(lambda _
(setenv "HOME" "/tmp")))
;; Otherwise, the user interface's icons will be missing.
@@ -1374,7 +1372,8 @@ borgmatic is powered by borg.")
python-pytest-qt
python-pytest-runner
python-setuptools
python-setuptools-git))
python-setuptools-git
python-wheel))
(inputs
(list borg
python-appdirs
+22 -21
View File
@@ -21,7 +21,7 @@
;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2021, 2024 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2022 zamfofex <zamfofex@twdb.moe>
;;; Copyright © 2022, 2026 John Kehayias <john@guixotic.coop>
;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2023 Josselin Poiret <dev@jpoiret.xyz>
;;; Copyright © 2024, 2025 Zheng Junjie <z572@z572.online>
;;;
@@ -273,7 +273,7 @@ implementation offers several extensions over the standard utility.")
;; https://lists.gnu.org/archive/html/bug-tar/2021-10/msg00007.html
;; tar-1.34 isn't aware of 64-bit time_t and upstream suggests
;; skipping the test for this release on 32-bit systems.
((target-32bit?)
((not (target-64bit?))
'(#:make-flags (list "TESTSUITEFLAGS= -k '!tricky time stamps'")))
(else '()))
;; XXX: 32-bit Hurd platforms don't support 64bit time_t
@@ -398,7 +398,15 @@ differences.")
(lambda _
(substitute* "tests/large-subopt"
(("^#!.*" all)
(string-append all "exit 77;\n"))))))
(string-append all "exit 77;\n")))
#$@(if (system-hurd64?)
#~((substitute*
;; These tests hang.
'("gnulib-tests/test-c-stack.sh"
"gnulib-tests/test-c-stack2.sh")
(("^#!.*" all)
(string-append all "exit 77;\n"))))
#~()))))
#~%standard-phases)))
(native-inputs (list perl))
(synopsis "Comparing and merging files")
@@ -557,9 +565,18 @@ used to apply commands with arbitrarily long arguments.")
,@(if (system-hurd64?)
'((substitute*
;; These tests fail
'("tests/misc/sort-NaN-infloop.sh")
'("tests/misc/sort-NaN-infloop.sh"
"tests/misc/wc-parallel.sh")
(("^#!.*" all)
(string-append all "exit 77;\n"))))
(string-append all "exit 77;\n")))
(substitute* '("gnulib-tests/test-fdutimensat.c"
"gnulib-tests/test-futimens.c"
"gnulib-tests/test-linkat.c"
"gnulib-tests/test-renameat.c"
"gnulib-tests/test-renameatu.c"
"gnulib-tests/test-utimensat.c")
(("(^| )main *\\(.*" all)
(string-append all "{\n exit (77);//"))))
'())
;; These tests can fail on btrfs.
(substitute* "tests/cp/reflink-auto.sh"
@@ -940,7 +957,6 @@ the store.")
(properties `((lint-hidden-cve . ("CVE-2024-2961"
"CVE-2024-33601" "CVE-2024-33602"
"CVE-2024-33600" "CVE-2024-33599"))))
(replacement glibc/fixed)
(build-system gnu-build-system)
;; Glibc's <limits.h> refers to <linux/limit.h>, for instance, so glibc
@@ -1218,17 +1234,6 @@ with the Linux kernel.")
(license lgpl2.0+)
(home-page "https://www.gnu.org/software/libc/")))
(define glibc/fixed
(package
(inherit glibc)
(name "glibc")
(source (origin
(inherit (package-source glibc))
;; XXX: When ungrafting, add the included patch to
;; %glibc-patches.
(patches (cons (search-patch "glibc-guix-locpath.patch")
(origin-patches (package-source glibc))))))))
;; Define a variation of glibc which uses the default /etc/ld.so.cache, useful
;; in FHS containers.
(define-public glibc-for-fhs
@@ -1428,10 +1433,6 @@ to the @code{share/locale} sub-directory of this package.")
"/" name "."
normalized)))))
locales))))
#$@(if (target-hurd?)
#~((delete 'augment-libc.so)
(delete 'create-machine-symlink))
#~())
(delete 'install)
(delete 'install-utf8-c-locale)
(delete 'move-static-libs)))
+39 -41
View File
@@ -48,7 +48,6 @@
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
#:use-module (gnu packages c)
#:use-module (gnu packages cmake)
#:use-module (gnu packages gcc)
#:use-module (gnu packages nss)
#:use-module (gnu packages check)
@@ -77,7 +76,6 @@
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt)
#:use-module (gnu packages vulkan)
#:use-module (gnu packages xdisorg)
#:use-module (gnu packages xorg)
#:use-module (gnu packages xml)
#:use-module (ice-9 match))
@@ -864,47 +862,47 @@ user-provided Lua scripts.
(license license:gpl2+)))
(define-public vkmark
(package
(name "vkmark")
(version "2025.01")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/vkmark/vkmark")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0mpxyfwln1627zzi11fb6lgv7x1jz1p2w16w1mhhkdz1xsln6fj6"))))
(build-system meson-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'unbundle-vulkan-headers
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/meson.build"
(("vulkan_dep.get_pkgconfig_variable\\('prefix'\\)")
(string-append "'" #$(this-package-input "vulkan-headers") "'"))))))))
(native-inputs (list pkg-config))
(inputs (list vulkan-loader
vulkan-headers
cmake
glm
assimp
libxcb
libdrm
mesa
xcb-util-wm
wayland-protocols
wayland))
(home-page "https://github.com/vkmark/vkmark")
(synopsis "Extensible benchmarking suite for Vulkan")
(description
"vkmark offers a suite of scenes that can be used to measure various
;; The only ever release is tagged "2017.08" and as its name suggests
;; it was back in the august of 2017. That version no longer compiles
;; due to changes in APIs of its libraries.
;; Latest commit on the other hand seems to be fully working on xcb
;; and wayland backends.
(let ((commit "30d2cd37f0566589d90914501fc7c51a4e51f559")
(revision "0"))
(package
(name "vkmark")
(version (git-version "2017.08" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/vkmark/vkmark")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"0w0n080sb67s7dbxqi71h0vhm6dccs78rqjnxx9x524jp4jh9b7x"))))
(build-system meson-build-system)
(native-inputs (list pkg-config))
;; The kms backend currently will not compile because of upstream issues.
;; So I omitted this backend's dependiencies. A fix has been proposed
;; on another branch, but it has not been merged yet.
;; See https://github.com/vkmark/vkmark/issues/33
(inputs
(list vulkan-loader
vulkan-headers
glm
assimp
libxcb
xcb-util-wm
wayland-protocols
wayland))
(home-page "https://github.com/vkmark/vkmark")
(synopsis "Extensible benchmarking suite for Vulkan")
(description
"vkmark offers a suite of scenes that can be used to measure various
aspects of Vulkan performance. The way in which each scene is rendered is
configurable through a set of options.")
(license license:lgpl2.1+)))
(license license:lgpl2.1+))))
(define-public osu-micro-benchmarks
(package
+83 -245
View File
@@ -63,7 +63,6 @@
#:use-module (gnu packages ncurses)
#:use-module (gnu packages netpbm)
#:use-module (gnu packages python)
#:use-module (gnu packages python-science)
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages protobuf)
@@ -1301,7 +1300,7 @@ data.")
(define-public r-illuminahumanmethylationepicv2anno-20a1-hg38
(package
(name "r-illuminahumanmethylationepicv2anno-20a1-hg38")
(version "1.0.1")
(version "1.0.0")
(source
(origin
(method url-fetch)
@@ -1309,7 +1308,7 @@ data.")
version
'annotation))
(sha256
(base32 "18y92h02dh3pcc27dn1m9jr4m6srwv7w25a4wg3c6jlrggnm5210"))))
(base32 "0vp4m3a7qal4d8qc9xaj7z3x484i33ix4c67qlbw0kskdir7rq5a"))))
(properties `((upstream-name . "IlluminaHumanMethylationEPICv2anno.20a1.hg38")))
(build-system r-build-system)
(propagated-inputs (list r-minfi))
@@ -1852,14 +1851,14 @@ annotations.")
(define-public r-illuminahumanmethylationepicv2manifest
(package
(name "r-illuminahumanmethylationepicv2manifest")
(version "1.0.1")
(version "1.0.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "IlluminaHumanMethylationEPICv2manifest"
version 'annotation))
(sha256
(base32 "0dwynwhjf3dnbw6975fxvncrqk5si22vrcyf6wivvgak1zim9bjl"))))
(base32 "1z4b15x8cai27cqhl2lhl02nx0lv8q5c1774vdvvdajx2hivn77l"))))
(properties `((upstream-name . "IlluminaHumanMethylationEPICv2manifest")))
(build-system r-build-system)
(propagated-inputs (list r-minfi))
@@ -3365,35 +3364,6 @@ is Illumina hiseq Level 3 RSEM normalized expression data from 2015-11-01
snapshot.")
(license license:gpl2)))
(define-public r-scpdata
(package
(name "r-scpdata")
(version "1.18.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "scpdata" version
'experiment))
(sha256
(base32 "049qrzjj26s41q0nl3q85bz91lwpd5j3i1c4gxwbavm0izhhk3ym"))))
(properties `((upstream-name . "scpdata")))
(build-system r-build-system)
(arguments
;; Tests require internet access via r-experimenthub
(list #:tests? #f))
(propagated-inputs (list r-annotationhub r-experimenthub r-qfeatures
r-s4vectors r-singlecellexperiment))
(native-inputs (list r-knitr r-testthat))
(home-page "https://bioconductor.org/packages/scpdata")
(synopsis "Single-cell proteomics data package")
(description
"The package disseminates mass spectrometry (MS)-based single-cell proteomics
(SCP) datasets. The data were collected from published work and formatted
using the `scp` data structure. The data sets contain quantitative
information at spectrum, peptide and/or protein level for single cells or
minute sample amounts.")
(license license:gpl2)))
(define-public r-sesamedata
(package
(name "r-sesamedata")
@@ -3436,14 +3406,14 @@ the @code{HorvathMethylChip40} (Mammal40) array.")
(define-public r-systempiperdata
(package
(name "r-systempiperdata")
(version "2.14.5")
(version "2.14.2")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "systemPipeRdata" version
'experiment))
(sha256
(base32 "1yrq1vyc0pmp3iv621cvdsavlarcca3z4bbxfzbg0ny3fyqp67pb"))))
(base32 "0qqkdrqvr0wic1hwrmhd6024w83gs66pdp0mc876qc68mv26nzwb"))))
(properties `((upstream-name . "systemPipeRdata")))
(build-system r-build-system)
(propagated-inputs (list r-biocgenerics r-biostrings r-jsonlite r-remotes))
@@ -4539,13 +4509,13 @@ these biases and construct statistically consistent estimators.")
(define-public r-animalcules
(package
(name "r-animalcules")
(version "1.26.1")
(version "1.26.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "animalcules" version))
(sha256
(base32
"15hy5b74bsyp8w7cpdfj2qi2syjlkbwm47nbxnm19g28cwqj0w3j"))))
"1a614al4vh6fzmzw8v8r1hn0fpmazrqfzspvmwg8injg36ab1i9x"))))
(properties
'((upstream-name . "animalcules")
(updater-extra-native-inputs . ("r-glmnet"))))
@@ -4608,54 +4578,6 @@ Powerful interactive and dynamic figures generated by animalcules enable users
to understand their data better and discover new insights.")
(license license:artistic2.0)))
(define-public r-anndatar
(package
(name "r-anndatar")
(version "1.0.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "anndataR" version))
(sha256
(base32 "1vi9aqgdjy0nlbsk7628sz12jsxd9bfb79yxhh0ngijpxj9sxd4p"))))
(properties `((upstream-name . "anndataR")))
(build-system r-build-system)
(arguments
(list
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'find-python
(lambda _
(setenv "RETICULATE_PYTHON" (which "python3")))))))
(propagated-inputs (list r-cli
r-lifecycle
r-matrix
r-purrr
r-r6
r-reticulate
r-rlang))
(inputs (list python-wrapper
python-anndata))
(native-inputs (list r-knitr
r-processx
r-rhdf5
r-s4vectors
r-seurat
r-seuratobject
r-singlecellexperiment
r-spelling
r-testthat
r-withr))
(home-page "https://anndatar.data-intuitive.com")
(synopsis "AnnData interoperability in R")
(description
"This package aims to bring the power and flexibility of @code{AnnData}
to the R ecosystem, allowing you to effortlessly manipulate and analyze your
single-cell data. This package lets you work with backed h5ad and zarr files,
directly access various slots (e.g. X, obs, var), or convert the data into
@code{SingleCellExperiment} and Seurat objects.")
(license license:expat)))
(define-public r-annotationhubdata
(package
(name "r-annotationhubdata")
@@ -4717,13 +4639,13 @@ for use in Bioconductors AnnotationHub.")
(define-public r-anvil
(package
(name "r-anvil")
(version "1.22.5")
(version "1.22.3")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "AnVIL" version))
(sha256
(base32
"07fsyifchcwic2vax6bgz401is7c24y88pjambs5k9r4rfy0snh6"))))
"0na8m3d2svrcblz8xzwb560sar39anx1bp0i787rw9sk23f2kwrc"))))
(properties `((upstream-name . "AnVIL")))
(build-system r-build-system)
;; Tests require Internet access.
@@ -5903,13 +5825,13 @@ Various visual and textual types of output are available.")
(define-public r-bambu
(package
(name "r-bambu")
(version "3.12.1")
(version "3.12.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "bambu" version))
(sha256
(base32
"0wwsak3f5mz80arphw8n50f3523rf0nx8ih6brg8balhsxqfjhvh"))))
"0bdwild1lxnizkwlcscl9vjnhqiri79p8vwkgw5a2lxkfj1gz1p8"))))
(properties `((upstream-name . "bambu")))
(build-system r-build-system)
;; Tests require Internet access.
@@ -8058,13 +7980,13 @@ mapping.")
(define-public r-nebulosa
(package
(name "r-nebulosa")
(version "1.20.1")
(version "1.20.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "Nebulosa" version))
(sha256
(base32
"0f4pmz583w0nywnnlnqs0jdvmz84876jcy1dcjar0d0x6w2x1ara"))))
"0xb2xj3rj2hqaz1hhsijk83n3qvwp646gj3nx6y8s6k6kda3mwvr"))))
(properties
'((upstream-name . "Nebulosa")
(updater-extra-native-inputs . ("r-seurat"))))
@@ -8673,13 +8595,13 @@ on Bioconductor or which replace R functions.")
(define-public r-biomart
(package
(name "r-biomart")
(version "2.66.1")
(version "2.66.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "biomaRt" version))
(sha256
(base32
"1cmzay4z9s183dc001rxfa81ql67la9y8m0p0wsn2iwzxzx94n8g"))))
"0xvwn4s7lxd2g98x6bng4w2vvxp26s57wzq2pij4f117xscad42f"))))
(properties
`((upstream-name . "biomaRt")))
(build-system r-build-system)
@@ -9134,14 +9056,14 @@ experiments.")
(define-public r-complexheatmap
(package
(name "r-complexheatmap")
(version "2.26.1")
(version "2.26.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "ComplexHeatmap" version))
(sha256
(base32
"1nhpifm5jq0ibh6s5vvjrym42rfk7cfjrnaks8xdrg5vr635xrww"))))
"1ibphh0x0drr0hm0pk96hs8mgxp5fy6ixs8ak4imyawqdjha3s68"))))
(properties
`((upstream-name . "ComplexHeatmap")))
(build-system r-build-system)
@@ -9616,13 +9538,13 @@ parameter configurations.")
(define-public r-enmix
(package
(name "r-enmix")
(version "1.46.1")
(version "1.46.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "ENmix" version))
(sha256
(base32
"1kkf387na8ldm7vqvv49cvz57yh4yi88mxcn3606xmdqxq69i78k"))))
"1zv7b8yfzn3mazfg2hyc20xpi8ayd0xwxz5wnd4ywjmnfagwqjwb"))))
(properties
'((upstream-name . "ENmix")
(updater-extra-native-inputs . ("r-minfidata"))))
@@ -10337,13 +10259,13 @@ Enrichment Analysis} (GSEA).")
(define-public r-gsva
(package
(name "r-gsva")
(version "2.4.6")
(version "2.4.4")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "GSVA" version))
(sha256
(base32
"08i2s5zlm75mr7zl357cic2zxcy7aqqfv67xb0w67n48cw016ri6"))))
"1rvzy8rx3pxy4slmmbrzydgwv3w6pjfvgz8xnwkm7zl18ik1y3h6"))))
(properties `((upstream-name . "GSVA")))
(build-system r-build-system)
(propagated-inputs (list r-biobase
@@ -11765,14 +11687,14 @@ platform that mimics both single and multi-sample scRNA-seq data.")
(define-public r-mutationalpatterns
(package
(name "r-mutationalpatterns")
(version "3.20.1")
(version "3.19.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "MutationalPatterns" version))
(sha256
(base32
"0g6r9lvbfr3q913hjs6kympzj8bg6sanqzl42qh0q0xipyvx8m31"))))
"1y7yxricvivg3ds3jacwf5qb366xvzw8sff9wddigz8p5kyzs7f6"))))
(properties
'((updater-extra-native-inputs . ("r-ccfindr"))))
(build-system r-build-system)
@@ -11897,35 +11819,6 @@ package thus provides an alternative MS data representation for very large or
remote MS data sets.")
(license license:artistic2.0)))
(define-public r-msdatahub
(package
(name "r-msdatahub")
(version "1.10.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "MsDataHub" version))
(sha256
(base32 "09rfj583b1vz3p328pnlrzj7mxg6804ia1q84p9y5pvzcb0z17fv"))))
(properties `((upstream-name . "MsDataHub")))
(build-system r-build-system)
(arguments
(list
#:phases '(modify-phases %standard-phases
(add-after 'unpack 'set-HOME
(lambda _
(setenv "HOME" "/tmp"))))))
(propagated-inputs (list r-experimenthub))
(native-inputs (list r-knitr r-testthat))
(home-page "https://rformassspectrometry.github.io/MsDataHub")
(synopsis "Mass spectrometry data on ExperimentHub")
(description
"The @code{MsDataHub} package uses the @code{ExperimentHub}
infrastructure to distribute raw mass spectrometry data files, peptide
spectrum matches or quantitative data from proteomics and metabolomics
experiments.")
(license license:artistic2.0)))
(define-public r-msexperiment
(package
(name "r-msexperiment")
@@ -12068,14 +11961,14 @@ of mass spectrometry based proteomics data.")
(define-public r-msnid
(package
(name "r-msnid")
(version "1.44.2")
(version "1.44.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "MSnID" version))
(sha256
(base32
"1f7l11sgfrpcwzzlxa4g4vl34z5fmjx3lpwnaawi5nddc1li2ads"))))
"1spb72pc7idn597sb8qywynf6sg306p8vbdbd0gcib1q1vinzqy0"))))
(properties `((upstream-name . "MSnID")))
(build-system r-build-system)
(arguments
@@ -12227,13 +12120,13 @@ previously been used in XCMS.")
(define-public r-numbat
(package
(name "r-numbat")
(version "1.5.2")
(version "1.5.1")
(source (origin
(method url-fetch)
(uri (cran-uri "numbat" version))
(sha256
(base32
"0j6p15n0zmm4d8ml4j6ydcd8x3b8gba53hpxjm1qv05blr29b65y"))))
"1p93jd009y0pymh08s8903pldh7c142icz7jvjbmmn5ayg9ayz39"))))
(properties `((upstream-name . "numbat")))
(build-system r-build-system)
(propagated-inputs (list r-ape
@@ -12255,6 +12148,7 @@ previously been used in XCMS.")
r-optparse
r-paralleldist
r-patchwork
r-pryr
r-purrr
r-r-utils
r-rcpp
@@ -13495,13 +13389,13 @@ transcripts in groups of interest.")
(define-public r-scannotatr
(package
(name "r-scannotatr")
(version "1.16.1")
(version "1.16.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "scAnnotatR" version))
(sha256
(base32 "08bpyzi43qbkmgqxp1aqi4fv7859gqpgj0bg39ycf5zlp7gpkjh5"))))
(base32 "1r9c033066rdrcnh0d540ln8axsmzpqjb35gxasmrfbd5zgl2m6h"))))
(properties `((upstream-name . "scAnnotatR")))
(build-system r-build-system)
;; 6 tests require connecting to a database over the Internet.
@@ -13534,13 +13428,13 @@ cell types based on specific research needs.")
(define-public r-scdblfinder
(package
(name "r-scdblfinder")
(version "1.24.10")
(version "1.24.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "scDblFinder" version))
(sha256
(base32 "0ngjgpjl2kky4j9ic4h6s4daaswhy59hq64d7s7yrws6m80k667j"))))
(base32 "0l9zhcx4a3wdzldlsg4blq3jh259pwd0h9qbhwwcz94jlp9v9wjq"))))
(properties `((upstream-name . "scDblFinder")))
(build-system r-build-system)
(propagated-inputs
@@ -13624,13 +13518,13 @@ with respect to the cell population of interest.")
(define-public r-scistreer
(package
(name "r-scistreer")
(version "1.2.1")
(version "1.2.0")
(source (origin
(method url-fetch)
(uri (cran-uri "scistreer" version))
(sha256
(base32
"0v8pwz0skkan9gbpr9jffkkz0y22gm063mcw516c43xy3bgrxmgk"))))
"03nd4p7ik66v09yv18c0z1bvdnkr5m0axk78yapd2ri80ihmyi3c"))))
(properties `((upstream-name . "scistreer")))
(build-system r-build-system)
(propagated-inputs (list r-ape
@@ -13700,54 +13594,6 @@ a scRNA-seq experiment onto the cell-types or individual cells identified in a
different experiment.")
(license license:gpl3)))
(define-public r-scp
(package
(name "r-scp")
(version "1.20.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "scp" version))
(sha256
(base32 "0ah2zy4mi5h1ihrv02s6z5q814rbyx37zcgj11iy5ss5j9zqhli4"))))
(properties
'((upstream-name . "scp")
(updater-extra-native-inputs . ("r-preprocesscore" "r-vsn"))))
(build-system r-build-system)
(arguments
(list
#:skipped-tests
;; These tests require Internet access via r-experimenthub
'(("test-readSCP.R"
"readSCPfromDIANN"
"readSCPfromDIANN with sce"))))
(propagated-inputs (list r-ggplot2
r-ggrepel
r-ihw
r-matrixstats
r-metapod
r-mscoreutils
r-multiassayexperiment
r-nipals
r-qfeatures
r-rcolorbrewer
r-s4vectors
r-singlecellexperiment
r-summarizedexperiment))
(native-inputs (list r-biocgenerics r-knitr r-msdatahub r-preprocesscore
r-testthat r-vdiffr r-vsn))
(home-page "https://UCLouvain-CBIO.github.io/scp")
(synopsis "Mass Spectrometry-based Single-Cell Proteomics data analysis")
(description
"This package provides utility functions for manipulating, processing,
and analyzing mass spectrometry-based single-cell proteomics data. The
package is an extension to the @code{QFeatures} package and relies on
@code{SingleCellExpirement} to enable single-cell proteomics analyses. The
package offers the user the functionality to process quantitative table (as
generated by MaxQuant, Proteome Discoverer, and more) into data tables ready
for downstream analysis and data visualization.")
(license license:artistic2.0)))
(define-public r-screpertoire
(package
(name "r-screpertoire")
@@ -13902,13 +13748,13 @@ single-cell RNA-seq.")
(define-public r-seqarray
(package
(name "r-seqarray")
(version "1.50.1")
(version "1.50.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "SeqArray" version))
(sha256
(base32
"1bswiypvzpp5l45ljycvh4ww0ig9kv18i3xvw8wr6v2sm8rc9ris"))))
"0p749sf2smc8j59qs5k3vkxlf5h2zws8q40vrnhv1svl1j1gc17d"))))
(properties
'((upstream-name . "SeqArray")
(updater-extra-native-inputs . ("r-digest"))))
@@ -14183,13 +14029,13 @@ less than 2bp on both sides of indel region.")
(define-public r-simona
(package
(name "r-simona")
(version "1.8.1")
(version "1.8.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "simona" version))
(sha256
(base32 "17lrkd9v4j3w30ra8fxv9p0wkmlmyb31mh7gp1wr0z2cbrfd3wjl"))))
(base32 "0fv5qqlchbij486w2j7r2yndj2c497f4id0skq3r8pp735lgc84j"))))
(properties
`((upstream-name . "simona")
(updater-extra-native-inputs
@@ -14221,14 +14067,14 @@ methods for semantic similarity analysis.")
(define-public r-simplifyenrichment
(package
(name "r-simplifyenrichment")
(version "2.4.1")
(version "2.4.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "simplifyEnrichment" version))
(sha256
(base32
"0303y172gzq3xvqm6g74ppsd6bk3h735wcvlpm7xx4pqbkrmlix2"))))
"1vz0pjn8j3ia6gcwdlr1c8cxvdbhf6rscag1r7h43gj3fxmsi9m0"))))
(properties
`((upstream-name . "simplifyEnrichment")))
(build-system r-build-system)
@@ -14636,13 +14482,13 @@ additional column data sets.")
(define-public r-scds
(package
(name "r-scds")
(version "1.26.1")
(version "1.26.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "scds" version))
(sha256
(base32
"1adfq2nlvh0p6as5kkxsk9z561x1zcl4i75zlkh3isfv2q0rf92f"))))
"1j0z0w8cw80mr9nll9lj6x8573cyi1hk0wlz5f1bm66c2pf4q547"))))
(properties `((upstream-name . "scds")))
(build-system r-build-system)
(propagated-inputs (list r-dplyr
@@ -14961,13 +14807,13 @@ samples.")
(define-public r-survcomp
(package
(name "r-survcomp")
(version "1.60.1")
(version "1.60.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "survcomp" version))
(sha256
(base32
"0in0wlhjkqfc18rp6r73q4672ks7xzdjmkc6fcjl998rcn4n70dz"))))
"0fhi7kjcd26shx0qh1j8akcbiwyaxb5b7jzk1hyzmdqf4ffs98kw"))))
(properties `((upstream-name . "survcomp")))
(build-system r-build-system)
(propagated-inputs (list r-bootstrap
@@ -14978,7 +14824,6 @@ samples.")
r-suppdists
r-survival
r-survivalroc))
(native-inputs (list r-biobase r-biocmanager r-xtable))
(home-page "https://www.pmgenomics.ca/bhklab/")
(synopsis "Performance assessment and comparison for survival analysis")
(description
@@ -15289,14 +15134,14 @@ coding changes and predict coding outcomes.")
(define-public r-vsn
(package
(name "r-vsn")
(version "3.78.1")
(version "3.78.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "vsn" version))
(sha256
(base32
"1dv7h6i1jfa046r8cipa761r2gxyrah90hsv0lp6y03m4v0hdl7h"))))
"07skbp8pq3anmlsmw0zqc2lhsis6wg9a6vid2535iy5hpj3d0yv0"))))
(properties
;; This is needed for vignettes.
'((updater-extra-native-inputs . ("r-biocstyle"))))
@@ -16175,13 +16020,13 @@ fitting of some classes of graphical Markov models.")
(define-public r-ggtreeextra
(package
(name "r-ggtreeextra")
(version "1.20.1")
(version "1.20.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "ggtreeExtra" version))
(sha256
(base32
"03qdh2q6bd0452ygk3la825ixw54vm997r21s38qivxraam5cjd7"))))
"086j86xxf8xn4kqkgs6b3r2zyrngi2inhhabj47c5mcyxy7cbddz"))))
(properties `((upstream-name . "ggtreeExtra")))
(build-system r-build-system)
(propagated-inputs (list r-cli
@@ -16190,8 +16035,7 @@ fitting of some classes of graphical Markov models.")
r-ggtree
r-magrittr
r-rlang
r-tidytree
r-yulab-utils))
r-tidytree))
(native-inputs (list r-knitr r-testthat))
(home-page "https://github.com/YuLab-SMU/ggtreeExtra/")
(synopsis
@@ -16207,17 +16051,14 @@ rectangular layout tree built by ggtree with the grammar of ggplot2.")
(define-public r-ggpicrust2
(package
(name "r-ggpicrust2")
(version "2.5.10")
(version "2.5.2")
(source (origin
(method url-fetch)
(uri (cran-uri "ggpicrust2" version))
(sha256
(base32
"19s72cfim793xx7d77ni2cb51qnsjabxq056zmdbladhkw9ipcck"))))
(properties
'((upstream-name . "ggpicrust2")
(updater-extra-native-inputs
. ("r-aldex2" "r-fgsea" "r-ggally" "r-limma"))))
"09cvv2ipxycq983rh9p2gdbahbgxknd7hxcxb6psvqcfx0paj0jg"))))
(properties `((upstream-name . "ggpicrust2")))
(build-system r-build-system)
(propagated-inputs (list r-aplot
r-dplyr
@@ -16233,8 +16074,12 @@ rectangular layout tree built by ggtree with the grammar of ggplot2.")
r-tibble
r-tidygraph
r-tidyr))
(native-inputs
(list r-aldex2 r-fgsea r-ggally r-knitr r-limma r-testthat))
(native-inputs (list r-devtools
r-fgsea
r-ggvenndiagram
r-mockery
r-testthat
r-upsetr))
(home-page "https://github.com/cafferychen777/ggpicrust2")
(synopsis "Make PICRUSt2 output analysis and visualization easier")
(description
@@ -19605,13 +19450,13 @@ data.")
(define-public r-enrichedheatmap
(package
(name "r-enrichedheatmap")
(version "1.40.1")
(version "1.40.0")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "EnrichedHeatmap" version))
(sha256
(base32
"0qzfd7q270z80jvw1c7nvxks4md3pvhscj3zmga3jklmkx3qz5pn"))))
"1pz5czpy4dhjxaamz7n7zvxz3s48jyk3rhy90pqil41i8zlql4hr"))))
(properties `((upstream-name . "EnrichedHeatmap")))
(build-system r-build-system)
(propagated-inputs (list r-circlize
@@ -20715,14 +20560,14 @@ analysis.")
(define-public r-gtrellis
(package
(name "r-gtrellis")
(version "1.42.1")
(version "1.42.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "gtrellis" version))
(sha256
(base32
"00ckhkf15x4wgd8wvcl2kg2n98xxsbyb4njjxg9fzshvd7ikx0g4"))))
"0lbqzdfz7ylw066ng01vvm5azvnjfxhhbfcjk6y0l5xbs2c5ckac"))))
(build-system r-build-system)
(propagated-inputs
(list r-circlize r-genomicranges r-getoptlong r-iranges))
@@ -22620,7 +22465,7 @@ sequential way to mimic the manual gating strategy.")
(properties
`((upstream-name . "CytoML")
(updater-extra-native-inputs . ("r-flowworkspacedata"))
(updater-ignored-native-inputs . ("r-cytoml-old"))))
(updater-ignored-native-inputs . ("r-old" "r-table"))))
(build-system r-build-system)
(inputs
(list libxml2 zlib))
@@ -24482,16 +24327,8 @@ available bioactivity data.")
"0d4c9qqwd5zm5y9xcskfjashqkdiy0ri3gsj1kmfb5zmv8i8666s"))))
(properties `((upstream-name . "biobroom")))
(build-system r-build-system)
(arguments
(list
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'dplyr-compatibility
(lambda _
(substitute* "R/utilities.R"
(("dplyr::tbl_df") "tibble::as_tibble")))))))
(propagated-inputs
(list r-biobase r-broom r-dplyr r-tibble r-tidyr))
(list r-biobase r-broom r-dplyr r-tidyr))
(native-inputs
(list r-deseq2 r-edger r-knitr r-magrittr r-testthat))
(home-page "https://github.com/StoreyLab/biobroom")
@@ -24952,14 +24789,14 @@ gene selection, testing relationships, and so on.")
(define-public r-biocpkgtools
(package
(name "r-biocpkgtools")
(version "1.28.3")
(version "1.27.12")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "BiocPkgTools" version))
(sha256
(base32
"0mxhsj3ah6qfq3lr3jz9bfjgfdzl9763aa3j5n3a0im36rz68960"))
"03z6b711071k15j8vlm4zgb36vli3y3zh1lnglz1xyimmvhvn9cp"))
(snippet
'(for-each delete-file
'("inst/htmlwidgets/lib/bioc_explore/bootstrap.min.js"
@@ -25178,19 +25015,18 @@ distance measures.")
(define-public r-pcatools
(package
(name "r-pcatools")
(version "2.22.4")
(version "2.22.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "PCAtools" version))
(sha256
(base32
"1ljsllssc2japlmjhnazsfbm7py0xdyzac7jfcfvcxh9z7q3njy1"))))
"1ngm3227viafcjmq5c25ihj3lrrs98c1rs5zx2ims6xzv68dbzwz"))))
(properties `((upstream-name . "PCAtools")))
(build-system r-build-system)
(propagated-inputs
(list r-assorthead
r-beachmat
(list r-beachmat
r-bh
r-biocparallel
r-biocsingular
@@ -25225,14 +25061,14 @@ dimensional mass cytometry data.")
(define-public r-rgreat
(package
(name "r-rgreat")
(version "2.12.2")
(version "2.12.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "rGREAT" version))
(sha256
(base32
"1c4pslr4b30j63yd3n5qnqk9s4k37iarpdfl0mxfxzkiwrgxc41b"))))
"1p9d9lzp5sgawn4058ghw7rq3n2n7ljb4f6a1586lpdf22pm0qhs"))))
(properties `((upstream-name . "rGREAT")))
(build-system r-build-system)
(propagated-inputs
@@ -25533,21 +25369,23 @@ S4Vectors package itself.")
(define-public r-wgcna
(package
(name "r-wgcna")
(version "1.74")
(version "1.73")
(source
(origin
(method url-fetch)
(uri (cran-uri "WGCNA" version))
(sha256
(base32
"1mjmz7qpgnkd07ar02qd9ff4r0d3brf6v4xzc4dz11r2p0by2qag"))))
"1kk3a2ll83zdwisjfvg4km5h0vl564nshy45ffgxv41im5ks7878"))))
(properties `((upstream-name . "WGCNA")))
(build-system r-build-system)
(propagated-inputs
(list r-doparallel
(list r-annotationdbi
r-doparallel
r-dynamictreecut
r-fastcluster
r-foreach
r-go-db
r-hmisc
r-impute
r-matrixstats
@@ -26446,14 +26284,14 @@ quality control.")
(define-public r-scran
(package
(name "r-scran")
(version "1.38.1")
(version "1.38.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "scran" version))
(sha256
(base32
"1p2lkhvfpg0v320l6mavdfv70dzkiw0pc6im1qd8a52wycy21i88"))))
"1ac4fxj5adqrsgpcpqhk9sxlagaaq2w577xq751kqvxs54hj63n4"))))
(properties
'((updater-extra-native-inputs
. ("r-dynamictreecut"
@@ -29144,14 +28982,14 @@ embeddings and functions to build new reference.")
(define-public r-tximeta
(package
(name "r-tximeta")
(version "1.28.3")
(version "1.28.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "tximeta" version))
(sha256
(base32
"15lm6h271kkz265mab55fncngnqx56200l0m7qw7bdyq58fnlp4a"))))
"1152llv077q19zyyzzba0ggy03vlvgqrirrkssa8nk0pi93nh1zv"))))
(properties `((upstream-name . "tximeta")))
(build-system r-build-system)
;; Two tests fail because data files are not included.
@@ -29188,13 +29026,13 @@ reproducibility.")
(define-public r-phyloseq
(package
(name "r-phyloseq")
(version "1.54.1")
(version "1.54.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "phyloseq" version))
(sha256
(base32 "1zivxag6b2bjh32k1mpn7hlvalap97rp90x3cbfynqrk6933f4bq"))))
(base32 "000a4ksians9qxjfcr89qd1h6pr127h2mfjz607sl1h0kml1hiiv"))))
(properties `((upstream-name . "phyloseq")))
(build-system r-build-system)
(arguments
File diff suppressed because it is too large Load Diff
+30 -32
View File
@@ -11,7 +11,7 @@
;;; Copyright © 2018, 2021 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2019, 2020 Brett Gilio <brettg@gnu.org>
;;; Copyright © 2020 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;; Copyright © 2021, 2026 Justin Veilleux <terramorpha@cock.li>
;;; Copyright © 2021 Justin Veilleux <terramorpha@cock.li>
;;; Copyright © 2021 Marius Bakke <marius@gnu.org>
;;; Copyright © 2021 Josselin Poiret <josselin.poiret@protonmail.ch>
;;; Copyright © 2022 Brice Waegeneire <brice@waegenei.re>
@@ -99,19 +99,16 @@
(define-public transmission
(package
(name "transmission")
(version "4.1.1")
(version "4.0.6")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/transmission/transmission")
(commit version)
;; TODO: Unbundle more available inputs, see:
;; <https://codeberg.org/guix/guix/pulls/6542#issuecomment-10935599>.
(recursive? #t)))
(file-name (git-file-name name version))
(method url-fetch)
(uri (string-append "https://github.com/transmission/transmission"
"/releases/download/" version "/transmission-"
version ".tar.xz"))
(patches (search-patches "transmission-4.0.6-fix-build.patch"))
(sha256
(base32
"1v5qjarqvd26v757mj56yyw75mn3ydvhxl5hdkw8hn3idr1lww3k"))))
"0py4n33wk2srdfrcd5rbrbg5p1zq6nipghlins01d693i9nzwf1a"))))
(build-system cmake-build-system)
(outputs '("out" ; library and command-line interface
"gui")) ; graphical user interface
@@ -199,7 +196,7 @@ DHT, µTP, PEX and Magnet Links.")
(define-public transmission-remote-gtk
(package
(name "transmission-remote-gtk")
(version "1.7.0")
(version "1.6.0")
(source
(origin
(method git-fetch)
@@ -210,7 +207,7 @@ DHT, µTP, PEX and Magnet Links.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "19m0jksx4klf5h9b7ici2dsdkbsrj24nj4y2iysrl5zc3sh3kii3"))))
(base32 "17b4as8k84b6gfr7g27r9hgw8qbcx5wr5kbspl5yd1jbzqirkk7y"))))
(build-system meson-build-system)
(native-inputs (list `(,glib "bin") ;glib-compile-resources
gettext-minimal
@@ -546,7 +543,7 @@ desktops.")
(define-public qbittorrent
(package
(name "qbittorrent")
(version "5.1.4")
(version "5.1.2")
(source
(origin
(method git-fetch)
@@ -555,7 +552,7 @@ desktops.")
(commit (string-append "release-" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1zja55b97cnij3vffmfa5p65dasybbm1gd3xjspw5yyypy5cl5zm"))))
(base32 "087l8fnr83bvvinsp1m27rsskc9wx9si3hh8alqrr8rhngd0c5ys"))))
(build-system qt-build-system)
(arguments
(list #:qtbase qtbase
@@ -655,23 +652,24 @@ the following features:
(base32
"1kbac1qjbddcib0bldqaf0dcq5mqi9i2jv2fd4fayam4bcmjgfmr"))))
(build-system pyproject-build-system)
(inputs (list bash-minimal
gtk+
libtorrent-rasterbar
nss-certs
python-pycairo
python-chardet
python-dbus-1.2
python-mako
python-pygobject-3.50
python-pillow
python-pyopenssl
python-pyxdg
python-rencode
python-service-identity
python-setproctitle
python-twisted
python-zope-interface))
(inputs (list bash-minimal))
(propagated-inputs
(list gtk+
libtorrent-rasterbar
nss-certs
python-pycairo
python-chardet
python-dbus
python-mako
python-pygobject
python-pillow
python-pyopenssl
python-pyxdg
python-rencode
python-service-identity
python-setproctitle
python-twisted
python-zope-interface))
(native-inputs
(list intltool
python-pytest
+1 -1
View File
@@ -61,7 +61,7 @@
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python)
#:use-module (gnu packages python-build)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages tex)
#:use-module (gnu packages texinfo)
#:use-module (gnu packages version-control)
+14 -24
View File
@@ -19,7 +19,6 @@
;;; Copyright © 2021 Franck Pérignon <franck.perignon@univ-grenoble-alpes.fr>
;;; Copyright © 2021 Aleksandr Vityazev <avityazev@posteo.org>
;;; Copyright © 2025 David Elsing <david.elsing@posteo.net>
;;; Copyright © 2025 Nigko Yerden <nigko.yerden@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -44,7 +43,6 @@
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix build-system gnu)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system trivial)
#:use-module (gnu packages)
#:use-module (gnu packages autotools)
@@ -81,10 +79,19 @@
(base32
"0yhcb8dn7g5k9dfr54j99wpd4qwk59g1lpp8z0ag7d114si3z8w5"))))
(build-system gnu-build-system)
(inputs
(append
(list icu4c zlib)
(if (%current-target-system)
'()
(list python-minimal-wrapper))))
(native-inputs
(list perl tcsh))
(arguments
(list
#:imported-modules %pyproject-build-system-modules
#:modules `(((guix build pyproject-build-system) #:select (python-version))
#:imported-modules `((guix build python-build-system)
,@%default-gnu-imported-modules)
#:modules `(((guix build python-build-system) #:select (python-version))
,@%default-gnu-modules)
#:tests? #f
#:configure-flags
@@ -223,14 +230,7 @@
(string-append "libboost_python"
(string-take python-version 1)
libext)))))))))))
(inputs
(append
(list icu4c zlib)
(if (%current-target-system)
'()
(list python-minimal-wrapper))))
(native-inputs
(list perl tcsh))
(home-page "https://www.boost.org")
(synopsis "Peer-reviewed portable C++ source libraries")
(description
@@ -376,8 +376,7 @@ across a broad spectrum of applications.")
(name "boost-with-numpy")
(native-inputs
(modify-inputs (package-native-inputs boost)
(append python-numpy)))
(synopsis "Boost C++ libraries with inclusion of Boost.NumPy")))
(append python-numpy)))))
(define-public boost-sync
(let ((commit "e690de2d30e2f1649ff500c9a6f3539814994b1c")
@@ -462,16 +461,7 @@ signals and slots system.")
(newline output-port)
(close output-port))))))))
(home-page "https://www.boost.org")
(synopsis "Boost C++ libraries with inclusion of Boost.MPI")))
(define-public boost-mpi-numpy
(package
(inherit boost-mpi)
(name "boost-mpi-numpy")
(inputs
(modify-inputs (package-inputs boost-mpi)
(append python-numpy)))
(synopsis "Boost C++ libraries with inclusion of Boost.MPI and Boost.NumPy")))
(synopsis "Message Passing Interface (MPI) library for C++")))
(define-public mdds
(package
+178 -59
View File
@@ -44,7 +44,6 @@
(define-module (gnu packages bootloaders)
#:use-module (gnu packages)
#:use-module (gnu packages assembly)
#:use-module (gnu packages autotools)
#:use-module (gnu packages base)
#:use-module (gnu packages disk)
#:use-module (gnu packages bison)
@@ -115,13 +114,13 @@
(define*-public (make-grub platform)
(package
(name (string-append "grub-" platform))
(version "2.14")
(version "2.12")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnu/grub/grub-" version ".tar.xz"))
(sha256
(base32
"0hvd8i3ib6nwymfmvd6dia6axrn4xmrlsrg2r3c3i22vadrkr3dw"))
"1ahgzvvvwdxx7rl08pv5dyqlgp76jxz0q2cflxvsdsn4yy8p7jgk"))
(patches (search-patches
"grub-efi-fat-serial-number.patch"
"grub-setup-root.patch"))
@@ -149,21 +148,13 @@
;; This needs to be compiled with clang for powerpc64le.
(if #$(and=> (%current-target-system)
target-ppc64le?)
(list "TARGET_CC=powerpc64le-linux-gnu-clang"
"CFLAGS=-Wno-error")
(list "TARGET_CC=powerpc64le-linux-gnu-clang")
'())
(if #$(and (target-ppc64le? (%current-system))
(not (%current-target-system)))
(list "CC=clang" "CFLAGS=-Wno-error")
(list "CC=clang")
'()))
;; The 'configure' script detects --image-base support and uses it,
;; but that shifts the i386-pc kernel.img start address from 0x9000
;; to 0x9074, breaking grub-install. Override with -Ttext.
;; See <https://lists.gnu.org/archive/html/grub-devel/2026-01/msg00041.html>.
#:make-flags
#~(list "TARGET_IMG_BASE_LDOPT=-Wl,-Ttext")
;; GRUB fails to load modules stripped with --strip-unneeded.
#:strip-flags
#~(list "--strip-debug" "--enable-deterministic-archives")
@@ -208,6 +199,14 @@
(setenv "BUILD_FREETYPE_CFLAGS"
(string-append "-I" freetype
"/include/freetype2"))))))
#$@(if (target-hurd64?)
#~((add-after 'unpack 'apply-hurd64-patch
(lambda _
(let ((patch
#$(local-file
(search-patch "grub-hurd64.patch"))))
(invoke "patch" "--force" "-p1" "-i" patch)))))
#~())
(add-before 'check 'disable-flaky-test
(lambda _
;; This test is unreliable. For more information, see:
@@ -230,7 +229,7 @@
(("test_unset grub_func_test")
"test_unset")))))))
(inputs
(append (list gettext-minimal freetype ncurses libtasn1
(append (list gettext-minimal freetype ncurses
;; Console-setup's ckbcomp is invoked by grub-kbdcomp. It
;; is required for generating alternative keyboard layouts.
@@ -286,6 +285,22 @@
;; targets are used.
(if (member (%current-system) (package-supported-systems qemu-minimal))
(list qemu-minimal)
'())
;; XXX: When building GRUB 2.02 on 32-bit x86, we need a binutils
;; capable of assembling 64-bit instructions. However, our default
;; binutils on 32-bit x86 is not 64-bit capable.
(if (string-match "^i[3456]86-" (%current-system))
(let ((binutils (package/inherit
binutils
(name "binutils-i386")
(arguments
(substitute-keyword-arguments (package-arguments binutils)
((#:configure-flags flags ''())
#~(cons* "--enable-64-bit-bfd" #$flags)))))))
(list (make-ld-wrapper "ld-wrapper-i386"
#:binutils binutils)
binutils))
'())))
(home-page "https://www.gnu.org/software/grub/")
(synopsis "GRand Unified Boot loader")
@@ -390,8 +405,7 @@ menu to select one of the installed operating systems.")
"test_sha512sum"
"grub_cmd_tr"
"test_unset"
"file_filter_test"
"asn1_test")
"file_filter_test")
" "))))))))
(supported-systems '("i686-linux" "x86_64-linux")))))
@@ -443,27 +457,22 @@ menu to select one of the installed operating systems.")
((target-arm32?) "arm")
(else ""))))
(substitute* "tests/util/grub-shell.in"
(("\\$\\{srcdir\\}/OVMF(32)?\\.fd")
(("OVMF-ia32\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/qemu/OVMF(32)?\\.fd")
(("OVMF\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("\\$\\{srcdir\\}/AAVMF(32)?\\.fd")
(("/usr/share/qemu-efi/QEMU_EFI\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/qemu-efi-aarch64/QEMU_EFI\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/AAVMF/AAVMF(32)?\\.fd")
(("/usr/share/ovmf-arm/QEMU_EFI\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
@@ -515,41 +524,19 @@ menu to select one of the installed operating systems.")
#$@(if (or (target-x86?)
(target-arm?))
#~((replace 'patch-ovmf-path
(lambda* (#:key native-inputs inputs #:allow-other-keys)
(lambda* (#:key inputs #:allow-other-keys)
(let ((arch #$(cond ((target-x86?) "ia32")
((target-arm?) "arm")
(else ""))))
(substitute* "tests/util/grub-shell.in"
(("\\$\\{srcdir\\}/OVMF(32)?\\.fd")
(("OVMF-ia32\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/qemu/OVMF(32)?\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("\\$\\{srcdir\\}/AAVMF(32)?\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/qemu-efi-aarch64/QEMU_EFI\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/AAVMF/AAVMF(32)?\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin")))
inputs (string-append
"/share/firmware/ovmf_" arch ".bin")))
(("/usr/share/ovmf-arm/QEMU_EFI\\.fd")
(search-input-file
(or native-inputs inputs)
(string-append
"/share/firmware/ovmf_" arch ".bin"))))))))
inputs (string-append
"/share/firmware/ovmf_" arch ".bin"))))))))
#~())))))
(native-inputs
(cond
@@ -573,7 +560,9 @@ menu to select one of the installed operating systems.")
(package
(inherit (make-grub "ieee1275"))
(synopsis "GRand Unified Boot loader (ieee1275 version)")
(supported-systems '("powerpc-linux" "powerpc64le-linux"))))
(supported-systems '("i686-linux" "x86_64-linux"
"i586-gnu" "x86_64-gnu"
"powerpc-linux" "powerpc64le-linux"))))
(define-public grub-qemu
(package
@@ -812,6 +801,10 @@ The SUBDIR argument defaults to \"efi/Guix\", as it is also the case for
#~(modify-phases %standard-phases
(add-after 'unpack 'preparations
(lambda _
;; The version string is usually derived via setuptools-scm, but
;; without the git metadata available this fails.
(setenv "SETUPTOOLS_SCM_PRETEND_VERSION" #$version)
;; Needed by setup.py.
(setenv "DESTDIR" "/")
@@ -843,7 +836,7 @@ The SUBDIR argument defaults to \"efi/Guix\", as it is also the case for
pkg-config
python
python-setuptools-scm
swig-4.0
swig
which)
(if (member (%current-system) (package-supported-systems valgrind/pinned))
(list valgrind/pinned)
@@ -895,7 +888,7 @@ tree binary files. These are board description files used by Linux and BSD.")
python-pyelftools
python-setuptools
python-wheel
swig-4.0
swig
(list util-linux "lib")))
(home-page "https://www.denx.de/wiki/U-Boot/")
(synopsis "ARM bootloader")
@@ -951,6 +944,7 @@ Info manual.")))
(modify-inputs (package-native-inputs u-boot)
(prepend python-filelock
python-pycryptodomex
python-coverage
python-pytest
python-pytest-xdist))
(modify-inputs (package-native-inputs u-boot)
@@ -976,6 +970,14 @@ Info manual.")))
(("/bin/false") (which "false")))
(substitute* "tools/dtoc/fdt_util.py"
(("'cc'") "'gcc'"))
(substitute* "tools/u_boot_pylib/test_util.py"
;; python3-coverage is simply called coverage in guix.
(("python3-coverage") "coverage")
;; Don't require 100% coverage since it's brittle and can
;; fail with newer versions of coverage or dependencies.
(("raise ValueError\\('Test coverage failure'\\)")
"print('Continuing anyway since Guix does not care :O')"))
(substitute* "test/run"
;; Make it easier to find test failures.
(("#!/bin/bash") "#!/bin/bash -x")
@@ -988,9 +990,9 @@ Info manual.")))
"# run_test \"sandbox_noinst\"")
(("run_test \"sandbox_vpl\"")
"# run_test \"sandbox_vpl\"")
;; Disable code coverage tests.
(("run_test \"(\\w+) code coverage\"" all)
(string-append "# " all))
;; FIXME: code coverage not working
(("run_test \"binman code coverage\"")
"# run_test \"binman code coverage\"")
;; This test would require internet access.
(("\\./tools/buildman/buildman") (which "true")))
(substitute* "test/py/tests/test_sandbox_exit.py"
@@ -1377,6 +1379,34 @@ removed so that it fits within common partitioning schemes.")))
(define-public u-boot-a20-olinuxino-micro
(make-u-boot-package "A20-OLinuXino_MICRO" "arm-linux-gnueabihf"))
(define-public u-boot-nintendo-nes-classic-edition
(let ((base (make-u-boot-package "Nintendo_NES_Classic_Edition"
"arm-linux-gnueabihf"
#:append-description "This version is for
the Nintendo NES Classic Edition. It is assumed that you have added a serial
port to pins PB0 and PB1 as described on
@url{https://linux-sunxi.org/Nintendo_NES_Classic_Edition}.
In order to use FEL mode on the device, hold the Reset button on the
device while it's being turned on (and a while longer).")))
(package
(inherit base)
;; Starting with 2019.01, FEL doesn't work anymore on A33.
(version "2018.11")
(source (origin
(method url-fetch)
(uri (string-append
"https://ftp.denx.de/pub/u-boot/"
"u-boot-" version ".tar.bz2"))
(sha256
(base32
"0znkwljfwwn4y7j20pzz4ilqw8znphrfxns0x1lwdzh3xbr96z3k"))
(patches (search-patches
"u-boot-nintendo-nes-serial.patch"))))
(native-inputs
`(("python" ,python-2)
,@(package-native-inputs base))))))
(define-public u-boot-wandboard
(make-u-boot-package "wandboard" "arm-linux-gnueabihf"))
@@ -1812,6 +1842,95 @@ For more information, refer to
(("DEFAULT_FDT_FILE")
"imx6q-ts7970.dtb")))))))))))
(define-public vboot-utils
(package
(name "vboot-utils")
(version "R63-10032.B")
(source (origin
;; XXX: Snapshots are available but changes timestamps every download.
(method git-fetch)
(uri (git-reference
(url (string-append "https://chromium.googlesource.com"
"/chromiumos/platform/vboot_reference"))
(commit (string-append "release-" version))))
(file-name (string-append name "-" version "-checkout"))
(sha256
(base32
"0h0m3l69vp9dr6xrs1p6y7ilkq3jq8jraw2z20kqfv7lvc9l1lxj"))
(patches
(search-patches "vboot-utils-skip-test-workbuf.patch"
"vboot-utils-fix-tests-show-contents.patch"
"vboot-utils-fix-format-load-address.patch"))))
(build-system gnu-build-system)
(arguments
`(#:make-flags (list "CC=gcc"
;; On ARM, we must pass "HOST_ARCH=arm" so that the
;; ${HOST_ARCH} and ${ARCH} variables in the makefile
;; match. Otherwise, ${HOST_ARCH} will be assigned
;; "armv7l", the value of `uname -m`, and will not
;; match ${ARCH}, which will make the tests require
;; QEMU for testing.
,@(if (string-prefix? "arm"
(or (%current-target-system)
(%current-system)))
'("HOST_ARCH=arm")
'())
(string-append "DESTDIR=" (assoc-ref %outputs "out")))
#:phases (modify-phases %standard-phases
(add-after 'unpack 'patch-hard-coded-paths
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((coreutils (assoc-ref inputs "coreutils"))
(diffutils (assoc-ref inputs "diffutils")))
(substitute* "futility/misc.c"
(("/bin/cp") (string-append coreutils "/bin/cp")))
(substitute* "tests/bitmaps/TestBmpBlock.py"
(("/usr/bin/cmp") (string-append diffutils "/bin/cmp")))
(substitute* "vboot_host.pc.in"
(("prefix=/usr")
(string-append "prefix=" (assoc-ref outputs "out"))))
#t)))
(delete 'configure)
(add-before 'check 'patch-tests
(lambda _
;; These tests compare diffs against known-good values.
;; Patch the paths to match those in the build container.
(substitute* (find-files "tests/futility/expect_output")
(("/mnt/host/source/src/platform/vboot_reference")
(string-append "/tmp/guix-build-" ,name "-" ,version
".drv-0/source")))
;; Tests require write permissions to many of these files.
(for-each make-file-writable (find-files "tests/futility"))
#t))
(add-after 'install 'install-devkeys
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(share (string-append out "/share/vboot-utils")))
(copy-recursively "tests/devkeys"
(string-append share "/devkeys"))
#t))))
#:test-target "runtests"))
(native-inputs
`(("pkg-config" ,pkg-config)
;; For tests.
("diffutils" ,diffutils)
("python@2" ,python-2)))
(inputs
`(("coreutils" ,coreutils)
("libyaml" ,libyaml)
("openssl" ,openssl)
("openssl:static" ,openssl "static")
("util-linux" ,util-linux "lib")))
(home-page
"https://dev.chromium.org/chromium-os/chromiumos-design-docs/verified-boot")
(synopsis "ChromiumOS verified boot utilities")
(description
"vboot-utils is a collection of tools to facilitate booting of
Chrome-branded devices. This includes the @command{cgpt} partitioning
program, the @command{futility} and @command{crossystem} firmware management
tools, and more.")
(license license:bsd-3)))
(define-public os-prober
(package
(name "os-prober")
+20 -28
View File
@@ -2,7 +2,7 @@
;;; Copyright © 2012-2020, 2024 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014, 2015, 2018, 2019 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2017, 2020, 2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2018, 2020, 2022, 2024, 2026 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2018, 2020, 2022 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2019 Carl Dong <contact@carldong.me>
;;; Copyright © 2019 Léo Le Bouter <lle-bout@zaclys.net>
;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
@@ -46,8 +46,7 @@
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (ice-9 match)
#:export (bootstrap-guile-url-path
bootstrap-origin
#:export (bootstrap-origin
package-with-bootstrap-guile
glibc-dynamic-linker
@@ -128,13 +127,13 @@
,(base32 "033rhpk6zrpxpd6ffjyg5y2zwq9x9cnq0zljb7k8jlncbalsayq5")))
("x86_64-gnu"
("bash"
,(base32 "1gr7hxpk55iahz5gc30iprssnkg0b8ylf7fh130dgiz8202z0c65"))
,(base32 "1xvhwyvamlcva01zv6pz7br7d2lgq5qd14misi8wffxc78c4lndk"))
("mkdir"
,(base32 "1wv4hsxg3d995bb5wfrvi8rhqrvn18qb2y889x89c8mhf9jl9xcp"))
,(base32 "1c5irkgxaxpwlxzf68xg47j7m6ibd9xqvxznlml42nhfnrka447s"))
("tar"
,(base32 "00s7f78yhd8s865fy8gizpzdx5dn294nxvy10bpga6dfj8q2990r"))
,(base32 "0ak7sri6294y1g3ia1yrf7facxc7dij02mlxi4xg6k5yszv1jd3w"))
("xz"
,(base32 "1193r88af30z124nc10a6aryvlk8pn320v6260kb56a6ax5dgqf9")))
,(base32 "0zz9pgw0pyadqsq9nvvpiryk1gpmm89754m6xlqh4ssbbvzpk3y6")))
("mips64el-linux"
("bash"
,(base32 "1aw046dhda240k9pb9iaj5aqkm23gkvxa9j82n4k7fk87nbrixw6"))
@@ -176,14 +175,14 @@
(match system
("powerpc64le-linux" (string-append system "/20210106/" program))
("i586-gnu" (string-append system "/20200326/" program))
("x86_64-gnu" (string-append system "/20260302/" program))
("x86_64-gnu" (string-append system "/20241122/" program))
("powerpc-linux" (string-append system "/20200923/bin/" program))
("riscv64-linux" (string-append system "/20210725/bin/" program))
(_ (string-append system "/" program
"?id=44f07d1dc6806e97c4e9ee3e6be883cc59dc666e"))))
(define bootstrap-executable*
(mlambda (program system file-name)
(define bootstrap-executable
(mlambda (program system)
"Return an origin for PROGRAM, a statically-linked bootstrap executable
built for SYSTEM."
(let ((system (if (string=? system "x86_64-linux")
@@ -204,15 +203,9 @@ for system '~a'")
(uri (map (cute string-append <>
(bootstrap-executable-file-name system program))
%bootstrap-executable-base-urls))
;; XXX: In the long term, migrate all boostrap executables to
;; (string-append "bootstrap-" program), and drop the additional
;; file-name argument.
(file-name file-name)
(file-name program)
(hash (content-hash bv sha256))))))))
(define* (bootstrap-executable program system #:optional file-name)
(bootstrap-executable* program system (or file-name program)))
;;;
;;; Helper procedures.
@@ -352,7 +345,6 @@ or false to signal an error."
;; here just so we can keep going.
((string=? system "arm-eabi") "no-ld.so")
((string=? system "avr") "no-ld.so")
((string=? system "bpf-none") "no-ld.so")
((string=? system "or1k-elf") "no-ld.so")
((string-suffix? "-elf" system) "no-ld.so")
((string-suffix? "-mingw" system) "no-ld.so")
@@ -390,7 +382,7 @@ or false to signal an error."
("i586-gnu"
"/20200326/guile-static-stripped-2.0.14-i586-pc-gnu.tar.xz")
("x86_64-gnu"
"/20260302/guile-static-stripped-3.0.9-x86_64-pc-gnu.tar.xz")
"/20241122/guile-static-stripped-3.0.9-x86_64-pc-gnu.tar.xz")
("powerpc64le-linux"
"/20210106/guile-static-stripped-2.0.14-powerpc64le-linux-gnu.tar.xz")
("riscv64-linux"
@@ -416,7 +408,7 @@ or false to signal an error."
("i586-gnu"
(base32 "0wgqpsmvg25rnqn49ap7kwd2qxccd8dr4lllzp7i3rjvgav27vac"))
("x86_64-gnu"
(base32 "049c6dxc5lgaa9kbp81gn9gj32bc7xqnly4ivwajzsh4lknrhq6n"))
(base32 "109p34v8fgxznxdyb90y74qj6ppwgb5qj0c2pa3gxba7x1r0p4k1"))
("powerpc-linux"
(base32 "1by2p7s27fbyjzfkcw8h65h4kkqh7d23kv4sgg5jppjn2qx7swq4"))
("riscv64-linux"
@@ -627,7 +619,7 @@ $out/bin/guile --version~%"
("i586-gnu"
"/20200326/static-binaries-0-i586-pc-gnu.tar.xz")
("x86_64-gnu"
"/20260302/static-binaries-0-x86_64-pc-gnu.tar.xz")
"/20241122/static-binaries-0-x86_64-pc-gnu.tar.xz")
("powerpc-linux"
"/20200923/static-binaries.tar.xz")
("riscv64-linux"
@@ -657,7 +649,7 @@ $out/bin/guile --version~%"
"17kllqnf3fg79gzy9ansgi801c46yh9c23h4d923plvb0nfm1cfn"))
("x86_64-gnu"
(base32
"0xnw5p6279m8xazbhal5ld5qxsya0249z2l6jcc7w9ndh2gnx07v"))
"04zksa2457h1vcl5ry2hyzhhsg8fckvfdgadp0viba3anwms2463"))
("powerpc-linux"
(base32
"0kspxy0yczan2vlih6aa9hailr2inz000fqa0gn5x9d1fxxa5y8m"))
@@ -715,7 +707,7 @@ $out/bin/guile --version~%"
("i586-gnu"
"/20200326/binutils-static-stripped-2.34-i586-pc-gnu.tar.xz")
("x86_64-gnu"
"/20260302/binutils-static-stripped-2.44-x86_64-pc-gnu.tar.xz")
"/20241122/binutils-static-stripped-2.41-x86_64-pc-gnu.tar.xz")
("powerpc-linux"
"/20200923/binutils-2.35.1.tar.xz")
("riscv64-linux"
@@ -748,7 +740,7 @@ $out/bin/guile --version~%"
"11kykv1kmqc5wln57rs4klaqa13hm952smkc57qcsyss21kfjprs"))
("x86_64-gnu"
(base32
"033bgmaa012b2lw8g76b02mjgzdnzv2yd3jvaqbhqrr5q9r3xn04"))
"1fasv76rppnqlshjqc7dbzngic9cqswi5ydzg6w9rc075daqk8kb"))
("powerpc-linux"
(base32
"0asbg1c4avkrvh057mx0942xwddd136jni382zqsxzn79ls42yq8"))
@@ -819,7 +811,7 @@ $out/bin/guile --version~%"
("i586-gnu"
"/20240816/glibc-stripped-2.39-i586-pc-gnu.tar.xz")
("x86_64-gnu"
"/20260302/glibc-stripped-2.41-x86_64-pc-gnu.tar.xz")
"/20241122/glibc-stripped-2.39-x86_64-pc-gnu.tar.xz")
("powerpc-linux"
"/20200923/glibc-2.32.tar.xz")
("riscv64-linux"
@@ -852,7 +844,7 @@ $out/bin/guile --version~%"
"0x2x6w611k6v9qdabacawamw2475p04hm3s0q95xcg063wjq4ig2"))
("x86_64-gnu"
(base32
"1lpvk0l7qqvz46cnxm64a1a40zg0gj90j3glyk67i1sh5r4znlmy"))
"1w4h91kxl64a62l646966i73zp2cj6w4dmyc64fh0c1hhdykxass"))
("powerpc-linux"
(base32
"0smmssyjrlk5cvx49586smmk81gkwff0i6r91n4rir4jm6ba25sb"))
@@ -937,7 +929,7 @@ exec ~a/bin/~a -B~a/lib \
("i586-gnu"
"/20200326/gcc-stripped-5.5.0-i586-pc-gnu.tar.xz")
("x86_64-gnu"
"/20260302/gcc-stripped-14.3.0-x86_64-pc-gnu.tar.xz")
"/20241122/gcc-stripped-14.2.0-x86_64-pc-gnu.tar.xz")
("powerpc-linux"
"/20200923/gcc-5.5.0.tar.xz")
("riscv64-linux"
@@ -970,7 +962,7 @@ exec ~a/bin/~a -B~a/lib \
"1j2zc58wzil71a34h7c70sd68dmqvcscrw3rmn2whq79vd70zvv5"))
("x86_64-gnu"
(base32
"1fhi7f5zld08b6qsyv1d48ha7z0vr8pxr4kf8x7aq1a3kbcv5rkz"))
"1cgbhc76hlccx6v2z7kk7z173lryyq3la5mmbwivl6hbl1zcqg3m"))
("powerpc-linux"
(base32
"1p7df3yixhm87dw5sccc6yn1i9db1r9hnmsg87wq5xi4rfmirq7w"))
+83 -138
View File
@@ -21,11 +21,10 @@
;;; Copyright © 2022, 2023 Juliana Sims <juli@incana.org>
;;; Copyright © 2024 Evgeny Pisemsky <mail@pisemsky.site>
;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2025,2026 Anderson Torres <anderson.torres.8519@gmail.com>
;;; Copyright © 2025 Anderson Torres <anderson.torres.8519@gmail.com>
;;; Copyright © 2025 Aiden Isik <aidenisik+git@member.fsf.org>
;;; Copyright © 2025 Josep Bigorra <jjbigorra@gmail.com>
;;; Copyright © 2025 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2026 Nemin <bergengocia@protonmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -45,12 +44,10 @@
(define-module (gnu packages build-tools)
#:use-module (ice-9 optargs)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages c)
#:use-module (guix build-system cmake)
#:use-module (guix build-system copy)
#:use-module (guix build-system gnu)
#:use-module (guix build-system guile)
#:use-module (guix build-system hare)
#:use-module (guix build-system meson)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system python)
@@ -82,7 +79,6 @@
#:use-module (gnu packages lisp)
#:use-module (gnu packages logging)
#:use-module (gnu packages lua)
#:use-module (gnu packages man)
#:use-module (gnu packages ninja)
#:use-module (gnu packages package-management)
#:use-module (gnu packages pcre)
@@ -382,37 +378,24 @@ files and generates build instructions for the Ninja build system.")
(sha256
(base32
"13a9pj7d2mxgv5gbd78di4pb4w722vjis0vmk38m1vdm95v2f9yd"))))
(build-system gnu-build-system)
(build-system pyproject-build-system)
(arguments
(list
#:tests? #f ;disabled to avoid extra dependencies
;; Essentially a lighter copy of the former python-build-system.
;; Using it rather than pyproject-build-system allows to edit the latter
;; without a C++ world rebuild.
#:phases
#~(modify-phases %standard-phases
(delete 'bootstrap)
(delete 'configure)
(replace 'build
(lambda _
(invoke "python" "./setup.py" "build")))
(replace 'install
(lambda _
(invoke "python" "./setup.py" "install"
(string-append "--prefix=" #$output) "--no-compile")
(invoke "python" "-m" "compileall"
"--invalidation-mode=unchecked-hash" #$output)))
;; Meson calls the various executables in out/bin through the
;; Python interpreter, so we cannot use the shell wrapper.
(add-after 'install 'wrap
(lambda _
(let* ((mdist (car (find-files #$output "^mdist\\.py$")))
(site (dirname (dirname mdist))))
(substitute* (string-append #$output "/bin/meson")
(("import sys" all)
(format #f "~a~%sys.path.insert(0, ~s)" all site)))))))))
(native-inputs (list python-setuptools-bootstrap))
(inputs (list python-wrapper ninja))
(list #:tests? #f ;disabled to avoid extra dependencies
#:phases
#~(modify-phases %standard-phases
;; Meson calls the various executables in out/bin through the
;; Python interpreter, so we cannot use the shell wrapper.
(replace 'wrap
(lambda* (#:key inputs outputs #:allow-other-keys)
(substitute* (search-input-file outputs "bin/meson")
(("import sys" all)
(string-append
all "\n"
"sys.path.insert(0, '"
(site-packages inputs outputs)
"')"))))))))
(native-inputs (list python-setuptools))
(inputs (list python ninja))
(home-page "https://mesonbuild.com/")
(synopsis "Build system designed to be fast and user-friendly")
(description
@@ -424,6 +407,45 @@ files}, are written in a custom domain-specific language (@dfn{DSL}) that
resembles Python.")
(license license:asl2.0)))
(define-public meson-python
(package
(name "meson-python")
(version "0.17.1")
(source (origin
(method url-fetch)
(uri (pypi-uri "meson_python" version))
(sha256
(base32
"10szxcqgki4zwkrwmsirdg68h03k9qmfswd4r5xyz7p1y9lizfgg"))))
(build-system pyproject-build-system)
(arguments
(list #:test-flags #~(list "tests"
;; The test_pep518 tries to install
;; dependencies from the network using pip.
"-k" "not test_pep518")))
(propagated-inputs
(list meson
ninja/pinned
python-colorama
python-cython
python-pyproject-metadata
python-tomli
python-typing-extensions
python-wheel))
(native-inputs
(list ;; For tests.
git-minimal/pinned
patchelf
pkg-config
python-cython
python-gitpython
python-pytest
python-pytest-mock))
(home-page "https://github.com/mesonbuild/meson-python")
(synopsis "Meson-based build backend for Python")
(description "Meson-python is a PEP 517 build backend for Meson projects.")
(license license:expat)))
(define-public muon
(package
(name "muon")
@@ -651,6 +673,12 @@ software.")
(chdir "build/scons"))))))
(native-inputs (list python-setuptools python-wheel))))
;; TODO Remove on the next python-team iteration.
(define-deprecated/public scons-python2 scons
(package
(inherit (package-with-python2 scons-3))
(name "scons-python2")))
(define-public tup
(package
(name "tup")
@@ -1182,57 +1210,41 @@ your existing scripts and tools. It is inspired by the GNU Make utility
but it does away with a lot of the complexity that comes with its history.")
(license license:gpl3+)))
(define-public pdpmake
(package
(name "pdpmake")
(version "2.0.4")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "git://git.frippery.org/pdpmake")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"13qfvn0kw1fkpmjdpk0cscmvj5iycdq68kqfiml1slf1936pllb9"))))
(version "1.4.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/rmyorston/pdpmake")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"0fjx5imd7s0h0yy8h2qc4vkdq7kxqcljnrw6h8n88720xha5z3cb"))))
(build-system gnu-build-system)
(arguments
(list
#:test-target "test"
#:parallel-tests? #f
#:make-flags
#~(list "DESTDIR=\"\""
(string-append "CC=" #$(cc-for-target))
(string-append "PREFIX=" #$output))
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
;; pdpmake can be built easily without relying on a previous Make
;; implementation; let's do this for the sake of bootstrappability.
(replace 'build
(lambda _
(let ((args (append (find-files "." "\\.c$")
(list "-o" "make"))))
(apply invoke #$(cc-for-target) args))))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(with-directory-excursion "testsuite"
(invoke "./runtest" "-v")))))
(replace 'install
(lambda _
(let ((bindir (string-append #$output "/bin"))
(mandir (string-append #$output "/share/man/man1")))
(mkdir-p bindir)
(mkdir-p mandir)
(install-file "make" bindir)
(install-file "pdpmake.1" mandir)))))))
(delete 'configure))))
(home-page "https://frippery.org/make/")
(synopsis "Public domain POSIX make")
(synopsis "POSIX make")
(description
"This package contains an implementation of POSIX make. The default
configuration enables extensions. Generally these extensions are compatible
with GNU make.")
;; pdpmake is distributed under the public domain, but the sources include
;; tests under the GPL license version 2.
(license
(list license:gpl2
license:public-domain))))
(license (list license:gpl2 license:public-domain))))
(define-public potato-make
;; No releases.
@@ -1339,70 +1351,3 @@ The Waf Book and in the API docs
;; as meson or ninja which are written in Python as well.
(define-deprecated-package python-waf
waf)
(define-public haredo
(package
(name "haredo")
(version "1.0.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://git.sr.ht/~autumnull/haredo/")
(commit version)))
(file-name (git-file-name name version))
(sha256 (base32 "1ysm8rgxi0i4zb1q6xj3pf5bwxssjlcc4x158pyd78l8ahz30fn2"))))
(build-system hare-build-system)
(native-inputs
;; XXX: `harec` and `qbe` are pulled in because Haredo assumes these
;; programs are present and allows build scripts to rely on them freely.
;;
;; See: https://git.sr.ht/~autumnull/haredo/tree/1.0.6/item/doc/haredo.1.scd
;;
;; Importing `harec` the usual way results in a circular dependency for
;; packages that rely on `hare-build-system`. To avoid that, we import
;; it using delayed evaluation.
(list scdoc
(module-ref (resolve-interface '(gnu packages hare)) 'harec)
qbe))
(supported-systems %hare-supported-systems)
(arguments
(list
#:tests? #f
#:phases
#~(modify-phases %standard-phases
(add-before 'build 'set-prefix
(lambda _ (setenv "PREFIX" #$output)))
(add-before 'build 'override-defaults
(lambda* (#:key inputs #:allow-other-keys)
;; XXX: To prevent future packagers from needing to do delayed
;; input evaluation in all subsequent packages that rely on
;; `haredo` and `hare-build-system`, this package provides the
;; Guix-packaged `harec` and `qbe` as defaults (which can be
;; overridden if needed by setting the appropriate environment
;; variable).
(let ((harec-binary (search-input-file inputs "/bin/harec"))
(qbe-binary (search-input-file inputs "/bin/qbe")))
(substitute* "./src/haredo.ha"
(("(\"HAREC\", \"harec\")")
(format #f "(\"HAREC\", \"~a\")" harec-binary))
(("(\"QBE\", \"qbe\")")
(format #f "(\"QBE\", \"~a\")" qbe-binary))))))
(replace 'build
(lambda _ (invoke "./bootstrap.sh")))
(replace 'install
(lambda _ (invoke "./bootstrap.sh" "install"))))))
(home-page "https://sr.ht/~autumnull/haredo/")
(synopsis "Build automator, alternative to @command{make} and @command{redo}")
(description "@command{haredo} is a build automator.
It is an alternative to e.g. @command{make(1)} and @command{redo(1)}. Features:
@itemize
@item Script syntax is plain shell script,
@item Only one command with few extraneous rules,
@item .do files are short and modular like in redo,
@item Builds its dependency tree on the fly, uses no database,
@item Doesn't break the build state when interrupted.
@end itemize
")
(license license:wtfpl2)))
+3 -25
View File
@@ -194,28 +194,6 @@ algorithms library for calendar dates and durations. It also provides the
(home-page "https://howardhinnant.github.io/date/date.html")
(license license:expat)))
(define-public ddate
(package
(name "ddate")
(version "0.2.2")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/bo0ts/ddate")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1qchxnxvghbma6gp1g78wnjxsri0b72ha9axyk31cplssl7yn73f"))))
(build-system cmake-build-system)
(arguments '(#:tests? #f)) ; no tests
(home-page "https://github.com/bo0ts/ddate")
(synopsis "Convert Gregorian dates to Discordian dates")
(description
"ddate displays the Discordian date and holidays of a given date.
The Discordian calendar was made popular by the \"Illuminatus!\" trilogy
by Robert Shea and Robert Anton Wilson.")
(license license:public-domain)))
(define-public libical
(package
(name "libical")
@@ -297,6 +275,7 @@ data units.")
(string-append #$output "/share/man/man1")))))))
(native-inputs
(list python-freezegun
python-importlib-metadata
python-packaging
python-pytest
python-setuptools
@@ -330,7 +309,7 @@ command-line interface} and a @acronym{TUI, textual user interface} named
(define-public remind
(package
(name "remind")
(version "6.02.01")
(version "6.0.1")
(source
(origin
(method url-fetch)
@@ -341,8 +320,7 @@ command-line interface} and a @acronym{TUI, textual user interface} named
".")
".tar.gz"))
(sha256
(base32 "1hp24d48nhlv6f7p6sj4qnqc9pyfgyhjah8w9426bzkqkqb31j9c"))
(patches (search-patches "tkremind-fix-fontchooser.patch"))))
(base32 "01zhs8lgncpm1229s7b49fhnwwnxyyan845gb47ppkfn03vvc187"))))
(properties
`((output-synopsis "tcl" "graphical front-end to Remind calendar program")))
(build-system gnu-build-system)
+1 -1
View File
@@ -30,7 +30,7 @@
#:use-module (gnu packages base)
#:use-module (gnu packages compression)
#:use-module (gnu packages perl)
#:use-module (gnu packages ruby-xyz))
#:use-module (gnu packages ruby-check))
(define-public ccache
(package
+296 -275
View File
@@ -36,7 +36,7 @@
;;; Copyright © 2020 Josh Marshall <joshua.r.marshall.1991@gmail.com>
;;; Copyright © 2020 Vinicius Monego <monego@posteo.net>
;;; Copyright © 2020 Tanguy Le Carrour <tanguy@bioneland.org>
;;; Copyright © 2020-2026 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2020-2025 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2021 Hugo Lecomte <hugo.lecomte@inria.fr>
;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be>
;;; Copyright © 2022, 2023 David Elsing <david.elsing@posteo.net>
@@ -133,54 +133,47 @@
#:use-module (guix build-system pyproject)
#:use-module (guix build-system python)
#:use-module (guix build-system trivial)
#:use-module (guix deprecation)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1))
(define-public atf
(package
(name "atf")
(version "0.23")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/freebsd/atf")
(commit (string-append name "-" version))))
(file-name (git-file-name name version))
(sha256
(base32
"12hcvclzphgkhmp226abhn9nl2j5vcm7nfnqbs8232ws41x1gmw3"))))
(version "0.21")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/freebsd/atf")
(commit (string-append name "-" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0jwzz6g9jdi5f8v10y0wf3hq73vxyv5qqhkh832ddsj36gn8rlcz"))
(patches (search-patches "atf-execute-with-shell.patch"))))
(build-system gnu-build-system)
(arguments
(list
#:configure-flags
#~(list (string-append "ATF_SHELL="
#$(this-package-input "bash-minimal")
"/bin/sh"))))
(native-inputs
(list autoconf
automake
libtool))
(inputs
(list bash-minimal))
(list #:configure-flags
#~(list (string-append "ATF_SHELL="
#$(this-package-input "bash-minimal")
"/bin/sh"))))
(native-inputs (list autoconf automake libtool))
(inputs (list bash-minimal))
(home-page "https://github.com/freebsd/atf")
(synopsis "C/C++ Automated Testing Framework libraries")
(description
"@acronym{ATF, Automated Testing Framework}, is a collection of libraries
to write test programs in C, C++ and POSIX shell.
(description "ATF, or Automated Testing Framework, is a collection of
libraries to write test programs in C, C++ and POSIX shell.
The ATF libraries offer a simple API orthogonal through the various bindings,
allowing developers to quickly learn how to write test programs in different
languages.
The ATF libraries offer a simple API. The API is orthogonal through the
various bindings, allowing developers to quickly learn how to write test
programs in different languages.
ATF-based test programs offer a consistent end-user command-line interface,
allowing execution to both humans and automation.
ATF-based test programs offer a consistent end-user command-line interface to
allow both humans and automation to run the tests.
ATF-based test programs rely on a third-party execution engine to be run,
shipped separatedly. @command{Kyua} is the engine of choice.")
(license
(list license:bsd-2
license:bsd-3))))
ATF-based test programs rely on an execution engine to be run and this
execution engine is not shipped with ATF. Kyua is the engine of choice.")
(license (list license:bsd-2 license:bsd-3))))
(define-public pict
(package
@@ -322,10 +315,6 @@ like Jasmine or Mocha.")
(sha256
(base32
"04qg1p9afdd6453k18qskazrvscysdcjz9j6w4i6p5x4xyma19v6")))))))
(arguments
;; FIXME: The tests hang on the 64bit Hurd.
(list #:tests? (and (not (%current-target-system))
(not (system-hurd64?)))))
(build-system gnu-build-system)
(home-page "https://libcheck.github.io/check/")
(synopsis "Unit test framework for C")
@@ -533,25 +522,6 @@ unit testing. Test output is in XML for automatic testing and GUI based for
supervised tests.")
(license license:lgpl2.1))) ; no copyright notices. LGPL2.1 is in the tarball
(define-public python-pytest-pretty
(package
(name "python-pytest-pretty")
(version "1.3.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest_pretty" version))
(sha256
(base32 "1wrvqhn0r5vpa1xhj61lywms87hc9a6hgnvqmr03w00gwhdr5scp"))))
(build-system pyproject-build-system)
(propagated-inputs (list python-pytest python-rich))
(native-inputs (list python-hatchling))
(home-page "https://github.com/samuelcolvin/pytest-pretty")
(synopsis "Pytest plugin to customize summary output")
(description "@code{pytest-pretty} is a Pytest plugin for customizing the
appearance of the printed summary data.")
(license license:expat)))
(define-public shunit2
(package
(name "shunit2")
@@ -1000,19 +970,6 @@ supports a very flexible form of test discovery.")
has been designed to be fast, light and unintrusive.")
(license license:expat)))
(define-public doctest-next
(package
(inherit doctest)
(version "2.4.12")
(source (origin
(method git-fetch)
(uri (git-reference (url (package-home-page doctest))
(commit (string-append "v" version))))
(file-name (git-file-name (package-name doctest) version))
(sha256
(base32
"1bwywljm4lzgwl5mig0h4621z7lx3xz0lzhwq9ys71lxdh8ka6qp"))))))
(define-public ftest
;; There aren't any releases and it looks more like a small side project.
;; It is included for completeness to run tests for package utfcpp.
@@ -1054,16 +1011,15 @@ has been designed to be fast, light and unintrusive.")
(package
(name "kyua")
(version "0.14.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/freebsd/kyua")
(commit (string-append name "-" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0w238ynhnjz7p2v8fbgxv35kl1x7a4vs86227qhb4gxncr75nsbl"))))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/freebsd/kyua")
(commit (string-append name "-" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0w238ynhnjz7p2v8fbgxv35kl1x7a4vs86227qhb4gxncr75nsbl"))))
(build-system gnu-build-system)
(arguments
(list
@@ -1097,30 +1053,15 @@ has been designed to be fast, light and unintrusive.")
(substitute* "utils/Kyuafile"
((".*atf_test_program.*stacktrace_test.*")
"")))))))
(native-inputs
(list autoconf
automake
gdb-minimal
libtool
pkg-config))
(inputs
(list atf
lutok
sqlite))
(native-inputs (list autoconf automake gdb-minimal libtool pkg-config))
(inputs (list atf lutok sqlite))
(home-page "https://github.com/freebsd/kyua")
(synopsis "Testing framework for infrastructure software")
(description
"Kyua is a lightweight and simple testing framework for infrastructure
software., integrating well with various build systems and continuous
integration frameworks.
Kyua features an expressive test suite definition language, a safe runtime
engine for test suites and a powerful report generation engine.
Kyua is able to execute test programs written with a plethora of testing
libraries and languages. The library of choice is @code{atf}, for which Kyua
was originally designed, but simple, framework-less and @acronym{TAP, Test
Anything Protocol} compliant programs can also be executed through Kyua.")
(description "Kyua is a testing framework for infrastructure software.
Kyua is lightweight and simple, and integrates well with various build systems
and continuous integration frameworks. Kyua features an expressive test suite
definition language, a safe runtime engine for test suites and a powerful
report generation engine.")
(license license:bsd-3)))
(define-public googletest
@@ -1355,7 +1296,7 @@ with the @code{klee} package.")
(define-public klee
(package
(name "klee")
(version "3.2")
(version "3.1")
(source
(origin
(method git-fetch)
@@ -1364,7 +1305,7 @@ with the @code{klee} package.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0rvvdbv0c6b2jhsdxhzcbm0smzndd4ibsg1bxwjw0mwkpk21yfph"))))
(base32 "1nma6dqi8chjb97llsa8mzyskgsg4dx56lm8j514j5wmr8vkafz6"))))
(arguments
(list
#:strip-directories #~(list "bin") ;don't strip LLVM bitcode in /lib
@@ -1415,7 +1356,7 @@ with the @code{klee} package.")
(string-append "-DKLEE_UCLIBC_PATH="
(search-input-file %build-inputs "/lib/klee/libc.a"))
"-DENABLE_POSIX_RUNTIME=ON")))
(native-inputs (list clang-16 llvm-16 python-lit))
(native-inputs (list clang-13 llvm-13 python-lit))
(inputs (list bash-minimal klee-uclibc gperftools sqlite z3 python python-tabulate))
(build-system cmake-build-system)
(supported-systems '("x86_64-linux"))
@@ -1582,6 +1523,31 @@ have been used. This library is now part of Python (since Python 3.3),
available via the @code{unittest.mock} module.")
(license license:expat)))
;;; This package is unmaintained (see the note at the top of doc/index.rst).
(define-public python-nose
(package
(name "python-nose")
(version "1.3.7")
(source
(origin
(method url-fetch)
(uri (pypi-uri "nose" version))
(sha256
(base32
"164a43k7k2wsqqk1s6vavcdamvss4mz0vd6pwzv2h9n8rgwzxgzi"))))
(build-system python-build-system)
(arguments
'(#:tests? #f
#:phases (modify-phases %standard-phases
(add-after 'unpack 'invoke-2to3
(lambda _
(invoke "2to3" "-w" "."))))))
(home-page "https://readthedocs.org/docs/nose/")
(synopsis "Python testing library")
(description
"Nose extends the unittest library to make testing easier.")
(license license:lgpl2.0+)))
(define-public python-nose2
(package
(name "python-nose2")
@@ -1617,30 +1583,23 @@ interfaces and processes.")
(define-public python-pytest
(package
(name "python-pytest")
;; Keep in sync with python-pytest-bootstrap in (gnu packages python-build)
(version "9.0.2")
(version "8.4.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest" version))
(sha256
(base32 "04fz1vbhb2l6k8lmrk8wqhkxhprlnkq21z6rs48rdn1bm58nc63m"))))
(base32 "0g593wjl45yck5g1xi8q31s08arxiapw67ipv6g3axs82xlzsrvw"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 3933 passed, 115 skipped, 2 deselected, 11 xfailed, 1 xpassed
#:test-flags
;; Just 2 tests fail:
;; 1. access to "/usr/" is required.
;; 2. assertion fails to compare length of the list.
#~(map (lambda (ls)
(string-append "--deselect=" (string-join ls "::")))
'(("testing/test_argcomplete.py"
"TestArgComplete"
"test_remove_dir_prefix")
("testing/test_assertrewrite.py"
"TestAssertionRewrite"
"test_len")))))
;;
;; 3780 passed, 119 skipped, 3 deselected, 11 xfailed, 1 xpassed
#~(list "-k" "not test_remove_dir_prefix and not test_len")))
(native-inputs
;; Tests need the "regular" bash since 'bash-final' lacks `compgen`.
(list bash
@@ -1648,12 +1607,13 @@ interfaces and processes.")
python-hypothesis
python-setuptools
python-setuptools-scm
python-xmlschema))
python-xmlschema
python-wheel))
(propagated-inputs
(list python-iniconfig
python-packaging-bootstrap
python-pluggy
python-pygments-bootstrap)) ;it is in installation dependencies
python-pygments-bootstrap)) ;it is in installation dependencies
(home-page "https://docs.pytest.org/en/latest/")
(synopsis "Python testing library")
(description
@@ -1662,17 +1622,19 @@ and functions, detailed info on failing assert statements, modular fixtures,
and many external plugins.")
(license license:expat)))
;; It's the last 8.X.X version, released on 2025-09-04.
(define-public python-pytest-8
(package
(inherit python-pytest)
(version "8.4.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest" version))
(sha256
(base32 "008fqfrxvg8s6pgnkffl2day4zzjg54dp932ipan3f866fwx1h46"))))))
(define-deprecated python-pytest-6 python-pytest)
(export python-pytest-6)
(define-deprecated python-pytest-7 python-pytest)
(export python-pytest-7)
(define-public python-pytest-bootstrap
(package/inherit python-pytest
(name "python-pytest-bootstrap")
(arguments (list #:tests? #f))
(native-inputs
(list python-setuptools
python-setuptools-scm))))
(define-public python-pytest-cov
(package
@@ -2010,24 +1972,24 @@ pytest-lazy-fixture}.")
(define-public python-pytest-mock
(package
(name "python-pytest-mock")
(version "3.15.1")
(version "3.14.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest_mock" version))
(uri (pypi-uri "pytest-mock" version))
(sha256
(base32 "03vsv2q11b6yhs33m9vg852an50qrdrdws92fqcxm5pkyqwa4j8q"))))
(base32 "1l0b864arbzrq13z635l1x9ial0w7pgz6svd0nyavkpy3rd2a697"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 85 passed, 5 skipped, 3 warnings
;; Skip the assertion rewriting tests, which don't work in the presence
;; of read-only Python modules (a limitation of Pytest).
#:test-flags #~(list "--assert=plain")))
(native-inputs
(list python-pytest-asyncio
python-setuptools
python-setuptools-scm))
python-setuptools-scm
python-wheel))
(propagated-inputs
(list python-pytest))
(home-page "https://github.com/pytest-dev/pytest-mock/")
@@ -2054,35 +2016,22 @@ same arguments.")
(build-system pyproject-build-system)
(arguments
(list
;; tests: 193 passed, 6 skipped, 3 deselected, 10 xfailed
#:test-flags
;; See: <https://github.com/pytest-dev/pytest-xdist/issues/1295>.
#~(list #$@(map (lambda (ls)
(string-append "--deselect=testing/"
(string-join ls "::")))
;; execnet.gateway_base.RemoteError: Traceback (most
;; recent call last):
'(("test_looponfail.py"
"TestRemoteControl"
"test_ignore_sys_path_hook_entry")
;; Failed: matched: '*HOOK: pytest_handlecrashitem'
("test_newhooks.py"
"TestCrashItem"
"test_handlecrashitem_one")
;; Failed: nomatch: '*usage: *
("test_remote.py"
"test_remote_usage_prog"))))))
;; Failes with execnet.gateway_base.RemoteError: Traceback (most recent
;; call last).
#~(list "-k" "not test_ignore_sys_path_hook_entry")))
(native-inputs
(list python-filelock
python-pytest
python-setuptools
python-setuptools-scm))
python-setuptools-scm
python-wheel))
(propagated-inputs
(list python-execnet))
(home-page "https://github.com/pytest-dev/pytest-xdist")
(synopsis "Pytest plugin for distributed testing and loop-on-failures testing modes")
(synopsis "Plugin for py.test with distributed testing and loop-on-failing modes")
(description
"The pytest-xdist plugin extends pytest with some unique test execution
"The pytest-xdist plugin extends py.test with some unique test execution
modes: parallelization, running tests in boxed subprocesses, the ability to
run tests repeatedly when failed, and the ability to run tests on multiple
Python interpreters or platforms. It uses rsync to copy the existing program
@@ -2092,19 +2041,19 @@ code to a remote location, executes there, and then syncs the result back.")
(define-public python-pytest-timeout
(package
(name "python-pytest-timeout")
(version "2.4.0")
(version "2.3.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest_timeout" version))
(uri (pypi-uri "pytest-timeout" version))
(sha256
(base32
"02jls37lng0qfqc70dm8wg25yjbmbkw02l5j689zgvzr045yjs3y"))))
"1nb5a6xf2p9zbcasy8136nbxpm1raag5n0q1rbdcnvjw28lpff8j"))))
(build-system pyproject-build-system)
;; tests: 41 passed, 2 skipped, 4 xfailed
(native-inputs
(list python-pexpect
python-setuptools))
python-setuptools
python-wheel))
(propagated-inputs
(list python-pytest))
(home-page "https://github.com/pytest-dev/pytest-timeout")
@@ -2131,7 +2080,15 @@ timeout has been exceeded.")
(build-system pyproject-build-system)
(arguments
;; See <https://github.com/pytest-dev/pytest-forked/issues/88>.
(list #:tests? #f))
(list #:tests? #f
#:phases
#~(modify-phases %standard-phases
(add-before 'build 'pretend-version
;; The version string is usually derived via setuptools-scm,
;; but without the git metadata available, the version string
;; is set to '0.0.0'.
(lambda _
(setenv "SETUPTOOLS_SCM_PRETEND_VERSION" #$version))))))
(native-inputs
;; XXX: The bootstrap variant of Pytest is used to ensure the
;; 'hypothesis' plugin is not in the environment (due to
@@ -2409,20 +2366,17 @@ since the last commit or what tests are currently failing.")
(define-public python-coverage
(package
(name "python-coverage")
(version "7.13.2")
(version "7.11.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/coveragepy/coveragepy")
(commit version)))
(file-name (git-file-name name version))
(method url-fetch)
(uri (pypi-uri "coverage" version))
(sha256
(base32 "1vf1qa2cndkrr0l6yc84frfmabr96vkly9nsw0n0cgxf10n1k23m"))))
(base32 "0l403f6d59q8rik9vvzb6982qad0zrfj87dqydzsz8hwmh2dayqn"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 1348 passed, 27 skipped
;; tests: 1303 passed, 23 skipped
#:test-flags
#~(list "--numprocesses" (number->string (min 8 (parallel-job-count)))
#$@(map (lambda (file) (string-append "--ignore=tests/" file))
@@ -2447,13 +2401,12 @@ since the last commit or what tests are currently failing.")
#$@(map (lambda (test) (string-append "--deselect=tests/test_"
test))
;; AssertionError
(list "api.py::ReportIncludeOmitTest"
"api.py::XmlIncludeOmitTest"
"api.py::RelativePathTest::test_files_up_one_level"
(list "api.py::RelativePathTest::test_files_up_one_level"
"concurrency.py::SigtermTest::\
test_sigterm_multiprocessing_saves_data"
"oddball.py::DoctestTest::test_doctest"
"oddball.py::MockingProtectionTest"
"oddball.py::MockingProtectionTest::\
test_os_path_exists"
"plugins.py::PluginTest::\
test_local_files_are_importable"
"regions.py::test_real_code_regions"
@@ -2511,33 +2464,28 @@ executed.")
(define-public python-pytest-asyncio
(package
(name "python-pytest-asyncio")
(version "1.3.0")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/pytest-dev/pytest-asyncio")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(method url-fetch)
(uri (pypi-uri "pytest_asyncio" version))
(sha256
(base32 "02ibw934ppy66vkjc9ihwc5zp66pbzcsqg0irf7gnxpi9ck8qqii"))))
(base32 "0gwbqikldfy5yvyzhi71h7vicni2dchj0iarsbmf2mj47z8n6m6i"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 233 passed, 7 deselected
#:test-flags
;; 4 failed, 163 passed
#~(list "-k" (string-join
;; XXX: Not clear why these tests fail:
(list "not test_event_loop_fixture_asyncgen_error"
"test_event_loop_fixture_handles_unclosed_async_gen"
(string-append "test_standalone_test_does_not_"
"trigger_warning_about_no_current_"
"event_loop_being_set")
"test_warns_when_scope_argument_is_present")
(list "not test_strict_mode_ignores_unmarked_coroutine"
"test_strict_mode_ignores_unmarked_fixture"
"test_strict_mode_marked_test_unmarked_fixture_warning"
"test_strict_mode_marked_test_unmarked_autouse_fixture_warning")
" and not "))))
(native-inputs
(list python-setuptools
python-setuptools-scm))
python-setuptools-scm
python-wheel))
(propagated-inputs
(list python-pytest
python-typing-extensions))
@@ -2549,8 +2497,17 @@ testing tools. @code{pytest-asyncio} provides useful fixtures and markers
to make testing async code easier.")
(license license:asl2.0)))
;; It's the last 0.26.X version which is still required and has breaking
;; changes with 1.X.X.
(define-public python-pytest-asyncio-0.23
(package
(inherit python-pytest-asyncio)
(version "0.23.8")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest_asyncio" version))
(sha256
(base32 "1lz4h8y6m6hxnsl7kqh0rjxqp5q2wc2m5gd88371rikd7ari16vm"))))))
(define-public python-pytest-asyncio-0.26
(package
(inherit python-pytest-asyncio)
@@ -2560,25 +2517,24 @@ to make testing async code easier.")
(method url-fetch)
(uri (pypi-uri "pytest_asyncio" version))
(sha256
(base32 "0bri1scs8whdrxb3jrv0ywiz20qb0mrll3kzkvriy928frljmpy4"))))
(arguments
(list
;; tests: 202 passed, 4 deselected
#:test-flags
#~(list "-k" (string-join
(list "not test_strict_mode_ignores_unmarked_coroutine"
"test_strict_mode_ignores_unmarked_fixture"
"test_strict_mode_marked_test_unmarked_fixture_warning"
"test_strict_mode_marked_test_unmarked_autouse_fixture_warning")
" and not "))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'relax-requirements
(lambda _
(substitute* "pyproject.toml"
;; Pytest is in propagated inputs, remove higher boundary to
;; avoid propagation of python-pytest-8.
((">=8.2,<9") ">=8.2")))))))))
(base32 "0bri1scs8whdrxb3jrv0ywiz20qb0mrll3kzkvriy928frljmpy4"))))))
(define-public python-pytest-asyncio-0.21
(package
(inherit python-pytest-asyncio)
(version "0.21.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest_asyncio" version))
(sha256
(base32 "0iag2lmglfajiasxi3dr2110gq0nxc5paq6hp4kb751b4gy3hxyn"))))
(native-inputs
(list python-flaky
python-pytest-trio
python-setuptools-scm
python-setuptools
python-wheel))))
(define-public python-codecov
(package
@@ -2606,6 +2562,32 @@ to make testing async code easier.")
C/C++, R, and more, and uploads it to the @code{codecov.io} service.")
(license license:asl2.0)))
(define-public python-testpath
(package
(name "python-testpath")
(version "0.6.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/jupyter/testpath")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"0pib1xsvjwwyyhv0sqzxvgg814k83dmv1ppwfkkq9llkhr8k7s9y"))))
(build-system pyproject-build-system)
(native-inputs
(list python-flit-core
python-pytest))
(home-page "https://github.com/jupyter/testpath")
(synopsis "Test utilities for code working with files and commands")
(description
"Testpath is a collection of utilities for Python code working with files
and commands. It contains functions to check things on the file system, and
tools for mocking system commands and recording calls to those.")
(license license:expat)))
(define-public python-pytest-localserver
(package
(name "python-pytest-localserver")
@@ -2669,82 +2651,48 @@ across test runs.")
(define-public python-pytest-sugar
(package
(name "python-pytest-sugar")
(properties '((commit . "4b1cd8d03060072db3737983ace80f416534a2c4")
(revision . "0")))
(version (git-version "1.1.1"
(assoc-ref properties 'revision)
(assoc-ref properties 'commit)))
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Teemu/pytest-sugar")
(commit (assoc-ref properties 'commit))))
(file-name (git-file-name name version))
(method url-fetch)
(uri (pypi-uri "pytest-sugar" version))
(sha256
(base32 "1smaxs7qabdfsvr9rvyyfp1d93j8vm0ghqwk4cskc9bnfhbhdn7d"))))
(base32 "02kc4y0ry4y9lp63kjq9p7yvbjijfxn1fcn6wx6c1c7mb0rfh8k4"))))
(build-system pyproject-build-system)
(propagated-inputs (list python-pytest python-termcolor))
(native-inputs (list python-setuptools))
(home-page "https://github.com/Teemu/pytest-sugar")
(propagated-inputs
(list python-packaging python-pytest python-termcolor))
(native-inputs
(list python-setuptools python-wheel))
(home-page "https://pivotfinland.com/pytest-sugar/")
(synopsis "Plugin for pytest that changes the default look and feel")
(description
"@code{pytest-sugar} is a plugin for py.test that changes the default
look and feel of @code{python-pytest}, using a progress bar and showing
failures and errors instantly.")
look and feel of py.test, using a progress bar and showing failures and errors
instantly.")
(license license:bsd-3)))
(define-public python-hypothesis
(package
(name "python-hypothesis")
(version "6.150.2")
(version "6.135.26")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/HypothesisWorks/hypothesis")
(commit (string-append "hypothesis-python-" version))))
(file-name (git-file-name name version))
(method url-fetch)
(uri (pypi-uri "hypothesis" version))
(sha256
(base32 "0c8mrgvyhvgrkfzxi953hmz9h6jgbdr752rcm9x87mqfxg3vzvp6"))))
(base32 "0073lb8xp789fxs5g8dmi3pr2p8q7imfsksidy0ccfahrm30xbvk"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 3528 passed, 13 skipped, 15 deselected, 3 xfailed, 1 xpassed
#:test-flags
;; Run slim portion of tests, see more test scenarios in
;; <hypothesis-python/tests/README.rst>.
#~(list "tests/cover"
"-k"
(string-join
;; ModuleNotFoundError: No module named 'pexpect'
(list "not test_interactive_example_does_not_emit_warning"
;; Network access is required or setting up local
;; timezone.
"test_can_generate_from_all_registered_types[ZoneInfo]"
"test_disallowed_inputs_to_target"
"test_generic_collections_only_use_hashable_elements[Dict]"
"test_generic_collections_only_use_hashable_elements[FrozenSet]"
"test_generic_collections_only_use_hashable_elements[Set]"
"test_generic_collections_only_use_hashable_elements[dict]"
"test_generic_collections_only_use_hashable_elements[set]"
"test_hashable_type_unhashable_value"
"test_inference_on_generic_collections_abc_aliases[Hashable]"
"test_is_not_identity"
"test_resolves_builtin_types[object]"
"test_resolves_forwardrefs_to_builtin_types[object]"
"test_timezone_lookup[tzinfo]")
" and not "))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'chdir-to-source
(lambda _
(chdir "hypothesis-python"))))))
;; XXX: Tests are not distributed with the PyPI archive.
(list #:tests? #f))
(native-inputs
(list python-pytest-bootstrap
python-setuptools))
(list python-pytest-bootstrap ;to pass sanity check
python-setuptools
python-wheel))
(propagated-inputs
(list python-sortedcontainers))
(list python-attrs-bootstrap
python-exceptiongroup
python-sortedcontainers))
(home-page "https://hypothesis.works/")
(synopsis "Library for property based testing")
(description "Hypothesis is a library for testing your Python code against a
@@ -2753,6 +2701,9 @@ based on the Haskell library, Quickcheck, and is designed to integrate
seamlessly into your existing Python unit testing work flow.")
(license license:mpl2.0)))
(define-deprecated/public-alias python-hypothesis-next
python-hypothesis) ;may be removed after 2025-12-01
;; WARNING: This package is a dependency of mesa.
(define-public python-lit
(package
@@ -2920,6 +2871,26 @@ a Pytest test execution.")
mypy plugins.")
(license license:expat)))
(define-public python-pytest-mypy-testing
(package
(name "python-pytest-mypy-testing")
(version "0.1.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pytest-mypy-testing" version))
(sha256
(base32 "0kqb3hi4jrc4knhc9pxv44m7c1jjkkwqx0dyghq4mw6wphlsv3q8"))))
(build-system pyproject-build-system)
(native-inputs (list python-flit-core))
(propagated-inputs (list python-mypy python-pytest))
(home-page "https://github.com/davidfritzsche/pytest-mypy-testing")
(synopsis "Pytest plugin to check mypy output")
(description "This package provides a pytest plugin to test that mypy
produces a given output. As mypy can be told to display the type of an
expression this allows you to check mypys type interference.")
(license (list license:expat license:asl2.0))))
(define-public python-pytest-perf
(package
(name "python-pytest-perf")
@@ -2992,7 +2963,7 @@ each of the environments.")
#:test-flags
'(list "-k" "not test_syntax_error")))
(native-inputs
(list python-pytest python-setuptools python-wheel))
(list python-coverage python-pytest python-setuptools python-wheel))
(propagated-inputs
(list python-pyflakes))
(home-page "https://github.com/fschulze/pytest-flakes")
@@ -3000,6 +2971,36 @@ each of the environments.")
(description "Pytest plugin for checking Python source code with pyflakes.")
(license license:expat)))
(define-public python-coverage-test-runner
(package
(name "python-coverage-test-runner")
(version "1.15")
(source
(origin
(method url-fetch)
(uri (string-append
"http://git.liw.fi/cgi-bin/cgit/cgit.cgi/"
"coverage-test-runner/snapshot/coverage-test-runner-"
version ".tar.gz"))
(sha256
(base32
"1kjjb9llckycnfxag8zcvqsn4z1s3dwyw6b1n0avxydihgf30rny"))))
(build-system python-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(replace 'check
(lambda _
(invoke "./testrun"))))))
(propagated-inputs
(list python-coverage))
(home-page "https://liw.fi/coverage-test-runner/")
(synopsis "Python module for running unit tests")
(description "@code{CoverageTestRunner} is a python module for running
unit tests and failing them if the unit test module does not exercise all
statements in the module it tests.")
(license license:gpl3+)))
(define-public python-pylint
(package
(name "python-pylint")
@@ -3058,6 +3059,26 @@ pragmas to control it from within your code. Additionally, it is
possible to write plugins to add your own checks.")
(license license:gpl2+)))
(define-public python-discover
(package
(name "python-discover")
(version "0.4.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "discover" version))
(sha256
(base32
"0y8d0zwiqar51kxj8lzmkvwc3b8kazb04gk5zcb4nzg5k68zmhq5"))))
(build-system python-build-system)
(home-page "https://pypi.org/project/discover/")
(synopsis
"Python test discovery for unittest")
(description
"Discover provides test discovery for unittest, a feature that has been
backported from Python 2.7 for Python 2.4+.")
(license license:bsd-3)))
(define-public behave
(package
(name "behave")
@@ -3449,13 +3470,13 @@ with a focus on working with embedded toolchains.")
(("\"date\"")
(format #f "~s" (search-input-file inputs "bin/date"))))))
#$@(if (target-32bit?)
#$@(if (target-64bit?)
#~()
#~((add-after 'unpack 'apply-32bit-patch
(lambda _
(let ((patch #$(local-file
(search-patch "libfaketime-32bit.patch"))))
(invoke "patch" "--force" "-p1" "-i" patch)))))
#~())
(invoke "patch" "--force" "-p1" "-i" patch))))))
(replace 'configure
(lambda* (#:key outputs #:allow-other-keys)
@@ -3545,7 +3566,7 @@ pre-condition.")
(define-public umockdev
(package
(name "umockdev")
(version "0.19.1")
(version "0.17.13")
(source (origin
(method url-fetch)
(uri (string-append "https://github.com/martinpitt/umockdev/"
@@ -3553,7 +3574,7 @@ pre-condition.")
"umockdev-" version ".tar.xz"))
(sha256
(base32
"09plskc0rqwngqssbn2nr8da4zwzkhwg6x5yf109pf36wglf1v1c"))))
"1kqkraag5v1jl5qfv0mb3ckm8yq2im21mng08sbs9dh9c9pbyvkc"))))
(build-system meson-build-system)
(arguments
(list #:phases
+8 -10
View File
@@ -100,7 +100,7 @@
mmtf-cpp
googletest
pkg-config
pybind11-2))
pybind11))
(inputs
`(("glew" ,glew)
("libarchive" ,libarchive)
@@ -1062,6 +1062,7 @@ integrals for Gaussian type functions.")
(string-append "-DPYTHON_INSTALL_DIR="
(site-packages %build-inputs %outputs)))
#:phases
(with-extensions (list (pyproject-guile-json))
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-includes
(lambda _
@@ -1100,7 +1101,7 @@ integrals for Gaussian type functions.")
(with-directory-excursion "../source"
(setenv "PYTHONPATH" "../build/py")
(invoke "python3" "-m" "unittest" "discover" "-v"
"-s" "tests"))))))))
"-s" "tests")))))))))
(inputs (list python zlib))
(native-inputs
(list fast-float
@@ -1470,6 +1471,7 @@ and rendering molecules.")
(guix build utils)
((guix build pyproject-build-system) #:prefix py:))
#:phases
(with-extensions (list (pyproject-guile-json))
#~(modify-phases %standard-phases
(add-before 'configure 'patch-cmake
(lambda _
@@ -1512,14 +1514,9 @@ and rendering molecules.")
(add-after 'install 'check
(assoc-ref %standard-phases 'check))
(add-before 'check 'add-install-to-pythonpath
(assoc-ref py:%standard-phases 'add-install-to-pythonpath)))))
(assoc-ref py:%standard-phases 'add-install-to-pythonpath))))))
(inputs (list python))
(native-inputs
(list doxygen
python
python-cython-0
python-sphinx
python-setuptools))
(native-inputs (list doxygen python python-cython-0 python-sphinx))
(home-page "https://github.com/rareylab/RingDecomposerLib")
(synopsis "Calculate ring topology descriptions")
(description "RingDecomposerLib is a library for the calculation of
@@ -1635,6 +1632,7 @@ Tanimoto scoring.")
"-DCMAKE_INCLUDE_PATH="
(search-input-directory %build-inputs "/include/avalontoolkit")))
#:phases
(with-extensions (list (pyproject-guile-json))
#~(modify-phases %standard-phases
(add-after 'unpack 'copy-external-dependencies
(lambda _
@@ -1694,7 +1692,7 @@ Tanimoto scoring.")
;; Circular import
"pythonSourceTests"
) "|")
")")))))))))
")"))))))))))
(inputs
(list avalon-toolkit
cairo
+2 -2
View File
@@ -1390,7 +1390,7 @@ libraries providing most of the functionality of the original.")
(define-public schemesh
(package
(name "schemesh")
(version "0.9.3")
(version "0.9.2")
(source
(origin
(method git-fetch)
@@ -1398,7 +1398,7 @@ libraries providing most of the functionality of the original.")
(url "https://github.com/cosmos72/schemesh")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256 (base32 "1dki6qa2ws5gjqnmp8ldl4g2lg739i1r0cqflwavlyipb1f2j51s"))))
(sha256 (base32 "0rnd2mz3vnsxdac5q7i625mkmfc1znp865wxdqqx1c6dqb26bqrv"))))
(build-system gnu-build-system)
(arguments
(list #:tests? #f
+1 -17
View File
@@ -8,7 +8,7 @@
;;; Copyright © 2022, 2024 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2023 David Pflug <david@pflug.io>
;;; Copyright © 2025 David Thompson <davet@gnu.org>
;;; Copyright © 2025-2026 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2025 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -93,7 +93,6 @@
(srfi srfi-1))
#:configure-flags #~'("--localstatedir=/var" ;for /var/log/cuirass
"--sysconfdir=/etc") ;for /etc/cuirass/forge-tokens
;; XXX: HTTP tests fail on aarch64 due to Fibers errors, disable them
;; on that architecture for now.
#:tests? (let ((s (or (%current-target-system)
@@ -102,21 +101,6 @@
#:parallel-tests? #f
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'skip-known-failing-tests
(lambda _
;; Skip tests that fail with SRFI-64 as found in Guile
;; 3.0.11. Remove this phase when
;; <https://codeberg.org/guix/cuirass/pulls/125> is merged.
(substitute* "tests/database.scm"
(("\\(test-equal \"db-update-specification, \
missing spec\"" all)
(string-append "(test-skip 1)\n" all)))
(substitute* "tests/forgejo.scm"
(("\\(test-equal \"forgejo-handle-notification\"" all)
(string-append "(test-skip 1)\n" all)))
(substitute* "tests/remote.scm"
(("\\(test-group-with-cleanup")
"(test-group"))))
(add-after 'install 'wrap-program
(lambda* (#:key inputs outputs #:allow-other-keys)
;; Wrap the 'cuirass' command to refer to the right modules.
+2 -1
View File
@@ -82,6 +82,7 @@
"-Dpy-overrides-dir="
(py:site-packages %build-inputs %outputs) "/gi/overrides"))
#:phases
(with-extensions (list (pyproject-guile-json))
#~(modify-phases %standard-phases
(add-before 'configure 'set-gtk-module-path
(lambda* (#:key inputs outputs #:allow-other-keys)
@@ -101,7 +102,7 @@
(string-quote (string-append #$output "/bin/pastebin")))
(("'xdg-open'")
(string-quote (search-input-file inputs
"/bin/xdg-open")))))))))
"/bin/xdg-open"))))))))))
(inputs
(list dbus
glib ; for gio
+52 -89
View File
@@ -24,18 +24,17 @@
(define-module (gnu packages clojure)
#:use-module (gnu packages)
#:use-module (gnu packages base)
#:use-module (gnu packages guile)
#:use-module (gnu packages java)
#:use-module (gnu packages maven)
#:use-module (guix gexp)
#:use-module (gnu packages readline)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix build-system ant)
#:use-module (guix build-system copy)
#:use-module (guix build-system clojure))
#:use-module (guix build-system clojure)
#:use-module (ice-9 match))
(define-public clojure-spec-alpha
(package
@@ -274,6 +273,7 @@ and line numbers not only to lists, but also to symbols, vectors and maps.")
(base32
"072dv6s2gxcg8snlgkpjk6bp1cb17bgfshdq6ijsa4yslpqbf9wc")))))
(build-system ant-build-system)
(inputs (list icedtea))
(arguments
`(#:imported-modules ((guix build clojure-utils)
(guix build clojure-build-system)
@@ -391,61 +391,45 @@ designs.")
`(delete-file ,(string-append "clojure-tools-" version ".jar")))))
(build-system copy-build-system)
(arguments
(list #:install-plan #~'(("deps.edn" "lib/clojure/")
("example-deps.edn" "lib/clojure/")
("tools.edn" "lib/clojure/")
("exec.jar" "lib/clojure/libexec/")
("clojure" "bin/")
("clojure.1" "share/man/man1/")
("clj" "bin/")
("clj.1" "share/man/man1/"))
#:phases
#~(modify-phases %standard-phases
(add-before 'install 'fix-paths
(lambda _
(substitute* "clj"
(("BINDIR") (string-append #$output "/bin")))
(substitute* "clojure"
(("PREFIX") (string-append #$output "/lib/clojure")))))
(add-after 'fix-paths 'copy-tools-deps-alpha-jar
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "clojure"
(("\\$install_dir/libexec/clojure-tools-\\$version\\.jar")
(let* ((selected (assq-remove! inputs "openjdk"))
(input-dirs (map cdr selected))
(jars (apply append
(map (lambda (dir)
(find-files dir "\\.jar$"))
input-dirs))))
(string-join jars ":"))))))
(add-after 'install 'wrap-clojure
(lambda* (#:key inputs #:allow-other-keys)
(let ((coreutils (assoc-ref inputs "coreutils-minimal"))
(jdk (assoc-ref inputs "openjdk")))
(wrap-script (string-append #$output "/bin/clojure")
;; Ensure that coreutils and java are accessible.
`("PATH" suffix (,(string-append coreutils "/bin")
,(string-append jdk "/bin"))))))))))
(inputs (list clojure
`(#:install-plan
'(("deps.edn" "lib/clojure/")
("example-deps.edn" "lib/clojure/")
("tools.edn" "lib/clojure/")
("exec.jar" "lib/clojure/libexec/")
("clojure" "bin/")
("clj" "bin/"))
#:modules ((guix build copy-build-system)
(guix build utils)
(srfi srfi-1)
(ice-9 match))
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key outputs #:allow-other-keys)
(substitute* "clojure"
(("PREFIX") (string-append (assoc-ref outputs "out") "/lib/clojure")))
(substitute* "clj"
(("BINDIR") (string-append (assoc-ref outputs "out") "/bin"))
(("rlwrap") (which "rlwrap")))))
(add-after 'fix-paths 'copy-tools-deps-alpha-jar
(lambda* (#:key inputs outputs #:allow-other-keys)
(substitute* "clojure"
(("\\$install_dir/libexec/clojure-tools-\\$version\\.jar")
(string-join
(append-map (match-lambda
((label . dir)
(find-files dir "\\.jar$")))
inputs)
":"))))))))
(inputs (list rlwrap
clojure
clojure-tools-deps
coreutils-minimal
guile-3.0/pinned
java-commons-logging-minimal
java-slf4j-nop
;; Depend on JDK instead of JRE since common developer tools
;; such as cider-nrepl require it.
(list openjdk "jdk")))
java-slf4j-nop))
(home-page "https://clojure.org/releases/tools")
(synopsis "CLI tools for the Clojure programming language")
(description "This package provides the @command{clojure} and
@command{clj} command line tools that can be used to start a Clojure REPL,
launch a main or execute any Clojure function.
Dependencies declared in @file{deps.edn} files are resolved and downloaded
beforehand.
The @command{clj} executable is a readline wrapper around @command{clojure}
delegating to the @command{rlwrap} optional dependency.")
(description "The Clojure command line tools can be used to start a
Clojure repl, use Clojure and Java libraries, and start Clojure programs.")
(license license:epl1.0)))
(define-public clojure-algo-generic
@@ -769,32 +753,6 @@ Uses StAX internally
lazy - should allow parsing and emitting of large XML documents")
(license license:epl1.0)))
(define-public clojure-data-zip
(package
(name "clojure-data-zip")
(version "1.1.1")
(home-page "https://github.com/clojure/data.zip")
(source
(origin
(method git-fetch)
(uri (git-reference
(url home-page)
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0l13xs0jlv2cyh3rqdp1f5r0jsff9p1h7dh49112xxrkcvzck876"))))
(build-system clojure-build-system)
(arguments
'(#:source-dirs '("src/main/clojure")
#:test-dirs '("src/test/clojure")
#:doc-dirs '()))
(synopsis
"Clojure library for filtering trees, and XML trees in particular")
(description
"@code{data.zip} is a Clojure library for filtering trees using the zipper
abstraction.")
(license license:epl1.0)))
(define-public clojure-instaparse
(let ((version "1.4.12"))
(package
@@ -962,7 +920,7 @@ work with command-line arguments.")
(define-public clojure-tools-deps
(package
(name "clojure-tools-deps")
(version "0.28.1578")
(version "0.28.1569")
(home-page "https://github.com/clojure/tools.deps")
(source (origin
(method git-fetch)
@@ -972,7 +930,7 @@ work with command-line arguments.")
(file-name (git-file-name name version))
(sha256
(base32
"1w3f8cl81q4kln6iz74fnfzms4c4x279ivh1962pcg22q8l1w8d5"))))
"04s8cishxm1y4vnx8mpdk1qma6j0khmb356j69fsy14s615yjgfg"))))
(build-system clojure-build-system)
(arguments
`(#:source-dirs '("src/main/clojure" "src/main/resources")
@@ -992,10 +950,15 @@ work with command-line arguments.")
(string-append "org.clojure/clojure {:local/root \""
(assoc-ref inputs "clojure")
"/share/java/clojure.jar\"}"))))))))
(propagated-inputs (list maven-3.8-core
maven-resolver-1.6-connector-basic
maven-resolver-1.6-transport-http
maven-resolver-1.6-transport-file
(propagated-inputs (list maven-resolver-api
maven-resolver-spi
maven-resolver-impl
maven-resolver-util
maven-resolver-connector-basic
maven-resolver-provider
maven-core
maven-resolver-transport-http
maven-resolver-transport-file
clojure-tools-gitlibs
clojure-tools-cli
clojure-data-xml
@@ -1175,7 +1138,7 @@ asynchronous support.")
(define-public cognitect-aws-api
(package
(name "cognitect-aws-api")
(version "0.8.800")
(version "0.8.774")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -1184,7 +1147,7 @@ asynchronous support.")
(file-name (git-file-name name version))
(sha256
(base32
"17sxj3mvq4iasr0kchbx2anmrh25v8bvmpam4si704vksmnm28p3"))
"1y3impishicd8niy1vddx6c80pnbpz24zfr7vysi4r56p1vqnwmb"))
(modules '((guix build utils)))
(snippet
'(begin
+1 -1
View File
@@ -37,7 +37,7 @@
#:use-module (gnu packages libevent)
#:use-module (gnu packages linux)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages ruby-xyz)
#:use-module (gnu packages ruby-check)
#:use-module (gnu packages sphinx)
#:use-module (gnu packages sqlite)
#:use-module (gnu packages texinfo)
+7 -8
View File
@@ -610,9 +610,9 @@ C/C++ projects. It features:
(license license:expat)))
(define-public tinycmmc
;; XXX: No tagged releases; this is the master tip.
(let ((commit "2e007ba059a4991c011a7193c9d7df28826c9adc")
(revision "1"))
;; XXX: Does not release anymore.
(let ((commit "8238a6c1b90536e211fddf356dc3af26ea7c2f2c")
(revision "0"))
(package
(name "tinycmmc")
(version (git-version "0.1.0" revision commit))
@@ -620,14 +620,13 @@ C/C++ projects. It features:
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Grumbel/tinycmmc")
(commit commit)))
(url "https://github.com/Grumbel/tinycmmc")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0ix2v0zrrcanflxdm0r4xpgda8lkls3ir7xqimdk2na4dfqnc05g"))))
(base32 "1nv1439psdnq99vqpmp4nj2630l85cfwxzmf7rgpa436q09ql77p"))))
(build-system cmake-build-system)
(arguments
(list #:tests? #f)) ; No tests.
(arguments (list #:tests? #f)) ;no test suite
(home-page "https://github.com/Grumbel/tinycmmc")
(synopsis "Tiny CMake Module Collections")
(description "The tinycmmc package contains a small collection of reusable
+3
View File
@@ -1148,3 +1148,6 @@ will fail (i.e., it will exit with a non-zero exit code) when any of these
requirements is not met.")
(properties '((lint-hidden-cpe-vendors . ("vmware"))))
(license license:expat)))
(define-deprecated-package python-xenon
xenon)
-411
View File
@@ -1,411 +0,0 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2026 Danny Milosavljevic <dannym@friendly-machines.com>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This module is separate from (gnu packages rust-apps) to avoid a
;;; circular module dependency: (gnu packages rust-sources), which
;;; defines rust-codex-0.98.0, transitively loads (gnu packages
;;; rust-apps) through its #:use-module chain. If the codex package
;;; lived in rust-apps.scm, loading rust-sources would trigger loading
;;; rust-apps before rust-codex-0.98.0 is defined, causing an unbound
;;; variable error.
(define-module (gnu packages codex)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix gexp)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix build-system cargo)
#:use-module (gnu packages)
#:use-module (gnu packages bash)
#:use-module (gnu packages base)
#:use-module (gnu packages cmake)
#:use-module (gnu packages compression)
#:use-module (gnu packages libunwind)
#:use-module (gnu packages llvm)
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python)
#:use-module (gnu packages rust-sources)
#:use-module (gnu packages sqlite)
#:use-module (gnu packages tls)
#:use-module (gnu packages version-control))
(define-public codex
(package
(name "codex")
(version (package-version rust-codex-0.98.0))
(source
(origin
(inherit (package-source rust-codex-0.98.0))
(patches (search-patches
"codex-0.98.0-remove-patch-sections.patch"
"rust-codex-0.98.0-test-shebangs.patch"
"rust-codex-0.98.0-test-timeout.patch"))))
(build-system cargo-build-system)
(arguments
(list
#:install-source? #f
#:cargo-install-paths '(list "cli" "exec" "exec-server"
"linux-sandbox" "mcp-server" "network-proxy"
"app-server" "tui")
;; schema_fixtures_match_generated (upstream fixture is stale:
;; FileChange::Update in codex-protocol gained old_content,
;; new_content, move_path fields but the committed JSON schema
;; fixture was not regenerated).
#:cargo-test-flags '(list "--workspace"
"--exclude" "codex-app-server-protocol"
"--"
;; These tests exercise sandbox denial and
;; escalation, which requires Landlock to
;; cleanly deny filesystem access. Inside the
;; build container Landlock returns NotEnforced
;; and the sandbox binary panics instead.
;; Disabling Landlock would not help either,
;; since these tests need a working sandbox to
;; have anything to deny and escalate.
"--skip" "sandbox_denied_shell_returns_original_output"
"--skip" "shell_escalated_permissions_rejected_then_ok"
"--skip" "unified_exec_runs_under_sandbox"
;; These tests (in codex-exec) directly call
;; spawn_command_under_linux_sandbox to verify
;; that python and bash work correctly inside
;; the Landlock sandbox. The sandbox binary
;; (codex-exec) panics with LandlockRestrict
;; (exit code 101) before the inner command
;; even starts.
"--skip" "python_getpwuid_works_under_sandbox"
"--skip" "python_multiprocessing_lock_works_under_sandbox"
"--skip" "sandbox_distinguishes_command_and_policy_cwds"
;; These linux-sandbox tests directly invoke
;; the Landlock sandbox via
;; process_exec_tool_call; same root cause.
"--skip" "test_writable_root"
"--skip" "test_timeout"
"--skip" "test_root_read"
"--skip" "test_dev_null_write"
"--skip" "test_no_new_privs_is_enabled"
;; This test iterates many approval scenarios;
;; one of them
;; (danger_full_access_on_request_allows_network)
;; runs a command through the Landlock sandbox
;; binary, which panics with LandlockRestrict
;; inside the build container. Cargo --skip
;; cannot target individual scenarios, so we
;; skip the entire matrix.
"--skip" "approval_matrix_covers_all_modes"
;; This test verifies session-level patch
;; approval caching: approve once, skip
;; future prompts for the same file. When
;; Landlock is unavailable (as in the Guix
;; build container) the sandbox binary panics,
;; triggering the escalation-retry path, which
;; interferes with the approval cache and
;; causes a spurious re-prompt on the second
;; patch.
"--skip" "approving_apply_patch_for_session_skips_future_prompts_for_same_file"
;; These tests expect to interrupt a
;; long-running 'sleep 60' and receive
;; TurnAborted. Default test config is
;; OnRequest + ReadOnly. What happens:
;;
;; 1. ReadOnly wraps the command with
;; codex-linux-sandbox (Landlock-based).
;; 2. Landlock is unavailable in the Guix
;; build container, so the sandbox
;; binary exits instantly (~1 ms).
;; 3. Orchestrator gets SandboxErr::Denied.
;; wants_no_sandbox_approval(OnRequest)
;; returns false (sandboxing.rs:222),
;; so no escalation -- denial returned
;; directly.
;; 4. ToolEmitter::finish sends the error
;; to the mock model as
;; function_call_output.
;; 5. Second mock SSE response fires,
;; turn finishes with TurnComplete.
;; 6. Op::Interrupt arrives 100 ms later,
;; but the turn is already done --
;; TurnAborted is never emitted,
;; test times out.
;;
;; The similar interrupt_long_running_tool_
;; emits_turn_aborted passes because it
;; sends the interrupt with no delay and
;; has only one mock response (so the turn
;; cannot complete first).
"--skip" "interrupt_persists_turn_aborted_marker_in_next_request"
"--skip" "interrupt_tool_records_history_entries"
;; Upstream bug: test hardcodes "0.0.0" in the
;; expected user-agent string but the workspace
;; version is "0.98.0".
"--skip" "get_user_agent_returns_current_codex_user_agent"
;; Same upstream bug: mcp-server tests
;; check the initialize response which
;; includes "version": "0.0.0" but the
;; server returns "0.98.0".
"--skip" "test_codex_tool_passes_base_instructions"
"--skip" "test_shell_command_approval_triggers_elicitation"
"--skip" "test_patch_approval_triggers_elicitation"
;; These codex-exec-server tests need
;; "dotslash", a Meta tool that lazily
;; downloads pre-built binaries from a
;; JSON manifest. The test helper
;; create_transport runs
;; `dotslash -- fetch <path>` to obtain a
;; custom bash binary described in
;; exec-server/tests/suite/bash.
;; dotslash is not available in the build
;; container.
"--skip" "list_tools"
"--skip" "accept_elicitation_for_prompt_rule"
;;; Test isolation bug: each test in
;;; state/src/runtime.rs calls
;;; unique_temp_dir() to get its own
;;; temporary directory (and thus its
;;; own SQLite database). That function
;;; names directories using the current
;;; nanosecond timestamp, so when tests
;;; run in parallel several can receive
;;; the same name and open the same
;;; database. The initial SQLite
;;; migration runs CREATE TABLE threads
;;; (without IF NOT EXISTS), so any init
;;; after the first panics with "table
;;; threads already exists". Any of
;;; these tests
;;; can be the victim.
"--skip" "init_removes_legacy_state_db_files"
"--skip" "upsert_and_get_thread_memory"
"--skip" "get_last_n_thread_memories_for_cwd_matches_exactly"
"--skip" "upsert_thread_memory_errors_for_unknown_thread"
"--skip" "get_last_n_thread_memories_for_cwd_zero_returns_empty"
"--skip" "get_last_n_thread_memories_for_cwd_does_not_prefix_match"
"--skip" "deleting_thread_cascades_thread_memory")
#:cargo-package-crates
''(;;; Tier 0: No internal deps.
"codex-async-utils"
"codex-client"
"codex-execpolicy"
"codex-file-search"
"codex-git"
"codex-keyring-store"
"codex-utils-absolute-path"
"codex-utils-cache"
"codex-utils-cargo-bin"
"codex-utils-home-dir"
"codex-utils-json-to-toml"
"codex-utils-pty"
"codex-utils-readiness"
"codex-utils-string"
"codex-backend-openapi-models"
"codex-process-hardening"
"codex-ansi-escape"
;;; Tier 1: Depends on tier 0.
"codex-utils-image"
"codex-apply-patch"
"codex-protocol"
"codex-windows-sandbox"
"codex-api"
"codex-experimental-api-macros"
"codex-secrets"
"codex-execpolicy-legacy"
"codex-debug-client"
;;; Tier 2.
"codex-app-server-protocol"
"codex-rmcp-client"
"codex-otel"
"codex-state"
"codex-core"
"codex-linux-sandbox"
"codex-feedback"
;;; Tier 3.
"codex-arg0"
"codex-lmstudio"
"codex-login"
"codex-ollama"
"codex-common"
"codex-mcp-server"
"codex-backend-client"
"codex-responses-api-proxy"
;;; Tier 4.
"codex-cloud-requirements"
"codex-exec"
"codex-exec-server"
"codex-stdio-to-uds"
"codex-network-proxy"
"codex-chatgpt"
"codex-cloud-tasks-client"
;;; Tier 5.
"codex-app-server"
"codex-app-server-test-client"
"codex-tui"
;;; Tier 6.
"codex-cloud-tasks"
;; The main executable.
"codex-cli")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'chdir-to-workspace
(lambda _
(chdir "codex-rs")))
(add-after 'chdir-to-workspace 'update-version-in-snapshots
(lambda _
;; Snapshot test files contain hardcoded v0.0.0 version strings.
;; Update them to match the actual package version.
(let ((snap-files (find-files "." "\\.snap$")))
(substitute* snap-files
(("\\(v0\\.0\\.0\\) ") "(v0.98.0)")))))
(add-after 'chdir-to-workspace 'patch-git-deps-to-vendor
(lambda _
;; Replace git dependencies with version references so cargo
;; resolves them from the vendored sources.
(substitute* "Cargo.toml"
(("nucleo = \\{ git = [^}]+\\}")
"nucleo = \"0.5.0\"")
(("runfiles = \\{ git = [^}]+\\}")
"runfiles = \"0.1.0\""))))
(add-after 'chdir-to-workspace 'add-version-to-workspace-deps
(lambda _
;; cargo package requires all dependencies to have versions.
;; cargo package requires all dependencies to have versions.
;; Add version = "0.98.0" to internal path dependencies.
(let ((cargo-files (find-files "." "^Cargo\\.toml$")))
(substitute* cargo-files
;; Handle inline deps: name = { path = "..." }
(("(codex-[a-z0-9-]+) = \\{ path = " all name)
(string-append name " = { version = \"0.98.0\", path = "))
;; Handle inline deps with package: name = { package = "...", path = "..." }
(("(codex-[a-z0-9-]+) = \\{ package = " all name)
(string-append name " = { version = \"0.98.0\", package = "))
;; Handle section deps: [dependencies.X] with path = "..."
(("^(path = \"\\.\\./[^\"]*\")" all path-line)
(string-append path-line "\nversion = \"0.98.0\""))))))
(add-after 'chdir-to-workspace 'patch-hardcoded-paths
(lambda* (#:key inputs #:allow-other-keys)
(let ((bash-bin (string-append
(assoc-ref inputs "bash-minimal") "/bin"))
(coreutils-bin (string-append
(assoc-ref inputs "coreutils") "/bin"))
(git-bin (string-append
(assoc-ref inputs "git-minimal") "/bin"))
(sed-bin (string-append
(assoc-ref inputs "sed") "/bin"))
;; Include .policy files: the execpolicy-legacy
;; crate embeds default.policy via include_str!
;; at compile time, so its paths must also be
;; patched.
(rs-files (find-files "." "\\.(rs|policy)$")))
(substitute* rs-files
(("\"/bin/bash\"")
(string-append "\"" bash-bin "/bash\""))
(("\"/bin/sh\"")
(string-append "\"" bash-bin "/sh\""))
(("\"/usr/bin/bash\"")
(string-append "\"" bash-bin "/bash\""))
(("\"/usr/bin/sh\"")
(string-append "\"" bash-bin "/sh\""))
;;; bash/sh with inline arguments, e.g. "/bin/bash -i".
(("\"/bin/bash ")
(string-append "\"" bash-bin "/bash "))
(("\"/bin/sh ")
(string-append "\"" bash-bin "/sh "))
;; coreutils.
(("\"/bin/(cat|cp|date|echo|head|ls|rm|sleep|true|touch)\"" all cmd)
(string-append "\"" coreutils-bin "/" cmd "\""))
;; coreutils.
(("\"/usr/bin/(cat|cp|head|ls|touch|true)\"" all cmd)
(string-append "\"" coreutils-bin "/" cmd "\""))
;; coreutils with inline arguments
;; like "/bin/echo END-EVENT".
(("\"/bin/(cat|cp|date|echo|head|ls|rm|sleep|true|touch) " all cmd)
(string-append "\"" coreutils-bin "/" cmd " "))
(("\"/usr/bin/git\"")
(string-append "\"" git-bin "/git\""))
(("\"/usr/bin/sed\"")
(string-append "\"" sed-bin "/sed\"")))
;; @SHELL@ placeholder from test-shebangs patch
(substitute*
(list "rmcp-client/src/program_resolver.rs"
"tui/src/external_editor.rs")
(("@SHELL@")
(string-append bash-bin "/sh")))
;; shebang in test-only file
(substitute*
"core/tests/suite/user_notification.rs"
(("#!/bin/bash")
(string-append "#!" bash-bin "/bash"))))))
(add-before 'check 'set-home
(lambda _
(setenv "HOME" "/tmp")
(setenv "USER" "nixbld"))))))
(native-inputs (list clang ;bindgen uses libclang to parse BoringSSL's C headers
cmake-minimal ;BoringSSL is compiled from C source
libunwind ;BoringSSL tests verify stack unwinding in assembly
perl python-minimal ;for tests
pkg-config))
(inputs (cons* bash-minimal coreutils git-minimal sed
openssl sqlite `(,zstd "lib")
(cargo-inputs 'codex)))
(home-page "https://github.com/openai/codex")
(synopsis "AI-assisted coding CLI and TUI")
(description
"Codex is an AI-powered coding assistant that runs in the terminal.
It provides an interactive TUI for conversations with AI models, with
support for shell command execution, file editing, and code generation.
Configure providers via @file{~/.codex/config.toml}.")
(license license:asl2.0)))
(define-public codex-acp
(package
(name "codex-acp")
(version "0.9.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/zed-industries/codex-acp")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "190sq6s6jfz8dkj1y8305r7x6ln86qqr2j1bnfjci7f1x2wyzmsj"))
(patches (search-patches "codex-acp-0.9.2-remove-patch-sections.patch"
"codex-acp-0.9.2-replace-result-flatten.patch"))))
(build-system cargo-build-system)
(arguments
(list
#:install-source? #f
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-codex-deps
(lambda _
;; Rewrite git dependencies to use vendored sources from rust-codex
(substitute* "Cargo.toml"
(("git = \"https://github.com/zed-industries/codex\", branch = \"acp\"")
"version = \"0.0.0\"")))))))
(native-inputs (list pkg-config))
(inputs (cons* openssl sqlite `(,zstd "lib") (cargo-inputs 'codex-acp)))
(home-page "https://github.com/zed-industries/codex-acp")
(synopsis "ACP-compatible agent bridging Zed Codex with ACP clients")
(description
"This package provides an Agent Client Protocol (ACP) compatible agent
that bridges the Zed Codex runtime with ACP clients over stdio. It
supports multiple LLM providers through configuration in
@file{~/.codex/config.toml} and integrates with MCP servers for filesystem
operations.")
(license license:asl2.0)))
+67 -61
View File
@@ -65,7 +65,7 @@
#:use-module (guix monads)
#:use-module (guix download)
#:use-module ((guix git-download)
#:select (git-fetch git-reference git-file-name git-version))
#:select (git-fetch git-reference git-file-name))
#:use-module (guix build-system gnu)
#:use-module (guix build-system trivial)
#:use-module ((guix licenses) #:prefix license:)
@@ -2723,6 +2723,7 @@ memoized as a function of '%current-system'."
(package
(inherit gnumach-headers)
(name "gnumach-headers-boot0")
(version "1.8+git20250731")
(source
(origin
(inherit (package-source gnumach-headers))
@@ -2732,64 +2733,77 @@ memoized as a function of '%current-system'."
(origin
(method url-fetch)
(uri (string-append
"mirror://gnu/guix/mirror/gnumach-"
(package-version gnumach-headers) ".tar.gz"))
"https://git.savannah.gnu.org/cgit/hurd/gnumach.git/snapshot/"
"gnumach-" version ".tar.gz"))
(sha256
(base32
"0dchfv2fg92503ydw4kj3myz2036x4hbf6i9k1s4q6mg210qanfs")))))))
(native-inputs (list autoconf-boot0 automake-boot0 texinfo-boot0)))))
"1dc40cf2s8jr6xhhbmy6khmig5zz1gpb4vc9c40aagccxf72jkpv")))))))
(native-inputs (list autoconf-boot0 automake-boot0 texinfo-boot0))
(arguments
(substitute-keyword-arguments (package-arguments gnumach-headers)
((#:phases phases)
#~(modify-phases #$phases
(add-after 'unpack 'patch-compat
(lambda _
(substitute* '("include/device/device_types.h"
"include/mach_debug/slab_info.h"
"include/mach_debug/vm_info.h")
(("rpc_vm_size_t") "unsigned int")
(("rpc_vm_offset_t") "unsigned int")
(("rpc_long_natural_t") "unsigned long")
(("long_natural_t") "unsigned long")))))))))))
(define mig-boot0
(let ((tarball-version "1.8+git3f4b006"))
(with-boot0
(package
(inherit mig)
(name "mig-boot0")
(source
(origin
(inherit (package-source mig))
(method
(git-fetch-from-tarball
(origin
(method url-fetch)
(uri (string-append
"mirror://gnu/guix/mirror/mig-"
tarball-version ".tar.gz"))
(sha256
(base32
"0bgrhbkaym1y222abjrcz3qrv28jr1kvq99a8vssplww73mcf92c")))))))
(native-inputs (list autoconf-boot0 automake-boot0 bison-boot0 flex-boot0
gnumach-headers-boot0))
(inputs (list flex-boot0 gnumach-headers-boot0))
(arguments
(substitute-keyword-arguments (package-arguments mig)
((#:configure-flags flags '())
#~(list (string-append "LDFLAGS=-Wl,-rpath="
#$(this-package-native-input "flex")
"/lib/")))))))))
(with-boot0
(package
(inherit mig)
(name "mig-boot0")
(version "1.8+git20231217")
(source
(origin
(inherit (package-source mig))
(method
(git-fetch-from-tarball
(origin
(method url-fetch)
(uri (string-append
"https://git.savannah.gnu.org/cgit/hurd/mig.git/snapshot/"
"mig-" version ".tar.gz"))
(sha256
(base32
"18vz3ifrhhlvrdmlv70h63wl0kh5w8jcpsjx9yscsw9yazm1lzs7")))))))
(native-inputs (list autoconf-boot0 automake-boot0 bison-boot0 flex-boot0
gnumach-headers-boot0))
(inputs (list flex-boot0 gnumach-headers-boot0))
(arguments
(substitute-keyword-arguments (package-arguments mig)
((#:configure-flags flags '())
#~(list (string-append "LDFLAGS=-Wl,-rpath="
#$(this-package-native-input "flex")
"/lib/"))))))))
(define hurd-headers-boot0
(let ((tarball-version "0.9+git6290b4c"))
(with-boot0
(package
(inherit hurd-headers)
(name "hurd-headers-boot0")
(source
(origin
(inherit (package-source hurd-headers))
(method
(git-fetch-from-tarball
(origin
(method url-fetch)
(uri (string-append
"mirror://gnu/guix/mirror/hurd-"
tarball-version ".tar.gz"))
(sha256
(base32
"0w18nv4bv0b5vg6mqxhajma3h56nf9iipa444hby5hqf9c1kaa32")))))))
(native-inputs
(list autoconf-boot0 automake-boot0 mig-boot0))
(inputs '())))))
(with-boot0
(package
(inherit hurd-headers)
(name "hurd-headers-boot0")
(version "0.9.git20251029")
(source
(origin
(inherit (package-source hurd-headers))
(method
(git-fetch-from-tarball
(origin
(method url-fetch)
(uri (string-append
"https://git.savannah.gnu.org/cgit/hurd/hurd.git/snapshot/"
"hurd-" version ".tar.gz"))
(sha256
(base32
"0pjxh4qln8m7jznqlzsz81vi38chjv64jj9824dj7wkm36gxbn3a")))))))
(native-inputs
(list autoconf-boot0 automake-boot0 mig-boot0))
(inputs '()))))
(define hurd-minimal-boot0
(with-boot0
@@ -2934,14 +2948,6 @@ memoized as a function of '%current-system'."
(substitute* "Lib/plat-generic/regen"
(("/usr/include/")
(string-append libc "/include/")))))))
'())
,@(if (system-hurd64?)
`((add-before 'configure 'resolve-libm-name-conflict
(lambda* _
;; with glibc 2.41 libm headers conflict with
;; mathmodule.c for sinpi
(substitute* "Modules/mathmodule.c"
(("sinpi") "m_sinpi")))))
'()))))
(native-search-paths
(list (search-path-specification
+40 -58
View File
@@ -88,7 +88,6 @@
#:use-module (gnu packages curl)
#:use-module (gnu packages documentation)
#:use-module (gnu packages file)
#:use-module (gnu packages gcc)
#:use-module (gnu packages gettext)
#:use-module (gnu packages glib)
#:use-module (gnu packages gnome)
@@ -1475,7 +1474,7 @@ for most inputs, but the resulting compressed files are anywhere from 20% to
(define-public 7zip
(package
(name "7zip")
(version "26.00")
(version "25.01")
(source
(origin
(method git-fetch)
@@ -1483,7 +1482,7 @@ for most inputs, but the resulting compressed files are anywhere from 20% to
(url "https://github.com/ip7z/7zip")
(commit version)))
(sha256
(base32 "1fvgl9qp2pl5c0jmvgbdx6qig3qd80mhxvml42yby8y412x65sh7"))
(base32 "01jg1fkc2zsdngv3ag3pwq4x8i5x01hjxsk30n78ffwiv2ps4rmq"))
(file-name (git-file-name name version))
(modules '((guix build utils)
(ice-9 regex)))
@@ -2398,7 +2397,7 @@ targeting storage applications. ISA-L includes:
(define-public brotli
(package
(name "brotli")
(version "1.1.0")
(version "1.0.9")
(source
(origin
(method git-fetch)
@@ -2407,8 +2406,35 @@ targeting storage applications. ISA-L includes:
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0cvcq302wpjpd1a2cmxcp9a01lwvc2kkir8vsdb3x11djnxc0nsk"))))
(base32 "1fikasxf7r2dwlk8mv8w7nmjkn0jw5ic31ky3mvpkdzwgd4xfndl"))
(modules '((guix build utils)))
(snippet
'(begin
;; Cherry-picked from upstream since the latest release
;; https://github.com/google/brotli/commit/09b0992b6acb7faa6fd3b23f9bc036ea117230fc
(substitute* (find-files "scripts" "^lib.*pc\\.in")
(("-R\\$\\{libdir\\} ") ""))
#t))))
(build-system cmake-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'install 'rename-static-libraries
;; The build tools put a 'static' suffix on the static libraries, but
;; other applications don't know how to find these.
(lambda* (#:key outputs #:allow-other-keys)
(let ((lib (string-append (assoc-ref %outputs "out") "/lib/")))
(rename-file (string-append lib "libbrotlicommon-static.a")
(string-append lib "libbrotlicommon.a"))
(rename-file (string-append lib "libbrotlidec-static.a")
(string-append lib "libbrotlidec.a"))
(rename-file (string-append lib "libbrotlienc-static.a")
(string-append lib "libbrotlienc.a"))
#t))))
#:configure-flags
(list ;; Defaults to "lib64" on 64-bit archs.
(string-append "-DCMAKE_INSTALL_LIBDIR="
(assoc-ref %outputs "out") "/lib"))))
(home-page "https://github.com/google/brotli")
(synopsis "General-purpose lossless compression")
(description "This package provides the reference implementation of Brotli,
@@ -2434,12 +2460,7 @@ The specification of the Brotli Compressed Data Format is defined in RFC 7932.")
#:source-dir "java"
;; Tests are mixed in with java sources, the ant build system
;; doesn't allow that
#:tests? #f
#:phases (modify-phases %standard-phases
(add-after 'unpack 'drop-android-wrapper
(lambda _
(delete-file-recursively
"java/org/brotli/wrapper/android"))))))
#:tests? #f))
(native-inputs (list java-junit))))
(define-public ucl
@@ -3050,7 +3071,7 @@ compression and decompression speed compared to Deflate using Zlib.")
(version "1.0")
(source (origin
(method url-fetch)
(uri (string-append "https://oldhome.schmorp.de/marc/data/"
(uri (string-append "http://oldhome.schmorp.de/marc/data/"
"fcrackzip-" version ".tar.gz"))
(sha256
(base32
@@ -3058,19 +3079,16 @@ compression and decompression speed compared to Deflate using Zlib.")
(build-system gnu-build-system)
(arguments
(list
#:make-flags
#~(list "CFLAGS=-Wno-error=implicit-int")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-reference-to-unzip
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "main.c"
(("\"unzip")
(string-append "\""
(search-input-file inputs "/bin/unzip")))))))))
'(modify-phases %standard-phases
(add-after 'unpack 'fix-reference-to-unzip
(lambda _
(substitute* "main.c"
(("\"unzip")
(string-append "\"" (which "unzip")))))))))
(inputs
(list perl unzip))
(home-page "https://oldhome.schmorp.de/marc/fcrackzip.html")
(home-page "http://oldhome.schmorp.de/marc/fcrackzip.html")
(synopsis "Zip password cracker")
(description "Fcrackzip is a Zip file password cracker.")
(license license:gpl2+)))
@@ -3153,39 +3171,3 @@ exported by the zlib library.")
;; The changes break the examples.
`(cons "-DBUILD_EXAMPLES=OFF" ,flags))))
(properties '((hidden? . #t)))))
(define-public cmix
(package
(name "cmix")
(version "21")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/byronknoll/cmix")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1alivia1hnhxa7z8vkqammacyhj8zfqwk7hjahj5nkfq28v2ddb4"))))
(build-system gnu-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(delete 'check) ;No tests
(replace 'install
(lambda _
(install-file "cmix"
(string-append #$output "/bin")))))
#:make-flags
#~(list (string-append "CXX=" #$(cxx-for-target))
;; Linker fails when you use CC=cc-for-target
(string-append "CC=" #$(cxx-for-target)))))
(native-inputs (list clang))
(synopsis "Lossless data-compression program optimized for file size")
(description
"Cmix is a lossless data compression program aimed at optimizing compression
ratio at the cost of high CPU/memory usage.")
(home-page "https://github.com/byronknoll/cmix")
(license license:gpl3)))
+7 -6
View File
@@ -43,7 +43,7 @@
#:use-module (gnu packages xdisorg)
#:use-module (gnu packages xml)
#:use-module (gnu packages xorg)
#:use-module (gnu packages ruby-xyz))
#:use-module (gnu packages ruby-check))
(define-public compton
(let ((upstream-version "0.1_beta2"))
@@ -115,7 +115,7 @@ performance).
(define-public picom
(package
(name "picom")
(version "13")
(version "12.5")
(source
(origin
(method git-fetch)
@@ -124,8 +124,8 @@ performance).
(commit (string-append "v" version))))
(sha256
(base32
"0x81m06fhkgrl6vzm4a3cqxcldkq223q0jzlkkhd8kpjmrqaprw3"))
(file-name (git-file-name name version))))
"1skkchrlir9si9ljawg0xcgpfnd2macw7ny5vhx5f5zk7b7iphhz"))
(file-name (string-append "picom-" version))))
(build-system meson-build-system)
(inputs
(list dbus
@@ -134,6 +134,7 @@ performance).
libev
libx11
libxext
libxdg-basedir
mesa
pcre2
pixman
@@ -144,7 +145,7 @@ performance).
xprop))
(native-inputs
(append
(list pkg-config python-minimal-wrapper xorgproto)
(list pkg-config xorgproto)
(if (supported-package? ruby-asciidoctor/minimal)
(list ruby-asciidoctor/minimal)
'())))
@@ -166,7 +167,7 @@ performance).
(substitute* "picom.desktop"
(("Exec=")
(string-append "Exec=" #$output "/bin/"))))))))
(home-page "https://picom.app/")
(home-page "https://github.com/yshui/picom")
(synopsis "Compositor for X11, forked from Compton")
(description
"Picom is a standalone compositor for Xorg, suitable for use
-233
View File
@@ -1,233 +0,0 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2026 Cayetano Santos <csantosb@inventati.org>
;;; Copyright © 2022-2023 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages computer-architecture)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system qt)
#:use-module (guix build-system scons)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix packages)
#:use-module (guix utils)
#:use-module (gnu packages)
#:use-module (gnu packages boost)
#:use-module (gnu packages compression)
#:use-module (gnu packages cpp)
#:use-module (gnu packages electronics)
#:use-module (gnu packages engineering)
#:use-module (gnu packages graphviz)
#:use-module (gnu packages image)
#:use-module (gnu packages m4)
#:use-module (gnu packages maths)
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages protobuf)
#:use-module (gnu packages python)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt)
#:use-module (gnu packages shells))
;;; Strongly based on package gem5 in channel
;; https://git.genenetwork.org/guix-bioinformatics
(define-public gem5
(package
(name "gem5")
(version "25.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/gem5/gem5")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0p40cb3g29zwy3fskah6rxyn8a8xjh9cc6riyigg5l4i854hj2nj"))
(snippet
#~(begin
(use-modules (guix build utils))
;; For reproducibility.
(substitute* "src/base/date.cc"
(("__DATE__") "\"1970-01-01\"")
(("__TIME__") "\"00:00:00\""))
;; TODO: Unbundle systemc, libelf and googletest
(delete-file-recursively "ext/ply") ;unbundling of python-ply
;; Unbundling of pybind11
(delete-file-recursively "ext/pybind11")
(substitute* "ext/sst/Makefile.linux"
(("-I../../ext/pybind11/include/")
"${shell pybind11-config --includes}"))
(substitute* "SConstruct"
((".*pybind11.*") ""))))))
(build-system scons-build-system)
(arguments
(list
#:scons-flags #~(list "--verbose")
#:build-targets #~(list "build/ALL/gem5.opt")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-source
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "SConstruct"
;; Force adding missing includes into the environment.
(("main\\.Append\\(CPPPATH=\\[Dir\\('" all)
(string-append
all (assoc-ref inputs "capstone") "/include')])\n"
all (assoc-ref inputs "hdf5") "/include')])\n"
all (assoc-ref inputs "kernel-headers") "/include')])\n"
all (assoc-ref inputs "libpng") "/include')])\n"
all (assoc-ref inputs "protobuf") "/include')])\n"
all (assoc-ref inputs "pybind11") "/include')])\n"
all (assoc-ref inputs "zlib") "/include')])\n"
all)))
(substitute* "ext/libelf/SConscript"
(("m4env\\.Tool" all)
(string-append
"m4env.Append(CPPPATH=[Dir('"
(assoc-ref inputs "kernel-headers")
"/include')])\n"
all)))
(substitute* "ext/libelf/native-elf-format"
(("cc") #$(cc-for-target)))))
;; This uses the cached results from the previous 'build phase.
;; Move to after 'install and delete build dir first?
(replace 'check
(lambda* (#:key tests? #:allow-other-keys #:rest args)
(when tests?
(apply (assoc-ref %standard-phases 'build)
#:build-targets '("build/ALL/unittests.opt")
args))))
(replace 'install
(lambda _
(let* ((bin (string-append #$output "/bin/")))
(mkdir-p bin)
(install-file "build/ALL/gem5.opt" bin)
(install-file "build/ALL/gem5py" bin)
(install-file "build/ALL/gem5py_m5" bin)
(copy-recursively
"configs"
(string-append #$output"/share/gem5/configs")))))
(add-after 'install 'wrap-binaries
(lambda _
(for-each
(lambda (file)
(wrap-program file
`("GUIX_PYTHONPATH" ":" prefix
(,(getenv "GUIX_PYTHONPATH")))))
(find-files (string-append #$output "/bin"))))))))
(inputs
(list capstone
gperftools
hdf5
libpng
protobuf
pybind11-2
python
python-ply
python-pydot
zlib))
(native-inputs
(list boost
m4
tcsh
perl
python-minimal-wrapper
pkg-config))
(home-page "http://gem5.org/")
(synopsis "Modular platform for computer-system architecture research")
(description "The gem5 simulator is a modular platform for computer-system
architecture research, encompassing system-level architecture as well as
processor microarchitecture.")
(license license:bsd-3)))
(define-public ripes
;; Includes Qt6 support.
(let ((commit "720066f8d1c9f8d62fad058f44471763a0312084")
(revision "0"))
(package
(name "ripes")
(version (git-version "2.2.6" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mortbopet/Ripes/")
(commit commit)
;; TODO: Unbundle. Ripes recursively requires tones of non
;; packaged dependencies in "external" directories.
(recursive? #t)))
(file-name (git-file-name name version))
(sha256
(base32 "1kkdc3y18h985zvgmhbdbms3zynygrg5f64w1lm948hffj58x7gy"))))
(build-system qt-build-system)
(arguments
(list
#:qtbase qtbase ;for Qt6
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'disable-tests
(lambda _
(substitute* "test/CMakeLists.txt"
;; Fails with "Compared values are not the same"
(("create_qtest\\(tst_riscv\\)") "")
;; Fails with "Internal test error"
(("create_qtest\\(tst_reverse\\)") ""))))
(add-after 'unpack 'patch-bugs
(lambda* (#:key inputs #:allow-other-keys)
;; TODO: Remove when fixed upstream.
;; See https://github.com/mortbopet/Ripes/issues/388 and 62
(substitute*
(string-append "external/VSRTL/external/cereal/include"
"/cereal/external/rapidjson/document.h")
(("GenericStringRef& operator=.*")
(string-append
"GenericStringRef& operator=(const GenericStringRef& rhs)"
" { s = rhs.s; return *this; }")))
;; As suggested by error message itself.
(substitute* '("external/VSRTL/interface/vsrtl_vcdfile.cpp")
(("#include <sstream>")
"#include <sstream>\n#include <cstdint>"))
;; As suggested by error message itself.
(substitute* '("external/VSRTL/interface/vsrtl_vcdfile.h")
(("#include <map>")
"#include <map>\n#include <cstdint>"))))
(add-before 'configure 'set-envs
(lambda* (#:key inputs #:allow-other-keys)
(setenv "VERILATOR_ROOT"
(dirname
(dirname
(search-input-file inputs "/bin/verilator"))))))
(replace 'check ;as for .github/workflows/test.yml
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(for-each
(lambda (f) (invoke f))
(filter executable-file? (find-files "test" "tst_")))))))
#:configure-flags
#~(list "-DRIPES_BUILD_VERILATOR_PROCESSORS=ON"
"-DRIPES_BUILD_TESTS=ON")))
(native-inputs
(list python-minimal-wrapper verilator))
(inputs
(list qtsvg qtcharts))
(home-page "https://github.com/mortbopet/Ripes/")
(synopsis "Visual computer architecture editor for RISCV")
(description
"Ripes is a visual computer architecture simulator and assembly code
editor built for the RISCV instruction set architecture.")
(license license:expat))))
+2 -49
View File
@@ -24,65 +24,18 @@
#:use-module (guix build-system pyproject)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (gnu packages check)
#:use-module (gnu packages golang-build)
#:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-vcs)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages golang-xyz)
#:use-module (gnu packages python-build)
#:use-module (gnu packages python-crypto)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages python-web)
#:use-module (gnu packages textutils)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix utils))
(define-public bundlewrap
(package
(name "bundlewrap")
(version "5.0.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/bundlewrap/bundlewrap")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1p0082lwyfkppswm8cpr1yp28y0cm0f8rk3ly3xlym7qyidglkli"))))
(build-system pyproject-build-system)
(arguments
(list
#:test-flags #~(list "tests/unit")))
(native-inputs
(list python-pytest
python-setuptools))
(inputs
(list python-bcrypt
python-cryptography
python-jinja2
python-librouteros
python-mako
python-pyyaml
python-requests
python-tomlkit))
(home-page "https://bundlewrap.org")
(synopsis "Config management with Python")
(description
"BundleWrap is a decentralized configuration management system that is
designed to be powerful, easy to extend and extremely versatile.
By allowing for easy and low-overhead config management, BundleWrap fills the
gap between complex deployments using Chef or Puppet and old school system
administration over SSH. While most other config management systems rely on a
client-server architecture, BundleWrap works off a repository cloned to local
machine. It then automates the process of SSHing into servers and making sure
everything is configured the way it's supposed to be.")
(license license:gpl3)))
(define-public chezmoi
(package
(name "chezmoi")
@@ -176,7 +129,7 @@ across multiple machines.")
(define-public konsave
(package
(name "konsave")
(version "2.3.0")
(version "2.2.0")
(source
(origin
(method git-fetch)
@@ -185,7 +138,7 @@ across multiple machines.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0454cjcnlwpylia6lb40xzjvm07p3hxmfl21zmlxhl2xjlbjhsg4"))))
(base32 "1j5nszy41j4fd6b5w7188gphfk2s0dj44rs7fg55a4izvm0brbx9"))))
(build-system pyproject-build-system)
(arguments
(list
+97
View File
@@ -0,0 +1,97 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2015 Siniša Biđin <sinisa@bidin.eu>
;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2019, 2023 Vasile Dumitrascu <va511e@yahoo.com>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages conky)
#:use-module (guix packages)
#:use-module (guix utils)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix build-system cmake)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages curl)
#:use-module (gnu packages fontutils)
#:use-module (gnu packages image)
#:use-module (gnu packages linux)
#:use-module (gnu packages lua)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages pulseaudio)
#:use-module (gnu packages xorg))
(define-public conky
(package
(name "conky")
(home-page "https://github.com/brndnmtthws/conky")
(version "1.19.8")
(source
(origin
(method git-fetch)
(uri (git-reference
(url home-page)
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1g712cw2nzd2qvgdmyvazyda0znyqzg6yckg98ss203fggwp93vj"))))
(build-system cmake-build-system)
(arguments
`(#:configure-flags
(list "-DRELEASE=true"
"-DBUILD_PULSEAUDIO=ON"
"-DBUILD_WLAN=ON"
"-DBUILD_TESTS=ON")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'add-freetype-to-search-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "cmake/ConkyPlatformChecks.cmake"
(("set\\(INCLUDE_SEARCH_PATH")
(string-append
"set(INCLUDE_SEARCH_PATH "
(assoc-ref inputs "freetype") "/include/freetype2 ")))
#t))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")))
(install-file "src/conky" bin))
#t)))))
(inputs
(list freetype
imlib2
libx11
libxdamage
libxext
libxft
libxi
libxinerama
pulseaudio
lua
ncurses
curl
wireless-tools))
(native-inputs
(list pkg-config))
(synopsis "Lightweight system monitor for X")
(description
"Conky is a lightweight system monitor for X that displays operating
system statistics (CPU, disk, and memory usage, etc.) and more on the
desktop.")
(license license:gpl3+)))
+1 -1
View File
@@ -144,7 +144,7 @@ sharing) to clients via USB, ethernet, WiFi, cellular and Bluetooth.")
(list bash-minimal ;for wrap-program
efl
python-wrapper
python-dbus-1.2
python-dbus
python-efl))
(home-page "https://www.enlightenment.org")
(synopsis "Connman User Interface written using the EFL")
+48 -192
View File
@@ -5,13 +5,11 @@
;;; Copyright © 2022 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2023 Zongyuan Li <zongyuan.li@c0x0o.me>
;;; Copyright © 2023 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2024, 2025, 2026 Tomas Volf <~@wolfsden.cz>
;;; Copyright © 2024, 2025 Tomas Volf <~@wolfsden.cz>
;;; Copyright © 2024 Foundation Devices, Inc. <hello@foundation.xyz>
;;; Copyright © 2024 Jean-Pierre De Jesus DIAZ <jean@foundation.xyz>
;;; Copyright © 2025 Tomas Volf <~@wolfsden.cz>
;;; Copyright © 2025 Foster Hangdaan <foster@hangdaan.email>
;;; Copyright © 2026 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;; Copyright © 2026 Sharlatan Hellseher <sharlatanus@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -39,10 +37,8 @@
#:use-module (guix build-system copy)
#:use-module (guix build-system gnu)
#:use-module (guix build-system go)
#:use-module (guix build-system guile)
#:use-module (guix build-system meson)
#:use-module (guix build-system pyproject)
#:use-module ((guix search-paths) #:select ($GUIX_EXTENSIONS_PATH))
#:use-module (guix utils)
#:use-module (gnu packages admin)
#:use-module (gnu packages autotools)
@@ -62,13 +58,11 @@
#:use-module (gnu packages golang-web)
#:use-module (gnu packages golang-xyz)
#:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz)
#:use-module (gnu packages linux)
#:use-module (gnu packages man)
#:use-module (gnu packages pcre)
#:use-module (gnu packages python)
#:use-module (gnu packages networking)
#:use-module (gnu packages package-management)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages python-build)
@@ -80,73 +74,6 @@
#:use-module (gnu packages web)
#:use-module (gnu packages wget))
;;; Code:
;;;
;;; Libraries:
;;;
(define-public go-github-com-checkpoint-restore-checkpointctl
(package
(name "go-github-com-checkpoint-restore-checkpointctl")
(version "1.5.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/checkpoint-restore/checkpointctl")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0qvgld9vji5f7h2idk6r3q30909hqws0rkpvgina43i57bsfh2sv"))
(snippet
#~(begin
(use-modules (guix build utils))
(delete-file-recursively "vendor")))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:import-path "github.com/checkpoint-restore/checkpointctl"))
(native-inputs
(list go-github-com-spf13-cobra))
(propagated-inputs
(list go-github-com-checkpoint-restore-go-criu-v8
go-github-com-containers-storage
go-github-com-opencontainers-runtime-spec
go-github-com-xlab-treeprint))
(home-page "https://github.com/checkpoint-restore/checkpointctl")
(synopsis "Tool for in-depth analysis of container checkpoints")
(description
"This package provides a Go library to read and manipulate checkpoint
archives as created by Podman, CRI-O and containerd.")
(license license:asl2.0)))
;;;
;;; Executables:
;;;
(define-public checkpointctl
(package/inherit go-github-com-checkpoint-restore-checkpointctl
(name "checkpointctl")
(arguments
(substitute-keyword-arguments
(package-arguments go-github-com-checkpoint-restore-checkpointctl)
((#:build-flags _) #~(list (string-append "-X main.version="
#$version)))
((#:install-source? _ #t) #f)
((#:skip-build? _ #t) #f)
((#:tests? _ #t) #f)))
(native-inputs
(append
(package-native-inputs go-github-com-checkpoint-restore-checkpointctl)
(package-propagated-inputs go-github-com-checkpoint-restore-checkpointctl)))
(propagated-inputs '())
(inputs '())
(description
"This package provides a tool to read and manipulate checkpoint archives
as created by Podman, CRI-O and containerd.")))
(define-public crun
(package
(name "crun")
@@ -197,55 +124,42 @@ Container Runtime fully written in C.")
(define-public conmon
(package
(name "conmon")
(version "2.2.1")
(version "2.1.13")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/containers/conmon")
(commit (string-append "v" version))))
(url "https://github.com/containers/conmon")
(commit (string-append "v" version))))
(sha256
(base32 "0n9l6030ibhk7pmsq85rarcf9b0kzglxibd1xnb6vzmkz3ywg1il"))
(base32 "0fiixv9h5dycrixs7s3bq81d06p7qs8491mskxj42wqlkdq5diay"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
(list #:make-flags
#~(list (string-append "CC=" #$(cc-for-target))
(string-append "PREFIX=" #$output))
;; XXX: uses `go get` to download 50 packages, runs a ginkgo test suite
;; then tries to download busybox and use a systemd logging library
;; see also https://github.com/containers/conmon/blob/main/nix/derivation.nix
#:tests? #f
#:test-target "test"
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(add-before 'check 'prepare-tests
(lambda* (#:key inputs #:allow-other-keys)
(setenv "RUNTIME_BINARY"
(search-input-file inputs "sbin/runc"))
;; We need to skip all tests requiring journald.
(for-each
(lambda (test file)
(substitute* file
(((string-append "@test \"" test "\" \\{\n$") all)
(string-append all "skip 'no journald in Guix';"))))
'("log driver as journald should pass"
"log driver as journald with short cid should fail"
"multiple log drivers should pass"
"log management: should work with multiple log drivers")
'("test/01-basic.bats"
"test/01-basic.bats"
"test/01-basic.bats"
"test/06-log-management.bats")))))))
(add-after 'unpack 'set-env
(lambda _
;; when running go, things fail because
;; HOME=/homeless-shelter.
(setenv "HOME" "/tmp"))))))
(inputs
(list crun
glib
libseccomp))
(native-inputs
(list bats
git
go-md2man
pkg-config
socat
runc))
(list git
go
pkg-config))
(home-page "https://github.com/containers/conmon")
(synopsis "Monitoring tool for Open Container Initiative (OCI) runtime")
(description
@@ -257,7 +171,7 @@ runtime (like runc or crun) for a single container.")
(define-public distrobox
(package
(name "distrobox")
(version "1.8.2.4")
(version "1.8.2.1")
(source
(origin
(method git-fetch)
@@ -265,7 +179,7 @@ runtime (like runc or crun) for a single container.")
(url "https://github.com/89luca89/distrobox")
(commit version)))
(sha256
(base32 "07kqgr5diwvkks3fn1r0nnpfqq6gngqyx4x7lxs06ri6g0a4knvf"))
(base32 "1la9qkhmj9277r6b2vfadb3fnvrwa435x6la5bwvm8ch0js2dfx0"))
(file-name (git-file-name name version))))
(build-system copy-build-system)
(arguments
@@ -318,7 +232,7 @@ runtime (like runc or crun) for a single container.")
(list guile-3.0 ; for wrap-script
podman
wget))
(home-page "https://distrobox.it")
(home-page "https://distrobox.privatedns.org/")
(synopsis "Create and start containers highly integrated with the hosts")
(description
"Distrobox is a fancy wrapper around Podman or Docker to create and start
@@ -341,11 +255,11 @@ containers highly integrated with the hosts.")
(build-system go-build-system)
(arguments
(list
#:go go-1.23
#:install-source? #f
#:build-flags
#~(list (string-append "-ldflags=-X main.version=" #$version))
#:import-path "github.com/wagoodman/dive"
#:test-flags #~(list "-vet=off")))
#:import-path "github.com/wagoodman/dive"))
(native-inputs
(list go-github-com-awesome-gocui-gocui
go-github-com-awesome-gocui-keybinding
@@ -372,69 +286,6 @@ containers highly integrated with the hosts.")
contents, and discovering ways to shrink the size of Docker/OCI image.")
(license license:expat)))
(define-public guix-compose
(package
(name "guix-compose")
(version "0.1.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://codeberg.org/fishinthecalculator/guix-compose")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1ij6rfs5pfykk8c53q029sl2qx3k572dqdfb6pn5s569l6697ci1"))))
(build-system guile-build-system)
(arguments
(list
#:source-directory "src"
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'set-load-paths-in-entry-point
(lambda _
(define load-path
(cons (string-append #$output "/share/guile/site/3.0")
(parse-path (getenv "GUILE_LOAD_PATH"))))
(define load-compiled-path
(cons (string-append #$output "/lib/guile/3.0/site-ccache")
(parse-path (getenv "GUILE_LOAD_COMPILED_PATH"))))
(define search-paths-header
`(begin
(set! %load-path
(append (list ,@load-path) %load-path))
(set! %load-compiled-path
(append (list ,@load-compiled-path)
%load-compiled-path))))
(substitute* "src/guix/extensions/compose.scm"
((";;@load-paths@")
(with-output-to-string
(lambda () (write search-paths-header)))))))
(add-after 'build 'add-extension-to-search-path
(lambda _
(with-directory-excursion #$output
(mkdir-p "share/guix/extensions")
(symlink
(string-append
#$output "/share/guile/site/3.0/guix/extensions/compose.scm")
"share/guix/extensions/compose.scm"))))
(add-after 'add-extension-to-search-path 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke
"guile" "-L" "./modules" "-s" "tests/test-compose.scm")))))))
(native-inputs (list guile-3.0))
;; Avoid setting propagated so that we use the users profile.
(inputs (list guix guile-yamlpp))
(native-search-paths
(list $GUIX_EXTENSIONS_PATH))
(synopsis "Guix' docker compose compatibility layer")
(description "A toolkit to run, read and write docker-compose.yml files with
Guix machinery.")
(home-page "https://codeberg.org/fishinthecalculator/guix-compose")
(license license:gpl3+)))
(define-public libslirp
(package
(name "libslirp")
@@ -545,7 +396,7 @@ Layer-4 sockets.")
(define-public cni-plugins
(package
(name "cni-plugins")
(version "1.9.0")
(version "1.8.0")
(source
(origin
(method git-fetch)
@@ -554,7 +405,7 @@ Layer-4 sockets.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0l3jgbizq0yaxld07hsdbh6ix2w6i789101ddk0ldnsmr93jg6ni"))
(base32 "0bwczkf4kbrx47sa6mnp5kyn65dbg52qnlfyjyydrwshal8rz3gw"))
(snippet
#~(begin (use-modules (guix build utils))
(delete-file-recursively "vendor")))))
@@ -562,10 +413,19 @@ Layer-4 sockets.")
(arguments
(list
#:install-source? #f
;; XXX: Tests require root access, see test_linux.sh.
#:tests? #f
#:import-path "github.com/containernetworking/plugins/plugins/..."
#:unpack-path "github.com/containernetworking/plugins"))
#:tests? #f ; TODO: Figure out how to run tests.
#:import-path "github.com/containernetworking/plugins"
#:phases
#~(modify-phases %standard-phases
(replace 'build
(lambda* (#:key import-path #:allow-other-keys)
(with-directory-excursion (string-append "src/" import-path)
;; XXX: Migrate to go-build-system logic.
(invoke "./build_linux.sh"))))
(replace 'install
(lambda* (#:key import-path #:allow-other-keys)
(copy-recursively (string-append "src/"import-path "/bin")
(string-append #$output "/bin")))))))
(native-inputs
(list go-github-com-alexflint-go-filemutex
go-github-com-buger-jsonparser
@@ -597,7 +457,7 @@ configure network interfaces in Linux containers.")
(define-public gvisor-tap-vsock
(package
(name "gvisor-tap-vsock")
(version "0.8.8")
(version "0.8.7")
(source
(origin
(method git-fetch)
@@ -606,7 +466,7 @@ configure network interfaces in Linux containers.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1xz710dmy58gngd0qizjw8g9nkraksqald8vzhwc5h36dqkc8nrf"))
(base32 "1p9vypphssvqfcm3y2nc7b9v0wcc2smkrqq8k60vskaiza89974k"))
(modules '((guix build utils)))
(snippet
#~(begin
@@ -630,7 +490,7 @@ configure network interfaces in Linux containers.")
;; network connection
#~(list "-skip" "TestSuite")
#:test-subdirs
#~(list "../../...") ;test the whole library
#~(list "../../...") ;test the whole libary
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'prune-tests
@@ -649,9 +509,7 @@ configure network interfaces in Linux containers.")
go-github-com-containers-winquit
go-github-com-coreos-stream-metadata-go
go-github-com-dustin-go-humanize
go-github-com-foxcpp-go-mockdns
go-github-com-google-gopacket
go-github-com-inetaf-tcpproxy
go-github-com-insomniacslk-dhcp
;; go-github-com-linuxkit-virtsock ;Windows only
go-github-com-mdlayher-vsock
@@ -660,6 +518,7 @@ configure network interfaces in Linux containers.")
go-github-com-onsi-ginkgo
go-github-com-onsi-gomega
go-github-com-opencontainers-go-digest
go-github-com-pkg-errors
go-github-com-sirupsen-logrus
go-github-com-songgao-packets
go-github-com-songgao-water
@@ -669,7 +528,6 @@ configure network interfaces in Linux containers.")
go-golang-org-x-mod
go-golang-org-x-sync
go-golang-org-x-sys
go-gopkg-in-yaml-v3
go-gvisor-dev-gvisor))
(home-page "https://github.com/containers/gvisor-tap-vsock")
(synopsis "Network stack for virtualization based on gVisor")
@@ -714,11 +572,11 @@ Its main purpose is to support the key usage by @code{docker-init}:
(define-public podman
(package
(name "podman")
(version "5.8.1")
(version "5.7.1")
(outputs '("out" "docker"))
(properties
`((output-synopsis "docker" "docker alias for podman")
;; XXX: Addressed already.
;; XXX: Adressed already.
(lint-hidden-cve . ("CVE-2022-2989"))))
(source
(origin
@@ -727,7 +585,7 @@ Its main purpose is to support the key usage by @code{docker-init}:
(url "https://github.com/containers/podman")
(commit (string-append "v" version))))
(sha256
(base32 "1wdsdc0nj4m1v8mn95dhavi87ad0adqmld70da59gvp2abff5f0f"))
(base32 "16lb58r8vkngics6fn1b3six8bl3nrl9awrnq6ivdv1grfgy9z61"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
@@ -788,7 +646,6 @@ Its main purpose is to support the key usage by @code{docker-init}:
,(string-append #$crun "/bin")
,(string-append #$gcc "/bin") ; cpp
,(string-append #$iptables "/sbin")
,(string-append #$nftables "/sbin")
,(string-append #$passt "/bin")
,(string-append #$procps "/bin") ; ps
"/run/privileged/bin")))))
@@ -803,9 +660,8 @@ Its main purpose is to support the key usage by @code{docker-init}:
(("[$][{]ETCDIR[}]") "/etc")))
(invoke "make" "install.docker"
(string-append "PREFIX=" (assoc-ref outputs "docker"))
(string-append "ETCDIR="
(string-append (assoc-ref outputs "docker")
"/etc"))))))
(string-append "ETCDIR=" (string-append (assoc-ref outputs "docker")
"/etc"))))))
(add-after 'install 'install-completions
(lambda _
(invoke "make" "install.completions"
@@ -885,7 +741,7 @@ being rootless and not requiring any daemon to be running.")
(define-public buildah
(package
(name "buildah")
(version "1.43.0")
(version "1.42.1")
(source
(origin
(method git-fetch)
@@ -893,7 +749,7 @@ being rootless and not requiring any daemon to be running.")
(url "https://github.com/containers/buildah")
(commit (string-append "v" version))))
(sha256
(base32 "0pwdd0mxhxy530c2sbsz0rnnb1jyl41rvnqn9ywfgb6lz5f4ja2a"))
(base32 "1agblw09yw4pc81c2nsjy3j83gznn4micyjyrgpqxlmp93w5w5h0"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
+115 -165
View File
@@ -51,7 +51,6 @@
;;; Copyright © 2025 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2025 Philippe Swartvagher <phil.swart@gmx.fr>
;;; Copyright © 2025 Murilo <murilo@disroot.org>
;;; Copyright © 2026 Justin Veilleux <terramorpha@cock.li>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -186,9 +185,9 @@ easy to use API.")
(license license:expat)))
(define-public argpp
;; No tagged releases; this is the master tip.
(let ((commit "b52420a843327361713b6242e47afaa6b6ab2a89")
(revision "1"))
;; XXX: Does not release anymore.
(let ((commit "9e1d54f8ed20af0aa5857e6653ab605b2ab63d5c")
(revision "0"))
(package
(name "argpp")
(version (git-version "0.0.0" revision commit))
@@ -196,18 +195,17 @@ easy to use API.")
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Grumbel/argpp")
(commit commit)))
(url "https://github.com/Grumbel/argpp")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "07kmw7qz8l7qz572axpag7db4s97fl1mprblsrw238wdmvh9lvwc"))))
(base32 "1izn9xfplhnqi9vs4w28dixqd2vy0n1n3asaa1751grg30bw0xxs"))))
(build-system cmake-build-system)
(arguments
(list
#:configure-flags
#~(list "-DBUILD_TESTS=ON")))
(native-inputs
(list tinycmmc))
(native-inputs (list tinycmmc))
(home-page "https://github.com/Grumbel/argpp")
(synopsis "Argument parser for C++")
(description "This package provides a simple argument parser for C++.")
@@ -850,33 +848,6 @@ combination of these streams.")
enabled in different parts of your code.")
(license license:zlib)))
(define-public xbyak
(package
(name "xbyak")
(version "7.30")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/herumi/xbyak")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0rb0q5i3lj2jfrkmkxcgbczflw05p1x9fdpwrhv7gng7vp2byydw"))))
(build-system cmake-build-system)
(arguments
(list
;; No tests are registered with CTest; the test/ directory contains
;; shell scripts that are not integrated into the CMake build.
#:tests? #f))
(native-inputs
(list pkg-config))
(synopsis "JIT assembler for x86(IA-32)/x64(AMD64/x86-64) architecture")
(description "Xbyak is a C++ header-only JIT assembler for x86(IA-32),
x64(AMD64/x86-64) architecture. It supports MASM/NASM-like syntax and
advanced instruction sets including AVX-512, APX, and AVX10.2.")
(home-page "https://github.com/herumi/xbyak")
(license license:bsd-3)))
(define-public xdgpp
(let ((commit "f01f810714443d0f10c333d4d1d9c0383be41375")
(revision "0"))
@@ -1051,6 +1022,17 @@ utilities used across the hypr* ecosystem.")
(base32
"06wiizy73f0x6zj1ar878gm1w9zam1gmgjw0ybixj3qag0gxqv34"))))
(build-system cmake-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-cross-compilation
(lambda _
(substitute* "CMakeLists.txt"
(("find_package.PkgConfig" all)
(string-append
"set(PKG_CONFIG_EXECUTABLE " #$(pkg-config-for-target) ")\n"
all))))))))
(native-inputs (list gcc-15 pkg-config))
(inputs (list hyprutils))
(home-page "https://wiki.hypr.land/Hypr-Ecosystem/hyprlang/")
@@ -1074,7 +1056,18 @@ language used in Hyprland.")
(base32
"1ymiqzncppdik8lw3ad7xaqig6c7bjcy7crcwbq3rjfk2hrc8rmc"))))
(build-system cmake-build-system)
(arguments (list #:tests? #f)) ; No tests in Release build type
(arguments
(list
#:tests? #f ; No tests in Release build type
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-cross-compilation
(lambda _
(substitute* "CMakeLists.txt"
(("find_package.PkgConfig" all)
(string-append
"set(PKG_CONFIG_EXECUTABLE " #$(pkg-config-for-target) ")\n"
all))))))))
(native-inputs (list gcc-15 pkg-config))
(inputs (list pixman))
(home-page "https://github.com/hyprwm/hyprutils")
@@ -1124,7 +1117,7 @@ apps.")
(define-public hyprwire
(package
(name "hyprwire")
(version "0.3.0")
(version "0.2.1")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -1133,7 +1126,7 @@ apps.")
(file-name (git-file-name name version))
(sha256
(base32
"0jasbbsqqysp88vn75dl9kcx3mzvvdldbq9g2jdpd25j3w8wl7rx"))))
"0rzclhk42x9im9n6fz2bj98l9lb7jhl3vijvck4rj6yhb80kvli0"))))
(build-system cmake-build-system)
(arguments (list #:tests? #f)) ; There are no tests
(native-inputs (list pkg-config gcc-15))
@@ -1917,32 +1910,64 @@ using the string similarity calculations from FuzzyWuzzy.")
(define-public cpplint
(package
(name "cpplint")
(version "2.0.2")
(version "2.0.0")
(source
(origin
(method git-fetch)
;; Fetch from github instead of pypi, since the test cases are not in
;; the pypi archive.
(uri (git-reference
(url "https://github.com/cpplint/cpplint")
(commit version)))
(url "https://github.com/cpplint/cpplint")
(commit version)))
(sha256
(base32 "0n9v4zayxp2r6lhmsi4xpk5lnjs4x6h6p7isr86xyhm7mjxd7jp1"))
(base32 "06km4wh4944az1hk61g5w8pjhbvbccpgarz1dy7vhwkhfvmvggnk"))
(file-name (git-file-name name version))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 222 passed
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-pytest-config
(lambda _
(substitute* "pyproject.toml"
((" \"pytest-cov\", ") "")
((" --cov-fail-under=90 --cov=cpplint") "")))))))
(list #:modules `((srfi srfi-1)
(srfi srfi-26)
,@%pyproject-build-system-modules)
#:phases
#~(modify-phases (@ (guix build pyproject-build-system) %standard-phases)
(add-after 'unpack 'patch-build-system
(lambda _
(substitute* "pyproject.toml"
(("setuptools\\.build_meta:__legacy__")
"setuptools.build_meta"))))
(add-before 'wrap 'reduce-GUIX_PYTHONPATH
(lambda _
;; Hide the transitive native inputs from GUIX_PYTHONPATH
;; to prevent them from ending up in the run-time closure.
;; See also <https://bugs.gnu.org/25235>.
(let ((transitive-native-inputs
'#$(match (package-transitive-native-inputs
this-package)
(((labels packages) ...) packages))))
;; Save the original PYTHONPATH because we need it for
;; tests later.
(setenv "TMP_PYTHONPATH" (getenv "GUIX_PYTHONPATH"))
(setenv "GUIX_PYTHONPATH"
(string-join
(filter (lambda (path)
(not (any (cut string-prefix? <> path)
transitive-native-inputs)))
(search-path-as-string->list
(getenv "GUIX_PYTHONPATH")))
":")))))
(add-after 'wrap 'reset-GUIX_PYTHONPATH
(lambda _
(setenv "GUIX_PYTHONPATH"
(getenv "TMP_PYTHONPATH")))))))
(native-inputs
(list python-pytest
(list python-coverage
python-parameterized
python-pytest
python-pytest-cov
python-pytest-runner
python-pytest-timeout
python-setuptools
python-testfixtures))
python-testfixtures
python-wheel))
(home-page "https://github.com/cpplint/cpplint")
(synopsis "Static code checker for C++")
(description "@code{cpplint} is a command-line tool to check C/C++ files
@@ -2590,7 +2615,7 @@ of C++14 components that complements @code{std} and Boost.")
(define-public poco
(package
(name "poco")
(version "1.15.0")
(version "1.13.3")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -2599,7 +2624,7 @@ of C++14 components that complements @code{std} and Boost.")
(file-name (git-file-name name version))
(sha256
(base32
"0fzf46y7rga233nsg7d1jc6xa83i6qajxil6rak1z2z2bmhk5xa8"))))
"1b8w3s6j020r356s6j6ijpnvzjdby4qwwndhzhfjc3rm727m085g"))))
(build-system cmake-build-system)
(arguments
(list
@@ -2607,10 +2632,6 @@ of C++14 components that complements @code{std} and Boost.")
"-DENABLE_NETSSL=ON")
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'check-setenv
(lambda _
(setenv "HOME" "/tmp")
(setenv "TMPDIR" "/tmp")))
(add-after 'unpack 'disable-problematic-tests
(lambda _
(substitute* (list "Foundation/CMakeLists.txt" ; XXX: fails.
@@ -2734,68 +2755,46 @@ provides a number of utilities to make coding with expected cleaner.")
(home-page "https://tl.tartanllama.xyz/")
(license license:cc0)))
(define-public libfccp
;; Header-only library without any official release versions available.
(let ((commit "4ade42d5f8c454c6c57b3dce9c51c6dd02182a66")
(define-public immer
;; Use latest commit to fix build with gcc 14.
(let ((commit "df6ef46d97e1fe81f397015b9aeb32505cef653b")
(revision "0"))
(package
(name "libfccp")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ben-strasser/fast-cpp-csv-parser")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1y7ads97gkrjg1jc532n8gmjry0qhqxginw1gq7b4lk9s0pyl540"))))
(build-system copy-build-system)
(name "immer")
(version (git-version "0.8.1" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/arximboldi/immer")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "032rb84ahvdnc1m6sj4lflrwnk4p1f2jsq1pv03xbgizp2lr2pkx"))))
(build-system cmake-build-system)
(arguments
(list
#:install-plan
#~`(("csv.h" "include/libfccp/"))))
(synopsis "Fast header-only library for reading CSV files")
(description
"This is a small, easy-to-use and fast header-only library for reading
comma separated value (CSV) files.")
(home-page "https://github.com/ben-strasser/fast-cpp-csv-parser")
(license license:bsd-3))))
(define-public immer
(package
(name "immer")
(version "0.9.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/arximboldi/immer")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "04ckvmi391pspqiglzgi8h57gwr8822xhlrg5qdxf5yg6scgkfj2"))))
(build-system cmake-build-system)
(arguments
(list
#:modules `((guix build cmake-build-system)
((guix build gnu-build-system) #:prefix gnu:)
(guix build utils))
#:phases
#~(modify-phases %standard-phases
(replace 'check (assoc-ref gnu:%standard-phases 'check)))))
(inputs (list boost libgc c-rrb))
(native-inputs (list catch2-3 doctest fmt pkg-config))
(home-page "https://sinusoid.es/immer")
(synopsis "Immutable data structures")
(description "Immer is a library of persistent and immutable data structures
;; -Werror appears to report false positives.
;; See <https://github.com/arximboldi/immer/issues/223>.
#:configure-flags #~'("-DDISABLE_WERROR=ON")
#:modules `((guix build cmake-build-system)
((guix build gnu-build-system) #:prefix gnu:)
(guix build utils))
#:phases
#~(modify-phases %standard-phases
(replace 'check (assoc-ref gnu:%standard-phases 'check)))))
(inputs (list boost libgc c-rrb))
(native-inputs (list catch2-3 doctest fmt pkg-config))
(home-page "https://sinusoid.es/immer")
(synopsis "Immutable data structures")
(description "Immer is a library of persistent and immutable data structures
written in C++.")
(properties '((lint-hidden-cpe-vendors . ("immer_project"))))
(license license:boost1.0)))
(properties '((lint-hidden-cpe-vendors . ("immer_project"))))
(license license:boost1.0))))
(define-public zug
(package
(name "zug")
(version "0.1.2")
(version "0.1.1")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -2803,7 +2802,7 @@ written in C++.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1fy6wvvlp1253lzh66zcq5sp656jxvanxf7iq8pi37ymjq5fyynh"))
(base32 "06vsbzx4ripidpb6ia7y1y8pmjk6gxzr93ilby90ahj6p2x08baf"))
(modules '((guix build utils)))
(snippet #~(delete-file-recursively "tools"))))
(build-system cmake-build-system)
@@ -2825,7 +2824,7 @@ composable sequential transformations.")
(define-public lager
(package
(name "lager")
(version "0.1.3")
(version "0.1.1")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -2833,7 +2832,7 @@ composable sequential transformations.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "123a75qklhiyic3yaj74h4p8jav2m92x9ssjnfsdiilhycp4p764"))))
(base32 "1by9d49qnkncifyjcq16zy605d7v4ps6hvc01q5nsp1nbswm94m4"))))
(build-system cmake-build-system)
(arguments (list #:configure-flags #~(list "-Dlager_BUILD_EXAMPLES=no")
#:modules `((guix build cmake-build-system)
@@ -5025,52 +5024,3 @@ and stable references (iterators are NOT stable) on insert.")
(description "This package provides a single-header C++14 library for
saving and loading C++ objects using a binary format.")
(license license:expat)))
(define-public libdivide
(package
(name "libdivide")
(version "5.2.0")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ridiculousfish/libdivide")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"18gpi9z9kimidkijpbrbf9vxg9s2md3nhyx9yh3n17cdj6aabgq2"))))
(build-system cmake-build-system)
(home-page "https://libdivide.com/")
(synopsis "Header-only library for optimized integer division")
(description "This package provides a header-only C and C++ library for
calculating integer division by using shift, add and multiply instructions.")
;; dual licensed
(license (list license:zlib license:boost1.0))))
(define-public functionalplus
(package
(name "functionalplus")
(version "0.2.27")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Dobiasd/FunctionalPlus")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1my5npxj9fnm1lxpqnx5jpp7s278zjb9l06wdzjbg4f52z7rsm9f"))))
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'chdir
(lambda _
(chdir "test"))))))
(build-system cmake-build-system)
(native-inputs (list doctest-next))
(home-page "https://github.com/Dobiasd/FunctionalPlus")
(synopsis "Functional Programming Library for C++")
(description "@code{FunctionalPlus} is a header-only library for
simplifying functional programming in C++.")
(license license:boost1.0)))
+880 -2477
View File
File diff suppressed because it is too large Load Diff
+5 -10
View File
@@ -146,9 +146,7 @@
;; TODO: This seems like a deeper problem that warrants
;; deeper investigation.
binutils "--enable-compressed-debug-sections" "no")
(search-patches
"binutils-cross-windres.patch"
"binutils-mingw-w64-deterministic.patch")))
(search-patches "binutils-mingw-w64-deterministic.patch")))
(else binutils))
target)))
@@ -455,7 +453,6 @@ target that libc."
"i386")
((? target-x86-64?)
"x86_64")))))))))))
(supported-systems %supported-systems)
(native-inputs
(modify-inputs (package-native-inputs gnumach-headers)
(prepend xgcc xbinutils)))))
@@ -490,8 +487,6 @@ the base compiler. Use XBINUTILS as the associated cross-Binutils."
'#$%gcc-cross-include-paths))))))))
(propagated-inputs
(list xgnumach-headers))
(inputs (modify-inputs (package-inputs mig)
(delete "gnumach-headers")))
(native-inputs
(modify-inputs (package-native-inputs mig)
(prepend xgcc xbinutils)))))
@@ -548,7 +543,7 @@ the base compiler. Use XBINUTILS as the associated cross-Binutils."
`(cons* ,(string-append "--build=" (%current-system))
,(string-append "--host=" target)
,flags))))
(supported-systems %supported-systems)
(native-inputs `(("cross-gcc" ,xgcc)
("cross-binutils" ,xbinutils)
("cross-mig" ,xmig)
@@ -581,7 +576,7 @@ the base compiler. Use XBINUTILS as the associated cross-Binutils."
`(cons* ,(string-append "--build=" (%current-system))
,(string-append "--host=" target)
,flags))))
(supported-systems %supported-systems)
(propagated-inputs `(("gnumach-headers" ,xgnumach-headers)
("hurd-headers" ,xhurd-headers)))
@@ -626,7 +621,7 @@ the base compiler. Use XBINUTILS as the associated cross-Binutils."
(for-each (cut setenv <> cpath)
'#$%gcc-cross-include-paths)
#t)))))))
(supported-systems %supported-systems)
(inputs `(("cross-glibc-hurd-headers" ,xglibc/hurd-headers)
("cross-gnumach-headers" ,xgnumach-headers)))
@@ -641,7 +636,7 @@ the base compiler. Use XBINUTILS as the associated cross-Binutils."
(inherit hurd-core-headers)
(name (string-append (package-name hurd-core-headers)
"-cross-" target))
(supported-systems %supported-systems)
(inputs `(("gnumach-headers" ,xgnumach-headers)
("hurd-headers" ,xhurd-headers)
("hurd-minimal" ,xhurd-minimal)))))
-6
View File
@@ -48,9 +48,3 @@
(define-public gcc-cross-x86_64-w64-mingw32-toolchain
(cross-gcc-toolchain "x86_64-w64-mingw32"))
(define-public gcc-cross-i586-pc-gnu-toolchain
(cross-gcc-toolchain "i586-pc-gnu"))
(define-public gcc-cross-x86_64-pc-gnu-toolchain
(cross-gcc-toolchain "x86_64-pc-gnu"))
+8 -52
View File
@@ -31,7 +31,6 @@
;;; Copyright © 2025 Ashish SHUKLA <ashish.is@lostca.se>
;;; Copyright © 2025 Robin Templeton <robin@guixotic.coop>
;;; Copyright © 2026 Hennadii Stepanov <hebasto@gmail.com>
;;; Copyright © 2026 Noé Lopez <noelopez@free.fr>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -145,49 +144,6 @@
CRC32C algorithm, which is specified in RFC 3720, section 12.1.")
(license license:bsd-3)))
(define-public crcpp
(package
(name "crcpp")
(version "1.2.1.0")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/d-bahr/CRCpp.git")
(commit (string-append "release-" version))))
(file-name (git-file-name name version))
(sha256
(base32
"005hc25srr4r80md57cg9fax98c8n57ljrhxyw0chjlyq3c0d07n"))))
(build-system cmake-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'install-pkgconfig-description
(lambda _
(let ((dir (string-append #$output "/lib/pkgconfig")))
(mkdir-p (string-append dir))
(with-output-to-file (string-append dir "/CRCpp.pc")
(lambda _
(simple-format #t "\
prefix=~a
includedir=${prefix}/include
Name: ~a
Description: CRC (cyclic redundancy check) library for C++
Version: ~a
Cflags: -I${includedir}"
#$output #$name #$version)))))))))
(home-page "https://github.com/d-bahr/CRCpp")
(synopsis "@acronym{CRC, cyclic redundancy check} library for C++")
(description "CRC++ is a C++ library for calculating cyclic redundancy
checks. It supports bit-by-bit and byte-by-byte calculation of full and
multipart CRCs. It aims to have highly optimized algorithms that can run
branchless for projects with a need for efficiency. Many common CRCs are
provided out-of-the-box, such as CRC-32 (used in PKZip and Ethernet),
CRC-XMODEM, and CRC-CCITT.")
(license license:bsd-3)))
(define-public libblake3
(package
(name "libblake3")
@@ -241,9 +197,9 @@ fast, secure, parallelizable, capable of incremental updates.")
(outputs '("out" "python" "doc"))
(arguments
(list #:imported-modules (append %cmake-build-system-modules
%pyproject-build-system-modules)
%python-build-system-modules)
#:modules '((guix build cmake-build-system)
((guix build pyproject-build-system) #:prefix python:)
((guix build python-build-system) #:prefix python:)
(guix build utils))
#:configure-flags #~(list "-DENABLE_STATIC=OFF")
#:phases
@@ -1241,7 +1197,7 @@ trivial to build for local use. Portability is emphasized over performance.")
(define-public libsecp256k1
(package
(name "libsecp256k1")
(version "0.7.1")
(version "0.7.0")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -1250,7 +1206,7 @@ trivial to build for local use. Portability is emphasized over performance.")
(file-name (git-file-name name version))
(sha256
(base32
"10cvh8jks3rjg6p7y0vm1v4kw9y7vljbfijj0zxwkxzysxx60w0f"))))
"1d0cnd2s607j642h64821mpklfvvzy70mkyl2dlsm5s9lgvndn2p"))))
(build-system gnu-build-system)
(arguments
(list #:configure-flags
@@ -1825,7 +1781,7 @@ configured to start gpg-agent.")
(define-public libdigidocpp
(package
(name "libdigidocpp")
(version "4.3.0")
(version "4.2.0")
(source
(origin
(method git-fetch)
@@ -1834,7 +1790,7 @@ configured to start gpg-agent.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1kv1cyc8ylsxcvhsx1lgbjaar7ilf14gmcnmzclql2wd5vf1973z"))
(base32 "1lz8zahdmzav6csnx9r40dhzvaj7zjwvlgdjlx1s0idfrlbs3zd3"))
(modules '((guix build utils)))
(snippet '(delete-file-recursively "src/minizip"))))
(build-system cmake-build-system)
@@ -1858,7 +1814,7 @@ for creation and reading of DigiDoc files.")
(define-public osslsigncode
(package
(name "osslsigncode")
(version "2.13")
(version "2.12")
(source
(origin
(method git-fetch)
@@ -1867,7 +1823,7 @@ for creation and reading of DigiDoc files.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0l58mnagv16k1sbxda6iykrd75szp7hs9k8dfjjjxmmx6758hx7b"))))
(base32 "000balq0cw49jra9gvr8dk8x7ns9gd77qim3z8qci5rrkjbb8nai"))))
(build-system cmake-build-system)
(arguments
(list
+3 -3
View File
@@ -35,13 +35,13 @@
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages popt)
#:use-module (gnu packages linux)
#:use-module (gnu packages ruby-xyz)
#:use-module (gnu packages ruby-check)
#:use-module (gnu packages web))
(define-public cryptsetup-minimal
(package
(name "cryptsetup-minimal")
(version "2.8.4")
(version "2.8.0")
(source (origin
(method url-fetch)
(uri (string-append "mirror://kernel.org/linux/utils/cryptsetup/v"
@@ -49,7 +49,7 @@
"/cryptsetup-" version ".tar.xz"))
(sha256
(base32
"10wa3vx0dx04kv2wy165gvnyi81swawgnnj51xwcr6jcjvw4cgj4"))))
"18j3a8zzcwc0sragq47vf0b0qyr06bajh2sj6zm1r1ssq8vjv7nc"))))
(build-system gnu-build-system)
(arguments
`(#:configure-flags
+3 -2
View File
@@ -647,6 +647,7 @@ should only be used as part of the Guix cups-pk-helper service.")
"--enable-qt5"
"--disable-qt4")
#:phases
(with-extensions (list (pyproject-guile-json))
#~(modify-phases %standard-phases
(add-after 'unpack 'set-gcc-14-cflags
;; We set CFLAGS here because adding setting it in
@@ -742,7 +743,7 @@ should only be used as part of the Guix cups-pk-helper service.")
bin target)))
(chmod file #o755)))
(find-files "." (lambda (file stat)
(eq? 'symlink (stat:type stat))))))))))))
(eq? 'symlink (stat:type stat)))))))))))))
;; Note that the error messages printed by the tools in the case of
;; missing dependencies are often downright misleading.
;; TODO: hp-toolbox still fails to start with:
@@ -755,7 +756,7 @@ should only be used as part of the Guix cups-pk-helper service.")
libjpeg-turbo
libusb
python
python-dbus-1.2
python-dbus
python-pygobject
python-pyqt
python-wrapper
+9 -14
View File
@@ -6,7 +6,6 @@
;;; Copyright © 2025 Nicolas Graves <ngraves@ngraves.fr>
;;; Copyright © 2025 Sharlatan Hellseher <sharlatanus@gmail.com>
;;; Copyright © 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
;;; Copyright © 2026 Cayetano Santos <csantosb@inventati.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -112,7 +111,7 @@ Refresh}in-DRAM mitigations effectively and as such can trigger bit flips.")
(define-public gallia
(package
(name "gallia")
(version "2.0.2")
(version "2.0.0b2")
(source
(origin
(method git-fetch)
@@ -121,7 +120,7 @@ Refresh}in-DRAM mitigations effectively and as such can trigger bit flips.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1yvjpwpqq6r6glfm4qzb8j91d2gsfy4lvygd9z9pg2j6jvcq6f6s"))))
(base32 "0bf9zq89dcnnm8ir322l69assrhxrspa97m7yk153q0vv9vib6q9"))))
(build-system pyproject-build-system)
(arguments
(list
@@ -140,7 +139,6 @@ Refresh}in-DRAM mitigations effectively and as such can trigger bit flips.")
(list python-aiofiles
python-aiosqlite
python-argcomplete
python-boltons
python-can
python-construct
python-exitcode
@@ -164,16 +162,13 @@ from a single ECU up to whole cars.")
(define-public ropgadget
(package
(name "ropgadget")
(version "7.7")
(version "7.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/JonathanSalwan/ROPgadget/")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(method url-fetch)
(uri (pypi-uri "ropgadget" version))
(sha256
(base32 "0g87qz8hfiajl1v5z5rxama4531hi9gabzbgkhrbavjj7v3xgavw"))))
(base32 "1hvl25j3fbiwihqa2p8a5i27h97pgspxp2ndwwn3l1r78r7cb0w8"))))
(build-system pyproject-build-system)
(arguments
(list
@@ -202,7 +197,7 @@ chains of gadgets to execute system calls.")
(define-public pwntools
(package
(name "pwntools")
(version "4.15.0")
(version "4.15.0beta1")
(source
(origin
(method git-fetch)
@@ -211,7 +206,7 @@ chains of gadgets to execute system calls.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0phi7gks9w9rim9rzs8cgwznc3xximdpxyj5vrafivziill51qnl"))))
(base32 "048b8szybf3f69xdp258a783nl5dcgj316a5156i8ajhyfw6aaw0"))))
(build-system pyproject-build-system)
(arguments
(list
@@ -245,7 +240,7 @@ chains of gadgets to execute system calls.")
python-zstandard
unicorn))
(native-inputs
(list python-setuptools python-toml))
(list python-setuptools python-toml python-wheel))
(home-page "https://github.com/Gallopsled/pwntools")
(synopsis
"Capture-the-flag (CTF) framework and exploit development library")
+198 -241
View File
@@ -28,7 +28,7 @@
;;; Copyright © 2017, 2018 Ben Woodcroft <donttrustben@gmail.com>
;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2017, 2018, 2019 Pierre Langlois <pierre.langlois@gmx.com>
;;; Copyright © 2015, 2017, 2018, 2019, 2021-2026 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2015, 2017, 2018, 2019, 2021-2025 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2017 Kristofer Buffington <kristoferbuffington@gmail.com>
;;; Copyright © 2018 Amirouche Boubekki <amirouche@hypermove.net>
;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com>
@@ -68,7 +68,6 @@
;;; Copyright © 2025 Philippe Swartvagher <phil.swart@gmx.fr>
;;; Copyright © 2025 Simen Endsjø <contact@simendsjo.me>
;;; Copyright © 2025 bdunahu <bdunahu@operationnull.com>
;;; Copyright © 2026 Spencer King <spencer.king@wustl.edu>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -473,11 +472,11 @@ database later.")
(build-system go-build-system)
(arguments
(list
#:go go-1.23
#:build-flags #~(list "-tags" "external_libzstd")
#:test-flags #~(list "-tags" "external_libzstd"
;; Skip tests requiring git in PATH.
"-skip" "TestLint"
"-vet=off")
"-skip" "TestLint")
;; XXX: Maybe run more tests if possible.
#:test-subdirs #~(list "internal/...")
#:import-path "github.com/cockroachdb/pebble"))
@@ -523,16 +522,16 @@ table-level bloom filters, and updates to the MANIFEST format.")
(package
(inherit go-github-com-cockroachdb-pebble)
(name "go-github-com-cockroachdb-pebble-v2")
(version "2.1.4")
(version "2.0.3")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/cockroachdb/pebble")
(commit (string-append "v" version))))
(url "https://github.com/cockroachdb/pebble")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1ca58sy1q3c8czqb69nkygk0hvz8b92xkb2fpj87hnncg0zh9a9p"))))
(base32 "1jglnsabg7y0y5agazvvmsa0r0ddn0j3c204cdpv7qsvi90pnr0d"))))
(arguments
(substitute-keyword-arguments
(package-arguments go-github-com-cockroachdb-pebble)
@@ -541,50 +540,7 @@ table-level bloom filters, and updates to the MANIFEST format.")
(propagated-inputs
(modify-inputs (package-propagated-inputs go-github-com-cockroachdb-pebble)
(append go-github-com-cockroachdb-crlib
go-github-com-cockroachdb-swiss
go-github-com-minio-minlz
go-github-com-raduberinde-axisds)))))
;; XXX: This repository has been archived by the owner on Sep 21, 2022. It is
;; now read-only. It's only used by go-github-com-golang-gddo, consider to
;; remove it when it does no longer require it.
(define-public go-github-com-garyburd-redigo
(package
(name "go-github-com-garyburd-redigo")
(version "1.6.4")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/DeprecatedGoModules/redigo")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0xq1r7149z358g1dra2dwgmdlk8ynk89bkdgf9y4xx9vyddlaw08"))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:import-path "github.com/garyburd/redigo"
#:test-flags
#~(list "-skip" (string-join
;; pubsub_test.go:28: Punsubscribe(p1) =
;; {punsubscribe p2 3}, want {punsubscribe p1 3}
;; pubsub_test.go:28: Punsubscribe() =
;; {punsubscribe p1 2}, want {punsubscribe p2 2}
(list "TestPushed"
;; error connection to database, dial tcp
;; :6379: connect: connection refused
"TestConnMux"
"TestConnMuxClose")
"|"))))
(native-inputs (list redis))
(home-page "https://github.com/garyburd/redigo")
(synopsis "Deprecated Redis client for Golang")
(description
"This package provides a Redis client for Golang. It is deprecated,
consider using go-github-com-gomodule-redigo instead.")
(license license:asl2.0)))
go-github-com-cockroachdb-swiss)))))
(define-public pebble
(package/inherit go-github-com-cockroachdb-pebble
@@ -689,44 +645,6 @@ delivers higher throughput and lower median latencies, making it ideal for
modern workloads.")
(license license:bsd-3)))
(define-public dicedb-cli
(package
(name "dicedb-cli")
(version "1.0.8")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/dicedb/dicedb-cli")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0hglagah0wpdkzw5fs5b1jx6m972yriwjl4zwg7sjs529v4jf3sw"))))
(build-system go-build-system)
(arguments
(list
#:install-source? #f
#:import-path "github.com/dicedb/dicedb-cli"
#:test-flags
;; XXX: This might be an issue with cobra: parse_args_test.go:90:
;; parseArgs("SET key \"unterminated value") = []string{}; expected
;; []string{"SET", "key", "unterminated value"}
#~(list "-skip" "TestParseArgs_EdgeCases/Unterminated_quote.*")))
(native-inputs
(list go-github-com-chzyer-readline
go-github-com-dicedb-dicedb-go
go-github-com-fatih-color
go-github-com-google-shlex
go-github-com-spf13-cobra
go-google-golang-org-protobuf))
(home-page "https://github.com/DiceDB/dicedb-cli")
(synopsis "Command line interface for DiceDB")
(description
"@command{dicedb-cli} is a command line interface for
@url{https://dicedb.io, DiceDB}, a Redis-compliant in-memory database.")
(license (list license:expat ;MIT in README
license:bsd-3)))) ;BSD-3 in LICENSE file
(define-public leveldb
(package
(name "leveldb")
@@ -794,7 +712,6 @@ and generic API, and was originally intended for use with dynamic web
applications.")
(license license:bsd-3)))
;; See: <https://codeberg.org/guix/guix/issues/6122>.
(define-public libmemcached
(package
(name "libmemcached")
@@ -821,7 +738,7 @@ applications.")
bison
flex
perl
python-sphinx-6)) ;to build the HTML doc.
python-sphinx)) ;to build the HTML doc.
(inputs
(list libevent cyrus-sasl))
(outputs '("out" "doc"))
@@ -1654,6 +1571,38 @@ pictures, sounds, or video.")
(base32
"0rc8rpsw2lwa5af35zd8iifah02wg2rnn1i890h2h8zh55hvpjy9"))))))
(define-deprecated/public postgresql-11 #f
(package
(inherit postgresql-13)
(name "postgresql")
(version "11.22")
(source (origin
(inherit (package-source postgresql-13))
(uri (string-append "https://ftp.postgresql.org/pub/source/v"
version "/postgresql-" version ".tar.bz2"))
(sha256
(base32
"1w71xf97i3hha6vl05xqf960k75nczs6375w3f2phwhdg9ywkdrc"))))
(native-inputs
(modify-inputs (package-native-inputs postgresql-13)
(replace "docbook-xml" docbook-xml-4.2)))))
(define-deprecated/public postgresql-10 #f
(package
(inherit postgresql-13)
(version "10.23")
(source (origin
(inherit (package-source postgresql-13))
(uri (string-append "https://ftp.postgresql.org/pub/source/v"
version "/postgresql-" version ".tar.bz2"))
(sha256
(base32
"1sgfssjc9lnzijhn108r6z26fri655k413f1c9b8wibjhd9b594l"))))
(native-inputs
(modify-inputs (package-native-inputs postgresql-13)
(append opensp docbook-sgml-4.2)
(delete "docbook-xml")))))
(define-public postgresql postgresql-14)
(define-public libpg-query-17
@@ -4678,8 +4627,8 @@ into Python.")
(sha256
(base32 "1njzxi130bbix53wl0gcsvryk1b2cazq0s2701jbkf6nvr3ywpyy"))))
(build-system pyproject-build-system)
(native-inputs (list python-flit-core python-packaging))
(propagated-inputs (list python-typing-extensions))
(arguments (list #:test-backend #~'unittest))
(native-inputs (list python-flit-core))
(home-page "https://github.com/jreese/aiosqlite")
(synopsis "Asyncio bridge for sqlite3")
(description
@@ -5018,7 +4967,7 @@ parsing code in hiredis. It primarily speeds up parsing of multi bulk replies."
(define-public python-fakeredis
(package
(name "python-fakeredis")
(version "2.33.0")
(version "2.31.2")
(source
(origin
(method git-fetch)
@@ -5027,22 +4976,24 @@ parsing code in hiredis. It primarily speeds up parsing of multi bulk replies."
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "02zi7dl4dm90z4aiadq8bba4vjhrpj8ns34ziazqcxlm72pyzxms"))))
(base32 "1ccywkm42drm2l1l2a1r6v5y5sycsbfbdlgvrrlr5a9ns9s1sb7s"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 2652 passed, 319 skipped, 194 deselected, 24 warnings
#:test-flags
#~(list "-m" "not slow"
;; XXX: Requires additional valkey package,
;; but not the one in this module.
"--ignore-glob=test/test_valkey/*"
;; XXX: Unclear why these tests fail. Wrong Redis version?
"-k" (string-join
;; redis.exceptions.ResponseError: unknown command
;; 'evalsha', with args beginning with:
(list "not test_async_lock[fake_resp2]"
"test_async_lock[fake_resp3]"
;; AssertionError: Commands not found in category
;; b'write'...
"test_acl_cat[StrictRedis2]"
"test_acl_cat[StrictRedis3]")
(list "not test_acl_cat"
"test_acl_log_auth_exist"
"test_acl_log_invalid_key"
"test_acl_log_invalid_channel"
"test_client_list"
"test_client_info"
"test_client_id")
" and not "))
#:phases
#~(modify-phases %standard-phases
@@ -5052,16 +5003,13 @@ parsing code in hiredis. It primarily speeds up parsing of multi bulk replies."
(when tests?
(invoke "redis-server" "--daemonize" "yes"
"--port" "6390")))))))
(native-inputs
(list python-hatchling
python-pytest
python-pytest-asyncio
python-pytest-mock
redis))
(native-inputs (list python-hatchling python-pytest
python-pytest-asyncio python-pytest-mock
redis))
(propagated-inputs
(list python-redis
python-sortedcontainers
python-valkey))
python-typing-extensions))
(home-page "https://github.com/cunla/fakeredis-py")
(synopsis "Fake implementation of redis API for testing purposes")
(description
@@ -5077,45 +5025,54 @@ reasonable substitute.")
(define-public python-redis
(package
(name "python-redis")
(version "7.1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/redis/redis-py")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0c2794r5xcqdqaqr1vr3ibi6lb5rvxg002ichjb42xhlbpd4860j"))))
(version "5.2.0")
(source (origin
;; The PyPI archive lacks some test resources such as the TLS
;; certificates under docker/stunnel/keys.
(method git-fetch)
(uri (git-reference
(url "https://github.com/redis/redis-py")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0f38s704gpm8ra6vdrqhicfq7m77in60kbgcmhvmviq9qj6v3505"))))
(build-system pyproject-build-system)
(arguments
(list
#:test-flags
#~(list
;; These tests are disabled in the official CI run (see:
;; https://raw.githubusercontent.com/redis/redis-py/master/
;; .github/workflows/install_and_test.sh).
"-m" "not onlycluster and not redismod and not ssl"
"--ignore=tests/test_scenario"
"--ignore=tests/test_asyncio/test_scenario"
;; XXX: Those tests require the unpackaged "pybreaker".
"--ignore=tests/test_multidb"
"--ignore=tests/test_asyncio/test_multidb"
;; XXX: Those tests require the unpackaged "redis_entraid".
"--ignore=tests/test_credentials.py"
"--ignore=tests/test_asyncio/test_credentials.py"
;; XXX: Those test fail with ConnectionError.
"--ignore=tests/test_sentinel.py"
"--ignore=tests/test_asyncio/test_sentinel.py"
"--deselect=tests/test_commands.py::TestRedisCommands::test_psync"
"--deselect=tests/test_commands.py::TestRedisCommands::\
test_xgroup_create_entriesread")
#~(list "-m"
;; These tests are disabled in the official CI run (see:
;; https://raw.githubusercontent.com/redis/redis-py/master/
;; .github/workflows/install_and_test.sh).
(string-append "not onlycluster "
"and not redismod "
"and not ssl "
"and not graph")
"-k" (string-join
(list
;; The autoclaim test fails with "AssertionError: assert
;; [b'0-0', [], []] == [b'0-0', []]".
"not test_xautoclaim "
;; These tests cause the following error: "Error 111
;; connecting to localhost:6380. Connection refused."
;; (see: https://github.com/redis/redis-py/issues/2109).
"test_sync"
"test_psync"
;; Same with: "Error 111 connecting to
;; localhost:6479. Connection refused."
"test_tfcall"
"test_tfunction_load_delete"
"test_tfunction_list"
;; AssertionError: assert 3 == 2
"test_acl_list"
;; XXX: This test occasionally fails on i686-linux
#$@(if (target-x86-32?)
'("test_geopos")
'()))
" and not "))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'relax-coverage-requirements
(lambda _
(substitute* "pyproject.toml"
((".*coverage.*") ""))))
;; Tests require a running Redis server.
(add-before 'check 'start-redis
(lambda* (#:key tests? #:allow-other-keys)
@@ -5124,12 +5081,13 @@ test_xgroup_create_entriesread")
"--enable-debug-command" "yes"
"--enable-module-command" "local")))))))
(native-inputs
(list python-hatchling
python-mock
python-numpy
(list python-numpy
python-pytest
python-pytest-asyncio
python-pytest-asyncio-0.23
python-pytest-cov
python-pytest-timeout
python-setuptools
python-wheel
redis))
(propagated-inputs
(list python-async-timeout))
@@ -5142,20 +5100,19 @@ test_xgroup_create_entriesread")
(define-public python-rq
(package
(name "python-rq")
(version "2.6.1")
(version "2.3.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/rq/rq")
(commit (string-append "v" version))))
(url "https://github.com/rq/rq")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0n2bn9awd3sbl9bkz0h7y8c356w0n7fdhifzfvzylrx2jggczv73"))))
(base32 "1w9aqvbvh1mfpgng0mdcskxl5y3ybcqqai5dnwgvg18am0xxhya6"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 520 passed, 16 skipped, 76 warnings
#:phases #~(modify-phases %standard-phases
(add-before 'check 'start-redis
(lambda _
@@ -5167,9 +5124,7 @@ test_xgroup_create_entriesread")
python-pytest
redis))
(propagated-inputs
(list python-click
python-croniter
python-redis))
(list python-click python-redis))
(home-page "https://python-rq.org/")
(synopsis "Simple job queues for Python")
(description
@@ -5182,68 +5137,41 @@ is designed to have a low barrier to entry.")
(package
(name "python-rq-scheduler")
(version "0.14")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/rq/rq-scheduler")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "09fh9m2vcl1jndq35xp1x0j8ih009r71qmhn2pkl93fykrqfavyn"))))
(home-page "https://github.com/rq/rq-scheduler")
(source (origin
(method git-fetch)
(uri (git-reference
(url home-page)
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"09fh9m2vcl1jndq35xp1x0j8ih009r71qmhn2pkl93fykrqfavyn"))))
(build-system pyproject-build-system)
(arguments
(list
;; tests: 60 passed, 15 deselected, 12 warnings
#:test-flags
#~(list #$@(map (lambda (test) (string-append "--deselect="
"tests/test_scheduler.py"
"::TestScheduler::"
test))
;; OSError: Read crontab <...>: mcron: Only root can use
;; the -u option.
(list "test_cron_sets_default_result_ttl_to_minus_1"
"test_cron_sets_default_ttl_to_none"
"test_cron_sets_provided_result_ttl"
"test_cron_sets_provided_ttl"
"test_crontab_persisted_correctly"
"test_crontab_persisted_correctly_with_local_timezone"
"test_crontab_rescheduled_correctly_with_local_timezone"
"test_crontab_schedules_correctly"
"test_crontab_sets_default_result_ttl"
"test_crontab_sets_description"
"test_crontab_sets_id"
"test_crontab_sets_timeout"
"test_job_with_crontab_get_rescheduled"))
#$@(map (lambda (test) (string-append "--deselect="
"tests/test_callbacks.py"
"::JobCallbackTestCase::"
test))
;; AssertionError: <object object at 0x7ffff7599c10> !=
;; None
(list "test_job_creation_with_failure_callback"
"test_job_creation_with_success_callback")))
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'start-redis
(lambda _
(invoke "redis-server" "--daemonize" "yes")))
(add-after 'unpack 'loosen-requirements
(lambda _
;; crontab package is python_crontab in PyPI.
(substitute* "setup.py"
(("crontab>=[0-9.]*")
"python-crontab")))))))
#~(list "-k" (string-append "not test_cron"
" and not test_job_creation_with"
" and not test_job_with_crontab"))
#:phases #~(modify-phases %standard-phases
(add-before 'check 'start-redis
(lambda _
(invoke "redis-server" "--daemonize" "yes")))
(add-after 'unpack 'loosen-requirements
(lambda _
(substitute* "setup.py"
(("crontab>=[0-9.]*")
"python-crontab")))))))
(native-inputs
(list python-pytest
python-setuptools
redis))
(propagated-inputs
(list python-crontab
python-freezegun
python-dateutil
python-rq))
(home-page "https://github.com/rq/rq-scheduler")
python-pytest
python-setuptools
python-wheel
redis))
(propagated-inputs
(list python-croniter python-rq))
(synopsis "Job scheduling capabilities for RQ (Redis Queue)")
(description
"This package provides job scheduling capabilities to @code{python-rq}
@@ -5405,7 +5333,7 @@ with integrated support for finding required rows quickly.")
(define-public apache-arrow
(package
(name "apache-arrow")
(version "23.0.1")
(version "22.0.0")
(source
(origin
(method git-fetch)
@@ -5415,7 +5343,7 @@ with integrated support for finding required rows quickly.")
(file-name (git-file-name name version))
(sha256
(base32
"1qn7wgavi3kiz4d6w1naqj5631bg87fnj6gbhaxmpmynm5hi9wm7"))))
"09ra9p2majsczjq6ygcz2jqafdryvrzahxsbflfqp2z8invsd14b"))))
(build-system cmake-build-system)
(arguments
(list
@@ -5620,6 +5548,9 @@ other traditional Python scientific computing packages.")
(lambda _
(substitute* "setup.py"
(("^.*\"git\", \"status\".*$") ""))))
(add-before 'build 'set-version
(lambda _
(setenv "SETUPTOOLS_SCM_PRETEND_VERSION" #$version)))
(add-before 'check 'remove-local-source
(lambda _
(copy-recursively "fastparquet/test" "test")
@@ -5879,7 +5810,7 @@ be blown away by a SQL-DB or an external database server.")
(define-public sdb
(package
(name "sdb")
(version "2.3.4")
(version "2.2.4")
(source (origin
(method git-fetch)
(uri (git-reference
@@ -5888,7 +5819,7 @@ be blown away by a SQL-DB or an external database server.")
(file-name (git-file-name name version))
(sha256
(base32
"0x99sjmd8h0r6rh1ahr48lbqlg6swf2s3m2slqzlf19bxvy2firs"))))
"15pc807s2nmhnr3mspyz9h47rkxkv1r07x959ir17v5b6zs7wxvw"))))
(build-system meson-build-system)
(arguments
(list
@@ -5915,6 +5846,57 @@ be blown away by a SQL-DB or an external database server.")
(description "SDB is a simple key/value database based on djb's cdb disk
storage that supports JSON and array introspection.")
(license license:expat)))
(define-public sequeler
(package
(name "sequeler")
(version "0.8.2")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Alecaddd/sequeler")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0biggmsn8k7j6pdrwk29whl56qlfgvf5d9vjpgz4nyqih56wgh9j"))))
(build-system meson-build-system)
(arguments
'(#:glib-or-gtk? #t
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'skip-gtk-update-icon-cache
;; Don't create 'icon-theme.cache'.
(lambda _
(substitute* "build-aux/meson_post_install.py"
(("gtk-update-icon-cache") "true")
(("update-desktop-database") "true")))))))
(native-inputs
`(;("appstream-glib" ,appstream-glib) ; validation fails for lack of network
("gettext-minimal" ,gettext-minimal)
("glib:bin" ,glib "bin") ; for glib-compile-resources
("gtk+" ,gtk+ "bin")
("pkg-config" ,pkg-config)
("vala" ,vala)))
(inputs
`(("glib" ,glib)
("granite" ,granite)
("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
("gtk+" ,gtk+)
("gtksourceview-3" ,gtksourceview-3)
("libgda" ,libgda)
("libgee" ,libgee)
("libsecret" ,libsecret)
("libssh2" ,libssh2)
("libxml2" ,libxml2)))
(synopsis "Friendly SQL Client")
(description "Sequeler is a native Linux SQL client built in Vala and
Gtk. It allows you to connect to your local and remote databases, write SQL in
a handy text editor with language recognition, and visualize SELECT results in
a Gtk.Grid Widget.")
(home-page "https://github.com/Alecaddd/sequeler")
(license license:gpl2+)))
(define-public sqlitebrowser
(package
(name "sqlitebrowser")
@@ -6122,31 +6104,6 @@ relational databases are in general.")
"This package implements the @acronym{LSP, Language Server Protocol} for SQL.")
(license license:expat)))
(define-public python-dbutils
(package
(name "python-dbutils")
(version "3.1.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/WebwareForPython/DBUtils")
(commit
(string-append "Release-"
(string-join (string-split version #\.) "_")))))
(file-name (git-file-name name version))
(sha256
(base32 "1x2bqqlp6ahm8k8d0f1g3l0fcsjala3z6jdmcwhwkbh0agg8agff"))))
(build-system pyproject-build-system)
(native-inputs (list python-pytest python-setuptools))
(home-page "https://github.com/WebwareForPython/DBUtils")
(synopsis "Database connections for multi-threaded environments")
(description
"This package provides tooling for solid, persistent and pooled
connections to a database that can be used in all kinds of multi-threaded
environments.")
(license license:expat)))
(define-public python-dogpile-cache
(package
(name "python-dogpile-cache")
+2 -2
View File
@@ -292,14 +292,14 @@ allows multiple concurrent reader and writer threads.")
(define-public liburcu
(package
(name "liburcu")
(version "0.15.6")
(version "0.14.1")
(source (origin
(method url-fetch)
(uri (string-append "https://www.lttng.org/files/urcu/"
"userspace-rcu-" version ".tar.bz2"))
(sha256
(base32
"0ks1mj5r11ir9ssbxgm13pj9wix7gny9g3qfqzrfn4gbjqh1j2w5"))))
"1h5bg0k94by2v7cjq7fb3ridqixbd9pndw506vl27h3fvh9wn6i3"))))
(build-system gnu-build-system)
(native-inputs
;; riscv64 needs >= gcc-13.3.0

Some files were not shown because too many files have changed in this diff Show More