forked from tribes/guix
Compare commits
15 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
 Mathieu Othacehe
|
8b04431433 | ||
|
Mathieu Othacehe
|
c7b40a2181 | ||
|
Mathieu Othacehe
|
5dca11e5e5 | ||
|
Mathieu Othacehe
|
f91286326a | ||
|
Mathieu Othacehe
|
7e0ecb5da2 | ||
|
Mathieu Othacehe
|
28b947938a | ||
|
Mathieu Othacehe
|
3c9b8e0669 | ||
|
Mathieu Othacehe
|
638b8e40fd | ||
|
Mathieu Othacehe
|
35114531e3 | ||
|
Mathieu Othacehe
|
02545e381e | ||
|
Mathieu Othacehe
|
3fbe5e4f9f | ||
|
Mathieu Othacehe
|
80be6360be | ||
|
Mathieu Othacehe
|
410731c831 | ||
|
Mathieu Othacehe
|
612f8c3606 | ||
|
Mathieu Othacehe
|
3369f7d509 |
+1
-19
@@ -12,15 +12,6 @@ gnu/packages/audio\.scm @guix/audio
|
||||
gnu/packages/fluidplug\.scm @guix/audio
|
||||
gnu/packages/xiph\.scm @guix/audio
|
||||
|
||||
gnu/packages/elixir(-.+|)\.scm$ @guix/beam
|
||||
guix/build/mix-build-system\.scm @guix/beam
|
||||
guix/build-system/mix\.scm @guix/beam
|
||||
gnu/packages/erlang(-.+|)\.scm$ @guix/beam
|
||||
guix/build/rebar-build-system\.scm @guix/beam
|
||||
guix/build-system/rebar\.scm @guix/beam
|
||||
guix/import/hexpm\.scm @guix/beam
|
||||
guix/scripts/import/hexpm\.scm @guix/beam
|
||||
|
||||
gnu/packages/commencement\.scm @guix/bootstrap
|
||||
gnu/packages/mes\.scm @guix/bootstrap
|
||||
|
||||
@@ -54,6 +45,7 @@ guix/diagnostics\.scm @guix/core
|
||||
guix/discovery\.scm @guix/core
|
||||
guix/docker\.scm @guix/core
|
||||
guix/download\.scm @guix/core
|
||||
guix/elf\.scm @guix/core
|
||||
guix/ftp-client\.scm @guix/core
|
||||
guix/gexp\.scm @guix/core
|
||||
guix/git-authenticate\.scm @guix/core
|
||||
@@ -126,14 +118,6 @@ guix/build/gnu-build-system\.scm @guix/core-packages
|
||||
guix/build/utils\.scm @guix/core-packages
|
||||
guix/build-system/gnu\.scm @guix/core-packages
|
||||
|
||||
gnu/packages/crypto\.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/debian\.scm @guix/debian
|
||||
|
||||
\.texi$ @guix/documentation
|
||||
@@ -206,7 +190,6 @@ tests/home-import\.scm @guix/home
|
||||
tests/home-services\.scm @guix/home
|
||||
|
||||
gnu/packages/mpi\.scm @guix/hpc
|
||||
gnu/packages/oneapi\.scm @guix/hpc
|
||||
gnu/packages/rocm\.scm @guix/hpc
|
||||
gnu/packages/sycl\.scm @guix/hpc
|
||||
gnu/packages/tbb\.scm @guix/hpc
|
||||
@@ -363,7 +346,6 @@ gnu/packages/openldap\.scm @guix/sysadmin
|
||||
gnu/packages/openstack\.scm @guix/sysadmin
|
||||
gnu/packages/prometheus\.scm @guix/sysadmin
|
||||
gnu/packages/rdesktop\.scm @guix/sysadmin
|
||||
gnu/packages/samba\.scm @guix/sysadmin
|
||||
gnu/packages/selinux\.scm @guix/sysadmin
|
||||
gnu/packages/storage\.scm @guix/sysadmin
|
||||
gnu/packages/task-runners\.scm @guix/sysadmin
|
||||
|
||||
+3
-10
@@ -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 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
# Copyright © 2020, 2021, 2023 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>
|
||||
@@ -170,7 +170,6 @@ MODULES = \
|
||||
guix/build-system/gnu.scm \
|
||||
guix/build-system/go.scm \
|
||||
guix/build-system/guile.scm \
|
||||
guix/build-system/hare.scm \
|
||||
guix/build-system/haskell.scm \
|
||||
guix/build-system/julia.scm \
|
||||
guix/build-system/linux-module.scm \
|
||||
@@ -202,6 +201,7 @@ MODULES = \
|
||||
guix/ftp-client.scm \
|
||||
guix/http-client.scm \
|
||||
guix/gnupg.scm \
|
||||
guix/elf.scm \
|
||||
guix/profiling.scm \
|
||||
guix/store.scm \
|
||||
guix/cvs-download.scm \
|
||||
@@ -240,7 +240,6 @@ MODULES = \
|
||||
guix/build/gnu-build-system.scm \
|
||||
guix/build/gnu-dist.scm \
|
||||
guix/build/guile-build-system.scm \
|
||||
guix/build/hare-build-system.scm \
|
||||
guix/build/luanti-build-system.scm \
|
||||
guix/build/maven-build-system.scm \
|
||||
guix/build/minetest-build-system.scm \
|
||||
@@ -266,7 +265,6 @@ MODULES = \
|
||||
guix/build/kconfig.scm \
|
||||
guix/build/linux-module-build-system.scm \
|
||||
guix/build/store-copy.scm \
|
||||
guix/build/io.scm \
|
||||
guix/build/json.scm \
|
||||
guix/build/pack.scm \
|
||||
guix/build/utils.scm \
|
||||
@@ -452,10 +450,6 @@ 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.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.16-arm.conf \
|
||||
gnu/packages/aux-files/linux-libre/6.16-arm64.conf \
|
||||
gnu/packages/aux-files/linux-libre/6.16-riscv.conf \
|
||||
@@ -592,7 +586,6 @@ SCM_TESTS = \
|
||||
tests/http-client.scm \
|
||||
tests/inferior.scm \
|
||||
tests/ipfs.scm \
|
||||
tests/ld-wrapper.scm \
|
||||
tests/lint.scm \
|
||||
tests/modules.scm \
|
||||
tests/monads.scm \
|
||||
@@ -729,7 +722,7 @@ endif !CAN_RUN_TESTS
|
||||
|
||||
check-system: $(GOBJECTS)
|
||||
$(AM_V_at)$(top_builddir)/pre-inst-env \
|
||||
guix build -m $(top_srcdir)/etc/manifests/system-tests.scm -K
|
||||
guix repl -- $(top_srcdir)/build-aux/run-system-tests.scm -K
|
||||
|
||||
# Public keys used to sign substitutes.
|
||||
dist_pkgdata_DATA = \
|
||||
|
||||
@@ -0,0 +1,228 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2025 Mathieu Othacehe <othacehe@gnu.org>
|
||||
;;;
|
||||
;;; 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/>.
|
||||
|
||||
(use-modules (gnu)
|
||||
(gnu tests)
|
||||
(gnu packages package-management)
|
||||
(guix)
|
||||
(guix colors)
|
||||
((guix build utils)
|
||||
#:select (delete-file-recursively))
|
||||
(guix store)
|
||||
(guix packages)
|
||||
(guix utils)
|
||||
(guix ui)
|
||||
(guix build syscalls)
|
||||
(srfi srfi-1)
|
||||
(srfi srfi-26)
|
||||
(ice-9 getopt-long)
|
||||
(ice-9 match)
|
||||
(ice-9 exceptions)
|
||||
(ice-9 pretty-print)
|
||||
(ice-9 rdelim)
|
||||
(web uri))
|
||||
|
||||
;; Version of the script.
|
||||
(define script-version "0.1")
|
||||
|
||||
;; Directory for the system test logs.
|
||||
(define tmpdir (mkdtemp! "/tmp/system-tests-XXXXXX"))
|
||||
|
||||
;; Save the stdout and stderr ports.
|
||||
(define output-port (duplicate-port (current-output-port) "w0"))
|
||||
(define error-port (duplicate-port (current-error-port) "w0"))
|
||||
|
||||
;; List of all the system tests, sorted alphabetically.
|
||||
(define all-sorted-tests
|
||||
(sort (all-system-tests)
|
||||
(lambda (a b)
|
||||
(string<? (system-test-name a) (system-test-name b)))))
|
||||
|
||||
(define (test->log-file test)
|
||||
"Return the name of the log file for the given system TEST."
|
||||
(format #f "~a/~a.log" tmpdir (system-test-name test)))
|
||||
|
||||
(define (print-failure)
|
||||
"Print a failure message."
|
||||
(format output-port
|
||||
(colorize-string "FAIL" (color RED BOLD)))
|
||||
(format output-port "~%"))
|
||||
|
||||
(define (print-success)
|
||||
"Print a success message."
|
||||
(format output-port
|
||||
(colorize-string "OK" (color GREEN BOLD)))
|
||||
(format output-port "~%"))
|
||||
|
||||
(define* (run-system-test test #:key redirect-output?)
|
||||
"Run the given system-test and redirect the test output to a file.
|
||||
Return true if the test is successful and false otherwise."
|
||||
(define log-port
|
||||
(and redirect-output?
|
||||
(open-output-file (test->log-file test))))
|
||||
|
||||
(dynamic-wind
|
||||
(lambda ()
|
||||
(when redirect-output?
|
||||
(redirect-port log-port (current-output-port))
|
||||
(redirect-port log-port (current-warning-port))
|
||||
(redirect-port log-port (current-error-port))))
|
||||
(lambda ()
|
||||
(parameterize ((current-build-output-port
|
||||
(if redirect-output?
|
||||
log-port
|
||||
(current-build-output-port))))
|
||||
(let ((store (open-connection)))
|
||||
(run-with-store store
|
||||
(mlet %store-monad
|
||||
((drv (lower-object test)))
|
||||
(return
|
||||
(guard (c ((store-protocol-error? c)
|
||||
(print-failure)
|
||||
#f))
|
||||
(and (build-derivations store (list drv))
|
||||
(print-success)))))))))
|
||||
(lambda ()
|
||||
(and redirect-output?
|
||||
(close-port log-port)))))
|
||||
|
||||
(define* (print-results results #:key keep-logs)
|
||||
"Use RESULTS, a list of booleans, to print out the test results. If
|
||||
some tests are failing, exit with the error code 1. Otherwise, exit with
|
||||
success."
|
||||
(let* ((ok-count (count identity results))
|
||||
(fail-count (- (length results) ok-count)))
|
||||
(format output-port "~%")
|
||||
(if keep-logs
|
||||
(format output-port "Test results are available in ~a~%" tmpdir)
|
||||
(delete-file-recursively tmpdir))
|
||||
(if (= fail-count 0)
|
||||
(begin
|
||||
(format output-port "All system tests are successful.~%")
|
||||
(exit 0))
|
||||
(begin
|
||||
(format output-port "~a failing test~a~%" fail-count
|
||||
(if (> fail-count 1) "s" ""))
|
||||
(exit 1)))))
|
||||
|
||||
(define* (run-tests tests #:key keep-logs redirect-output?)
|
||||
"Run all the given TESTS. If KEEP-LOGS is set to true, keep the system test
|
||||
log files."
|
||||
(let* ((count (length tests))
|
||||
(indexes (iota count)))
|
||||
(print-results
|
||||
(map (lambda (index test)
|
||||
(format output-port "Running ~a (~a/~a): "
|
||||
(system-test-name test)
|
||||
(1+ index) count)
|
||||
(force-output output-port)
|
||||
(run-system-test test #:redirect-output? redirect-output?))
|
||||
indexes tests)
|
||||
#:keep-logs keep-logs)))
|
||||
|
||||
(define (subset-tests tests subset)
|
||||
"Return the subset of TESTS that are also in the given SUBSET list."
|
||||
(filter
|
||||
(lambda (test)
|
||||
(let ((name (system-test-name test)))
|
||||
(member name subset)))
|
||||
tests))
|
||||
|
||||
(define (exclude-tests tests excludes)
|
||||
"Return the given TESTS list without the tests that are part of the EXCLUDES
|
||||
list."
|
||||
(filter
|
||||
(lambda (test)
|
||||
(let ((name (system-test-name test)))
|
||||
(not (member name excludes))))
|
||||
tests))
|
||||
|
||||
(define (show-help)
|
||||
(display "Usage: run-system-tests.scm [OPTIONS]
|
||||
Run the system tests.\n")
|
||||
(display " --tests=TEST1,TEST2,... run only TEST1 and TEST2")
|
||||
(newline)
|
||||
(display " --exclude-tests=TEST1,TEST2,... run all tests but TEST1 and TEST2")
|
||||
(newline)
|
||||
(display " --list-tests list all the system tests")
|
||||
(newline)
|
||||
(display " -n, --no-redirect do not redirect the test logs")
|
||||
(newline)
|
||||
(display " -K, --keep-logs keep the test logs")
|
||||
(newline)
|
||||
(display " -h, --help display this help and exit")
|
||||
(newline)
|
||||
(display " -V, --version display verson information and exit")
|
||||
(newline))
|
||||
|
||||
(define %options
|
||||
'((tests (value #t))
|
||||
(exclude-tests (value #t))
|
||||
(list-tests (value #f))
|
||||
(keep-logs (single-char #\K) (value #f))
|
||||
(no-redirect (single-char #\n) (value #f))
|
||||
(help (single-char #\h) (value #f))
|
||||
(version (single-char #\V) (value #f))))
|
||||
|
||||
(define (main . args)
|
||||
(define guix-source
|
||||
(canonicalize-path
|
||||
(string-append (current-source-directory) "/..")))
|
||||
|
||||
;; Use the local Guix as the current-guix-package so that we do not compute
|
||||
;; the Guix derivation over and over.
|
||||
(define guix-local
|
||||
(package
|
||||
(inherit guix)
|
||||
(source (local-file guix-source #:recursive? #t))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments guix)
|
||||
((#:tests? #f #f) #f)))))
|
||||
|
||||
(let* ((opts (getopt-long (command-line) %options))
|
||||
(option (cut option-ref opts <> <>))
|
||||
(keep-logs (option 'keep-logs #f))
|
||||
(no-redirect (option 'no-redirect #f)))
|
||||
(cond
|
||||
((option 'help #f)
|
||||
(show-help))
|
||||
((option 'version #f)
|
||||
(format #t "run-system-tests.scm ~A~%" script-version))
|
||||
((option 'list-tests #f)
|
||||
(format #t "System tests:~%~{- ~a~%~}"
|
||||
(map (lambda (test)
|
||||
(system-test-name test))
|
||||
all-sorted-tests)))
|
||||
(else
|
||||
(let* ((subset
|
||||
(and=> (option 'tests #f)
|
||||
(cut string-split <> #\,)))
|
||||
(excludes
|
||||
(and=> (option 'exclude-tests #f)
|
||||
(cut string-split <> #\,)))
|
||||
(tests
|
||||
(cond
|
||||
(excludes (exclude-tests all-sorted-tests excludes))
|
||||
(subset (subset-tests all-sorted-tests subset))
|
||||
(else all-sorted-tests))))
|
||||
(parameterize ((current-guix-package guix-local))
|
||||
(run-tests tests
|
||||
#:keep-logs keep-logs
|
||||
#:redirect-output? (not no-redirect))))))))
|
||||
|
||||
(apply main (cdr (command-line)))
|
||||
+1
-1
@@ -21,7 +21,7 @@
|
||||
AC_PREREQ([2.69])
|
||||
AC_INIT([GNU Guix],
|
||||
[m4_esyscmd([build-aux/git-version-gen .tarball-version])],
|
||||
[https://codeberg.org/guix/guix/issues/], [guix],
|
||||
[bug-guix@gnu.org], [guix],
|
||||
[https://www.gnu.org/software/guix/])
|
||||
AC_CONFIG_AUX_DIR([build-aux])
|
||||
|
||||
|
||||
+5
-13
@@ -3344,21 +3344,13 @@ for @b{at least one year}. For example, @code{go-ipfs} was renamed to
|
||||
change to users, the package module provided this definition:
|
||||
|
||||
@findex deprecated-package
|
||||
@findex define-deprecated-package
|
||||
@lisp
|
||||
(define-deprecated-package go-ipfs
|
||||
kubo)
|
||||
(define-public go-ipfs
|
||||
(deprecated-package "go-ipfs" kubo))
|
||||
@end lisp
|
||||
|
||||
That way, someone running @command{guix install go-ipfs} or similar sees
|
||||
a deprecation warning mentioning the new package name; likewise, someone
|
||||
referring to the @code{go-ipfs} @emph{variable} from their manifest or
|
||||
package definition will see a warning.
|
||||
|
||||
Under the hood, @code{define-deprecated-package} combines
|
||||
@code{define-deprecated/public-alias} to mark the variable as deprecated
|
||||
(see below), and the @code{deprecated-package} procedure to mark the
|
||||
package name as deprecated.
|
||||
a deprecation warning mentioning the new name.
|
||||
|
||||
@cindex package removal policy
|
||||
@anchor{package-removal-policy}
|
||||
@@ -3368,8 +3360,8 @@ of life'' or being unmaintained may be removed; likewise, packages that
|
||||
have been @b{failing to build for two months or more} may be removed.
|
||||
|
||||
There is no formal deprecation mechanism for this case, unless a
|
||||
replacement exists, in which case the @code{define-deprecated-package}
|
||||
macro mentioned above can be used.
|
||||
replacement exists, in which case the @code{deprecated-package}
|
||||
procedure mentioned above can be used.
|
||||
|
||||
If the package being removed is a ``leaf'' (no other packages depend on
|
||||
it), it may be removed after a @b{one-month review period} of the patch
|
||||
|
||||
@@ -518,7 +518,7 @@ as ``SICP'', this book is a reference.
|
||||
You can also install it and read it from your computer:
|
||||
|
||||
@example
|
||||
guix install book-sicp info-reader
|
||||
guix install sicp info-reader
|
||||
info sicp
|
||||
@end example
|
||||
|
||||
@@ -5737,9 +5737,9 @@ packages:
|
||||
guix shell -C gcc-toolchain cmake coreutils grep sed make -- @dots{}
|
||||
@end example
|
||||
|
||||
Or perhaps you'll find that you could just as well provide a package
|
||||
definition for your code---@pxref{Defining Packages,,, guix, GNU Guix
|
||||
Reference Manual}, to learn more on how to do that.
|
||||
Or perhaps you'll find that you could just as well provide a definition
|
||||
for your package---@pxref{Defining Packages,,, guix, GNU Guix Reference
|
||||
Manual}, to learn more on how to do that.
|
||||
|
||||
Eventually, you'll have a list of packages that satisfies your needs.
|
||||
|
||||
|
||||
+34
-514
@@ -145,7 +145,6 @@ Copyright @copyright{} 2025 jgart@*
|
||||
Copyright @copyright{} 2025 Artur Wroblewski@*
|
||||
Copyright @copyright{} 2025 Edouard Klein@*
|
||||
Copyright @copyright{} 2025 Rodion Goritskov@*
|
||||
Copyright @copyright{} 2025 dan@*
|
||||
|
||||
Permission is granted to copy, distribute and/or modify this document
|
||||
under the terms of the GNU Free Documentation License, Version 1.3 or
|
||||
@@ -5833,7 +5832,6 @@ Voilà!
|
||||
@c What follows stems from discussions at
|
||||
@c <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=22629#134> as well as
|
||||
@c earlier discussions on guix-devel@gnu.org.
|
||||
@c Updated in 2025 to refer to the Deprecation Policy.
|
||||
@quotation Warning
|
||||
Before you publish your channel, we would like to share a few words of
|
||||
caution:
|
||||
@@ -5848,10 +5846,10 @@ process.
|
||||
|
||||
@item
|
||||
Package modules and package definitions are Scheme code that uses
|
||||
various programming interfaces (APIs). Those may occasionally change,
|
||||
in accordance with our deprecation policy (@pxref{Deprecation Policy}),
|
||||
and it is your responsibility as a channel author to adjust your code
|
||||
accordingly.
|
||||
various programming interfaces (APIs). We, Guix developers, never
|
||||
change APIs gratuitously, but we do @emph{not} commit to freezing APIs
|
||||
either. When you maintain package definitions outside Guix, we consider
|
||||
that @emph{the compatibility burden is on you}.
|
||||
|
||||
@item
|
||||
Corollary: if you're using an external channel and that channel breaks, please
|
||||
@@ -10116,34 +10114,6 @@ directory, the parameter @code{#:javascript-files} can be used to
|
||||
specify a list of file names to feed to the minifier.
|
||||
@end defvar
|
||||
|
||||
@defvar mix-build-system
|
||||
This is a variable exported by @code{guix build-system mix}. It implements
|
||||
the standard build procedure used by Elixr programs with
|
||||
@url{https://hexdocs.pm/mix/Mix.html,Mix}, which consists
|
||||
of running @command{mix compile}, thereby creating bytecode.
|
||||
|
||||
The API is similar to the @var{gnu-build-system}, with some specifics for
|
||||
Elixir:
|
||||
@itemize
|
||||
@item
|
||||
@code{#:tests?} is a boolean, @code{#true} by default, determining whether tests
|
||||
for the current build have to be run or not.
|
||||
@item
|
||||
@code{#:test-flags} is a list of arguments append to the @command{mix test}
|
||||
invocation. It defaults to @code{'()}.
|
||||
@item
|
||||
@code{#:mix-exs}, changes the full path to the @code{mix.exs}
|
||||
file. It defaults to @code{"mix.exs"}. Please refer to
|
||||
@url{https://hexdocs.pm/mix/Mix.html#module-environment-variables,upstream}
|
||||
documentation for more details.
|
||||
@item
|
||||
@code{#:mix-path}, appends extra code paths. It
|
||||
defaults to @code{#f}. Please refer to
|
||||
@url{https://hexdocs.pm/mix/Mix.html#module-environment-variables,upstream}
|
||||
documentation for more details.
|
||||
@end itemize
|
||||
@end defvar
|
||||
|
||||
@defvar mozilla-build-system
|
||||
This variable is exported by @code{(guix build-system mozilla)}. It
|
||||
sets the @code{--target} and @code{--host} configuration flags to what
|
||||
@@ -10519,29 +10489,6 @@ run SCons can be specified by selecting the appropriate SCons package
|
||||
with the @code{#:scons} parameter.
|
||||
@end defvar
|
||||
|
||||
@defvar hare-build-system
|
||||
This variable is exported by @code{(guix build-system hare)}. It implements the
|
||||
Makefile build process typically used by Hare packages, removing the
|
||||
@code{configure} phase used by @code{gnu-build-system} and modifying existing
|
||||
phases to set the Hare architecture tag, module path, and package install
|
||||
destinations appropriately.
|
||||
|
||||
This relies on the package's Makefile supporting, at minimum, the variables
|
||||
@code{HAREFLAGS} and @code{THIRDPARTYDIR}. Packages may set @code{make-flags}
|
||||
to override or supplement these variables.
|
||||
|
||||
By default, Hare modules are installed to the @code{lib} output if it exists,
|
||||
and all other files to the @code{bin} output. If an output does not exist,
|
||||
the default @code{out} output is used instead. This behavior may be overriden
|
||||
through the @code{#:binary-output} and @code{#:module-output} keyword arguments.
|
||||
|
||||
@code{(guix build-system hare)} also provides utility definitions for creating
|
||||
Hare packages. The variable @code{%hare-supported-systems} is the list of build
|
||||
targets currently supported by @code{hare}, for use in @code{supported-systems}
|
||||
(@pxref{package Reference}). The procedure @code{target->hare-arch} may be used
|
||||
to get the Hare architecture tag for a given (supported) Guix target or system.
|
||||
@end defvar
|
||||
|
||||
@defvar haskell-build-system
|
||||
This variable is exported by @code{(guix build-system haskell)}. It
|
||||
implements the Cabal build procedure used by Haskell packages, which
|
||||
@@ -15530,34 +15477,10 @@ the updater for @uref{https://www.stackage.org, Stackage} packages.
|
||||
the updater for @uref{https://crates.io, Crates} packages.
|
||||
@item launchpad
|
||||
the updater for @uref{https://launchpad.net, Launchpad} packages.
|
||||
|
||||
@item generic-html
|
||||
a generic updater that crawls, by default, the HTML page where the
|
||||
source tarball of the package is hosted, when applicable. Behavior can
|
||||
be customized with the following package properties:
|
||||
|
||||
@table @code
|
||||
@item release-monitoring-url
|
||||
an alternate URL to crawl;
|
||||
|
||||
@item release-file-regexp
|
||||
an regular expression matching release file names, whose first
|
||||
subexpression must correspond to the version string.
|
||||
@end table
|
||||
|
||||
Here is an example package with a custom release monitoring URL and a
|
||||
regexp matching an unconventional release file name (it's unconventional
|
||||
due to the use of upper case letter and the lack of a hyphen before the
|
||||
version string):
|
||||
|
||||
@lisp
|
||||
(package
|
||||
;; @dots{}
|
||||
(home-page "http://example.org/software/the-package.html")
|
||||
(properties
|
||||
`((release-monitoring-url . ,home-page)
|
||||
(release-file-regexp . "ThePackage([0-9\\.]+)\\.tgz"))))
|
||||
@end lisp
|
||||
a generic updater that crawls the HTML page where the source tarball of
|
||||
the package is hosted, when applicable, or the HTML page specified by
|
||||
the @code{release-monitoring-url} property of the package.
|
||||
|
||||
@item generic-git
|
||||
a generic updater for packages hosted on Git repositories. It tries to
|
||||
@@ -15877,49 +15800,6 @@ Note that changes made by the @code{arguments} rule do not entail a
|
||||
rebuild of the affected packages. Furthermore, if a package definition
|
||||
happens to be using G-expressions already, @command{guix style} leaves
|
||||
it unchanged.
|
||||
|
||||
@item git-source
|
||||
If the @code{home-page} is a Git repository (as per
|
||||
@code{git-repository-url?}), and the actual Git repository is tagged
|
||||
with @code{version} or @code{(string-append ``v'' version)}, change the
|
||||
package origin to the @code{git-fetch} method
|
||||
(@pxref{origin Reference}). Consider this example:
|
||||
|
||||
@lisp
|
||||
(define-public guile-json-4
|
||||
(package
|
||||
(inherit guile-json-3)
|
||||
(name "guile-json")
|
||||
(version "4.7.3")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://savannah/guile-json/guile-json-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"127k2xc07w1gnyqs40z4865l8p3ra5xgpcn569dz04lxsa709fiq"))))))
|
||||
@end lisp
|
||||
|
||||
@noindent
|
||||
Running @command{guix style -S git-source} on this package would rewrite
|
||||
its @code{source} field like to:
|
||||
|
||||
@lisp
|
||||
(define-public guile-json-4
|
||||
(package
|
||||
(inherit guile-json-3)
|
||||
(name "guile-json")
|
||||
(version "4.7.3")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference (url
|
||||
"https://github.com/aconchillo/guile-json")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256 (base32
|
||||
"0akhm8xjv8fl55fyq0w6c9c6hi5j7mifjx01w07np7qg1cjl9f06"))))))
|
||||
@end lisp
|
||||
|
||||
@end table
|
||||
|
||||
@item --list-stylings
|
||||
@@ -18496,7 +18376,7 @@ bits), @code{no-atime} (do not update file access times),
|
||||
@code{no-diratime} (likewise for directories only),
|
||||
@code{strict-atime} (update file access time), @code{lazy-time} (only
|
||||
update time on the in-memory version of the file inode),
|
||||
@code{no-exec} (disallow program execution), @code{remount} (remount a mounted file system), and @code{shared} (make the
|
||||
@code{no-exec} (disallow program execution), and @code{shared} (make the
|
||||
mount shared).
|
||||
@xref{Mount-Unmount-Remount,,, libc, The GNU C Library Reference
|
||||
Manual}, for more information on these flags.
|
||||
@@ -24767,8 +24647,8 @@ To ensure that upgrades are actually happening, you can run
|
||||
the unattended upgrade log file (see below).
|
||||
|
||||
@defvar unattended-upgrade-service-type
|
||||
This is the service type for unattended upgrades. It sets up a Shepherd
|
||||
Timer (@pxref{Scheduled Job Execution}) that runs @command{guix system
|
||||
This is the service type for unattended upgrades. It sets up an mcron
|
||||
job (@pxref{Scheduled Job Execution}) that runs @command{guix system
|
||||
reconfigure} from the latest version of the specified channels.
|
||||
|
||||
Its value must be a @code{unattended-upgrade-configuration} record (see
|
||||
@@ -27099,37 +26979,6 @@ The value for this service is a @code{<geoclue-configuration>} object.
|
||||
@c TODO: Document <geoclue-configuration>, preferably by refactoring this to use
|
||||
@c define-configuration and generating documentation from it.
|
||||
|
||||
@defvar iio-sensor-proxy-service-type
|
||||
Type for the service that runs
|
||||
@uref{https://gitlab.freedesktop.org/hadess/iio-sensor-proxy, IIO sensor
|
||||
proxy}, a daemon that proxies low-level sensor data from Industrial I/O
|
||||
(IIO) devices into a D-Bus interface. It enables user-space
|
||||
applications, such as desktop environments like GNOME and KDE, and
|
||||
services like GeoClue, to access data from various sensors commonly
|
||||
found in devices like ultrabooks and 2-in-1s. This allows for:
|
||||
|
||||
@itemize @bullet
|
||||
@item
|
||||
Automatic screen rotation based on accelerometer data.
|
||||
@item
|
||||
Ambient brightness adjustment using light sensor data.
|
||||
@item
|
||||
Compass/direction information for location services (via GeoClue).
|
||||
@end itemize
|
||||
|
||||
The value for this service is a @code{<iio-sensor-proxy-configuration>} object.
|
||||
@end defvar
|
||||
|
||||
@deftp {Data Type} iio-sensor-proxy-configuration
|
||||
Data type representing the configuration for @code{iio-sensor-proxy-service-type}.
|
||||
|
||||
@table @asis
|
||||
@item @code{iio-sensor-proxy} (default: @code{iio-sensor-proxy}) (type: file-like)
|
||||
Package object of iio-sensor-proxy.
|
||||
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
@defvar bluetooth-service-type
|
||||
This is the type for the @uref{https://bluez.org/, Linux Bluetooth Protocol
|
||||
Stack} (BlueZ) system, which generates the @file{/etc/bluetooth/main.conf}
|
||||
@@ -29903,7 +29752,6 @@ remote servers. Run @command{man smtpd.conf} for more information.
|
||||
@item @code{log-file} (default: @code{"/var/log/mail.log"})
|
||||
The file location for the OpenSMTPD log file. Logging occurs in the
|
||||
foreground via the Shepherd, i.e. OpenSMTPD does not detach.
|
||||
When set to @code{#f} OpenSMTPD will instead detach and log to the syslog.
|
||||
|
||||
@item @code{setgid-commands?} (default: @code{#t})
|
||||
Make the following commands setgid to @code{smtpq} so they can be
|
||||
@@ -31801,50 +31649,6 @@ Owner's group of the broker process.
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
@subsubheading Mollysocket Service
|
||||
|
||||
@url{https://github.com/mollyim/mollysocket,Mollysocket} is a UnifiedPush
|
||||
provider for the messaging app @url{https://molly.im,Molly}, a fork of Signal.
|
||||
|
||||
@defvar mollysocket-service-type
|
||||
The Mollysocket service. Takes @code{mollysocket-configuration} as its value.
|
||||
By default, this service listens on port 8020 for any Molly client.
|
||||
@end defvar
|
||||
|
||||
@deftp {Data Type} mollysocket-configuration
|
||||
The configuration for Mollysocket, with the following fields:
|
||||
|
||||
@table @asis
|
||||
@item @code{package} (default: @code{mollysocket})
|
||||
The Mollysocket package to use.
|
||||
|
||||
@item @code{host} (default: @code{"0.0.0.0"})
|
||||
Address for the webserver to listen on. It is recommended that this be set to
|
||||
localhost, and instead configure a TLS-supporting reverse proxy in front of it.
|
||||
|
||||
@item @code{port} (default: @code{8020})
|
||||
Port for the webserver to listen on.
|
||||
|
||||
@item @code{webserver} (default: @code{#t})
|
||||
Whether the webserver sould be enabled. If disabled, the server is considered to
|
||||
be in airgapped mode, and clients must be configured likewise.
|
||||
|
||||
@item @code{allowed-endpoints} (default: @code{'("*")})
|
||||
Allowlist of UnifiedPush distributor endpoints, represented as IP addresses or
|
||||
domain names. Addresses on the local network must be specified explicitly.
|
||||
|
||||
@item @code{allowed-uuids} (default: @code{'("*")})
|
||||
Allowlist of Signal account UUIDs.
|
||||
|
||||
@item @code{db} (default: @code{"/var/lib/mollysocket/db.sqlite"})
|
||||
Path to the Mollysocket database. Will be created if it doesn't exist.
|
||||
|
||||
@item @code{vapid-key-file} (default: @code{"/var/lib/mollysocket/vapid.key"})
|
||||
Path to the VAPID key used to authorize requests to the UnifiedPush distributor.
|
||||
Will be created if it doesn't exist.
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
@node Telephony Services
|
||||
@subsection Telephony Services
|
||||
|
||||
@@ -37786,251 +37590,6 @@ The verbosity level of the daemon.
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
|
||||
|
||||
@subsubheading Autofs Service
|
||||
@cindex autofs
|
||||
@cindex automount
|
||||
|
||||
The autofs service automatically mounts and unmounts filesystems. It
|
||||
can mount both network and local storage, but is most often used to
|
||||
manage NFS mounts.
|
||||
|
||||
A typical configuration might look like:
|
||||
|
||||
@lisp
|
||||
(operating-system
|
||||
(services
|
||||
(append
|
||||
(list
|
||||
(service nfs-service-type (nfs-configuration))
|
||||
(service autofs-service-type
|
||||
(autofs-configuration
|
||||
(mounts
|
||||
(list
|
||||
(autofs-indirect-map
|
||||
(mount-point "/net/home")
|
||||
(entries
|
||||
(list
|
||||
;; Accessing /net/home/foo will mount
|
||||
;; big.network.server:/home/foo.
|
||||
(autofs-map-entry
|
||||
(type "nfs")
|
||||
(device "big.network.server:/home/&")
|
||||
(mount-point "*"))))))))))
|
||||
%base-services)))
|
||||
@end lisp
|
||||
|
||||
@deftp {Data Type} autofs-indirect-map
|
||||
Available @code{autofs-indirect-map} fields are:
|
||||
|
||||
@table @asis
|
||||
@item @code{mount-point} (type: string)
|
||||
Where to mount the indirect map.
|
||||
|
||||
@item @code{entries} (default: @code{()}) (type: autofs-map-entries)
|
||||
Entries in this map.
|
||||
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
@deftp {Data Type} autofs-map-entry
|
||||
Available @code{autofs-map-entry} fields are:
|
||||
|
||||
@table @asis
|
||||
@item @code{type} (default: @code{"auto"}) (type: string)
|
||||
The type of the filesystem.
|
||||
|
||||
@item @code{device} (type: string)
|
||||
Device or remote host to mount. May contain special character @code{&},
|
||||
which can be referenced in the @var{mount-point} field.
|
||||
|
||||
@item @code{mount-point} (type: string)
|
||||
Directory to mount this device on. Map entries come in two flavors:
|
||||
direct and indirect. Direct entries map a single device to a single
|
||||
mountpoint, while indirect entries can map multiple devices to multiple
|
||||
mountpoints. A direct entry has a @var{mount-point} beginning with
|
||||
@code{/}, representing the absolute path of the directory to mount the
|
||||
device on. For example:
|
||||
|
||||
@lisp
|
||||
(autofs-map-entry
|
||||
(type "ext4")
|
||||
(device "/dev/sdb1")
|
||||
(mount-point "/mnt/external-disk"))
|
||||
@end lisp
|
||||
|
||||
An indirect entry has a @var{mount-point} not beginning with @code{/},
|
||||
representing the subdirectory within the parent indirect map for this
|
||||
entry. Indirect maps may also use the special character @code{*}, which
|
||||
will be replaced with the value of special character @code{&} in the
|
||||
@var{device} field of this entry. For example:
|
||||
|
||||
@lisp
|
||||
(autofs-indirect-map
|
||||
(mount-point "/devices")
|
||||
(entries
|
||||
(list
|
||||
;; Automount any block device r/o by ID.
|
||||
(autofs-map-entry
|
||||
(type "auto")
|
||||
(mount-point "ro/uuid/*")
|
||||
(device "/dev/disk/by-id/&")
|
||||
(options '(ro)))
|
||||
;; Automount any block device by UUID.
|
||||
(autofs-map-entry
|
||||
(type "auto")
|
||||
(mount-point "rw/uuid/*")
|
||||
(device "/dev/disk/by-uuid/&")))))
|
||||
@end lisp
|
||||
|
||||
@item @code{options} (default: @code{()}) (type: file-system-options)
|
||||
List of mount options. Some options are simple flags, such as ro,
|
||||
noexec, nosuid, etc. These may be expressed as strings or symbols.
|
||||
Other options also accept a value. These are expressed as pairs of
|
||||
@code{(option . value)}. @code{option} may be a string or symbol, as
|
||||
with flags. @code{value} may be a string, symbol, or number. Example:
|
||||
@code{(ro (errors . remount-ro) noexec)}
|
||||
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
@deftp {Data Type} autofs-configuration
|
||||
Available @code{autofs-configuration} fields are:
|
||||
|
||||
@table @asis
|
||||
@item @code{autofs} (default: @code{autofs}) (type: package)
|
||||
The autofs package to use.
|
||||
|
||||
@item @code{mounts} (default: @code{()}) (type: autofs-mount-maps)
|
||||
Mount maps to manage. This is a list of either direct map entries or
|
||||
indirect mount maps.
|
||||
|
||||
@item @code{timeout} (default: @code{300}) (type: conf-integer)
|
||||
Sets the default mount timeout in seconds.
|
||||
|
||||
@item @code{master-wait} (default: @code{10}) (type: conf-integer)
|
||||
Sets the default maximum number of retries (actual iterations is half
|
||||
this, each is delayed by 2 seconds before retrying) waiting for the
|
||||
master map to become available if it cannot be read at program start.
|
||||
This can be longer if the map source itself waits for availability (such
|
||||
as sss).
|
||||
|
||||
@item @code{negative-timeout} (default: @code{60}) (type: conf-integer)
|
||||
Set the default timeout for caching failed key lookups.
|
||||
|
||||
@item @code{mount-verbose?} (default: @code{#f}) (type: conf-boolean)
|
||||
Use the verbose flag when spawning mount(8), and log some process info
|
||||
about the requestor and its parent.
|
||||
|
||||
@item @code{mount-wait} (default: @code{-1}) (type: conf-integer)
|
||||
Set the default time to wait for a response from a spawned mount(8)
|
||||
before sending it a SIGTERM. Note that we still need to wait for the
|
||||
RPC layer to timeout before the sub-process exits so this isn't ideal
|
||||
but it is the best we can do. The default is to wait until mount(8)
|
||||
returns without intervention.
|
||||
|
||||
@item @code{umount-wait} (default: @code{12}) (type: conf-integer)
|
||||
Set the default time to wait for a response from a spawned umount(8)
|
||||
before sending it a SIGTERM. Note that we still need to wait for the
|
||||
RPC layer to timeout before the sub-process exits so this isn't ideal
|
||||
but it is the best we can do.
|
||||
|
||||
@item @code{browse-mode?} (default: @code{#t}) (type: conf-boolean)
|
||||
Should maps be browsable by default?
|
||||
|
||||
@item @code{mount-nfs-default-protocol} (default: @code{3}) (type: conf-integer)
|
||||
Set the default protocol that mount.nfs(8) uses when performing a mount.
|
||||
Autofs needs to know the default NFS protocol that mount.nfs(8) uses so
|
||||
it can do special case handling for its availability probe for different
|
||||
NFS protocols. Since we can't identify this default automatically we
|
||||
need to set it in the autofs configuration.
|
||||
|
||||
@item @code{append-options?} (default: @code{#t}) (type: conf-boolean)
|
||||
When #t, global options are appended to map entry options. When #f, map
|
||||
entry options replace the global options.
|
||||
|
||||
@item @code{logging} (type: conf-log-level)
|
||||
Default log level. May be #:none, #:verbose, or #:debug.
|
||||
|
||||
@item @code{force-standard-program-map-env?} (default: @code{#f}) (type: conf-boolean)
|
||||
Override the use of a prefix with standard environment variables when a
|
||||
program map is executed. Since program maps are run as the privileged
|
||||
user setting these standard environment variables opens automount(8) to
|
||||
potential user privilege escalation when the program map is written in a
|
||||
language that can load components from, for example, a user home
|
||||
directory.
|
||||
|
||||
@item @code{map-hash-table-size} (default: @code{1024}) (type: conf-integer)
|
||||
This configuration option may be used to change the number of hash table
|
||||
slots. This configuration option affects the overhead of searching the
|
||||
map entry cache for map entries when there are a large number of
|
||||
entries. It affects the number of entries that must be looked at to
|
||||
locate a map entry in the map entry cache. For example, the default of
|
||||
1024 and a direct map with 8000 entries would result in each slot
|
||||
containing an average of 8 entries, which should be acceptable. However,
|
||||
if excessive CPU usage is observed during automount lookups increasing
|
||||
this option can reduce the CPU overhead considerably because it reduces
|
||||
the length of the search chains. Note that the number of entries in a
|
||||
map doesn't necessarily relate to the number of entries used in the map
|
||||
entry cache. There are two distinct cases where the map hash table can
|
||||
make a significant difference, direct maps and indirect maps that use
|
||||
the "browse" option. For indirect maps that do not use the "browse"
|
||||
option entries are added to the map entry cache at lookup so the number
|
||||
of active cache entries, in this case, is usually much less than the
|
||||
number of entries in the map. In this last case it would be unusual for
|
||||
the map entry cache to grow large enough to warrant increasing the
|
||||
default before an event that cleans stale entries, a map re-read for
|
||||
example.
|
||||
|
||||
@item @code{use-hostname-for-mounts?} (default: @code{#f}) (type: conf-boolean)
|
||||
NFS mounts where the host name resolves to more than one IP address are
|
||||
probed for availability and to establish the order in which mounts to
|
||||
them should be tried. To ensure that mount attempts are made only to
|
||||
hosts that are responding and are tried in the order of hosts with the
|
||||
quickest response the IP address of the host needs to be used for the
|
||||
mount. If it is necessary to use the hostname given in the map entry
|
||||
for the mount regardless, then set this option to #t. Be aware that if
|
||||
this is done there is no defense against the host name resolving to one
|
||||
that isn't responding and while the number of attempts at a successful
|
||||
mount will correspond to the number of addresses the host name resolves
|
||||
to the order will also not correspond to fastest responding hosts.
|
||||
|
||||
@item @code{disable-not-found-message?} (default: @code{#f}) (type: conf-boolean)
|
||||
The original request to add this log message needed it to be
|
||||
unconditional. That produces, IMHO, unnecessary noise in the log so a
|
||||
configuration option has been added to provide the ability to turn it
|
||||
off.
|
||||
|
||||
@item @code{use-ignore-mount-option?} (default: @code{#f}) (type: conf-boolean)
|
||||
An option to enable the use of autofs pseudo option "disable". This
|
||||
option is used as a hint to user space that the mount entry should be
|
||||
omitted from mount table listings. The default is #f to avoid
|
||||
unexpected changes in behaviour and so is an opt-in setting.
|
||||
|
||||
@item @code{sss-master-map-wait} (default: @code{0}) (type: conf-integer)
|
||||
Set the time to wait and retry if sssd is unable to read the master map
|
||||
at program start. Default is 0 (don't wait) or 10 if sss supports
|
||||
returning EHSTDOWN when the provider isn't available. If the sss
|
||||
library upports returning EHOSTDOWN when the provider is down then this
|
||||
value is how long to wait between re‐ tries reading the master map. When
|
||||
reading dependent maps or looking up a map key this value is multiplied
|
||||
by the number of retries that would be used when reading the master map.
|
||||
|
||||
@item @code{use-mount-request-log-id?} (default: @code{#f}) (type: conf-boolean)
|
||||
Set whether to use a mount request log id so that log entries for
|
||||
specific mount requests can be easily identified in logs that have
|
||||
multiple concurrent requests.
|
||||
|
||||
@end table
|
||||
|
||||
@end deftp
|
||||
|
||||
|
||||
@c %end of fragment
|
||||
|
||||
|
||||
|
||||
@node Samba Services, Continuous Integration, Network File System, Services
|
||||
@subsection Samba Services
|
||||
|
||||
@@ -38605,9 +38164,6 @@ as its configuration and access token.
|
||||
@item @code{run-directory} (default: @code{"/var/run/forgejo-runner"})
|
||||
Directory where @command{forgejo-runner} stores cached data.
|
||||
|
||||
@item @code{log-file} (default: @code{"/var/log/forgejo-runner.log"})
|
||||
Name of the @command{forgejo-runner} log file.
|
||||
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
@@ -43155,10 +42711,6 @@ The location of the repositories. Note that only public repositories will
|
||||
be shown by Gitile. To make a repository public, add an empty
|
||||
@file{git-daemon-export-ok} file at the root of that repository.
|
||||
|
||||
@item @code{git-owner-validation?} (default: @code{#t})
|
||||
Whether to check for the service user's ownership of repositories.
|
||||
By default, Git will refuse to process a repository owned by another user.
|
||||
|
||||
@item @code{base-git-url}
|
||||
The base git url that will be used to show clone commands.
|
||||
|
||||
@@ -43939,12 +43491,6 @@ The port to bind the server to.
|
||||
@item @code{host} (default: @code{"127.0.0.1"})
|
||||
The host to bind the server to.
|
||||
|
||||
@item @code{control-port} (default: @code{8734})
|
||||
The port to bind the control server to.
|
||||
|
||||
@item @code{control-host} (default: @code{"127.0.0.1"})
|
||||
The host to bind the control server to.
|
||||
|
||||
@item @code{mirror} (default: @code{#f})
|
||||
Optional URL of the other Nar Herder instance which should be mirrored.
|
||||
This means that this Nar Herder instance will download it's database,
|
||||
@@ -47902,13 +47448,8 @@ The @option{--share} and @option{--expose} options can also be passed to
|
||||
the generated script to bind-mount additional directories into the
|
||||
container.
|
||||
|
||||
The generated script also supports the @option{--pid-file} option to
|
||||
write the container process ID to a file. This can be used, along with
|
||||
@command{guix container exec} to execute scripts within the container
|
||||
(@pxref{Invoking guix container}).
|
||||
|
||||
@quotation Note
|
||||
The @code{container} action requires Linux-libre 3.19 or newer.
|
||||
This option requires Linux-libre 3.19 or newer.
|
||||
@end quotation
|
||||
|
||||
@end table
|
||||
@@ -50771,8 +50312,6 @@ Extend home-shell-profile service only if you really know what you do.
|
||||
@subsubheading Bash Home Service
|
||||
|
||||
@anchor{home-bash-configuration}
|
||||
@c %start of fragment
|
||||
|
||||
@deftp {Data Type} home-bash-configuration
|
||||
Available @code{home-bash-configuration} fields are:
|
||||
|
||||
@@ -50787,19 +50326,13 @@ use Guix System, is it safe to set this to @code{#f}, as in this case
|
||||
this is already taken care of by the globally installed
|
||||
@file{/etc/bashrc}.
|
||||
|
||||
@item @code{environment-variables} (default: @code{()}) (type: alist)
|
||||
Association list of environment variables to set for the Bash session.
|
||||
The rules for the @code{home-environment-variables-service-type} apply
|
||||
here (@pxref{Essential Home Services}). The contents of this field will
|
||||
be added after the contents of the @code{bash-profile} field.
|
||||
@item @code{environment-variables} (default: @code{'()}) (type: alist)
|
||||
Association list of environment variables to set for the Bash session. The
|
||||
rules for the @code{home-environment-variables-service-type} apply
|
||||
here (@pxref{Essential Home Services}). The contents of this field will be
|
||||
added after the contents of the @code{bash-profile} field.
|
||||
|
||||
@item @code{variables} (default: @code{()}) (type: alist)
|
||||
Bash variables (not to be confused with environment variables) to be set
|
||||
in @file{.bashrc} for use by interactive shells. A typical example of
|
||||
such variables is @code{HISTSIZE} and related history variables
|
||||
(@pxref{Bash Variables,,, bash,Bash Reference Manual}).
|
||||
|
||||
@item @code{aliases} (type: alist)
|
||||
@item @code{aliases} (default: @code{%default-bash-aliases}) (type: alist)
|
||||
Association list of aliases to set for the Bash session. The aliases
|
||||
will be defined after the contents of the @code{bashrc} field has been
|
||||
put in the @file{.bashrc} file. The alias will automatically be quoted,
|
||||
@@ -50815,31 +50348,27 @@ turns into
|
||||
alias ls="ls -alF"
|
||||
@end example
|
||||
|
||||
@item @code{bash-profile} (default: @code{()}) (type: text-config)
|
||||
@item @code{bash-profile} (default: @code{'()}) (type: text-config)
|
||||
List of file-like objects, which will be added to @file{.bash_profile}.
|
||||
Used for executing user's commands at start of login shell (In most
|
||||
cases the shell started on tty just after login). @file{.bash_login}
|
||||
won't be ever read, because @file{.bash_profile} always present.
|
||||
|
||||
@item @code{bashrc} (default: @code{()}) (type: text-config)
|
||||
@item @code{bashrc} (default: @code{'()}) (type: text-config)
|
||||
List of file-like objects, which will be added to @file{.bashrc}. Used
|
||||
for executing user's commands at start of interactive shell (The shell
|
||||
for interactive usage started by typing @code{bash} or by terminal app
|
||||
or any other program).
|
||||
|
||||
@item @code{bash-logout} (default: @code{()}) (type: text-config)
|
||||
@item @code{bash-logout} (default: @code{'()}) (type: text-config)
|
||||
List of file-like objects, which will be added to @file{.bash_logout}.
|
||||
Used for executing user's commands at the exit of login shell. It won't
|
||||
be read in some cases (if the shell terminates by exec'ing another
|
||||
process for example).
|
||||
|
||||
@end table
|
||||
|
||||
@end deftp
|
||||
|
||||
|
||||
@c %end of fragment
|
||||
|
||||
You can extend the Bash service by using the @code{home-bash-extension}
|
||||
configuration record, whose fields must mirror that of
|
||||
@code{home-bash-configuration} (@pxref{home-bash-configuration}). The
|
||||
@@ -50849,14 +50378,14 @@ Bash Reference Manual}.
|
||||
|
||||
For example, here is how you would define a service that extends the
|
||||
Bash service such that @file{~/.bash_profile} defines an additional
|
||||
shell variable, @env{PS1}:
|
||||
environment variable, @env{PS1}:
|
||||
|
||||
@lisp
|
||||
(define bash-fancy-prompt-service
|
||||
(simple-service 'bash-fancy-prompt
|
||||
home-bash-service-type
|
||||
(home-bash-extension
|
||||
(variables
|
||||
(environment-variables
|
||||
'(("PS1" . "\\u \\wλ "))))))
|
||||
@end lisp
|
||||
|
||||
@@ -50864,43 +50393,34 @@ You would then add @code{bash-fancy-prompt-service} to the list in the
|
||||
@code{services} field of your @code{home-environment}. The reference of
|
||||
@code{home-bash-extension} follows.
|
||||
|
||||
@c %start of fragment
|
||||
|
||||
@deftp {Data Type} home-bash-extension
|
||||
Available @code{home-bash-extension} fields are:
|
||||
|
||||
@table @asis
|
||||
@item @code{environment-variables} (default: @code{()}) (type: alist)
|
||||
Additional environment variables to set. These will be combined with
|
||||
the environment variables from other extensions and the base service to
|
||||
form one coherent block of environment variables.
|
||||
@item @code{environment-variables} (default: @code{'()}) (type: alist)
|
||||
Additional environment variables to set. These will be combined with the
|
||||
environment variables from other extensions and the base service to form one
|
||||
coherent block of environment variables.
|
||||
|
||||
@item @code{variables} (default: @code{()}) (type: alist)
|
||||
Extra Bash variables (not to be confused with environment variables) to
|
||||
be set in @file{.bashrc} for use by interactive shells.
|
||||
|
||||
@item @code{aliases} (default: @code{()}) (type: alist)
|
||||
@item @code{aliases} (default: @code{'()}) (type: alist)
|
||||
Additional aliases to set. These will be combined with the aliases from
|
||||
other extensions and the base service.
|
||||
|
||||
@item @code{bash-profile} (default: @code{()}) (type: text-config)
|
||||
Additional text blocks to add to @file{.bash_profile}, which will be
|
||||
combined with text blocks from other extensions and the base service.
|
||||
@item @code{bash-profile} (default: @code{'()}) (type: text-config)
|
||||
Additional text blocks to add to @file{.bash_profile}, which will be combined
|
||||
with text blocks from other extensions and the base service.
|
||||
|
||||
@item @code{bashrc} (default: @code{()}) (type: text-config)
|
||||
@item @code{bashrc} (default: @code{'()}) (type: text-config)
|
||||
Additional text blocks to add to @file{.bashrc}, which will be combined
|
||||
with text blocks from other extensions and the base service.
|
||||
|
||||
@item @code{bash-logout} (default: @code{()}) (type: text-config)
|
||||
Additional text blocks to add to @file{.bash_logout}, which will be
|
||||
combined with text blocks from other extensions and the base service.
|
||||
@item @code{bash-logout} (default: @code{'()}) (type: text-config)
|
||||
Additional text blocks to add to @file{.bash_logout}, which will be combined
|
||||
with text blocks from other extensions and the base service.
|
||||
|
||||
@end table
|
||||
|
||||
@end deftp
|
||||
|
||||
@c %end of fragment
|
||||
|
||||
@subsubheading Zsh Home Service
|
||||
|
||||
@deftp {Data Type} home-zsh-configuration
|
||||
|
||||
@@ -13,9 +13,8 @@
|
||||
(service home-bash-service-type
|
||||
(home-bash-configuration
|
||||
(guix-defaults? #t)
|
||||
(variables
|
||||
`(("HISTFILE" . "$XDG_CACHE_HOME/.bash_history")
|
||||
("HISTSIZE" . "50000")))))
|
||||
(bash-profile (list (plain-file "bash-profile" "\
|
||||
export HISTFILE=$XDG_CACHE_HOME/.bash_history")))))
|
||||
|
||||
(simple-service 'test-config
|
||||
home-xdg-configuration-files-service-type
|
||||
|
||||
+5
-10
@@ -283,20 +283,15 @@ corresponding to the top-level definition containing the staged changes."
|
||||
(define variable-name
|
||||
(second old))
|
||||
(define version
|
||||
(match ((xpath:node-or
|
||||
(and=> ((xpath:node-or
|
||||
(xpath:sxpath '(*any* *any* package version *any*))
|
||||
;; For let binding
|
||||
(xpath:sxpath '(*any* *any* (*any*) package version *any*)))
|
||||
(cons '*TOP* new))
|
||||
(() #f)
|
||||
((version . rest) version)))
|
||||
(if version
|
||||
(format port
|
||||
"gnu: ~a: Update to ~a.~%~%* ~a (~a): Update to ~a.~%"
|
||||
variable-name version file-name variable-name version)
|
||||
(format port
|
||||
"gnu: ~a: Update.~%~%* ~a (~a): Update.~%"
|
||||
variable-name file-name variable-name))
|
||||
first))
|
||||
(format port
|
||||
"gnu: ~a: Update to ~a.~%~%* ~a (~a): Update to ~a.~%"
|
||||
variable-name version file-name variable-name version)
|
||||
(for-each (lambda (field)
|
||||
(let ((old-values (get-values old field))
|
||||
(new-values (get-values new field)))
|
||||
|
||||
+12
-68
@@ -326,12 +326,6 @@ PARAMETERS."
|
||||
"members" user)
|
||||
=> 204)
|
||||
|
||||
(define-forgejo-request (remove-team-member team user)
|
||||
"Remove USER (a string) from TEAM, a Forgejo team."
|
||||
(DELETE "teams" (number->string (forgejo-team-id team))
|
||||
"members" user)
|
||||
=> 204)
|
||||
|
||||
(define-forgejo-request (repository-teams owner repository)
|
||||
"Return the list of teams assigned to REPOSITORY of OWNER."
|
||||
(GET "repos" owner repository "teams"
|
||||
@@ -378,8 +372,7 @@ PARAMETERS."
|
||||
to-add)
|
||||
(for-each (lambda (user)
|
||||
(format log-port "removing '~a' from team '~a'~%"
|
||||
user (forgejo-team-name forgejo-team))
|
||||
(remove-team-member token forgejo-team user))
|
||||
user (forgejo-team-name forgejo-team)))
|
||||
to-remove)))
|
||||
|
||||
(define* (synchronize-team token team
|
||||
@@ -464,21 +457,6 @@ already exists. Lookup team IDs among CURRENT-TEAMS."
|
||||
"gnu/packages/fluidplug.scm"
|
||||
"gnu/packages/xiph.scm")))
|
||||
|
||||
(define-team beam
|
||||
(team 'beam
|
||||
#:name "Erlang/Elixir/BEAM team"
|
||||
#:description "The virtual machine at the core of the Erlang Open
|
||||
Telecom Platform (OTP), Erlang and Elxir languages and packages, development
|
||||
of Rebar and Mix build systems and Hex.pm importer."
|
||||
#:scope (list (make-regexp* "^gnu/packages/elixir(-.+|)\\.scm$")
|
||||
"guix/build/mix-build-system.scm"
|
||||
"guix/build-system/mix.scm"
|
||||
(make-regexp* "^gnu/packages/erlang(-.+|)\\.scm$")
|
||||
"guix/build/rebar-build-system.scm"
|
||||
"guix/build-system/rebar.scm"
|
||||
"guix/import/hexpm.scm"
|
||||
"guix/scripts/import/hexpm.scm")))
|
||||
|
||||
(define-team bootstrap
|
||||
(team 'bootstrap
|
||||
#:name "Bootstrap"
|
||||
@@ -525,6 +503,7 @@ of Rebar and Mix build systems and Hex.pm importer."
|
||||
"guix/discovery.scm"
|
||||
"guix/docker.scm"
|
||||
"guix/download.scm"
|
||||
"guix/elf.scm"
|
||||
"guix/ftp-client.scm"
|
||||
"guix/gexp.scm"
|
||||
"guix/git-authenticate.scm"
|
||||
@@ -719,10 +698,9 @@ the haskell-build-system."
|
||||
|
||||
(define-team hpc
|
||||
(team 'hpc
|
||||
#:name "High-performance computing team"
|
||||
#:description "High-performance computing (HPC) related packages."
|
||||
#:name "Hpc team"
|
||||
#:description "High performance computing related packages."
|
||||
#:scope (list "gnu/packages/mpi.scm"
|
||||
"gnu/packages/oneapi.scm"
|
||||
"gnu/packages/rocm.scm"
|
||||
"gnu/packages/sycl.scm"
|
||||
"gnu/packages/tbb.scm"
|
||||
@@ -955,20 +933,6 @@ release."
|
||||
"guix/scripts/import/crate.scm"
|
||||
"tests/import/crate.scm")))
|
||||
|
||||
(define-team crypto
|
||||
(team 'crypto
|
||||
#:name "Crypto team"
|
||||
#:description
|
||||
"Secrets, passwords, cryptography and security related packages."
|
||||
#:scope (list
|
||||
"gnu/packages/crypto.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")))
|
||||
|
||||
(define-team science
|
||||
(team 'science
|
||||
#:name "Science team"
|
||||
@@ -1018,7 +982,6 @@ packages (e.g. Astronomy, Chemistry, Math, Physics etc.)"
|
||||
"gnu/packages/openstack.scm"
|
||||
"gnu/packages/prometheus.scm"
|
||||
"gnu/packages/rdesktop.scm"
|
||||
"gnu/packages/samba.scm"
|
||||
"gnu/packages/selinux.scm"
|
||||
"gnu/packages/storage.scm"
|
||||
"gnu/packages/task-runners.scm"
|
||||
@@ -1100,7 +1063,7 @@ the \"texlive\" importer."
|
||||
(define-member (person "Andreas Enge"
|
||||
"andreas@enge.fr"
|
||||
"enge")
|
||||
bootstrap core-packages crypto lxqt science tex)
|
||||
bootstrap core-packages lxqt science tex)
|
||||
|
||||
(define-member (person "Tanguy Le Carrour"
|
||||
"tanguy@bioneland.org"
|
||||
@@ -1183,8 +1146,7 @@ the \"texlive\" importer."
|
||||
ocaml)
|
||||
|
||||
(define-member (person "Josselin Poiret"
|
||||
"dev@jpoiret.xyz"
|
||||
"jpoiret")
|
||||
"dev@jpoiret.xyz")
|
||||
installer)
|
||||
|
||||
(define-member (person "("
|
||||
@@ -1192,8 +1154,7 @@ the \"texlive\" importer."
|
||||
)
|
||||
|
||||
(define-member (person "Simon Tournier"
|
||||
"zimon.toutoune@gmail.com"
|
||||
"zimoun")
|
||||
"zimon.toutoune@gmail.com")
|
||||
julia core mentors r)
|
||||
|
||||
(define-member (person "宋文武"
|
||||
@@ -1217,8 +1178,7 @@ the \"texlive\" importer."
|
||||
core documentation electronics gnome qt telephony)
|
||||
|
||||
(define-member (person "Katherine Cox-Buday"
|
||||
"cox.katherine.e+guix@gmail.com"
|
||||
"katco")
|
||||
"cox.katherine.e+guix@gmail.com")
|
||||
emacs go lisp)
|
||||
|
||||
(define-member (person "Munyoki Kilyungi"
|
||||
@@ -1265,8 +1225,7 @@ the \"texlive\" importer."
|
||||
games)
|
||||
|
||||
(define-member (person "Laurent Gatto"
|
||||
"laurent.gatto@gmail.com"
|
||||
"lgatto")
|
||||
"laurent.gatto@gmail.com")
|
||||
r)
|
||||
|
||||
(define-member (person "Nicolas Goaziou"
|
||||
@@ -1307,7 +1266,7 @@ the \"texlive\" importer."
|
||||
(define-member (person "Cayetano Santos"
|
||||
"csantosb@inventati.org"
|
||||
"csantosb")
|
||||
ai emacs electronics hpc crypto)
|
||||
ai emacs electronics hpc)
|
||||
|
||||
(define-member (person "Greg Hogan"
|
||||
"code@greghogan.com"
|
||||
@@ -1346,7 +1305,7 @@ the \"texlive\" importer."
|
||||
(define-member (person "Nicolas Graves"
|
||||
"ngraves@ngraves.fr"
|
||||
"nicolas-graves")
|
||||
core javascript python ruby)
|
||||
javascript python ruby)
|
||||
|
||||
(define-member (person "Yelninei"
|
||||
"yelninei@tutamail.com"
|
||||
@@ -1356,7 +1315,7 @@ the \"texlive\" importer."
|
||||
(define-member (person "Giacomo Leidi"
|
||||
"goodoldpaul@autistici.org"
|
||||
"fishinthecalculator")
|
||||
audio beam)
|
||||
audio)
|
||||
|
||||
(define-member (person "Saku Laesvuori"
|
||||
"saku@laesvuori.fi"
|
||||
@@ -1383,21 +1342,6 @@ the \"texlive\" importer."
|
||||
"daym")
|
||||
bootstrap hpc rust science)
|
||||
|
||||
(define-member (person "Andy Tai"
|
||||
"atai@atai.org"
|
||||
"atai")
|
||||
ai)
|
||||
|
||||
(define-member (person "Pierre-Henry Fröhring"
|
||||
"contact@phfrohring.com"
|
||||
"phfrohring")
|
||||
beam)
|
||||
|
||||
(define-member (person "Igorj Gorjaĉev"
|
||||
"igor@goryachev.org"
|
||||
"delitrem")
|
||||
beam)
|
||||
|
||||
|
||||
(define (find-team name)
|
||||
(or (hash-ref %teams (string->symbol name))
|
||||
|
||||
@@ -1,60 +0,0 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2025 Giacomo Leidi <goodoldpaul@autistici.org>
|
||||
;;;
|
||||
;;; 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 mix-build-system.
|
||||
;;; It is used to assist continuous integration of the beam-team branch.
|
||||
;;;
|
||||
;;;
|
||||
;;; You can use it to build all covered packages with:
|
||||
;;;
|
||||
;;; ./pre-inst-env guix build -m etc/teams/beam/elixir-manifest.scm
|
||||
;;;
|
||||
;;; or to update them with:
|
||||
;;;
|
||||
;;; ./pre-inst-env guix refresh -u -m etc/teams/beam/elixir-manifest.scm
|
||||
|
||||
(use-modules (guix packages)
|
||||
(guix profiles)
|
||||
(guix gexp)
|
||||
(guix build-system)
|
||||
(ice-9 match)
|
||||
(srfi srfi-1)
|
||||
(srfi srfi-26))
|
||||
|
||||
(define* (has-mix-build-system? build-system #:key modules #:allow-other-keys)
|
||||
(or (eq? (build-system-name build-system) 'mix)
|
||||
(any
|
||||
(match-lambda
|
||||
(('guix 'build 'mix-build-system) #t)
|
||||
('((guix build mix-build-system) . _) #t)
|
||||
(_ #f))
|
||||
(cond
|
||||
((gexp? modules) (gexp->approximate-sexp modules))
|
||||
((pair? modules) modules)
|
||||
(else '())))))
|
||||
|
||||
(manifest
|
||||
(map package->manifest-entry
|
||||
(fold-packages
|
||||
(lambda (package lst)
|
||||
(if (apply has-mix-build-system?
|
||||
(package-build-system package)
|
||||
(package-arguments package))
|
||||
(cons package lst)
|
||||
lst))
|
||||
(list))))
|
||||
@@ -1,60 +0,0 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2025 Giacomo Leidi <goodoldpaul@autistici.org>
|
||||
;;;
|
||||
;;; 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 rebar-build-system.
|
||||
;;; It is used to assist continuous integration of the beam-team branch.
|
||||
;;;
|
||||
;;;
|
||||
;;; You can use it to build all covered packages with:
|
||||
;;;
|
||||
;;; ./pre-inst-env guix build -m etc/teams/beam/erlang-manifest.scm
|
||||
;;;
|
||||
;;; or to update them with:
|
||||
;;;
|
||||
;;; ./pre-inst-env guix refresh -u -m etc/teams/beam/erlang-manifest.scm
|
||||
|
||||
(use-modules (guix packages)
|
||||
(guix profiles)
|
||||
(guix gexp)
|
||||
(guix build-system)
|
||||
(ice-9 match)
|
||||
(srfi srfi-1)
|
||||
(srfi srfi-26))
|
||||
|
||||
(define* (has-rebar-build-system? build-system #:key modules #:allow-other-keys)
|
||||
(or (eq? (build-system-name build-system) 'rebar)
|
||||
(any
|
||||
(match-lambda
|
||||
(('guix 'build 'rebar-build-system) #t)
|
||||
('((guix build rebar-build-system) . _) #t)
|
||||
(_ #f))
|
||||
(cond
|
||||
((gexp? modules) (gexp->approximate-sexp modules))
|
||||
((pair? modules) modules)
|
||||
(else '())))))
|
||||
|
||||
(manifest
|
||||
(map package->manifest-entry
|
||||
(fold-packages
|
||||
(lambda (package lst)
|
||||
(if (apply has-rebar-build-system?
|
||||
(package-build-system package)
|
||||
(package-arguments package))
|
||||
(cons package lst)
|
||||
lst))
|
||||
(list))))
|
||||
@@ -1,48 +0,0 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2025 Simon Tournier <zimon.toutoune@gmail.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/>.
|
||||
|
||||
(use-modules (guix packages)
|
||||
(guix profiles)
|
||||
(guix gexp)
|
||||
(guix build-system)
|
||||
(ice-9 match)
|
||||
(srfi srfi-1)
|
||||
(srfi srfi-26))
|
||||
|
||||
(define* (has-r-build-system? build-system #:key modules #:allow-other-keys)
|
||||
(or (eq? (build-system-name build-system) 'r)
|
||||
(any
|
||||
(match-lambda
|
||||
(('guix 'build 'r-build-system) #t)
|
||||
('((guix build r-build-system) . _) #t)
|
||||
(_ #f))
|
||||
(cond
|
||||
((gexp? modules) (gexp->approximate-sexp modules))
|
||||
((pair? modules) modules)
|
||||
(else '())))))
|
||||
|
||||
(manifest
|
||||
(map package->manifest-entry
|
||||
(fold-packages
|
||||
(lambda (package lst)
|
||||
(if (apply has-r-build-system?
|
||||
(package-build-system package)
|
||||
(package-arguments package))
|
||||
(cons package lst)
|
||||
lst))
|
||||
(list))))
|
||||
@@ -7,7 +7,6 @@
|
||||
;;; Copyright © 2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2023-2024 Herman Rimm <herman@rimm.ee>
|
||||
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2025 dan <i@dan.games>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -47,7 +46,6 @@
|
||||
u-boot-pine64-lts-bootloader
|
||||
u-boot-pinebook-bootloader
|
||||
u-boot-pinebook-pro-rk3399-bootloader
|
||||
u-boot-nanopi-r4s-rk3399-bootloader
|
||||
u-boot-puma-rk3399-bootloader
|
||||
u-boot-rock-4c-plus-rk3399-bootloader
|
||||
u-boot-rock64-rk3328-bootloader
|
||||
@@ -275,11 +273,6 @@ is BLOCK-SIZE * COUNT, or FILE size if COUNT is not given."
|
||||
(inherit u-boot-rockchip-bootloader)
|
||||
(package u-boot-pinebook-pro-rk3399)))
|
||||
|
||||
(define u-boot-nanopi-r4s-rk3399-bootloader
|
||||
(bootloader
|
||||
(inherit u-boot-rockchip-bootloader)
|
||||
(package u-boot-nanopi-r4s-rk3399)))
|
||||
|
||||
(define u-boot-ts7970-q-2g-1000mhz-c-bootloader
|
||||
;; This bootloader doesn't really need to be installed, as it is read from
|
||||
;; an SPI memory chip, not the SD card. It is copied to /boot/u-boot.imx
|
||||
|
||||
@@ -1312,8 +1312,6 @@ corresponds to the symbols listed in FLAGS."
|
||||
(logior MS_STRICTATIME (loop rest)))
|
||||
(('lazy-time rest ...)
|
||||
(logior MS_LAZYTIME (loop rest)))
|
||||
(('remount rest ...)
|
||||
(logior MS_REMOUNT (loop rest)))
|
||||
(('shared rest ...)
|
||||
(loop rest))
|
||||
(()
|
||||
|
||||
+104
-137
@@ -190,10 +190,7 @@ for the process."
|
||||
(remount-read-only "/"))))
|
||||
|
||||
(define* (initialize-user-namespace pid host-uids
|
||||
#:key
|
||||
(host-uid (getuid))
|
||||
(host-gid (getgid))
|
||||
(guest-uid 0) (guest-gid 0))
|
||||
#:key (guest-uid 0) (guest-gid 0))
|
||||
"Configure the user namespace for PID. HOST-UIDS specifies the number of
|
||||
host user identifiers to map into the user namespace. GUEST-UID and GUEST-GID
|
||||
specify the first UID (respectively GID) that host UIDs (respectively GIDs)
|
||||
@@ -204,21 +201,24 @@ map to in the namespace."
|
||||
(define (scope file)
|
||||
(string-append proc-dir file))
|
||||
|
||||
;; Only root can write to the gid map without first disabling the
|
||||
;; setgroups syscall.
|
||||
(unless (and (zero? host-uid) (zero? host-gid))
|
||||
(call-with-output-file (scope "/setgroups")
|
||||
(lambda (port)
|
||||
(display "deny" port))))
|
||||
(let ((uid (getuid))
|
||||
(gid (getgid)))
|
||||
|
||||
;; Map the user/group that created the container to the root user
|
||||
;; within the container.
|
||||
(call-with-output-file (scope "/uid_map")
|
||||
(lambda (port)
|
||||
(format port "~d ~d ~d" guest-uid host-uid host-uids)))
|
||||
(call-with-output-file (scope "/gid_map")
|
||||
(lambda (port)
|
||||
(format port "~d ~d ~d" guest-gid host-gid host-uids))))
|
||||
;; Only root can write to the gid map without first disabling the
|
||||
;; setgroups syscall.
|
||||
(unless (and (zero? uid) (zero? gid))
|
||||
(call-with-output-file (scope "/setgroups")
|
||||
(lambda (port)
|
||||
(display "deny" port))))
|
||||
|
||||
;; Map the user/group that created the container to the root user
|
||||
;; within the container.
|
||||
(call-with-output-file (scope "/uid_map")
|
||||
(lambda (port)
|
||||
(format port "~d ~d ~d" guest-uid uid host-uids)))
|
||||
(call-with-output-file (scope "/gid_map")
|
||||
(lambda (port)
|
||||
(format port "~d ~d ~d" guest-gid gid host-uids)))))
|
||||
|
||||
(define (namespaces->bit-mask namespaces)
|
||||
"Return the number suitable for the 'flags' argument of 'clone' that
|
||||
@@ -239,14 +239,12 @@ corresponds to the symbols in NAMESPACES."
|
||||
#:key (guest-uid 0) (guest-gid 0)
|
||||
(populate-file-system (const #t))
|
||||
(loopback-network? #t)
|
||||
(lock-mounts? #t)
|
||||
writable-root?)
|
||||
"Run THUNK in a new container process and return its PID. ROOT specifies
|
||||
the root directory for the container. MOUNTS is a list of <file-system>
|
||||
objects that specify file systems to mount inside the container. NAMESPACES
|
||||
is a list of symbols that correspond to the possible Linux namespaces: mnt,
|
||||
ipc, uts, user, and net. When LOCK-MOUNTS? is true, arrange so that none of
|
||||
MOUNTS can be unmounted or remounted individually from within THUNK.
|
||||
ipc, uts, user, and net.
|
||||
|
||||
When LOOPBACK-NETWORK? is true and 'net is amount NAMESPACES, set up the
|
||||
loopback device (\"lo\") and a minimal /etc/hosts.
|
||||
@@ -263,93 +261,75 @@ that host UIDs (respectively GIDs) map to in the namespace."
|
||||
;; child process blocks until the parent writes to it.
|
||||
(match (socketpair PF_UNIX (logior SOCK_CLOEXEC SOCK_STREAM) 0)
|
||||
((child . parent)
|
||||
(safe-clone
|
||||
(namespaces->bit-mask namespaces)
|
||||
(lambda ()
|
||||
(call-with-clean-exit
|
||||
(lambda ()
|
||||
(close-port parent)
|
||||
;; Wait for parent to set things up.
|
||||
(match (read child)
|
||||
('ready
|
||||
(purify-environment)
|
||||
(when (and (memq 'mnt namespaces)
|
||||
(not (string=? root "/")))
|
||||
(catch #t
|
||||
(lambda ()
|
||||
(mount-file-systems root mounts
|
||||
#:mount-/proc? (memq 'pid namespaces)
|
||||
#:mount-/sys? (memq 'net
|
||||
namespaces)
|
||||
#:populate-file-system
|
||||
(lambda ()
|
||||
(populate-file-system)
|
||||
(when (and (memq 'net namespaces)
|
||||
loopback-network?)
|
||||
(set-network-interface-up "lo")
|
||||
(let ((flags (namespaces->bit-mask namespaces)))
|
||||
(match (clone flags)
|
||||
(0
|
||||
(call-with-clean-exit
|
||||
(lambda ()
|
||||
(close-port parent)
|
||||
;; Wait for parent to set things up.
|
||||
(match (read child)
|
||||
('ready
|
||||
(purify-environment)
|
||||
(when (and (memq 'mnt namespaces)
|
||||
(not (string=? root "/")))
|
||||
(catch #t
|
||||
(lambda ()
|
||||
(mount-file-systems root mounts
|
||||
#:mount-/proc? (memq 'pid namespaces)
|
||||
#:mount-/sys? (memq 'net
|
||||
namespaces)
|
||||
#:populate-file-system
|
||||
(lambda ()
|
||||
(populate-file-system)
|
||||
(when (and (memq 'net namespaces)
|
||||
loopback-network?)
|
||||
(set-network-interface-up "lo")
|
||||
|
||||
;; When isolated from the
|
||||
;; network, provide a minimal
|
||||
;; /etc/hosts to resolve
|
||||
;; "localhost".
|
||||
(mkdir-p "/etc")
|
||||
(call-with-output-file "/etc/hosts"
|
||||
(lambda (port)
|
||||
(display "127.0.0.1 localhost\n" port)
|
||||
(chmod port #o444)))))
|
||||
#:writable-root?
|
||||
(or writable-root?
|
||||
(not (memq 'mnt namespaces)))))
|
||||
(lambda args
|
||||
;; Forward the exception to the parent process.
|
||||
;; FIXME: SRFI-35 conditions and non-trivial objects
|
||||
;; cannot be 'read' so they shouldn't be written as is.
|
||||
(write args child)
|
||||
(primitive-exit 3))))
|
||||
;; When isolated from the
|
||||
;; network, provide a minimal
|
||||
;; /etc/hosts to resolve
|
||||
;; "localhost".
|
||||
(mkdir-p "/etc")
|
||||
(call-with-output-file "/etc/hosts"
|
||||
(lambda (port)
|
||||
(display "127.0.0.1 localhost\n" port)
|
||||
(chmod port #o444)))))
|
||||
#:writable-root?
|
||||
(or writable-root?
|
||||
(not (memq 'mnt namespaces)))))
|
||||
(lambda args
|
||||
;; Forward the exception to the parent process.
|
||||
;; FIXME: SRFI-35 conditions and non-trivial objects
|
||||
;; cannot be 'read' so they shouldn't be written as is.
|
||||
(write args child)
|
||||
(primitive-exit 3))))
|
||||
;; TODO: Manage capabilities.
|
||||
(write 'ready child)
|
||||
(close-port child)
|
||||
(thunk))
|
||||
(_ ;parent died or something
|
||||
(primitive-exit 2))))))
|
||||
(pid
|
||||
(close-port child)
|
||||
(when (memq 'user namespaces)
|
||||
(initialize-user-namespace pid host-uids
|
||||
#:guest-uid guest-uid
|
||||
#:guest-gid guest-gid))
|
||||
;; TODO: Initialize cgroups.
|
||||
(write 'ready parent)
|
||||
(newline parent)
|
||||
|
||||
(when (and lock-mounts?
|
||||
(memq 'mnt namespaces)
|
||||
(memq 'user namespaces))
|
||||
;; Create a new mount namespace owned by a new user
|
||||
;; namespace to "lock" together previous mounts, such that
|
||||
;; they cannot be unmounted or remounted separately--see
|
||||
;; mount_namespaces(7).
|
||||
(let ((uid (getuid)) (gid (getgid)))
|
||||
(unshare (logior CLONE_NEWUSER CLONE_NEWNS))
|
||||
(when (file-exists? "/proc/self")
|
||||
(initialize-user-namespace (getpid)
|
||||
host-uids
|
||||
#:host-uid uid
|
||||
#:host-gid gid
|
||||
#:guest-uid guest-uid
|
||||
#:guest-gid guest-gid))))
|
||||
|
||||
;; TODO: Manage capabilities.
|
||||
(write 'ready child)
|
||||
(close-port child)
|
||||
(thunk))
|
||||
(_ ;parent died or something
|
||||
(primitive-exit 2))))))
|
||||
(lambda (pid)
|
||||
(close-port child)
|
||||
(when (memq 'user namespaces)
|
||||
(initialize-user-namespace pid host-uids
|
||||
#:guest-uid guest-uid
|
||||
#:guest-gid guest-gid))
|
||||
;; TODO: Initialize cgroups.
|
||||
(write 'ready parent)
|
||||
(newline parent)
|
||||
|
||||
;; Check whether the child process' setup phase succeeded.
|
||||
(let ((message (read parent)))
|
||||
(close-port parent)
|
||||
(match message
|
||||
('ready ;success
|
||||
pid)
|
||||
(((? symbol? key) args ...) ;exception
|
||||
(apply throw key args))
|
||||
(_ ;unexpected termination
|
||||
#f))))))))
|
||||
;; Check whether the child process' setup phase succeeded.
|
||||
(let ((message (read parent)))
|
||||
(close-port parent)
|
||||
(match message
|
||||
('ready ;success
|
||||
pid)
|
||||
(((? symbol? key) args ...) ;exception
|
||||
(apply throw key args))
|
||||
(_ ;unexpected termination
|
||||
#f)))))))))
|
||||
|
||||
;; FIXME: This is copied from (guix utils), which we cannot use because it
|
||||
;; would pull (guix config) and all.
|
||||
@@ -396,7 +376,6 @@ if there are no child processes left."
|
||||
|
||||
(define* (call-with-container mounts thunk #:key (namespaces %namespaces)
|
||||
(host-uids 1) (guest-uid 0) (guest-gid 0)
|
||||
(lock-mounts? #t)
|
||||
(relayed-signals (list SIGINT SIGTERM))
|
||||
(child-is-pid1? #t)
|
||||
(populate-file-system (const #t))
|
||||
@@ -481,7 +460,6 @@ load path must be adjusted as needed."
|
||||
(call-with-temporary-directory
|
||||
(lambda (root)
|
||||
(let ((pid (run-container root mounts namespaces host-uids thunk*
|
||||
#:lock-mounts? lock-mounts?
|
||||
#:guest-uid guest-uid
|
||||
#:guest-gid guest-gid
|
||||
#:populate-file-system populate-file-system
|
||||
@@ -502,35 +480,24 @@ return the exit status, an integer as returned by 'waitpid'."
|
||||
(0
|
||||
(call-with-clean-exit
|
||||
(lambda ()
|
||||
;; First, determine the user namespace that owns the pid namespace and
|
||||
;; join that user namespace (the assumption is that it also owns all
|
||||
;; the other namespaces). It's important that the user namespace is
|
||||
;; joined first, so that the user will have the privileges to join the
|
||||
;; other namespaces.
|
||||
(let* ((pid-ns (open-fdes (namespace-file pid "pid")
|
||||
(logior O_CLOEXEC O_RDONLY)))
|
||||
(user-ns (get-user-ns pid-ns)))
|
||||
(close-fdes pid-ns)
|
||||
(unless (equal? (stat user-ns)
|
||||
(stat (namespace-file (getpid) "user")))
|
||||
(setns user-ns 0))
|
||||
(close-fdes user-ns)
|
||||
|
||||
;; Then join all the remaining namespaces.
|
||||
(for-each (lambda (ns)
|
||||
(let ((source (namespace-file (getpid) ns))
|
||||
(target (namespace-file pid ns)))
|
||||
;; Joining the namespace that the process already
|
||||
;; belongs to would throw an error so avoid that.
|
||||
;; XXX: This /proc interface leads to TOCTTOU.
|
||||
(unless (string=? (readlink source) (readlink target))
|
||||
(call-with-input-file target
|
||||
(lambda (new-ns-port)
|
||||
(setns (fileno new-ns-port) 0))))))
|
||||
;; It's important that the mount namespace is joined last,
|
||||
;; otherwise the /proc mount point would no longer be
|
||||
;; accessible.
|
||||
'("ipc" "uts" "net" "pid" "mnt")))
|
||||
(for-each (lambda (ns)
|
||||
(let ((source (namespace-file (getpid) ns))
|
||||
(target (namespace-file pid ns)))
|
||||
;; Joining the namespace that the process already
|
||||
;; belongs to would throw an error so avoid that.
|
||||
;; XXX: This /proc interface leads to TOCTTOU.
|
||||
(unless (string=? (readlink source) (readlink target))
|
||||
(call-with-input-file source
|
||||
(lambda (current-ns-port)
|
||||
(call-with-input-file target
|
||||
(lambda (new-ns-port)
|
||||
(setns (fileno new-ns-port) 0))))))))
|
||||
;; It's important that the user namespace is joined first,
|
||||
;; so that the user will have the privileges to join the
|
||||
;; other namespaces. Furthermore, it's important that the
|
||||
;; mount namespace is joined last, otherwise the /proc mount
|
||||
;; point would no longer be accessible.
|
||||
'("user" "ipc" "uts" "net" "pid" "mnt"))
|
||||
(purify-environment)
|
||||
(chdir "/")
|
||||
|
||||
|
||||
@@ -21,6 +21,7 @@
|
||||
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
(define-module (gnu build linux-modules)
|
||||
#:use-module (guix elf)
|
||||
#:use-module (guix glob)
|
||||
#:use-module (guix build syscalls)
|
||||
#:use-module ((guix build utils) #:select (find-files invoke))
|
||||
@@ -38,7 +39,6 @@
|
||||
#:use-module (ice-9 match)
|
||||
#:use-module (ice-9 rdelim)
|
||||
#:autoload (ice-9 pretty-print) (pretty-print)
|
||||
#:use-module (system vm elf)
|
||||
#:export (dot-ko
|
||||
ensure-dot-ko
|
||||
module-formal-name
|
||||
|
||||
+1
-23
@@ -1,7 +1,7 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2021-2023 Andrew Tropin <andrew@trop.in>
|
||||
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
|
||||
;;; Copyright © 2022-2023, 2025 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2022-2023 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2023 Carlo Zancanaro <carlo@zancanaro.id.au>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
@@ -58,7 +58,6 @@
|
||||
|
||||
with-shell-quotation-bindings
|
||||
environment-variable-shell-definitions
|
||||
shell-variable-definitions
|
||||
home-files-directory
|
||||
xdg-configuration-files-directory
|
||||
xdg-data-files-directory
|
||||
@@ -242,27 +241,6 @@ ensures variable values are properly quoted."
|
||||
"\n")))
|
||||
variables))))
|
||||
|
||||
(define (shell-variable-definitions variables)
|
||||
"Return a gexp that evaluates to a list of POSIX shell statements defining
|
||||
VARIABLES, a list of variable name/value pairs, as shell variables (not
|
||||
environment variables). The returned code ensures variable values are
|
||||
properly quoted."
|
||||
(with-shell-quotation-bindings
|
||||
#~(string-append
|
||||
#$@(map (match-lambda
|
||||
((key . (or (? string? value)
|
||||
(? file-like? value)
|
||||
(? gexp? value)))
|
||||
#~(string-append #$key "="
|
||||
(shell-double-quote #$value)
|
||||
"\n"))
|
||||
((key . (? literal-string? value))
|
||||
#~(string-append #$key "="
|
||||
(shell-single-quote
|
||||
#$(literal-string-value value))
|
||||
"\n")))
|
||||
variables))))
|
||||
|
||||
(define (environment-variables->setup-environment-script vars)
|
||||
"Return a file that can be sourced by a POSIX compliant shell which
|
||||
initializes the environment. The file will source the home
|
||||
|
||||
@@ -23,7 +23,6 @@
|
||||
#:use-module (gnu packages freedesktop)
|
||||
#:use-module (gnu packages glib)
|
||||
#:use-module (gnu packages gnome)
|
||||
#:use-module (gnu packages xorg)
|
||||
#:use-module (gnu packages wm)
|
||||
#:use-module (gnu services)
|
||||
#:use-module (gnu services shepherd)
|
||||
@@ -72,8 +71,7 @@ environment variables set for a Wayland desktop session."
|
||||
niri
|
||||
xdg-desktop-portal
|
||||
xdg-desktop-portal-gnome
|
||||
xdg-desktop-portal-gtk
|
||||
xwayland-satellite)))))
|
||||
xdg-desktop-portal-gtk)))))
|
||||
(description "Install and configure Niri, a scrollable tiling Wayland
|
||||
compositor. This service starts Niri as a user-level desktop session with
|
||||
proper environment variables set for Wayland compatibility. It ensures Niri
|
||||
|
||||
@@ -2,7 +2,6 @@
|
||||
;;; Copyright © 2021 Andrew Tropin <andrew@trop.in>
|
||||
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
|
||||
;;; Copyright © 2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2025 Ludovic Courtès <ludo@gnu.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -122,9 +121,6 @@ service type can be extended with a list of file-like objects.")))
|
||||
(define (serialize-posix-env-vars field-name val)
|
||||
(environment-variable-shell-definitions val))
|
||||
|
||||
(define (serialize-shell-variables field value)
|
||||
(shell-variable-definitions value))
|
||||
|
||||
|
||||
;;;
|
||||
;;; Zsh.
|
||||
@@ -351,13 +347,6 @@ rules for the @code{home-environment-variables-service-type} apply
|
||||
here (@pxref{Essential Home Services}). The contents of this field will be
|
||||
added after the contents of the @code{bash-profile} field."
|
||||
(serializer serialize-posix-env-vars))
|
||||
(variables
|
||||
(alist '())
|
||||
"Bash variables (not to be confused with environment variables) to be set
|
||||
in @file{.bashrc} for use by interactive shells. A typical example of such
|
||||
variables is @code{HISTSIZE} and related history variables (@pxref{Bash
|
||||
Variables,,, bash, Bash Reference Manual})."
|
||||
(serializer serialize-shell-variables))
|
||||
(aliases
|
||||
(alist %default-bash-aliases)
|
||||
"Association list of aliases to set for the Bash session. The aliases will be
|
||||
@@ -436,12 +425,10 @@ if [ -f ~/.bashrc ]; then source ~/.bashrc; fi
|
||||
|
||||
,@(list (file-if-not-empty
|
||||
'bashrc
|
||||
(let ((user-settings (list (serialize-field 'variables) "\n"
|
||||
(serialize-field 'aliases))))
|
||||
(if (home-bash-configuration-guix-defaults? config)
|
||||
(cons* (plain-file-content %default-bashrc) "\n"
|
||||
user-settings)
|
||||
user-settings)))
|
||||
(if (home-bash-configuration-guix-defaults? config)
|
||||
(list (plain-file-content %default-bashrc) "\n"
|
||||
(serialize-field 'aliases))
|
||||
(list (serialize-field 'aliases))))
|
||||
(file-if-not-empty 'bash-logout)))))
|
||||
|
||||
(define (add-bash-packages config)
|
||||
@@ -453,10 +440,6 @@ if [ -f ~/.bashrc ]; then source ~/.bashrc; fi
|
||||
"Additional environment variables to set. These will be combined with the
|
||||
environment variables from other extensions and the base service to form one
|
||||
coherent block of environment variables.")
|
||||
(variables
|
||||
(alist '())
|
||||
"Extra Bash variables (not to be confused with environment variables) to be
|
||||
set in @file{.bashrc} for use by interactive shells.")
|
||||
(aliases
|
||||
(alist '())
|
||||
"Additional aliases to set. These will be combined with the aliases from
|
||||
@@ -476,17 +459,13 @@ with text blocks from other extensions and the base service."))
|
||||
|
||||
(define (home-bash-extensions original-config extension-configs)
|
||||
(match-record original-config <home-bash-configuration>
|
||||
(environment-variables variables aliases bash-profile bashrc bash-logout)
|
||||
(environment-variables aliases bash-profile bashrc bash-logout)
|
||||
(home-bash-configuration
|
||||
(inherit original-config)
|
||||
(environment-variables
|
||||
(append environment-variables
|
||||
(append-map
|
||||
home-bash-extension-environment-variables extension-configs)))
|
||||
(variables
|
||||
(append variables
|
||||
(append-map
|
||||
home-bash-extension-variables extension-configs)))
|
||||
(aliases
|
||||
(append aliases
|
||||
(append-map
|
||||
|
||||
@@ -112,35 +112,29 @@ network devices were found. Do you want to continue anyway?"))
|
||||
full-value
|
||||
(+ value 1)))))))
|
||||
|
||||
(define (url-alive? url)
|
||||
(false-if-exception
|
||||
(begin
|
||||
(http-request url)
|
||||
#t)))
|
||||
|
||||
(define (common-urls-alive? urls)
|
||||
(dynamic-wind
|
||||
(lambda ()
|
||||
(sigaction SIGALRM
|
||||
(lambda _ #f))
|
||||
(alarm 3))
|
||||
(lambda ()
|
||||
(any url-alive?
|
||||
urls))
|
||||
(lambda ()
|
||||
(alarm 0))))
|
||||
|
||||
(define (wait-service-online)
|
||||
"Display a newt scale until connman detects an Internet access. Do
|
||||
FULL-VALUE tentatives, spaced by 1 second."
|
||||
(define (url-alive? url)
|
||||
(false-if-exception
|
||||
(= (response-code (http-request url))
|
||||
200)))
|
||||
|
||||
(define (ci-available?)
|
||||
(dynamic-wind
|
||||
(lambda ()
|
||||
(sigaction SIGALRM
|
||||
(lambda _ #f))
|
||||
(alarm 3))
|
||||
(lambda ()
|
||||
(or (url-alive? "https://bordeaux.guix.gnu.org")
|
||||
(url-alive? "https://ci.guix.gnu.org")))
|
||||
(lambda ()
|
||||
(alarm 0))))
|
||||
|
||||
(define (online?)
|
||||
(or (and (connman-online?)
|
||||
(common-urls-alive?
|
||||
(list
|
||||
"https://bordeaux.guix.gnu.org"
|
||||
"https://ci.guix.gnu.org"
|
||||
"https://guix.gnu.org"
|
||||
"https://gnu.org")))
|
||||
(ci-available?))
|
||||
(file-exists? "/tmp/installer-assume-online")))
|
||||
|
||||
(let* ((full-value 5))
|
||||
@@ -155,47 +149,11 @@ FULL-VALUE tentatives, spaced by 1 second."
|
||||
full-value
|
||||
(+ value 1))))
|
||||
(unless (online?)
|
||||
(case (choice-window
|
||||
(G_ "Internet access")
|
||||
(G_ "Continue")
|
||||
(G_ "Try again?")
|
||||
(G_ "
|
||||
The selected network does not seem to provide access to the \
|
||||
Internet. The install process requires Internet access. \
|
||||
Do you want to continue anyway?"))
|
||||
((2) (abort-to-prompt 'installer-step 'abort))))))
|
||||
|
||||
(define (check-substitute-availability)
|
||||
"Check that at least one of the Guix substitute servers is available."
|
||||
(define (substitutes-available?)
|
||||
(or
|
||||
(file-exists? "/tmp/installer-assume-online")
|
||||
(common-urls-alive?
|
||||
(list
|
||||
"https://bordeaux.guix.gnu.org/nix-cache-info"
|
||||
"https://ci.guix.gnu.org/nix-cache-info"))))
|
||||
|
||||
(let* ((full-value 5))
|
||||
(run-scale-page
|
||||
#:title (G_ "Checking substitutes")
|
||||
#:info-text (G_ "Checking if Guix substitutes are available...")
|
||||
#:scale-full-value full-value
|
||||
#:scale-update-proc
|
||||
(lambda (value)
|
||||
(sleep 1)
|
||||
(if (substitutes-available?)
|
||||
full-value
|
||||
(+ value 1))))
|
||||
(unless (substitutes-available?)
|
||||
(case (choice-window
|
||||
(G_ "Substitute availability")
|
||||
(G_ "Continue")
|
||||
(G_ "Try again?")
|
||||
(G_ "
|
||||
None of the Guix substitute servers are available.
|
||||
You can proceed with the install, but you will
|
||||
have to build most of the packages you install locally."))
|
||||
((2) (abort-to-prompt 'installer-step 'abort))))))
|
||||
(run-error-page
|
||||
(G_ "The selected network does not provide access to the \
|
||||
Internet and the Guix substitute server, please try again.")
|
||||
(G_ "Connection error"))
|
||||
(abort-to-prompt 'installer-step 'abort))))
|
||||
|
||||
(define (run-network-page)
|
||||
"Run a page to allow the user to configure connman so that it can access the
|
||||
@@ -234,11 +192,7 @@ Internet."
|
||||
(installer-step
|
||||
(id 'wait-online)
|
||||
(compute (lambda _
|
||||
(wait-service-online))))
|
||||
(installer-step
|
||||
(id 'check-substitutes)
|
||||
(compute (lambda _
|
||||
(check-substitute-availability))))))
|
||||
(wait-service-online))))))
|
||||
(run-installer-steps
|
||||
#:steps network-steps
|
||||
#:rewind-strategy 'start))
|
||||
|
||||
@@ -5,8 +5,6 @@
|
||||
;;; Copyright © 2021 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2021 Leo Famulari <leo@famulari.name>
|
||||
;;; Copyright © 2023 Denys Nykula <vegan@libre.net.ua>
|
||||
;;; Copyright © 2025 Florian Pelz <pelzflorian@pelzflorian.de>
|
||||
;;; Copyright © 2025 Fredrik Salomonsson <plattfot@posteo.net>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -82,9 +80,6 @@
|
||||
(desktop-environment
|
||||
(name "MATE")
|
||||
(snippet '((service mate-desktop-service-type))))
|
||||
(desktop-environment
|
||||
(name "KDE Plasma")
|
||||
(snippet '((service plasma-desktop-service-type))))
|
||||
(desktop-environment
|
||||
(name "Icewm")
|
||||
(packages '((specification->package "icewm"))))
|
||||
@@ -108,11 +103,6 @@
|
||||
(packages '((specification->package "emacs")
|
||||
(specification->package "emacs-exwm")
|
||||
(specification->package "emacs-desktop-environment"))))
|
||||
(desktop-environment
|
||||
(name "Sway")
|
||||
(packages (map (lambda (package)
|
||||
`(specification->package ,package))
|
||||
'("sway" "wmenu" "foot"))))
|
||||
|
||||
;; Networking.
|
||||
(system-service
|
||||
@@ -204,11 +194,8 @@
|
||||
(if (target-hurd?)
|
||||
'%base-services/hurd
|
||||
'%base-services)))
|
||||
(native-console-font (match (false-if-exception
|
||||
(string-take (getenv "LANGUAGE") 2))
|
||||
((or "el" ;easier with more complete Greek font
|
||||
;; These need Cyrillic:
|
||||
"be" "bg" "kk" "ky"
|
||||
(native-console-font (match (getenv "LANGUAGE")
|
||||
((or "be" "bg" "el" "eo" "kk" "ky"
|
||||
"mk" "mn" "ru" "sr" "tg" "uk")
|
||||
"LatGrkCyr-8x16")
|
||||
(_ #f)))
|
||||
|
||||
+35
-52
@@ -72,7 +72,6 @@
|
||||
# Copyright © 2024 Ashvith Shetty <ashvithshetty10@gmail.com>
|
||||
# Copyright © 2024 James Smith <jsubuntuxp@disroot.org>
|
||||
# Copyright © 2025 Nigko Yerden <nigko.yerden@gmail.com>
|
||||
# Copyright © 2025 Cayetano Santos <csantosb@inventati.org>
|
||||
#
|
||||
# This file is part of GNU Guix.
|
||||
#
|
||||
@@ -187,6 +186,7 @@ GNU_SYSTEM_MODULES = \
|
||||
%D%/packages/calcurse.scm \
|
||||
%D%/packages/ccache.scm \
|
||||
%D%/packages/cdrom.scm \
|
||||
%D%/packages/cedille.scm \
|
||||
%D%/packages/certs.scm \
|
||||
%D%/packages/check.scm \
|
||||
%D%/packages/chemistry.scm \
|
||||
@@ -253,7 +253,6 @@ GNU_SYSTEM_MODULES = \
|
||||
%D%/packages/docker.scm \
|
||||
%D%/packages/documentation.scm \
|
||||
%D%/packages/dpdk.scm \
|
||||
%D%/packages/duckdb.scm \
|
||||
%D%/packages/dvtm.scm \
|
||||
%D%/packages/easyrpg.scm \
|
||||
%D%/packages/ebook.scm \
|
||||
@@ -299,8 +298,10 @@ GNU_SYSTEM_MODULES = \
|
||||
%D%/packages/fortran-xyz.scm \
|
||||
%D%/packages/freedesktop.scm \
|
||||
%D%/packages/freeipmi.scm \
|
||||
%D%/packages/fsf.scm \
|
||||
%D%/packages/ftp.scm \
|
||||
%D%/packages/fribidi.scm \
|
||||
%D%/packages/fvwm.scm \
|
||||
%D%/packages/gambas.scm \
|
||||
%D%/packages/game-development.scm \
|
||||
%D%/packages/games.scm \
|
||||
@@ -609,6 +610,7 @@ GNU_SYSTEM_MODULES = \
|
||||
%D%/packages/rust-sources.scm \
|
||||
%D%/packages/samba.scm \
|
||||
%D%/packages/sagemath.scm \
|
||||
%D%/packages/sawfish.scm \
|
||||
%D%/packages/scanner.scm \
|
||||
%D%/packages/scheme.scm \
|
||||
%D%/packages/spreadsheet.scm \
|
||||
@@ -647,7 +649,6 @@ GNU_SYSTEM_MODULES = \
|
||||
%D%/packages/storage.scm \
|
||||
%D%/packages/suckless.scm \
|
||||
%D%/packages/sugar.scm \
|
||||
%D%/packages/swift.scm \
|
||||
%D%/packages/swig.scm \
|
||||
%D%/packages/sycl.scm \
|
||||
%D%/packages/sync.scm \
|
||||
@@ -682,7 +683,6 @@ GNU_SYSTEM_MODULES = \
|
||||
%D%/packages/upnp.scm \
|
||||
%D%/packages/usb-modeswitch.scm \
|
||||
%D%/packages/uucp.scm \
|
||||
%D%/packages/oneapi.scm \
|
||||
%D%/packages/valgrind.scm \
|
||||
%D%/packages/version-control.scm \
|
||||
%D%/packages/video.scm \
|
||||
@@ -1078,7 +1078,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/capnproto-fix-test.patch \
|
||||
%D%/packages/patches/capstone-fix-python-constants.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 \
|
||||
%D%/packages/patches/circos-remove-findbin.patch \
|
||||
%D%/packages/patches/cdparanoia-fpic.patch \
|
||||
@@ -1102,7 +1101,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/clang-16-remove-crypt-interceptors.patch \
|
||||
%D%/packages/patches/clang-17.0-libc-search-path.patch \
|
||||
%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-runtime-esan-build-fixes.patch \
|
||||
%D%/packages/patches/clang-runtime-12-remove-crypt-interceptors.patch \
|
||||
@@ -1164,6 +1162,7 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/dbus-helper-search-path.patch \
|
||||
%D%/packages/patches/dbus-c++-gcc-compat.patch \
|
||||
%D%/packages/patches/dbus-c++-threading-mutex.patch \
|
||||
%D%/packages/patches/dbxfs-remove-sentry-sdk.patch \
|
||||
%D%/packages/patches/ddd-build.patch \
|
||||
%D%/packages/patches/debops-setup-py-avoid-git.patch \
|
||||
%D%/packages/patches/dee-vapi.patch \
|
||||
@@ -1246,11 +1245,11 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/esmtp-add-lesmtp.patch \
|
||||
%D%/packages/patches/esound-c99.patch \
|
||||
%D%/packages/patches/exercism-disable-self-update.patch \
|
||||
%D%/packages/patches/extempore-unbundle-external-dependencies.patch \
|
||||
%D%/packages/patches/extundelete-e2fsprogs-1.44.patch \
|
||||
%D%/packages/patches/fail2ban-fix-sshd-filter.patch \
|
||||
%D%/packages/patches/fail2ban-paths-guix-conf.patch \
|
||||
%D%/packages/patches/faiss-tests-CMakeLists-find-googletest.patch \
|
||||
%D%/packages/patches/falcosecurity-libs-bpf-probes-fix.patch \
|
||||
%D%/packages/patches/falcosecurity-libs-shared-build.patch \
|
||||
%D%/packages/patches/farstream-gupnp.patch \
|
||||
%D%/packages/patches/farstream-make.patch \
|
||||
@@ -1280,7 +1279,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/ffmpeg-jami-remove-mjpeg-log.patch \
|
||||
%D%/packages/patches/ffmpeg-jami-screen-sharing-x11-fix.patch \
|
||||
%D%/packages/patches/ffmpeg-4-binutils-2.41.patch \
|
||||
%D%/packages/patches/fgallery-also-look-for-7z.patch \
|
||||
%D%/packages/patches/fifengine-boost-compat.patch \
|
||||
%D%/packages/patches/fifengine-python-3.9-compat.patch \
|
||||
%D%/packages/patches/fifengine-swig-compat.patch \
|
||||
@@ -1293,7 +1291,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/flatpak-fix-fonts-icons.patch \
|
||||
%D%/packages/patches/flatpak-fix-icon-validation.patch \
|
||||
%D%/packages/patches/flatpak-unset-gdk-pixbuf-for-sandbox.patch \
|
||||
%D%/packages/patches/flex-fix-make-dependencies.patch \
|
||||
%D%/packages/patches/fluxbox-1.3.7-no-dynamic-cursor.patch \
|
||||
%D%/packages/patches/fluxbox-1.3.7-gcc.patch \
|
||||
%D%/packages/patches/fmt-9-overspecified-tests.patch \
|
||||
@@ -1308,8 +1305,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/fp16-system-libraries.patch \
|
||||
%D%/packages/patches/fpc-reproducibility.patch \
|
||||
%D%/packages/patches/fpc-glibc-2.34-compat.patch \
|
||||
%D%/packages/patches/fritzing-0.9.6-fix-types.patch \
|
||||
%D%/packages/patches/freedink-engine-fix-const-char.patch \
|
||||
%D%/packages/patches/freedict-tools-fix-determinism.patch \
|
||||
%D%/packages/patches/freedink-engine-fix-sdl-hints.patch \
|
||||
%D%/packages/patches/freeimage-libtiff-compat.patch \
|
||||
@@ -1441,45 +1436,51 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/glib-appinfo-watch.patch \
|
||||
%D%/packages/patches/glib-skip-failing-test.patch \
|
||||
%D%/packages/patches/glibc-2.33-riscv64-miscompilation.patch \
|
||||
%D%/packages/patches/glibc-2.35-CVE-2023-4911.patch \
|
||||
%D%/packages/patches/glibc-2.37-hurd-clock_t_centiseconds.patch \
|
||||
%D%/packages/patches/glibc-2.37-versioned-locpath.patch \
|
||||
%D%/packages/patches/glibc-2.38-ldd-x86_64.patch \
|
||||
%D%/packages/patches/glibc-2.39-git-updates.patch \
|
||||
%D%/packages/patches/glibc-2.40-dl-cache.patch \
|
||||
%D%/packages/patches/glibc-2.41-bootstrap-system.patch \
|
||||
%D%/packages/patches/glibc-2.41-hurd-local-clock_gettime_MONOTONIC.patch \
|
||||
%D%/packages/patches/glibc-2.41-ldd-x86_64.patch \
|
||||
%D%/packages/patches/glibc-CVE-2019-7309.patch \
|
||||
%D%/packages/patches/glibc-CVE-2019-9169.patch \
|
||||
%D%/packages/patches/glibc-CVE-2019-19126.patch \
|
||||
%D%/packages/patches/glibc-2.35-CVE-2023-4911.patch \
|
||||
%D%/packages/patches/glibc-allow-kernel-2.6.32.patch \
|
||||
%D%/packages/patches/glibc-boot-2.2.5.patch \
|
||||
%D%/packages/patches/glibc-boot-2.16.0.patch \
|
||||
%D%/packages/patches/glibc-boot-2.2.5.patch \
|
||||
%D%/packages/patches/glibc-bootstrap-system-2.2.5.patch \
|
||||
%D%/packages/patches/glibc-bootstrap-system-2.16.0.patch \
|
||||
%D%/packages/patches/glibc-bootstrap-system.patch \
|
||||
%D%/packages/patches/glibc-2.41-bootstrap-system.patch \
|
||||
%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-hidden-visibility-ldconfig.patch \
|
||||
%D%/packages/patches/glibc-hurd-clock_gettime_monotonic.patch \
|
||||
%D%/packages/patches/glibc-2.31-hurd-clock_gettime_monotonic.patch \
|
||||
%D%/packages/patches/glibc-2.37-hurd-clock_t_centiseconds.patch \
|
||||
%D%/packages/patches/glibc-2.41-hurd-local-clock_gettime_MONOTONIC.patch \
|
||||
%D%/packages/patches/glibc-2.37-versioned-locpath.patch \
|
||||
%D%/packages/patches/glibc-2.38-ldd-x86_64.patch \
|
||||
%D%/packages/patches/glibc-2.41-ldd-x86_64.patch \
|
||||
%D%/packages/patches/glibc-hurd-clock_t_centiseconds.patch \
|
||||
%D%/packages/patches/glibc-hurd-getauxval.patch \
|
||||
%D%/packages/patches/glibc-hurd-gettyent.patch \
|
||||
%D%/packages/patches/glibc-hurd-mach-print.patch \
|
||||
%D%/packages/patches/glibc-hurd-pthread_setcancelstate.patch \
|
||||
%D%/packages/patches/glibc-hurd-signal-fpe-exception.patch \
|
||||
%D%/packages/patches/glibc-hurd-signal-sa-siginfo.patch \
|
||||
%D%/packages/patches/glibc-hurd-2.41-pthread-once.patch \
|
||||
%D%/packages/patches/glibc-hurd-2.41-pthread-sigmask.patch \
|
||||
%D%/packages/patches/glibc-hurd-2.41-symlink.patch \
|
||||
%D%/packages/patches/glibc-hurd-xstate.patch \
|
||||
%D%/packages/patches/glibc-hurd64-gcc-14.2-tls-bug.patch \
|
||||
%D%/packages/patches/glibc-hurd64-intr-msg-clobber.patch \
|
||||
%D%/packages/patches/glibc-ldd-powerpc.patch \
|
||||
%D%/packages/patches/glibc-ldd-x86_64.patch \
|
||||
%D%/packages/patches/glibc-locales.patch \
|
||||
%D%/packages/patches/glibc-locales-2.28.patch \
|
||||
%D%/packages/patches/glibc-reinstate-prlimit64-fallback.patch \
|
||||
%D%/packages/patches/glibc-supported-locales.patch \
|
||||
%D%/packages/patches/glibc-skip-c++.patch \
|
||||
%D%/packages/patches/glibc-versioned-locpath.patch \
|
||||
%D%/packages/patches/glibc-2.29-git-updates.patch \
|
||||
%D%/packages/patches/glibc-2.29-supported-locales.patch \
|
||||
%D%/packages/patches/glibc-supported-locales.patch \
|
||||
%D%/packages/patches/gmime-disable-tests.patch \
|
||||
%D%/packages/patches/gmp-arm-asm-nothumb.patch \
|
||||
%D%/packages/patches/gmp-faulty-test.patch \
|
||||
@@ -1493,7 +1494,6 @@ dist_patch_DATA = \
|
||||
%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-version.patch \
|
||||
%D%/packages/patches/gnupg-default-pinentry.patch \
|
||||
%D%/packages/patches/gnupg-1-build-with-gcc10.patch \
|
||||
@@ -1520,6 +1520,7 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/grantlee-register-metaenumvariable.patch \
|
||||
%D%/packages/patches/grep-timing-sensitive-test.patch \
|
||||
%D%/packages/patches/grfcodec-gcc-compat.patch \
|
||||
%D%/packages/patches/gromacs-tinyxml2.patch \
|
||||
%D%/packages/patches/groovy-add-exceptionutilsgenerator.patch \
|
||||
%D%/packages/patches/grub-efi-fat-serial-number.patch \
|
||||
%D%/packages/patches/grub-hurd64.patch \
|
||||
@@ -1582,15 +1583,16 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/highlight-gui-data-dir.patch \
|
||||
%D%/packages/patches/hplip-usb-timeout.patch \
|
||||
%D%/packages/patches/http-parser-CVE-2020-8287.patch \
|
||||
%D%/packages/patches/htslib-for-stringtie.patch \
|
||||
%D%/packages/patches/hubbub-sort-entities.patch \
|
||||
%D%/packages/patches/hueplusplus-mbedtls.patch \
|
||||
%D%/packages/patches/hugs-fix-build.patch \
|
||||
%D%/packages/patches/hurd-refcounts-assert.patch \
|
||||
%D%/packages/patches/hurd-rumpdisk-no-hd.patch \
|
||||
%D%/packages/patches/hurd-socket-activation.patch \
|
||||
%D%/packages/patches/hurd-startup.patch \
|
||||
%D%/packages/patches/hwloc-1-test-btrfs.patch \
|
||||
%D%/packages/patches/i7z-gcc-10.patch \
|
||||
%D%/packages/patches/icecat-adjust-mozilla-desktop.patch \
|
||||
%D%/packages/patches/icecat-makeicecat.patch \
|
||||
%D%/packages/patches/icecat-avoid-bundled-libraries.patch \
|
||||
%D%/packages/patches/icecat-compare-paths.patch \
|
||||
@@ -1617,6 +1619,7 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/irrlicht-link-against-needed-libs.patch \
|
||||
%D%/packages/patches/isl-0.11.1-aarch64-support.patch \
|
||||
%D%/packages/patches/ispell-for-linphone-cmake.patch \
|
||||
%D%/packages/patches/jamesdsp-fix-bulid-on-pipewire-1.4.0.patch\
|
||||
%D%/packages/patches/jami-find-package-avutil.patch \
|
||||
%D%/packages/patches/jami-libjami-headers-search.patch \
|
||||
%D%/packages/patches/jami-qwindowkit.patch \
|
||||
@@ -1761,13 +1764,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/libmpeg2-global-symbol-test.patch \
|
||||
%D%/packages/patches/liblinphone-jsoncpp.patch \
|
||||
%D%/packages/patches/libphonenumber-reproducible-build.patch \
|
||||
%D%/packages/patches/plotutils-c23.patch \
|
||||
%D%/packages/patches/plotutils-configure-c99.patch \
|
||||
%D%/packages/patches/plotutils-cxx17-fix.patch \
|
||||
%D%/packages/patches/plotutils-format-security.patch \
|
||||
%D%/packages/patches/plotutils-libxmi.patch \
|
||||
%D%/packages/patches/plotutils-makefile.patch \
|
||||
%D%/packages/patches/plotutils-rangecheck.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 \
|
||||
@@ -1783,6 +1779,8 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/libtiff-CVE-2022-34526.patch \
|
||||
%D%/packages/patches/libtirpc-CVE-2021-46828.patch \
|
||||
%D%/packages/patches/libtirpc-hurd.patch \
|
||||
%D%/packages/patches/libtool-grep-compat.patch \
|
||||
%D%/packages/patches/libtool-skip-tests2.patch \
|
||||
%D%/packages/patches/libtree-fix-check-non-x86.patch \
|
||||
%D%/packages/patches/libusb-0.1-disable-tests.patch \
|
||||
%D%/packages/patches/libusb-for-axoloti.patch \
|
||||
@@ -1791,8 +1789,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/libvdpau-va-gl-unbundle.patch \
|
||||
%D%/packages/patches/libvpx-CVE-2016-2818.patch \
|
||||
%D%/packages/patches/libxcb-path-max.patch \
|
||||
%D%/packages/patches/libxmi-gcc15.patch \
|
||||
%D%/packages/patches/libxmi-implicit.patch \
|
||||
%D%/packages/patches/libxml2-xpath0-Add-option-xpath0.patch \
|
||||
%D%/packages/patches/libwpd-gcc-compat.patch \
|
||||
%D%/packages/patches/libxt-guix-search-paths.patch \
|
||||
@@ -1844,7 +1840,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/maxima-defsystem-mkdir.patch \
|
||||
%D%/packages/patches/maven-generate-component-xml.patch \
|
||||
%D%/packages/patches/maven-generate-javax-inject-named.patch \
|
||||
%D%/packages/patches/mc2mt-add-packaging-support.patch \
|
||||
%D%/packages/patches/mcrypt-CVE-2012-4409.patch \
|
||||
%D%/packages/patches/mcrypt-CVE-2012-4426.patch \
|
||||
%D%/packages/patches/mcrypt-CVE-2012-4527.patch \
|
||||
@@ -1954,7 +1949,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/ocaml-4.09-multiple-definitions.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-optimizer-system-library.patch \
|
||||
%D%/packages/patches/onnx-1.13.1-use-system-googletest.patch \
|
||||
@@ -2011,10 +2005,14 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/orpheus-cast-errors-and-includes.patch \
|
||||
%D%/packages/patches/ots-no-include-missing-file.patch \
|
||||
%D%/packages/patches/owncloud-disable-updatecheck.patch \
|
||||
%D%/packages/patches/p7zip-CVE-2016-9296.patch \
|
||||
%D%/packages/patches/p7zip-CVE-2017-17969.patch \
|
||||
%D%/packages/patches/pnet-fix-line-number-info.patch \
|
||||
%D%/packages/patches/pnet-fix-off-by-one.patch \
|
||||
%D%/packages/patches/pnet-newer-libgc-fix.patch \
|
||||
%D%/packages/patches/pnet-newer-texinfo-fix.patch \
|
||||
%D%/packages/patches/p7zip-fix-build-with-gcc-11.patch \
|
||||
%D%/packages/patches/p7zip-remove-unused-code.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 \
|
||||
@@ -2055,7 +2053,6 @@ dist_patch_DATA = \
|
||||
%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 \
|
||||
%D%/packages/patches/python-pypytools-python-3-fixes.patch \
|
||||
%D%/packages/patches/python-pyreadstat-link-libiconv.patch \
|
||||
%D%/packages/patches/python-sip-include-dirs.patch \
|
||||
%D%/packages/patches/python-scikit-build-setuptools-compat.patch \
|
||||
@@ -2083,7 +2080,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/smalltalk-multiplication-overflow.patch \
|
||||
%D%/packages/patches/soci-mysql-ddl-types.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 \
|
||||
@@ -2095,7 +2091,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/perl-5.14-no-sys-dirs.patch \
|
||||
%D%/packages/patches/perl-autosplit-default-time.patch \
|
||||
%D%/packages/patches/perl-class-methodmaker-reproducible.patch \
|
||||
%D%/packages/patches/perl-crypt-des-implicit-func-decl.patch \
|
||||
%D%/packages/patches/perl-image-exiftool-CVE-2021-22204.patch \
|
||||
%D%/packages/patches/perl-net-amazon-s3-moose-warning.patch \
|
||||
%D%/packages/patches/perl-net-dns-resolver-programmable-fix.patch \
|
||||
@@ -2140,6 +2135,7 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/psm-ldflags.patch \
|
||||
%D%/packages/patches/psm-repro.patch \
|
||||
%D%/packages/patches/pstoedit-fix-gcc12.patch \
|
||||
%D%/packages/patches/pstoedit-fix-plainC.patch \
|
||||
%D%/packages/patches/pstoedit-pkglibdir.patch \
|
||||
%D%/packages/patches/pulseaudio-fix-mult-test.patch \
|
||||
%D%/packages/patches/pulseaudio-longer-test-timeout.patch \
|
||||
@@ -2164,6 +2160,7 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/python-3-reproducible-build.patch \
|
||||
%D%/packages/patches/python-cross-compile.patch \
|
||||
%D%/packages/patches/python-colour-remove-d2to1.patch \
|
||||
%D%/packages/patches/python-configobj-setuptools.patch \
|
||||
%D%/packages/patches/python-debugpy-unbundle-pydevd.patch \
|
||||
%D%/packages/patches/python-docopt-pytest6-compat.patch \
|
||||
%D%/packages/patches/python-fixtures-remove-monkeypatch-test.patch \
|
||||
@@ -2183,7 +2180,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/python-pytorch-fix-codegen.patch \
|
||||
%D%/packages/patches/python-pytorch-for-r-torch-fix-codegen.patch \
|
||||
%D%/packages/patches/python-pytorch-for-r-torch-system-libraries.patch \
|
||||
%D%/packages/patches/python-pytorch-for-r-torch-without-kineto.patch \
|
||||
%D%/packages/patches/python-pytorch-runpath.patch \
|
||||
%D%/packages/patches/python-pytorch-system-libraries.patch \
|
||||
%D%/packages/patches/python-pytorch-without-kineto.patch \
|
||||
@@ -2251,7 +2247,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/rocm-opencl-runtime-4.3-noclinfo.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 \
|
||||
%D%/packages/patches/ruby-asciidoctor-pdf-support-prawn-svg-0_36.patch \
|
||||
%D%/packages/patches/ruby-chunky-png-ruby-3-2-support.patch \
|
||||
%D%/packages/patches/ruby-hiredis-use-system-hiredis.patch \
|
||||
@@ -2301,7 +2296,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/seq24-rename-mutex.patch \
|
||||
%D%/packages/patches/libsequoia-fix-ffi-Makefile.patch \
|
||||
%D%/packages/patches/libsequoia-remove-store.patch \
|
||||
%D%/packages/patches/shaderc-for-pcsx2-changes.patch \
|
||||
%D%/packages/patches/shakespeare-spl-fix-grammar.patch \
|
||||
%D%/packages/patches/shared-mime-info-xdgmime-path.patch \
|
||||
%D%/packages/patches/sharutils-CVE-2018-1000097.patch \
|
||||
@@ -2331,13 +2325,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/superlu-dist-awpm-grid.patch \
|
||||
%D%/packages/patches/superlu-dist-scotchmetis.patch \
|
||||
%D%/packages/patches/supertux-unbundle-squirrel.patch \
|
||||
%D%/packages/patches/swift-5.7.3-sdk-path.patch \
|
||||
%D%/packages/patches/swift-5.7.3-sourcekit-rpath.patch \
|
||||
%D%/packages/patches/swift-6.2-cplus-include-path.patch \
|
||||
%D%/packages/patches/swift-6.2-exclude-scan-test.patch \
|
||||
%D%/packages/patches/swift-corelibs-libdispatch-5.6.3-lock-cpp.patch \
|
||||
%D%/packages/patches/swift-corelibs-libdispatch-5.7.3-modulemap.patch \
|
||||
%D%/packages/patches/swift-llvm-5.7.3-linux.patch \
|
||||
%D%/packages/patches/swig-support-gcc-12.patch \
|
||||
%D%/packages/patches/swish-e-search.patch \
|
||||
%D%/packages/patches/swish-e-format-security.patch \
|
||||
@@ -2366,7 +2353,6 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/texi2html-document-encoding.patch \
|
||||
%D%/packages/patches/texi2html-i18n.patch \
|
||||
%D%/packages/patches/texmacs-wayland-hidpi.patch \
|
||||
%D%/packages/patches/texlive-bin-luaoutputdir-test.patch \
|
||||
%D%/packages/patches/thefuck-test-environ.patch \
|
||||
%D%/packages/patches/thefuck-remove-broken-tests.patch \
|
||||
%D%/packages/patches/tidy-CVE-2015-5522+5523.patch \
|
||||
@@ -2486,14 +2472,11 @@ dist_patch_DATA = \
|
||||
%D%/packages/patches/xfce4-settings-defaults.patch \
|
||||
%D%/packages/patches/xgboost-use-system-dmlc-core.patch \
|
||||
%D%/packages/patches/xiphos-glib.patch \
|
||||
%D%/packages/patches/xlispstat-fix-compilation-with-modern-gcc.patch \
|
||||
%D%/packages/patches/xmonad-dynamic-linking.patch \
|
||||
%D%/packages/patches/xplanet-1.3.1-cxx11-eof.patch \
|
||||
%D%/packages/patches/xplanet-1.3.1-libdisplay_DisplayOutput.cpp.patch \
|
||||
%D%/packages/patches/xplanet-1.3.1-libimage_gif.c.patch \
|
||||
%D%/packages/patches/xplanet-1.3.1-xpUtil-Add2017LeapSecond.cpp.patch \
|
||||
%D%/packages/patches/xpra-5.0-install_libs.patch \
|
||||
%D%/packages/patches/xpra-5.0-systemd-run.patch \
|
||||
%D%/packages/patches/xpra-6.0-systemd-run.patch \
|
||||
%D%/packages/patches/xpra-6.1-install_libs.patch \
|
||||
%D%/packages/patches/xterm-370-explicit-xcursor.patch \
|
||||
|
||||
@@ -77,43 +77,36 @@
|
||||
(build-system glib-or-gtk-build-system)
|
||||
(outputs '("out" "bin"))
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ; Tests require drivers
|
||||
#:configure-flags
|
||||
#~(list "CFLAGS=-g -O2 -Wno-error=incompatible-pointer-types"
|
||||
"--disable-static"
|
||||
"--enable-fake")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
#$@(if (this-package-native-input "config")
|
||||
#~((add-after 'unpack 'update-config-scripts
|
||||
(lambda* (#:key native-inputs inputs #:allow-other-keys)
|
||||
(for-each
|
||||
(lambda (dir)
|
||||
(for-each
|
||||
(lambda (file)
|
||||
(install-file
|
||||
(search-input-file
|
||||
(or native-inputs inputs)
|
||||
(string-append "/bin/" file)) dir))
|
||||
(list "config.guess" "config.sub")))
|
||||
(list "." "libltdl")))))
|
||||
(list)))))
|
||||
`(#:tests? #f ; Tests require drivers
|
||||
#:configure-flags
|
||||
(list "CFLAGS=-g -O2 -Wno-error=incompatible-pointer-types"
|
||||
"--disable-static"
|
||||
"--enable-fake")
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
,@(if (this-package-native-input "config")
|
||||
`((add-after 'unpack 'update-config-scripts
|
||||
(lambda* (#:key native-inputs inputs #:allow-other-keys)
|
||||
(for-each
|
||||
(lambda (dir)
|
||||
(for-each (lambda (file)
|
||||
(install-file
|
||||
(search-input-file
|
||||
(or native-inputs inputs)
|
||||
(string-append "/bin/" file)) dir))
|
||||
'("config.guess" "config.sub")))
|
||||
'("." "libltdl")))))
|
||||
'()))))
|
||||
(native-inputs
|
||||
(append
|
||||
(if (or (target-aarch64?)
|
||||
(target-ppc64le?)
|
||||
(target-riscv64?))
|
||||
(list config)
|
||||
(list))
|
||||
(list latex2html
|
||||
pkg-config
|
||||
python-wrapper
|
||||
swig)))
|
||||
(if (or (target-aarch64?)
|
||||
(target-ppc64le?)
|
||||
(target-riscv64?))
|
||||
(list config)
|
||||
'())
|
||||
(list latex2html pkg-config python-wrapper swig)))
|
||||
(inputs
|
||||
(list glib
|
||||
gtk+-2
|
||||
libusb-compat))
|
||||
(list glib gtk+-2 libusb-compat))
|
||||
(synopsis "Portable Braille Library")
|
||||
(description "Libbraille is a library to easily access Braille displays and
|
||||
terminals.")
|
||||
|
||||
@@ -40,7 +40,7 @@
|
||||
(define-public acl
|
||||
(package
|
||||
(name "acl")
|
||||
(version "2.3.2")
|
||||
(version "2.3.1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
@@ -48,7 +48,7 @@
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0z1gi82zc2xcbchfagd7apn2s7camaagj8y6hmysl1wpcanxnasz"))))
|
||||
"1bqi7hj0xkpivwg7lx5cv3yvs9ks1i6azvpgbvfpzcq1i736233n"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:modules ((ice-9 ftw)
|
||||
|
||||
+15
-24
@@ -583,14 +583,14 @@ interface and is based on GNU Guile.")
|
||||
(define-public shepherd-1.0
|
||||
(package
|
||||
(inherit shepherd-0.10)
|
||||
(version "1.0.8")
|
||||
(version "1.0.7")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/shepherd/shepherd-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1xbzf7vmanb36hfb0kc9a240x7xnkynsfs6hcz2kj0xzf19h1srv"))))
|
||||
"15vmfbnah4p978zs4j95fl7m3sy98z1brgyz2m8s30zfh5srnnij"))))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments shepherd-0.10)
|
||||
((#:configure-flags flags #~'())
|
||||
@@ -603,19 +603,10 @@ interface and is based on GNU Guile.")
|
||||
"/bin/zstd")))))
|
||||
(native-inputs
|
||||
(modify-inputs (package-native-inputs shepherd-0.10)
|
||||
(replace "guile-fibers"
|
||||
;; Work around <https://codeberg.org/guile/fibers/issues/89>.
|
||||
;; This affects any system without a functional real-time
|
||||
;; clock (RTC), but in practice these are typically
|
||||
;; single-board computers.
|
||||
(if (or (target-arm?)
|
||||
(target-riscv64?))
|
||||
guile-fibers-1.1
|
||||
guile-fibers)))) ;use latest guile-fibers available
|
||||
(replace "guile-fibers" guile-fibers))) ;use latest guile-fibers available
|
||||
(inputs
|
||||
(modify-inputs (package-inputs shepherd-0.10)
|
||||
(replace "guile-fibers"
|
||||
(this-package-native-input "guile-fibers"))
|
||||
(replace "guile-fibers" guile-fibers) ;use latest guile-fibers available
|
||||
(append gzip zstd)))))
|
||||
|
||||
(define-public shepherd shepherd-0.10)
|
||||
@@ -2718,7 +2709,7 @@ command.")
|
||||
#:tests? #f ; no tests
|
||||
;; Make sure the (rarely updated) package 'imagemagick/stable'
|
||||
;; does not end up in the closure.
|
||||
#:disallowed-references (list (this-package-native-input "imagemagick"))
|
||||
#:disallowed-references (list imagemagick/stable)
|
||||
#:modules '((guix build qt-build-system)
|
||||
((guix build gnu-build-system) #:prefix gnu:)
|
||||
(guix build utils))
|
||||
@@ -3784,14 +3775,14 @@ rules is done with the @code{auditctl} utility.")
|
||||
(define-public nmap
|
||||
(package
|
||||
(name "nmap")
|
||||
(version "7.98")
|
||||
(version "7.97")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://nmap.org/dist/nmap-" version
|
||||
".tar.bz2"))
|
||||
(sha256
|
||||
(base32
|
||||
"1rlpv238ixcj62d740w8xghcfmkvmg9453kh46gmr7mfx89p716f"))
|
||||
"1h252sz1cqr0r440s7pxn9wwn1jffbrdvacnvmbw4w664mwz565g"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
@@ -4668,7 +4659,7 @@ information tool.")
|
||||
(define-public fastfetch-minimal
|
||||
(package
|
||||
(name "fastfetch-minimal")
|
||||
(version "2.55.0")
|
||||
(version "2.53.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -4677,7 +4668,7 @@ information tool.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1vqw0r0h8clb302bzbmfxpkz54kx6sd661nm50vvhijham8x7mlb"))
|
||||
(base32 "0w260lscjy3rqahhr2637hb3fqsklv2qx59f2v66wy99nnmqvbha"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet '(begin
|
||||
(delete-file-recursively "src/3rdparty")))))
|
||||
@@ -5152,7 +5143,7 @@ cache of unix and unix-like systems.")
|
||||
(define-public solaar
|
||||
(package
|
||||
(name "solaar")
|
||||
(version "1.1.16")
|
||||
(version "1.1.14")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -5161,7 +5152,7 @@ cache of unix and unix-like systems.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1q05pcrl1pr6ls92m5k690qrwqb4nz1lganxvbj9b40w3c6nh5iy"))))
|
||||
(base32 "000700waw4z6ab40naycapjgqz8yvz9ny1px94ni4pwf8f3kh0vh"))))
|
||||
(build-system pyproject-build-system)
|
||||
(native-inputs
|
||||
(list python-pytest
|
||||
@@ -5398,7 +5389,7 @@ elogind's uaccess feature.")
|
||||
(define-public jc
|
||||
(package
|
||||
(name "jc")
|
||||
(version "1.25.6")
|
||||
(version "1.25.5")
|
||||
(source
|
||||
(origin
|
||||
;; The PyPI tarball lacks the test suite.
|
||||
@@ -5408,7 +5399,7 @@ elogind's uaccess feature.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0bpna1hfwigv9r3i1xafl96jlj4335hrjq5rkrgh2nzc57453bly"))))
|
||||
(base32 "16agzk47f1g72gni3lazqlcv7fs0nb2dwbagv6kxjbk36pm3mzmn"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list #:phases
|
||||
@@ -5578,14 +5569,14 @@ Netgear devices.")
|
||||
(define-public atop
|
||||
(package
|
||||
(name "atop")
|
||||
(version "2.12.1")
|
||||
(version "2.12.0")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://www.atoptool.nl/download/atop-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1xhjpmaans63g0y4z9gzff09fxxf9sgmj64ycc2r9y7sbmyfdnsg"))))
|
||||
"11ih6kan3j9kg83pjhy9yffgpr638b0mfg1fq90yzrhl1k4yq28d"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
|
||||
@@ -14,7 +14,6 @@
|
||||
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
|
||||
;;; Copyright © 2020, 2021, 2023, 2024, 2025 Vinicius Monego <monego@posteo.net>
|
||||
;;; Copyright © 2021 Lars-Dominik Braun <ldb@leibniz-psychology.org>
|
||||
;;; Copyright © 2022 宋文武 <iyzsong@envs.net>
|
||||
;;; Copyright © 2022 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2023 Mehmet Tekman <mtekman89@gmail.com>
|
||||
;;; Copyright © 2025 Sharlatan Hellseher <sharlatanus@gmail.com>
|
||||
@@ -46,7 +45,6 @@
|
||||
#:use-module (gnu packages boost)
|
||||
#:use-module (gnu packages build-tools)
|
||||
#:use-module (gnu packages check)
|
||||
#:use-module (gnu packages cmake)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages cpp)
|
||||
#:use-module (gnu packages curl)
|
||||
@@ -239,7 +237,7 @@ the real span of the lattice.")
|
||||
(inputs
|
||||
(list fplll gmp mpfr pari-gp))
|
||||
(propagated-inputs
|
||||
(list python-cysignals python-cython python-flake8 python-numpy))
|
||||
(list python-cysignals python-cython-3 python-flake8 python-numpy))
|
||||
(home-page "https://github.com/fplll/fpylll")
|
||||
(synopsis "Python interface for fplll")
|
||||
(description "fpylll is a Python wrapper for fplll.")
|
||||
@@ -552,7 +550,7 @@ fast arithmetic.")
|
||||
(native-inputs
|
||||
(list meson-python
|
||||
pkg-config
|
||||
python-cython
|
||||
python-cython-3
|
||||
python-pytest))
|
||||
(inputs
|
||||
(list gmp
|
||||
@@ -1055,34 +1053,6 @@ Optional thin wrappers allow usage of the library from other languages.")
|
||||
(license (list license:expat ;SymEngine
|
||||
license:bsd-3)))) ;3rd party code
|
||||
|
||||
(define-public python-symengine
|
||||
(package
|
||||
(name "python-symengine")
|
||||
(version "0.14.1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "symengine" version))
|
||||
(sha256
|
||||
(base32 "1w7hwavbxgikljy9m3p89k3x2zdhv81h9bh330aw4wb3qm74p7jf"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:test-flags #~(list "--pyargs" "symengine")))
|
||||
(native-inputs
|
||||
(list cmake-minimal
|
||||
python-cython
|
||||
python-pytest
|
||||
python-setuptools))
|
||||
(inputs
|
||||
(list symengine))
|
||||
(home-page "https://github.com/symengine/symengine.py")
|
||||
(synopsis "Python library providing wrappers to SymEngine")
|
||||
(description
|
||||
"This library provides a Python wrapper to SymEngine, a fast C++ symbolic
|
||||
manipulation library.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public ginac
|
||||
(package
|
||||
(name "ginac")
|
||||
|
||||
+39
-35
@@ -53,9 +53,7 @@
|
||||
#:use-module (gnu packages gcc)
|
||||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang-xyz)
|
||||
#:use-module (gnu packages graphviz)
|
||||
#:use-module (gnu packages image)
|
||||
#:use-module (gnu packages iso-codes)
|
||||
#:use-module (gnu packages java)
|
||||
#:use-module (gnu packages linux)
|
||||
#:use-module (gnu packages pcre)
|
||||
@@ -1117,30 +1115,36 @@ safest way, on a file image.")
|
||||
(define-public python-androguard
|
||||
(package
|
||||
(name "python-androguard")
|
||||
(version "3.3.5") ;TODO: It was released in 2019, there is a fresh version
|
||||
(version "3.2.1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "androguard" version))
|
||||
(sha256
|
||||
(base32 "18nd08rbvc4d1p9r70qp76rcbldvpv89prsi15alrmxdlnimqrgh"))))
|
||||
(build-system pyproject-build-system)
|
||||
;; XXX: The pypi release doesn't have the tests, but the tests use
|
||||
;; packaged binaries, so we skip them.
|
||||
(origin
|
||||
;; The pypi release doesn't have the tests, but the tests use
|
||||
;; packaged binaries, so we skip them.
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "androguard" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0ndsw00pkyda4i2s3wi5ap8gbk6a9d23xhhxpdbk02padv8sxkfv"))))
|
||||
(build-system python-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f))
|
||||
'(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(replace 'check
|
||||
;; Adapted from .travis.yml
|
||||
(lambda _
|
||||
(invoke "nosetests" "--with-coverage" "--with-timer"
|
||||
"--timer-top-n" "50"))))))
|
||||
(native-inputs
|
||||
(list python-setuptools))
|
||||
(list python-codecov python-coverage python-mock python-nose
|
||||
python-nose-timer))
|
||||
(propagated-inputs
|
||||
(list python-asn1crypto
|
||||
python-click
|
||||
python-colorama
|
||||
python-future
|
||||
python-ipython
|
||||
python-lxml
|
||||
python-matplotlib
|
||||
python-networkx
|
||||
python-pydot
|
||||
python-pygments
|
||||
python-pyperclip))
|
||||
(home-page "https://github.com/androguard/androguard")
|
||||
@@ -1192,49 +1196,49 @@ for communicating with Xiaomi smart appliances over miIO and MIoT protocols.")
|
||||
(define-public fdroidserver
|
||||
(package
|
||||
(name "fdroidserver")
|
||||
(version "2.4.2")
|
||||
(version "1.1.9")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "fdroidserver" version))
|
||||
(sha256
|
||||
(base32
|
||||
"06xybginrwi5c7bw000wz5s5hzi0aqrxskzwh8qc6wv463w2djax"))))
|
||||
(build-system pyproject-build-system)
|
||||
"0m07f791z45w7r2dzx4yb6s54b3c3wykm3w9hn25p2jcyax082a2"))))
|
||||
(build-system python-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;requires Android SDK
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'check 'set-env
|
||||
(lambda _
|
||||
(setenv "HOME" "/tmp"))))))
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fix-versioning
|
||||
(lambda _
|
||||
(substitute* "setup.py"
|
||||
(("0.2.1") ,(package-version python-pyasn1-modules))
|
||||
;; The dependency on docker has been removed upstream by
|
||||
;; a fairly large patch:
|
||||
;; https://gitlab.com/fdroid/fdroidserver/-/commit/89614851250c79a05db84070feca6dea033af334
|
||||
;; that is not in a release yet. It appears we can compile with
|
||||
;; a newer version.
|
||||
(("docker-py >= 1.9, < 2.0") "docker >= 1.9"))
|
||||
#t)))))
|
||||
(propagated-inputs
|
||||
(list python-androguard
|
||||
python-apache-libcloud
|
||||
python-argcomplete
|
||||
python-asn1crypto
|
||||
python-clint
|
||||
python-defusedxml
|
||||
python-docker
|
||||
python-gitpython
|
||||
python-mwclient
|
||||
python-oscrypto
|
||||
python-paramiko
|
||||
python-pillow
|
||||
python-platformdirs
|
||||
python-puremagic
|
||||
python-pyasn1
|
||||
python-pyasn1-modules
|
||||
python-pyyaml
|
||||
python-qrcode
|
||||
python-ruamel.yaml
|
||||
python-requests
|
||||
python-ruamel.yaml-0.16
|
||||
python-vagrant
|
||||
python-yamllint
|
||||
sdkmanager))
|
||||
python-vagrant))
|
||||
(native-inputs
|
||||
(list python-babel python-setuptools))
|
||||
(list python-babel python-bcrypt python-docker-pycreds python-pynacl
|
||||
python-websocket-client))
|
||||
(home-page "https://f-droid.org")
|
||||
(synopsis "F-Droid server tools")
|
||||
(description
|
||||
|
||||
+25
-27
@@ -40,15 +40,13 @@
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/AppImage/type2-runtime")
|
||||
(commit commit)))
|
||||
(url "https://github.com/AppImage/type2-runtime")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0954crhlbapxis96g1s0vfpf78ybr64zvjalak387ksxj560g44x"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ; No tests
|
||||
#:make-flags
|
||||
#~(list "-Csrc/runtime" "runtime-fuse3"
|
||||
(string-append "CC=" #$(cc-for-target))
|
||||
@@ -62,33 +60,34 @@
|
||||
`((guix build gnu-build-system)
|
||||
(guix build utils)
|
||||
(ice-9 binary-ports))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(replace 'install
|
||||
(lambda _
|
||||
(install-file "src/runtime/runtime-fuse3"
|
||||
(string-append #$output "/bin"))))
|
||||
;; Must be after all elf reliant phases. Used to identify the
|
||||
;; executable as an AppImage as per the specification.
|
||||
(add-after 'make-dynamic-linker-cache 'set-magic-bytes
|
||||
(lambda _
|
||||
(let ((port (open (string-append #$output
|
||||
"/bin/runtime-fuse3")
|
||||
(logior O_WRONLY))))
|
||||
(seek port 8 SEEK_SET)
|
||||
(put-bytevector port #vu8(#x41 #x49 #x02))
|
||||
(close-port port)))))
|
||||
#:disallowed-references
|
||||
(list (this-package-input "squashfuse-for-appimage")
|
||||
(this-package-input "fuse")
|
||||
(gexp-input (this-package-input "zstd") "static")
|
||||
(gexp-input (this-package-input "zlib") "static"))))
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(delete 'check) ; No tests.
|
||||
(replace 'install
|
||||
(lambda _
|
||||
(install-file "src/runtime/runtime-fuse3"
|
||||
(string-append #$output "/bin"))))
|
||||
;; Must be after all elf reliant phases. Used to identify the
|
||||
;; executable as an AppImage as per the specification.
|
||||
(add-after 'make-dynamic-linker-cache 'set-magic-bytes
|
||||
(lambda _
|
||||
(let ((port (open (string-append #$output
|
||||
"/bin/runtime-fuse3")
|
||||
(logior O_WRONLY))))
|
||||
(seek port 8 SEEK_SET)
|
||||
(put-bytevector port #vu8(#x41 #x49 #x02))
|
||||
(close-port port)))))
|
||||
#:disallowed-references (list squashfuse-for-appimage
|
||||
fuse-for-appimage
|
||||
(gexp-input zstd "static")
|
||||
(gexp-input zlib "static"))))
|
||||
;; Only needed at build time.
|
||||
(inputs (list squashfuse-for-appimage
|
||||
fuse-for-appimage
|
||||
`(,zstd "static")
|
||||
`(,zlib "static")))
|
||||
(build-system gnu-build-system)
|
||||
(home-page "https://github.com/AppImage/type2-runtime")
|
||||
(synopsis "Runtime for executing AppImages")
|
||||
(description "The runtime is the executable part of every AppImage. It mounts
|
||||
the payload via @acronym{FUSE} and executes the entrypoint, allowing users to run
|
||||
@@ -97,5 +96,4 @@ ensures that the AppImage can access its bundled libraries and resources seamles
|
||||
providing a consistent environment across different Linux distributions. In the
|
||||
absence of @acronym{FUSE}, the AppImage can still be started using the
|
||||
@option{--appimage-extract-and-run} flag.")
|
||||
(home-page "https://github.com/AppImage/type2-runtime")
|
||||
(license license:expat))))
|
||||
|
||||
+65
-64
@@ -84,69 +84,70 @@
|
||||
(delete-file-recursively "external/sqlite")))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:configure-flags
|
||||
#~'("-DBUILD_PRESET=everything" "-DDISTR_TAG='Guix'")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-paths
|
||||
(lambda _
|
||||
(substitute* "src/platform/posix/paths.c"
|
||||
(("/usr/local") #$output))))
|
||||
;; Normally, it tries to fetch patched openal with git
|
||||
;; but copying files manually in the right place seems
|
||||
;; to work too.
|
||||
(add-after 'unpack 'prepare-static-openal
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(copy-recursively #$(this-package-input "arcan-openal-checkout")
|
||||
"external/git/openal")))
|
||||
(add-after 'prepare-static-openal 'generate-man
|
||||
(lambda _
|
||||
(with-directory-excursion "doc"
|
||||
(invoke "ruby" "docgen.rb" "mangen"))))
|
||||
(add-before 'configure 'chdir
|
||||
(lambda _
|
||||
(chdir "src"))))
|
||||
(list #:configure-flags #~'("-DBUILD_PRESET=everything"
|
||||
"-DDISTR_TAG='Guix'")
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-paths
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(substitute* "src/platform/posix/paths.c"
|
||||
(("/usr/local")
|
||||
(assoc-ref outputs "out")))))
|
||||
;; Normally, it tries to fetch patched openal with git
|
||||
;; but copying files manually in the right place seems
|
||||
;; to work too.
|
||||
(add-after 'unpack 'prepare-static-openal
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((arcan-openal (assoc-ref inputs
|
||||
"arcan-openal")))
|
||||
(copy-recursively arcan-openal
|
||||
"external/git/openal")) #t))
|
||||
(add-after 'prepare-static-openal 'generate-man
|
||||
(lambda _
|
||||
(with-directory-excursion "doc"
|
||||
(invoke "ruby" "docgen.rb" "mangen")) #t))
|
||||
(add-before 'configure 'chdir
|
||||
(lambda _
|
||||
(chdir "src") #t)))
|
||||
#:tests? #f))
|
||||
(inputs
|
||||
(list bash-minimal
|
||||
espeak
|
||||
ffmpeg-6
|
||||
freetype
|
||||
gumbo-parser
|
||||
harfbuzz
|
||||
jbig2dec
|
||||
leptonica
|
||||
libdrm
|
||||
libjpeg-turbo
|
||||
libseccomp
|
||||
libusb
|
||||
libvnc
|
||||
libxkbcommon
|
||||
luajit
|
||||
mupdf
|
||||
openal
|
||||
openjpeg
|
||||
sdl2
|
||||
sqlite
|
||||
tesseract-ocr
|
||||
vlc
|
||||
wayland
|
||||
wayland-protocols
|
||||
xcb-util
|
||||
xcb-util-wm
|
||||
zlib
|
||||
;; To build arcan_lwa, we need a patched version of openal.
|
||||
;; https://github.com/letoram/arcan/wiki/packaging
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(file-name "arcan-openal-checkout")
|
||||
(uri (git-reference (url
|
||||
"https://github.com/letoram/openal")
|
||||
(commit "0.6.2")))
|
||||
(sha256
|
||||
(base32
|
||||
"0vg3fda47q2dk1n43ijcc64q39z044pa8h6scmfyi22g6r6bfw2z")))))
|
||||
(inputs `(("bash-minimal" ,bash-minimal)
|
||||
("espeak" ,espeak)
|
||||
("ffmpeg" ,ffmpeg)
|
||||
("freetype" ,freetype)
|
||||
("gumbo-parser" ,gumbo-parser)
|
||||
("harfbuzz" ,harfbuzz)
|
||||
("jbig2dec" ,jbig2dec)
|
||||
("leptonica" ,leptonica)
|
||||
("libdrm" ,libdrm)
|
||||
("libjpeg-turbo" ,libjpeg-turbo)
|
||||
("libseccomp" ,libseccomp)
|
||||
("libusb" ,libusb)
|
||||
("libvnc" ,libvnc)
|
||||
("libxkbcommon" ,libxkbcommon)
|
||||
("luajit" ,luajit)
|
||||
("mupdf" ,mupdf)
|
||||
("openal" ,openal)
|
||||
("openjpeg" ,openjpeg)
|
||||
("sdl2" ,sdl2)
|
||||
("sqlite" ,sqlite)
|
||||
("tesseract-ocr" ,tesseract-ocr)
|
||||
("vlc" ,vlc)
|
||||
("wayland" ,wayland)
|
||||
("wayland-protocols" ,wayland-protocols)
|
||||
("xcb-util" ,xcb-util)
|
||||
("xcb-util-wm" ,xcb-util-wm)
|
||||
("zlib" ,zlib)
|
||||
;; To build arcan_lwa, we need a patched version of openal.
|
||||
;; https://github.com/letoram/arcan/wiki/packaging
|
||||
("arcan-openal"
|
||||
,(origin
|
||||
(method git-fetch)
|
||||
(file-name "arcan-openal-0.6.2")
|
||||
(uri (git-reference (url
|
||||
"https://github.com/letoram/openal")
|
||||
(commit "0.6.2")))
|
||||
(sha256
|
||||
(base32
|
||||
"0vg3fda47q2dk1n43ijcc64q39z044pa8h6scmfyi22g6r6bfw2z"))))))
|
||||
(native-inputs (list pkg-config ruby)) ;For documentation and testing
|
||||
(home-page "https://arcan-fe.com")
|
||||
(synopsis "Display server, multimedia framework and game engine")
|
||||
@@ -315,5 +316,5 @@ 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)
|
||||
(define-public arcan-wayland
|
||||
(deprecated-package "arcan-wayland" arcan))
|
||||
|
||||
+389
-713
File diff suppressed because it is too large
Load Diff
+218
-293
@@ -57,7 +57,6 @@
|
||||
;;; Copyright © 2025 Kjartan Oli Agustsson <kjartanoli@outlook.com>
|
||||
;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2025 Antoine Côté <antoine.cote@posteo.net>
|
||||
;;; Copyright © 2025 Isidor Zeuner <guix@quidecco.pl>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -252,7 +251,7 @@ promoting the market for advanced audio.")
|
||||
(define-public wildmidi
|
||||
(package
|
||||
(name "wildmidi")
|
||||
(version "0.4.6")
|
||||
(version "0.4.4")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -262,7 +261,7 @@ promoting the market for advanced audio.")
|
||||
(commit (string-append name "-" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0cc8vg2alyzakmm132vljx228arisqcnfqh8xyjnnczr5vryqa5k"))))
|
||||
(base32 "08fbbsvw6pkwwqarjwcvdp8mq4zn5sgahf025hynwc6rvf4sp167"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
`(#:tests? #f ; No target
|
||||
@@ -872,129 +871,120 @@ purposes developed at Queen Mary, University of London.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public jamesdsp
|
||||
(let ((commit "53cf0989681ba38755208c8aec063f29ed8586d3")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "jamesdsp")
|
||||
(version (git-version "2.7.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri
|
||||
(git-reference
|
||||
(url "https://github.com/Audio4Linux/JDSP4Linux")
|
||||
(commit commit)
|
||||
;; Recurse GraqhicEQWidget, FlatTabWidget, LiquidEqualizerWidget and
|
||||
;; EELEditor.
|
||||
(recursive? #t)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1b5612gr2gfmj1h5hdzfa9xxdwixia06a34n2zs04cra94clif9i"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
;; Unbundle 3rd party libraries.
|
||||
'(begin
|
||||
;; Delete the bundled 3rd party libraries.
|
||||
(for-each delete-file-recursively
|
||||
(list "3rdparty"
|
||||
"src/subprojects/EELEditor/3rdparty"
|
||||
"src/subprojects/EELEditor/QCodeEditor"
|
||||
"src/subprojects/EELEditor/src/EELEditor-Linker.pri"))
|
||||
(with-directory-excursion "src"
|
||||
(package
|
||||
(name "jamesdsp")
|
||||
(version "2.7.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri
|
||||
(git-reference
|
||||
(url "https://github.com/Audio4Linux/JDSP4Linux")
|
||||
(commit version)
|
||||
;; Recurse GraqhicEQWidget, FlatTabWidget, LiquidEqualizerWidget and
|
||||
;; EELEditor.
|
||||
(recursive? #t)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "17vx12kbvwxvb69vzrlb82mrgf6sl3plyk71g9f39p49ialdsnbr"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
;; Unbundle 3rd party libraries.
|
||||
'(begin
|
||||
;; Delete the bundled 3rd party libraries.
|
||||
(for-each delete-file-recursively
|
||||
(list "3rdparty"
|
||||
"src/subprojects/EELEditor/3rdparty"
|
||||
"src/subprojects/EELEditor/QCodeEditor"
|
||||
"src/subprojects/EELEditor/src/EELEditor-Linker.pri"))
|
||||
(with-directory-excursion "src"
|
||||
(substitute* "src.pro"
|
||||
;; Do not use bundled 3rd party libraries.
|
||||
((".*3rdparty.*") "")
|
||||
;; Link required libraries from system.
|
||||
(("-ldl")
|
||||
(string-join '("-ldl"
|
||||
"-lasync++"
|
||||
"-lQCodeEditor"
|
||||
"-lqcustomplot"
|
||||
"-lqtadvanceddocking-qt6"
|
||||
"-lqtcsv"
|
||||
"-lwaf")
|
||||
" ")))
|
||||
;; Fix including WAF headers.
|
||||
(substitute* "MainWindow.cpp"
|
||||
(("<Animation") "<WAF/Animation"))
|
||||
;; Do not use resources from the bundled docking-system.
|
||||
(substitute* '("interface/fragment/AppManagerFragment.ui")
|
||||
((".*location.*3rdparty.*") "")
|
||||
((" resource=.*>") ">"))
|
||||
(with-directory-excursion "subprojects/EELEditor/src"
|
||||
;; Do not use bundled QCodeEditor and docking-system.
|
||||
(substitute* "EELEditor.pri"
|
||||
((".*(QCodeEditor|docking-system).*") ""))
|
||||
;; Do not link to bundled docking-system.
|
||||
(substitute* "src.pro"
|
||||
;; Do not use bundled 3rd party libraries.
|
||||
((".*3rdparty.*") "")
|
||||
;; Link required libraries from system.
|
||||
(("-ldl")
|
||||
(string-join '("-ldl"
|
||||
"-lasync++"
|
||||
"-lQCodeEditor"
|
||||
"-lqcustomplot"
|
||||
"-lqtadvanceddocking-qt6"
|
||||
"-lqtcsv"
|
||||
"-lwaf")
|
||||
" ")))
|
||||
;; Fix including WAF headers.
|
||||
(substitute* "MainWindow.cpp"
|
||||
(("<Animation") "<WAF/Animation"))
|
||||
;; Do not use resources from the bundled docking-system.
|
||||
(substitute* '("interface/fragment/AppManagerFragment.ui")
|
||||
((".*location.*3rdparty.*") "")
|
||||
((" resource=.*>") ">"))
|
||||
(with-directory-excursion "subprojects/EELEditor/src"
|
||||
;; Do not use bundled QCodeEditor and docking-system.
|
||||
(substitute* "EELEditor.pri"
|
||||
((".*(QCodeEditor|docking-system).*") ""))
|
||||
;; Do not link to bundled docking-system.
|
||||
(substitute* "src.pro"
|
||||
((".*EELEditor-Linker.*") ""))
|
||||
;; Fix including headers from the system.
|
||||
(substitute* (find-files "." "\\.(cpp|h)$")
|
||||
(("#include <Dock") "#include <qtadvanceddocking-qt6/Dock")
|
||||
(("#include <FloatingDock")
|
||||
"#include <qtadvanceddocking-qt6/FloatingDock")
|
||||
(("#include <QSyntaxStyle")
|
||||
"#include <QCodeEditor/QSyntaxStyle")
|
||||
(("#include <QStyleSyntaxHighlighter")
|
||||
"#include <QCodeEditor/QStyleSyntaxHighlighter")
|
||||
(("#include <QHighlightRule")
|
||||
"#include <QCodeEditor/QHighlightRule")
|
||||
(("#include <QLanguage") "#include <QCodeEditor/QLanguage")
|
||||
(("#include <QCodeEditor\\.hpp")
|
||||
"#include <QCodeEditor/QCodeEditor.hpp"))))))))
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list #:qtbase qtbase
|
||||
#:tests? #f ;no tests
|
||||
#:parallel-build? #f ;fails on some systems
|
||||
#:modules '((guix build qt-build-system)
|
||||
((guix build gnu-build-system) #:prefix gnu:)
|
||||
(guix build utils))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; Configure using qmake.
|
||||
(replace 'configure
|
||||
(lambda _
|
||||
(invoke "qmake" (string-append "PREFIX=" #$output))))
|
||||
(replace 'build (assoc-ref gnu:%standard-phases 'build))
|
||||
(replace 'check (assoc-ref gnu:%standard-phases 'check))
|
||||
(replace 'install (assoc-ref gnu:%standard-phases 'install))
|
||||
(add-after 'install 'install-icon
|
||||
(lambda _
|
||||
(let ((pixmaps (string-append #$output "/share/pixmaps")))
|
||||
(mkdir-p pixmaps)
|
||||
(copy-file "resources/icons/icon.png"
|
||||
(string-append pixmaps "/jamesdsp.png")))))
|
||||
(add-after 'install-icon 'create-desktop-entry-file
|
||||
(lambda _
|
||||
(make-desktop-entry-file
|
||||
(string-append #$output
|
||||
"/share/applications/jamesdsp.desktop")
|
||||
#:name "JamesDSP"
|
||||
#:comment "Audio effect processor"
|
||||
#:keywords '("equalizer" "audio" "effect")
|
||||
#:categories '("AudioVideo" "Audio")
|
||||
#:exec (string-append #$output "/bin/jamesdsp")
|
||||
#:icon (string-append #$output
|
||||
"/share/pixmaps/jamesdsp.png")
|
||||
#:startup-notify #f))))))
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(inputs
|
||||
(list asyncplusplus
|
||||
glibmm-2.66
|
||||
libarchive
|
||||
pipewire
|
||||
qcodeeditor
|
||||
qcustomplot
|
||||
qt-advanced-docking-system
|
||||
qtcsv
|
||||
qtpromise
|
||||
qtsvg
|
||||
qtwidgetanimationframework))
|
||||
(home-page "https://github.com/Audio4Linux/JDSP4Linux")
|
||||
(synopsis "Audio effect processor for PipeWire and PulseAudio clients")
|
||||
(description "JamesDSP is an audio effect processor for PipeWire and
|
||||
((".*EELEditor-Linker.*") ""))
|
||||
;; Fix including headers from the system.
|
||||
(substitute* (find-files "." "\\.(cpp|h)$")
|
||||
(("#include <Dock") "#include <qtadvanceddocking-qt6/Dock")
|
||||
(("#include <FloatingDock")
|
||||
"#include <qtadvanceddocking-qt6/FloatingDock")
|
||||
(("#include <QSyntaxStyle")
|
||||
"#include <QCodeEditor/QSyntaxStyle")
|
||||
(("#include <QStyleSyntaxHighlighter")
|
||||
"#include <QCodeEditor/QStyleSyntaxHighlighter")
|
||||
(("#include <QHighlightRule")
|
||||
"#include <QCodeEditor/QHighlightRule")
|
||||
(("#include <QLanguage") "#include <QCodeEditor/QLanguage")
|
||||
(("#include <QCodeEditor\\.hpp")
|
||||
"#include <QCodeEditor/QCodeEditor.hpp"))))))
|
||||
(patches (search-patches "jamesdsp-fix-bulid-on-pipewire-1.4.0.patch"))))
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list #:qtbase qtbase
|
||||
#:tests? #f ;no tests
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; Configure using qmake.
|
||||
(replace 'configure
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(invoke "qmake" (string-append "PREFIX=" #$output))))
|
||||
(add-after 'install 'install-icon
|
||||
(lambda _
|
||||
(let ((pixmaps (string-append #$output "/share/pixmaps")))
|
||||
(mkdir-p pixmaps)
|
||||
(copy-file "resources/icons/icon.png"
|
||||
(string-append pixmaps "/jamesdsp.png")))))
|
||||
(add-after 'install-icon 'create-desktop-entry-file
|
||||
(lambda _
|
||||
(make-desktop-entry-file
|
||||
(string-append #$output
|
||||
"/share/applications/jamesdsp.desktop")
|
||||
#:name "JamesDSP"
|
||||
#:comment "Audio effect processor"
|
||||
#:keywords '("equalizer" "audio" "effect")
|
||||
#:categories '("AudioVideo" "Audio")
|
||||
#:exec (string-append #$output "/bin/jamesdsp")
|
||||
#:icon (string-append #$output "/share/pixmaps/jamesdsp.png")
|
||||
#:startup-notify #f))))))
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(inputs
|
||||
(list asyncplusplus
|
||||
glibmm-2.66
|
||||
libarchive
|
||||
pipewire
|
||||
qcodeeditor
|
||||
qcustomplot
|
||||
qt-advanced-docking-system
|
||||
qtcsv
|
||||
qtpromise
|
||||
qtsvg
|
||||
qtwidgetanimationframework))
|
||||
(home-page "https://github.com/Audio4Linux/JDSP4Linux")
|
||||
(synopsis "Audio effect processor for PipeWire and PulseAudio clients")
|
||||
(description "JamesDSP is an audio effect processor for PipeWire and
|
||||
PulseAudio clients, featuring:
|
||||
@itemize
|
||||
@item Automatic bass boost: Frequency-detecting bass-boost
|
||||
@@ -1016,7 +1006,7 @@ PulseAudio clients, featuring:
|
||||
dynamic code outline window, console output support and detailed error
|
||||
messages with inline code highlighting
|
||||
@end itemize")
|
||||
(license license:gpl3+))))
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define ardour-bundled-media
|
||||
(origin
|
||||
@@ -1167,16 +1157,6 @@ namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \
|
||||
perl
|
||||
pkg-config
|
||||
unzip))
|
||||
(native-search-paths
|
||||
(list (search-path-specification
|
||||
(variable "LADSPA_PATH")
|
||||
(files '("lib/ladspa")))
|
||||
(search-path-specification
|
||||
(variable "LV2_PATH")
|
||||
(files '("lib/lv2")))
|
||||
(search-path-specification
|
||||
(variable "LXVST_PATH")
|
||||
(files '("lib/lxvst")))))
|
||||
(home-page "https://ardour.org")
|
||||
(synopsis "Digital audio workstation")
|
||||
(description
|
||||
@@ -1615,7 +1595,7 @@ plugins are provided.")
|
||||
(define-public cable
|
||||
(package
|
||||
(name "cable")
|
||||
(version "0.9.21")
|
||||
(version "0.9.8.1")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1624,7 +1604,10 @@ plugins are provided.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1c7fy92nwp2m96asls460s83xapzcc6pqvplmg5rqds1rddiva2h"))))
|
||||
"0pzafiim1cnxrngk6nzmpx9sx1lc6qrqjrrcxg1qpigcrjvrfjs2"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(delete-file-recursively "Arch packages"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -1645,7 +1628,21 @@ plugins are provided.")
|
||||
(install-file "jack-plug.svg"
|
||||
(string-append #$output "/share/icons/hicolor/scalable/apps/"))
|
||||
(install-file "com.github.magillos.cable.desktop"
|
||||
(string-append #$output "/share/applications/")))))))
|
||||
(string-append #$output "/share/applications/"))))
|
||||
(add-after 'install-more 'wrap-executables
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let* ((pyversion
|
||||
#$(version-major+minor (package-version
|
||||
(this-package-input "python"))))
|
||||
(lib (string-append #$output "/lib/python" pyversion
|
||||
"/site-packages"))
|
||||
(file
|
||||
(string-append lib "/cables/launch-connection-manager.py")))
|
||||
(chmod file #o555)
|
||||
(wrap-script file
|
||||
#:guile (search-input-file inputs "bin/guile")
|
||||
`("GUIX_PYTHONPATH" ":" prefix
|
||||
(,lib ,(getenv "GUIX_PYTHONPATH"))))))))))
|
||||
(inputs
|
||||
(list python
|
||||
python-dbus
|
||||
@@ -1666,7 +1663,7 @@ connections manager, pw-top wrapper, simple ALSA mixer and jack_delay GUI.")
|
||||
(define-public calf
|
||||
(package
|
||||
(name "calf")
|
||||
(version "0.90.8")
|
||||
(version "0.90.6")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1675,7 +1672,7 @@ connections manager, pw-top wrapper, simple ALSA mixer and jack_delay GUI.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0wzkshqazw26w73h1lva5wr8v2bq0a20kjd6lfvbi1pj3ql3azk5"))))
|
||||
"0p4zqzr7spy3jjsmy6h7n5lsyqqyh23bswk1r3kims50b102xhxd"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments (list #:tests? #false)) ;there is no test target
|
||||
(inputs
|
||||
@@ -1831,7 +1828,7 @@ reel-to-reel tape machines.")
|
||||
(define-public iir
|
||||
(package
|
||||
(name "iir")
|
||||
(version "1.10.0")
|
||||
(version "1.9.4")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -1840,7 +1837,7 @@ reel-to-reel tape machines.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0p64l0fmr7mfjhfxg6yc4f06aacbr6bb8kjmb5ffm95sq12rzdss"))))
|
||||
(base32 "1fqxn0qlvykpk9hiliivmkjjcz3g1bp83yd0zfm82r14abkjbj2g"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -2371,7 +2368,7 @@ the non-linear circuit elements of their original analog counterparts.")
|
||||
(define-public rev-plugins
|
||||
(package
|
||||
(name "rev-plugins")
|
||||
(version "0.8.1")
|
||||
(version "0.7.1")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
@@ -2380,24 +2377,23 @@ the non-linear circuit elements of their original analog counterparts.")
|
||||
version ".tar.bz2"))
|
||||
(sha256
|
||||
(base32
|
||||
"1yhnvjgr14qr0ni0n2x8dhlzbx1qfgyrnffbaaq0d5xbzfgrq543"))))
|
||||
"1ikpinxm00pkfi259bnkzhsy3miagrjgdihaaf5x4v7zac29j3g7"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f ; no "check" target
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; no configure script
|
||||
(delete 'configure)
|
||||
(add-after 'unpack 'change-directory
|
||||
(lambda _
|
||||
(chdir "source")))
|
||||
(add-after 'change-directory 'override-target-directory
|
||||
(lambda _
|
||||
(substitute* "Makefile"
|
||||
(("/usr") #$output))))
|
||||
(add-before 'install 'prepare-target-directory
|
||||
(lambda _
|
||||
(mkdir-p (string-append #$output "/lib/ladspa")))))))
|
||||
`(#:tests? #f ; no "check" target
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
;; no configure script
|
||||
(delete 'configure)
|
||||
(add-before 'install 'prepare-target-directory
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
||||
#t))
|
||||
(add-after 'unpack 'override-target-directory
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(substitute* "Makefile"
|
||||
(("/usr") (assoc-ref outputs "out")))
|
||||
#t)))))
|
||||
(home-page "https://kokkinizita.linuxaudio.org")
|
||||
(synopsis "LADSPA reverb plugin")
|
||||
(description
|
||||
@@ -2711,7 +2707,7 @@ also play midifiles using a Soundfont.")
|
||||
(define-public faust-2
|
||||
(package
|
||||
(inherit faust)
|
||||
(version "2.81.10")
|
||||
(version "2.75.7")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://github.com/grame-cncm/faust/"
|
||||
@@ -2719,7 +2715,7 @@ also play midifiles using a Soundfont.")
|
||||
"/faust-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0mj7gn7xp6mzr94nqcyrrkcmzm81chq6qb1n76wspah71lw7g6f6"))))
|
||||
"11ww02zmj3vnva1w52hs9wkxvhwwf53agklyzm2c7gysw0jfvkw9"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -3145,7 +3141,7 @@ and testing or configuring the JACK session. Tools include @code{jack_lsp},
|
||||
(define-public jacktrip
|
||||
(package
|
||||
(name "jacktrip")
|
||||
(version "2.7.1")
|
||||
(version "1.6.8")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -3153,7 +3149,7 @@ and testing or configuring the JACK session. Tools include @code{jack_lsp},
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1d9cn4nny3kbf3f9x0bcsrqb0ir1h789nv7s72xmhf7r5rfd9xm4"))))
|
||||
(base32 "0719ng799kingv0y9yk07bvnmprk25c09ph3yaia5dhapg0jz17m"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -3172,11 +3168,10 @@ and testing or configuring the JACK session. Tools include @code{jack_lsp},
|
||||
python
|
||||
python-jinja2
|
||||
python-pyyaml
|
||||
qtbase
|
||||
qtwayland
|
||||
qtbase-5
|
||||
rtaudio))
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(list pkg-config qtbase-5)) ;for qmake
|
||||
(home-page "https://jacktrip.github.io/jacktrip/")
|
||||
(synopsis "Multi-machine audio system for network music performance")
|
||||
(description
|
||||
@@ -3258,30 +3253,25 @@ from being able to mix multiple JACK audio streams.")
|
||||
"1q8mzjv577vdi64s47gd4pg0ydzxvs32cwrb1d64v90f52qpgbpd"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f ; no check target
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'configure 'build-PIC
|
||||
;; The default -fPIE #errors when combined with our Qt
|
||||
;; packages. Work around the broken meson.build script
|
||||
;; clobbering c_args.
|
||||
(lambda _
|
||||
(substitute* "meson.build"
|
||||
(("'-DZIX_STATIC'" match)
|
||||
(string-append match ", '-fPIC'"))))))))
|
||||
`(#:tests? #f ; no check target
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-before 'configure 'build-PIC
|
||||
;; The default -fPIE #errors when combined with our Qt packages.
|
||||
;; Work around the broken meson.build script clobbering c_args.
|
||||
(lambda _
|
||||
(substitute* "meson.build"
|
||||
(("'-DZIX_STATIC'" match)
|
||||
(string-append match ", '-fPIC'"))))))))
|
||||
(inputs
|
||||
(list lv2
|
||||
lilv
|
||||
suil
|
||||
gtk+
|
||||
jack-1
|
||||
qtbase-5))
|
||||
qtbase-5
|
||||
jack-1))
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(native-search-paths
|
||||
(list (search-path-specification
|
||||
(variable "LV2_PATH")
|
||||
(files '("lib/lv2")))))
|
||||
(home-page "https://drobilla.net/software/jalv.html")
|
||||
(synopsis "Simple LV2 host for JACK")
|
||||
(description
|
||||
@@ -3545,7 +3535,6 @@ compensation, (de)interleaving, and byte-swapping
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;no test target
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'find-library
|
||||
@@ -3735,13 +3724,13 @@ CFFI and NumPy.")
|
||||
(define-public python-soxr
|
||||
(package
|
||||
(name "python-soxr")
|
||||
(version "1.0.0")
|
||||
(version "0.5.0.post1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "soxr" version))
|
||||
(sha256
|
||||
(base32 "02a5balcm8dvlb938gl2k3kqvfdq1k300j2g0dbnkg2rsv0yczp0"))))
|
||||
(base32 "0wzz7j0z814mm99xr19vfrwp2x904lbwhf513x7085m4x3rvk4kh"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -3769,6 +3758,7 @@ CFFI and NumPy.")
|
||||
python-scikit-build-core
|
||||
python-setuptools
|
||||
python-setuptools-scm
|
||||
python-sphinx
|
||||
python-typing-extensions
|
||||
python-wheel))
|
||||
(home-page "https://github.com/dofuuz/python-soxr")
|
||||
@@ -4286,14 +4276,14 @@ different audio devices such as ALSA or PulseAudio.")
|
||||
(define-public qjackctl
|
||||
(package
|
||||
(name "qjackctl")
|
||||
(version "1.0.4")
|
||||
(version "1.0.3")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://sourceforge/qjackctl/qjackctl/"
|
||||
version "/qjackctl-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1bhlfnlvqgircnlq014whaka01ki6ja44xzynjbwszclknc6zsz3"))))
|
||||
"0wzimnxb9yjj155l0hqb57smf0158a4bbzi6bj11pp60njld4zqn"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
'(#:tests? #f)) ; no check target
|
||||
@@ -4387,7 +4377,6 @@ link REQUIRED)"))))))
|
||||
"ide")) ;qt ide
|
||||
(arguments
|
||||
(list
|
||||
#:qtbase qtbase
|
||||
#:configure-flags
|
||||
#~(list "-DSYSTEM_BOOST=ON"
|
||||
"-DSYSTEM_YAMLCPP=ON"
|
||||
@@ -5634,42 +5623,6 @@ encoder used for an MPEG Layer III (MP3) file, as well as scan any MPEG audio
|
||||
file (any layer) and print a lot of useful information.")
|
||||
(license license:lgpl2.1+)))
|
||||
|
||||
(define-public mp3cat
|
||||
(package
|
||||
(name "mp3cat")
|
||||
(version "0.5")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/tomclegg/mp3cat")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0n6hjg2wgd06m561zc3ib5w2m3pwpf74njv2b2w4sqqh5md2ymfr"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;upstream defines no tests
|
||||
#:make-flags
|
||||
#~(list (string-append "PREFIX="
|
||||
#$output))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(add-before 'build 'patch-makefile
|
||||
(lambda _args
|
||||
(substitute* "Makefile"
|
||||
(("cc")
|
||||
#$(cc-for-target))))))))
|
||||
(home-page "http://tomclegg.net/mp3cat")
|
||||
(synopsis "MP3 stream copier and concatenator")
|
||||
(description
|
||||
"Copies a stream, skipping everything except MP3 frames with valid
|
||||
headers. This can be used to copy and concatenate streams, even if
|
||||
they contain extra garbage.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public shntool
|
||||
(package
|
||||
(name "shntool")
|
||||
@@ -5975,7 +5928,7 @@ kbps at 24 bit/96 kHz.")
|
||||
(define-public bluez-alsa
|
||||
(package
|
||||
(name "bluez-alsa")
|
||||
(version "4.3.1")
|
||||
(version "3.0.0")
|
||||
(source (origin
|
||||
;; The tarballs are mere snapshots and don't contain a
|
||||
;; bootstrapped build system.
|
||||
@@ -5986,7 +5939,7 @@ kbps at 24 bit/96 kHz.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"05qzmcsihhd92vpjd45qr0gdzfqiw4jfcdjdg78mzimv9g5g3rjm"))))
|
||||
"1jlsgxyqfhncfhx1sy3ry0dp6p95kd4agh7g2b7g51h0c4cv74h8"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:configure-flags
|
||||
@@ -5998,12 +5951,7 @@ kbps at 24 bit/96 kHz.")
|
||||
(assoc-ref %outputs "out")
|
||||
"/etc/dbus-1/system.d"))))
|
||||
(native-inputs
|
||||
(list autoconf
|
||||
automake
|
||||
`(,glib "bin")
|
||||
libtool
|
||||
pkg-config
|
||||
python-minimal))
|
||||
(list autoconf automake libtool pkg-config))
|
||||
(inputs
|
||||
(list alsa-lib
|
||||
bluez
|
||||
@@ -6091,50 +6039,26 @@ customized and extended using either the s7 Scheme implementation (included in
|
||||
the Snd sources), Ruby, or Forth.")
|
||||
(license (license:non-copyleft "file://COPYING"))))
|
||||
|
||||
(define-public libspecbleach
|
||||
(package
|
||||
(name "libspecbleach")
|
||||
(version "0.1.6")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/lucianodato/libspecbleach")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0czmzhggg5gl833karfrl2c0pr2k3jf7q7jd3y68hyj0cnn6f3jg"))))
|
||||
(build-system meson-build-system)
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(inputs
|
||||
(list fftwf))
|
||||
(home-page "https://github.com/lucianodato/libspecbleach")
|
||||
(synopsis "C library for audio noise reduction and other spectral effects")
|
||||
(description
|
||||
"This package provides a C library for audio noise reduction and other
|
||||
spectral effects. It is based on the algorithms that were used in
|
||||
@code{noise-repellent}. These were extracted into a this standalone library to
|
||||
remove the lv2 dependency. It uses the concept of a spectral processor which
|
||||
itself uses a @acronym{STFT, short time Fourier transform} to process the audio.")
|
||||
(license license:lgpl2.1+)))
|
||||
|
||||
(define-public noise-repellent
|
||||
(package
|
||||
(name "noise-repellent")
|
||||
(version "0.2.3")
|
||||
(version "0.1.5")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/lucianodato/noise-repellent")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(commit version)))
|
||||
(file-name (string-append name "-" version "-checkout"))
|
||||
(sha256
|
||||
(base32
|
||||
"0dq0rv7mndw0lqacl2nf9dmj4zzq19hfminzk3fzbppk5mh2rivp"))))
|
||||
"0hb89x9i2knzan46q4nwscf5zmnb2nwf4w13xl2c0y1mx1ls1mwl"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
`(#:configure-flags
|
||||
(list (string-append "--prefix=" (assoc-ref %outputs "out")
|
||||
"/lib/lv2"))))
|
||||
(inputs
|
||||
(list fftwf libspecbleach lv2))
|
||||
(list lv2 fftwf))
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(home-page "https://github.com/lucianodato/noise-repellent")
|
||||
@@ -6258,7 +6182,7 @@ representations.")
|
||||
(define-public cava
|
||||
(package
|
||||
(name "cava")
|
||||
(version "0.10.6")
|
||||
(version "0.10.4")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -6267,7 +6191,7 @@ representations.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"12ysxbm1di2m0qac4rgd5f94fvlxv64s7kyy5s0d2bbxyzvdcqvm"))))
|
||||
"09wwzqynfmdzn77vxxmrw2z0yz95p4zg9cgfp9vnpv70visi98d0"))))
|
||||
(build-system gnu-build-system)
|
||||
(native-inputs (list autoconf automake libtool pkg-config))
|
||||
(inputs (list alsa-lib fftw ncurses pipewire pulseaudio iniparser
|
||||
@@ -6396,16 +6320,16 @@ library supports sample rates up to 96 kHz and up to eight channels (7.1
|
||||
(define-public libfreeaptx
|
||||
(package
|
||||
(name "libfreeaptx")
|
||||
(version "0.2.2")
|
||||
(version "0.1.1")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/regularhunter/libfreeaptx")
|
||||
(url "https://github.com/iamthehorker/libfreeaptx")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0xk247w2l7jd51rbavqnmqk6sqnifhf46k4wwfj572pz7k9cbmly"))))
|
||||
"1fm5041nd08yzg0m9474g0943lb3x54zmn59b53nhvxan8x22ibq"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f ;no tests.
|
||||
@@ -6417,8 +6341,8 @@ library supports sample rates up to 96 kHz and up to eight channels (7.1
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'configure))))
|
||||
(home-page "https://github.com/regularhunter/libfreeaptx")
|
||||
(synopsis "Free implementation of aptX")
|
||||
(home-page "https://github.com/iamthehorker/libfreeaptx")
|
||||
(synopsis "aptX codec library")
|
||||
(description "libfreeaptx is an implementation of the Audio Processing
|
||||
Technology codecs aptX and aptX HD, mainly intended for use with an A2DP
|
||||
bluetooth profile.")
|
||||
@@ -6518,7 +6442,7 @@ other Gnaural instances, allowing synchronous sessions between many users.")
|
||||
(define-public darkice
|
||||
(package
|
||||
(name "darkice")
|
||||
(version "1.5")
|
||||
(version "1.4")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://github.com/rafael2k/darkice/releases/"
|
||||
@@ -6526,7 +6450,7 @@ other Gnaural instances, allowing synchronous sessions between many users.")
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"13h58skz5xik75sjv9kf2299haly2nc5gswl22ff1kvw79bw9d0q"))))
|
||||
"05yq7lggxygrkd76yiqby3msrgdn082p0qlvmzzv9xbw8hmyra76"))))
|
||||
(build-system gnu-build-system)
|
||||
(native-inputs (list pkg-config))
|
||||
(inputs (list lame
|
||||
@@ -7276,13 +7200,17 @@ Rate} 3600x2250 bit/s vocoder used in various radio systems.")
|
||||
(native-inputs
|
||||
(list catch-framework
|
||||
python ;for running tests
|
||||
portaudio)) ;for portaudio examples
|
||||
portaudio ;for portaudio examples
|
||||
qtbase-5 ;for Qt examples
|
||||
qtdeclarative-5
|
||||
qttools-5))
|
||||
(inputs
|
||||
(list jack-1)) ;for JACK examples
|
||||
(list jack-1 ;for JACK examples
|
||||
qtquickcontrols-5)) ;for Qt examples
|
||||
(propagated-inputs
|
||||
;; This is because include/ableton/platforms/asio/AsioWrapper.hpp
|
||||
;; contains '#include <asio.hpp>'.
|
||||
(list asio-1.28))
|
||||
(list asio))
|
||||
(arguments
|
||||
`(#:configure-flags
|
||||
'("-DLINK_BUILD_QT_EXAMPLES=ON"
|
||||
@@ -7340,14 +7268,14 @@ while still staying in time.")
|
||||
(define-public butt
|
||||
(package
|
||||
(name "butt")
|
||||
(version "1.45.0")
|
||||
(version "0.1.38")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://danielnoethen.de/butt/release/"
|
||||
(uri (string-append "mirror://sourceforge/butt/butt/butt-"
|
||||
version "/butt-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0r43xph6xf02c9zldhyj82mvy82xv0f9wbv653gg2kkcjh88ajc8"))
|
||||
"10i3xpxzccdl4pidiyymw9cfavhy50yhn7xi5bd77y91f2903kp9"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(substitute* "src/butt.cpp"
|
||||
@@ -7358,21 +7286,19 @@ while still staying in time.")
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'install 'install-documentation
|
||||
(lambda _
|
||||
(let ((doc (string-append #$output:doc "/share/doc/" #$name)))
|
||||
(let ((doc (string-append #$output "/share/doc/" #$name)))
|
||||
(install-file "README" doc)
|
||||
(copy-file #$(this-package-native-input "manual")
|
||||
(string-append doc "/butt-manual.pdf"))))))))
|
||||
(outputs '("out" "doc"))
|
||||
(native-inputs
|
||||
`(("pkg-config" ,pkg-config)
|
||||
("manual"
|
||||
,(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://danielnoethen.de/butt/release/" version
|
||||
"/butt-"
|
||||
(uri (string-append "https://danielnoethen.de/butt/butt-"
|
||||
version "_manual.pdf"))
|
||||
(sha256
|
||||
(base32 "07mr25k26xrpns3s7ci27jmp71c49a23r0mi662ir5v35rz4bf4q"))))))
|
||||
(base32 "04aixxqshfj11ja3ifh0zvywl2mqzmymppcd0xj8sv0j7whjibaq"))))))
|
||||
(inputs
|
||||
(list curl
|
||||
dbus
|
||||
@@ -7390,8 +7316,7 @@ while still staying in time.")
|
||||
libogg
|
||||
openssl
|
||||
opus
|
||||
portaudio
|
||||
portmidi-2))
|
||||
portaudio))
|
||||
(home-page "https://danielnoethen.de/butt/")
|
||||
(synopsis "Audio streaming tool")
|
||||
(description "Butt is a tool to stream audio to a ShoutCast or
|
||||
@@ -7525,7 +7450,7 @@ Home Page}.")
|
||||
(define-public python-librosa
|
||||
(package
|
||||
(name "python-librosa")
|
||||
(version "0.11.0")
|
||||
(version "0.10.2.post1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -7535,7 +7460,7 @@ Home Page}.")
|
||||
;; For test files.
|
||||
(recursive? #true)))
|
||||
(sha256
|
||||
(base32 "065x43hx670rjrclxi4hiqxscllb16v9s7myjvg7rd5pd3y0k7sg"))))
|
||||
(base32 "1x37148y1rh4sq2nc59iw9jlza3zwawxnlb7bd9w36an05aclmnh"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -7664,7 +7589,7 @@ and DSD streams.")
|
||||
(define-public qpwgraph
|
||||
(package
|
||||
(name "qpwgraph")
|
||||
(version "0.9.6")
|
||||
(version "0.8.0")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -7673,7 +7598,7 @@ and DSD streams.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"17f84qp0vphw0qbgi4yzvws19cw1lppn5r35niy032gw8qr7l6nf"))))
|
||||
"036qzc2sjxa1lvysf7shyjkp1jyjkpalgxf74bgyzm89phqac7cc"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f)) ; no tests
|
||||
|
||||
@@ -157,7 +157,7 @@ know anything about Autoconf or M4.")
|
||||
(base32
|
||||
"0niz4852fgyavfh3gr4h4kzalk01nk70v6vfsja6r3ap349mr25s"))))))
|
||||
|
||||
(define-public autoconf autoconf-2.72)
|
||||
(define-public autoconf autoconf-2.69)
|
||||
|
||||
(define-public autoconf-2.68
|
||||
(package (inherit autoconf)
|
||||
@@ -438,14 +438,14 @@ Makefile, simplifying the entire process for the developer.")
|
||||
(define-public automake
|
||||
(package/inherit automake-1.16.5
|
||||
(name "automake")
|
||||
(version "1.18.1")
|
||||
(version "1.17")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/automake/automake-"
|
||||
version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"11v8ckqx7z8hv4mq9dnhg58cwnssaa7l9136yndbhlc34xis72hn"))
|
||||
"146rkdcwri2dkwn3pjrjs9v0wm4xyav9vvq4yw5vj4qy87yc2849"))
|
||||
(patches
|
||||
(search-patches "automake-skip-amhello-tests.patch"))))
|
||||
(arguments
|
||||
@@ -483,14 +483,16 @@ Makefile, simplifying the entire process for the developer.")
|
||||
(define-public libtool
|
||||
(package
|
||||
(name "libtool")
|
||||
(version "2.5.4")
|
||||
(version "2.4.7")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/libtool/libtool-"
|
||||
version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0xb64rhambx6mhxwr613xgyad7ybs5hgmpmd9gccf2vbcrh5h7zq"))))
|
||||
"0pb3l4x37k6fj1lwnpzws55gi3pxl0hx56jm4bzmbrkw0mzj2zsg"))
|
||||
(patches (search-patches "libtool-skip-tests2.patch"
|
||||
"libtool-grep-compat.patch"))))
|
||||
(build-system gnu-build-system)
|
||||
(propagated-inputs (list m4))
|
||||
(native-inputs
|
||||
@@ -516,12 +518,6 @@ Makefile, simplifying the entire process for the developer.")
|
||||
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'skip-some-tests-on-extra-archs
|
||||
(lambda _
|
||||
(with-directory-excursion "tests"
|
||||
(substitute* '("demo.at" "testsuite")
|
||||
(("hppa\\*\\|amd64\\*\\|x86_64\\*\\|s390\\*" all)
|
||||
(string-append all "|arm*|mips*|riscv*"))))))
|
||||
(add-before 'check 'pre-check
|
||||
(lambda* (#:key inputs native-inputs parallel-tests? #:allow-other-keys)
|
||||
;; Run the test suite in parallel, if possible.
|
||||
|
||||
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
@@ -662,5 +662,5 @@ with some layout changes and added features.
|
||||
|
||||
This package provides the patcher application.")))
|
||||
|
||||
(define-deprecated-package axoloti-patcher-next
|
||||
ksoloti-patcher)
|
||||
(define-public axoloti-patcher-next
|
||||
(deprecated-package "axoloti-patcher-next" ksoloti-patcher))
|
||||
|
||||
+47
-36
@@ -21,10 +21,10 @@
|
||||
;;; Copyright © 2021 Timothy Sample <samplet@ngyro.com>
|
||||
;;; Copyright © 2021 Brice Waegeneire <brice@waegenei.re>
|
||||
;;; Copyright © 2021 Sarah Morgensen <iskarian@mgsn.dev>
|
||||
;;; Copyright © 2022, 2025 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2022 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2022 Feng Shu <tumashu@163.com>
|
||||
;;; Copyright © 2023 Timo Wilken <guix@twilken.net>
|
||||
;;; Copyright © 2023-2024 Nicolas Graves <ngraves@ngraves.fr>
|
||||
;;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr>
|
||||
;;; Copyright © 2024 jgart <jgart@dismail.de>
|
||||
;;; Copyright © 2025 Kjartan Oli Agustsson <kjartanoli@outlook.com>
|
||||
;;; Copyright © 2025 mstenek <mstenek@disroot.org>
|
||||
@@ -54,6 +54,7 @@
|
||||
#:use-module (guix build-system qt)
|
||||
#:use-module (guix download)
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (guix packages)
|
||||
#:use-module (guix utils)
|
||||
@@ -108,8 +109,7 @@
|
||||
#:use-module (gnu packages time)
|
||||
#:use-module (gnu packages tls)
|
||||
#:use-module (gnu packages valgrind)
|
||||
#:use-module (gnu packages xml)
|
||||
#:use-module (ice-9 format))
|
||||
#:use-module (gnu packages xml))
|
||||
|
||||
(define-public duplicity
|
||||
(package
|
||||
@@ -264,7 +264,7 @@ backups (called chunks) to allow easy burning to CD/DVD.")
|
||||
(define-public libarchive
|
||||
(package
|
||||
(name "libarchive")
|
||||
(version "3.8.3")
|
||||
(version "3.7.7")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
@@ -275,7 +275,7 @@ backups (called chunks) to allow easy burning to CD/DVD.")
|
||||
version ".tar.xz")))
|
||||
(sha256
|
||||
(base32
|
||||
"124pp4w6n8xqdwjswc5d4d6kkrgxv67f9xlhgg7934zii4mizqlh"))))
|
||||
"1vps57mrpqmrk4zayh5g5amqfq7031s5zzkkxsm7r71rqf1wv6l7"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
(list bzip2
|
||||
@@ -287,52 +287,63 @@ backups (called chunks) to allow easy burning to CD/DVD.")
|
||||
`(,zstd "lib")))
|
||||
(arguments
|
||||
(list
|
||||
;; Embed absolute references to inputs to avoid propagation.
|
||||
#:configure-flags
|
||||
#~(list "--disable-static"
|
||||
(format #f "LIBS=~{-L~a/lib~^ ~}"
|
||||
'#$(map (lambda (x)
|
||||
(this-package-input (car x)))
|
||||
(package-inputs this-package)))
|
||||
;; Because of the circular dependency, we cannot use openssl here.
|
||||
;; Explicitly disable openssl to avoid unnecessary dependencies in the
|
||||
;; pc file.
|
||||
"--without-openssl")
|
||||
#~'("--disable-static"
|
||||
;; Because of the circular dependency, we cannot use openssl here.
|
||||
;; Explicitly disable openssl to avoid unnecessary dependencies in the
|
||||
;; pc file.
|
||||
"--without-openssl")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'build 'patch-commands
|
||||
(add-before 'build 'patch-pwd
|
||||
(lambda _
|
||||
(substitute* "Makefile"
|
||||
(("/bin/pwd") (which "pwd")))
|
||||
(substitute* "test_utils/test_main.c"
|
||||
(("/bin/sh") (which "sh")))))
|
||||
(("/bin/pwd") (which "pwd")))))
|
||||
(replace 'check
|
||||
(lambda* (#:key parallel-build? tests? #:allow-other-keys)
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(if tests?
|
||||
;; XXX: The test_owner_parse, test_read_disk, and
|
||||
;; test_write_disk_lookup tests expect user 'root' to
|
||||
;; exist, but the chroot's /etc/passwd doesn't have
|
||||
;; it. Turn off those tests.
|
||||
(begin
|
||||
;; These environment variables are taken from
|
||||
;; <https://raw.githubusercontent.com/libarchive/libarchive/refs/heads/master/.github/workflows/ci.yml>
|
||||
(setenv "SKIP_OPEN_FD_ERR_TEST" "1")
|
||||
(setenv "IGNORE_TRAVERSALS_TEST4" "1")
|
||||
|
||||
;; XXX: The test_owner_parse, test_read_disk, and
|
||||
;; test_write_disk_lookup tests expect user 'root' to
|
||||
;; exist, but the chroot's /etc/passwd doesn't have it
|
||||
;; (see:
|
||||
;; <https://github.com/libarchive/libarchive/issues/2794>).
|
||||
(invoke "make" "-j" (number->string
|
||||
(if parallel-build?
|
||||
(parallel-job-count)
|
||||
1))
|
||||
;; The tests allow one to disable tests matching a globbing pattern.
|
||||
(invoke "make"
|
||||
"libarchive_test"
|
||||
"bsdcpio_test"
|
||||
"bsdtar_test")
|
||||
|
||||
;; XXX: This glob disables too much.
|
||||
(invoke "./libarchive_test" "^test_*_disk*")
|
||||
(invoke "./bsdcpio_test" "^test_owner_parse")
|
||||
(invoke "./bsdtar_test"))
|
||||
;; Tests may be disabled if cross-compiling.
|
||||
(format #t "Test suite not run.~%")))))))
|
||||
(format #t "Test suite not run.~%"))))
|
||||
(add-after 'install 'add--L-in-libarchive-pc
|
||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||
(let* ((out #$output)
|
||||
(lib (string-append out "/lib"))
|
||||
(nettle (assoc-ref inputs "nettle"))
|
||||
(libxml2 (assoc-ref inputs "libxml2"))
|
||||
(xz (assoc-ref inputs "xz"))
|
||||
(zlib (assoc-ref inputs "zlib"))
|
||||
(zstd (assoc-ref inputs "zstd"))
|
||||
(bzip2 (assoc-ref inputs "bzip2")))
|
||||
;; Embed absolute references to these inputs to avoid propagation.
|
||||
(substitute* (list (string-append lib "/pkgconfig/libarchive.pc")
|
||||
(string-append lib "/libarchive.la"))
|
||||
(("-lnettle")
|
||||
(string-append "-L" nettle "/lib -lnettle"))
|
||||
(("-lxml2")
|
||||
(string-append "-L" libxml2 "/lib -lxml2"))
|
||||
(("-llzma")
|
||||
(string-append "-L" xz "/lib -llzma"))
|
||||
(("-lz")
|
||||
(string-append "-L" zlib "/lib -lz"))
|
||||
(("-lzstd")
|
||||
(string-append "-L" zstd "/lib -lzstd"))
|
||||
(("-lbz2")
|
||||
(string-append "-L" bzip2 "/lib -lbz2")))))))))
|
||||
(home-page "https://libarchive.org/")
|
||||
(synopsis "Multi-format archive and compression library")
|
||||
(description
|
||||
|
||||
+247
-112
@@ -107,7 +107,6 @@
|
||||
(sha256
|
||||
(base32
|
||||
"1aqq1379syjckf0wdn9vs6wfbapnj9zfikhiykf29k4jq9nrk6js"))))
|
||||
(outputs (list "out" "debug"))
|
||||
(build-system gnu-build-system)
|
||||
(synopsis "Example GNU package")
|
||||
(description
|
||||
@@ -134,6 +133,15 @@ command-line arguments, multiple languages, and so on.")
|
||||
(inputs (list pcre2))
|
||||
(arguments
|
||||
(list #:configure-flags #~(list "--enable-perl-regexp")
|
||||
|
||||
;; XXX: On 32-bit Hurd platforms, 'time_t' is defined as a 32-bit
|
||||
;; integer in 'hurd_types.defs', so this Gnulib test always fails.
|
||||
#:make-flags
|
||||
#~#$(if (and (not (%current-target-system))
|
||||
(string=? (%current-system) "i586-gnu"))
|
||||
#~'("XFAIL_TESTS=test-year2038")
|
||||
#~'())
|
||||
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'install 'fix-egrep-and-fgrep
|
||||
@@ -153,17 +161,6 @@ command-line arguments, multiple languages, and so on.")
|
||||
(substitute* "lib/sigsegv.in.h"
|
||||
(("__GNU__") "__XGNU__")))))
|
||||
#~())
|
||||
;; XXX: On 32-bit Hurd platforms, 'time_t' is defined as a 32-bit
|
||||
;; integer in 'hurd_types.defs', so this Gnulib test always fails.
|
||||
;; Use a phase instead of XFAIL_TESTS to not override
|
||||
;; xfailing tests in grep
|
||||
#$@(if (target-hurd32?)
|
||||
#~((add-after 'unpack 'skip-year2038-test
|
||||
(lambda _
|
||||
(substitute* "gnulib-tests/test-year2038.c"
|
||||
(("(^| )main *\\(.*" all)
|
||||
(string-append all "{\n return 77;//"))))))
|
||||
#~())
|
||||
#$@(if (system-hurd?)
|
||||
#~((add-before 'check 'skip-test
|
||||
(lambda _
|
||||
@@ -272,7 +269,8 @@ implementation offers several extensions over the standard utility.")
|
||||
'(#:make-flags (list "TESTSUITEFLAGS= -k '!tricky time stamps'")))
|
||||
(else '()))
|
||||
;; XXX: 32-bit Hurd platforms don't support 64bit time_t
|
||||
,@(if (target-hurd32?)
|
||||
,@(if (and (target-hurd?)
|
||||
(not (target-64bit?)))
|
||||
(list #:configure-flags ''("--disable-year2038"))
|
||||
'())
|
||||
#:phases (modify-phases %standard-phases
|
||||
@@ -348,7 +346,7 @@ differences.")
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments patch/pinned)
|
||||
((#:configure-flags flags #~'())
|
||||
(if (target-hurd32?)
|
||||
(if (and (target-hurd?) (not (target-64bit?)))
|
||||
#~(cons* "--disable-year2038"
|
||||
#$flags)
|
||||
flags))))
|
||||
@@ -372,7 +370,7 @@ differences.")
|
||||
;; integer in 'hurd_types.defs', so this Gnulib test always fails.
|
||||
#:make-flags
|
||||
#~#$(cond ((and (not (%current-target-system))
|
||||
(target-hurd32?))
|
||||
(string=? (%current-system) "i586-gnu"))
|
||||
#~'("XFAIL_TESTS=test-year2038"))
|
||||
;; TODO: Figure out why these gnulib tests are failing.
|
||||
((and (not (%current-target-system))
|
||||
@@ -430,7 +428,8 @@ interactive means to merge two files.")
|
||||
(arguments
|
||||
`(#:configure-flags (list
|
||||
;; XXX: 32-bit Hurd platforms don't support 64bit time_t
|
||||
,@(if (target-hurd32?)
|
||||
,@(if (and (target-hurd?)
|
||||
(not (target-64bit?)))
|
||||
'("--disable-year2038")
|
||||
'())
|
||||
;; Tell 'updatedb' to write to /var.
|
||||
@@ -528,7 +527,6 @@ used to apply commands with arbitrarily long arguments.")
|
||||
;; These tests error
|
||||
"tests/dd/nocache.sh"
|
||||
;; These tests fail
|
||||
"tests/cp/parent-perm-race.sh"
|
||||
"tests/cp/sparse.sh"
|
||||
"tests/cp/special-f.sh"
|
||||
"tests/dd/bytes.sh"
|
||||
@@ -695,75 +693,62 @@ change. GNU make offers many powerful extensions over the standard utility.")
|
||||
|
||||
(define-public binutils
|
||||
(package
|
||||
(name "binutils")
|
||||
(version "2.44")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/binutils/binutils-"
|
||||
version ".tar.bz2"))
|
||||
(sha256
|
||||
(base32 "0fnwaasfglbphqzvz5n25js9gl695p7pjbmb1z81g8gsc6k90qzn"))
|
||||
(patches (search-patches
|
||||
"binutils-2.41-fix-cross.patch"
|
||||
"binutils-loongson-workaround.patch"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:out-of-source? #t ;recommended in the README
|
||||
#:configure-flags
|
||||
#~'( ;; Add `-static-libgcc' to not retain a dependency
|
||||
;; on GCC when bootstrapping.
|
||||
"LDFLAGS=-static-libgcc"
|
||||
(name "binutils")
|
||||
(version "2.44")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/binutils/binutils-"
|
||||
version ".tar.bz2"))
|
||||
(sha256
|
||||
(base32 "0fnwaasfglbphqzvz5n25js9gl695p7pjbmb1z81g8gsc6k90qzn"))
|
||||
(patches (search-patches
|
||||
"binutils-2.41-fix-cross.patch"
|
||||
"binutils-loongson-workaround.patch"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:out-of-source? #t ;recommended in the README
|
||||
#:configure-flags #~'(;; Add `-static-libgcc' to not retain a dependency
|
||||
;; on GCC when bootstrapping.
|
||||
"LDFLAGS=-static-libgcc"
|
||||
|
||||
;; Turn on --enable-new-dtags by default to make the
|
||||
;; linker set RUNPATH instead of RPATH on binaries.
|
||||
;; This is important because RUNPATH can be overriden
|
||||
;; using LD_LIBRARY_PATH at runtime.
|
||||
"--enable-new-dtags"
|
||||
;; Turn on --enable-new-dtags by default to make the
|
||||
;; linker set RUNPATH instead of RPATH on binaries.
|
||||
;; This is important because RUNPATH can be overriden
|
||||
;; using LD_LIBRARY_PATH at runtime.
|
||||
"--enable-new-dtags"
|
||||
|
||||
;; Don't search under /usr/lib & co.
|
||||
"--with-lib-path=/no-ld-lib-path"
|
||||
;; Don't search under /usr/lib & co.
|
||||
"--with-lib-path=/no-ld-lib-path"
|
||||
|
||||
;; Install BFD. It ends up in a hidden directory,
|
||||
;; but it's here.
|
||||
"--enable-install-libbfd"
|
||||
;; Install BFD. It ends up in a hidden directory,
|
||||
;; but it's here.
|
||||
"--enable-install-libbfd"
|
||||
|
||||
;; Make sure 'ar' and 'ranlib' produce archives in a
|
||||
;; deterministic fashion.
|
||||
"--enable-deterministic-archives"
|
||||
;; Make sure 'ar' and 'ranlib' produce archives in a
|
||||
;; deterministic fashion.
|
||||
"--enable-deterministic-archives"
|
||||
|
||||
"--enable-64-bit-bfd"
|
||||
;; Note: Do not enable compression here, as dwz cannot process
|
||||
;; compressed debug sections.
|
||||
"--enable-lto"
|
||||
"--enable-separate-code"
|
||||
"--enable-threads")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'use-zstd-compression-level-19
|
||||
(lambda _
|
||||
;; The default level (3) is hard-coded. Use a higher level to
|
||||
;; compact debug sections as much as possible.
|
||||
(substitute* "bfd/compress.c"
|
||||
(("ZSTD_CLEVEL_DEFAULT") "19")))))
|
||||
"--enable-64-bit-bfd"
|
||||
"--enable-compressed-debug-sections=all"
|
||||
"--enable-lto"
|
||||
"--enable-separate-code"
|
||||
"--enable-threads")
|
||||
|
||||
;; For some reason, the build machinery insists on rebuilding .info
|
||||
;; files, even though they're already provided by the tarball.
|
||||
#:make-flags #~'("MAKEINFO=true")))
|
||||
(native-inputs
|
||||
(list bison ;needed to build 'gprofng'
|
||||
pkg-config))
|
||||
(inputs (list `(,zstd "lib")))
|
||||
(synopsis "Binary utilities: bfd gas gprof ld")
|
||||
(description
|
||||
"GNU Binutils is a collection of tools for working with binary files.
|
||||
;; For some reason, the build machinery insists on rebuilding .info
|
||||
;; files, even though they're already provided by the tarball.
|
||||
#:make-flags #~'("MAKEINFO=true")))
|
||||
(native-inputs (list bison)) ;needed to build 'gprofng'
|
||||
(synopsis "Binary utilities: bfd gas gprof ld")
|
||||
(description
|
||||
"GNU Binutils is a collection of tools for working with binary files.
|
||||
Perhaps the most notable are \"ld\", a linker, and \"as\", an assembler.
|
||||
Other tools include programs to display binary profiling information, list
|
||||
the strings in a binary file, and utilities for working with archives. The
|
||||
\"bfd\" library for working with executable and object formats is also
|
||||
included.")
|
||||
(license gpl3+)
|
||||
(home-page "https://www.gnu.org/software/binutils/")))
|
||||
(license gpl3+)
|
||||
(home-page "https://www.gnu.org/software/binutils/")))
|
||||
|
||||
;; FIXME: ath9k-firmware-htc-binutils.patch do not apply on 2.34 because of a
|
||||
;; big refactoring of xtensa-modules.c (commit 567607c11fbf7105 upstream).
|
||||
@@ -805,22 +790,10 @@ included.")
|
||||
(delete "LDFLAGS=-static-libgcc" #$flags)))
|
||||
((#:phases phases '%standard-phases)
|
||||
#~(modify-phases #$phases
|
||||
(add-after 'unpack 'use-zstd-compression-level-19-for-gold
|
||||
(lambda _
|
||||
;; The default level (3) is hard-coded. Use a higher level to
|
||||
;; compact debug sections as much as possible.
|
||||
(substitute* "gold/compressed_output.cc"
|
||||
(("ZSTD_CLEVEL_DEFAULT") "19"))))
|
||||
(add-after 'patch-source-shebangs 'patch-more-shebangs
|
||||
(lambda _
|
||||
(substitute* "gold/Makefile.in"
|
||||
(("/bin/sh") (which "sh")))))
|
||||
(add-before 'check 'set-LD_LIBRARY_PATH
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
;; Some test binaries are linked with gold, which lack RUNPATH
|
||||
;; info due to not being linked with our ld-wrapper script.
|
||||
(setenv "LD_LIBRARY_PATH"
|
||||
(dirname (search-input-file inputs "lib/libzstd.so")))))
|
||||
;; Multiple failing tests on some architectures in the gold testsuite.
|
||||
#$@(if (or (target-arm?)
|
||||
(target-ppc32?))
|
||||
@@ -1381,6 +1354,145 @@ with the Linux kernel.")
|
||||
;; This phase fails trying to create /etc/ld.so.cache
|
||||
(delete 'install-utf8-c-locale)))))))
|
||||
|
||||
(define-public glibc-2.32
|
||||
(package
|
||||
(inherit glibc-2.35)
|
||||
(version "2.32")
|
||||
(source (origin
|
||||
(inherit (package-source glibc))
|
||||
(uri (string-append "mirror://gnu/glibc/glibc-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0di848ibffrnwq7g2dvgqrnn4xqhj3h96csn69q4da51ymafl9qn"))
|
||||
(patches (search-patches
|
||||
"glibc-skip-c++.patch"
|
||||
"glibc-ldd-powerpc.patch"
|
||||
"glibc-ldd-x86_64.patch"
|
||||
"glibc-dl-cache.patch"
|
||||
"glibc-hidden-visibility-ldconfig.patch"
|
||||
"glibc-versioned-locpath.patch"
|
||||
"glibc-allow-kernel-2.6.32.patch"
|
||||
"glibc-reinstate-prlimit64-fallback.patch"
|
||||
"glibc-supported-locales.patch"
|
||||
"glibc-hurd-clock_t_centiseconds.patch"
|
||||
"glibc-2.31-hurd-clock_gettime_monotonic.patch"
|
||||
"glibc-hurd-signal-sa-siginfo.patch"
|
||||
"glibc-hurd-mach-print.patch"
|
||||
"glibc-hurd-gettyent.patch"))
|
||||
#;
|
||||
(patches (search-patches "glibc-ldd-x86_64.patch"
|
||||
"glibc-hidden-visibility-ldconfig.patch"
|
||||
"glibc-versioned-locpath.patch"
|
||||
"glibc-allow-kernel-2.6.32.patch"
|
||||
"glibc-reinstate-prlimit64-fallback.patch"
|
||||
"glibc-supported-locales.patch"
|
||||
"glibc-hurd-clock_t_centiseconds.patch"
|
||||
"glibc-hurd-clock_gettime_monotonic.patch"
|
||||
"glibc-hurd-signal-sa-siginfo.patch"))))
|
||||
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments glibc)
|
||||
((#:make-flags flags '())
|
||||
;; Arrange so that /etc/rpc & co. go to $out/etc.
|
||||
`(list (string-append "sysconfdir="
|
||||
(assoc-ref %outputs "out")
|
||||
"/etc")))
|
||||
((#:phases phases)
|
||||
`(modify-phases ,phases
|
||||
(add-before 'configure 'set-etc-rpc-installation-directory
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; Install the rpc data base file under `$out/etc/rpc'.
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
(substitute* "sunrpc/Makefile"
|
||||
(("^\\$\\(inst_sysconfdir\\)/rpc(.*)$" _ suffix)
|
||||
(string-append out "/etc/rpc" suffix "\n"))
|
||||
(("^install-others =.*$")
|
||||
(string-append "install-others = " out "/etc/rpc\n"))))))))))))
|
||||
|
||||
(define-public glibc-2.31
|
||||
(package
|
||||
(inherit glibc-2.35)
|
||||
(version "2.31")
|
||||
(source (origin
|
||||
(inherit (package-source glibc))
|
||||
(uri (string-append "mirror://gnu/glibc/glibc-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"05zxkyz9bv3j9h0xyid1rhvh3klhsmrpkf3bcs6frvlgyr2gwilj"))
|
||||
(patches (search-patches
|
||||
"glibc-skip-c++.patch"
|
||||
"glibc-ldd-powerpc.patch"
|
||||
"glibc-ldd-x86_64.patch"
|
||||
"glibc-dl-cache.patch"
|
||||
"glibc-hidden-visibility-ldconfig.patch"
|
||||
"glibc-versioned-locpath.patch"
|
||||
"glibc-allow-kernel-2.6.32.patch"
|
||||
"glibc-reinstate-prlimit64-fallback.patch"
|
||||
"glibc-supported-locales.patch"
|
||||
"glibc-hurd-clock_t_centiseconds.patch"
|
||||
"glibc-2.31-hurd-clock_gettime_monotonic.patch"
|
||||
"glibc-hurd-signal-sa-siginfo.patch"
|
||||
"glibc-hurd-mach-print.patch"
|
||||
"glibc-hurd-gettyent.patch"))))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments glibc)
|
||||
((#:phases phases)
|
||||
`(modify-phases ,phases
|
||||
(add-before 'configure 'set-etc-rpc-installation-directory
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; Install the rpc data base file under `$out/etc/rpc'.
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
(substitute* "sunrpc/Makefile"
|
||||
(("^\\$\\(inst_sysconfdir\\)/rpc(.*)$" _ suffix)
|
||||
(string-append out "/etc/rpc" suffix "\n"))
|
||||
(("^install-others =.*$")
|
||||
(string-append "install-others = " out "/etc/rpc\n"))))))))))))
|
||||
|
||||
(define-public glibc-2.30
|
||||
(package
|
||||
(inherit glibc-2.31)
|
||||
(version "2.30")
|
||||
(native-inputs
|
||||
;; This fails with a build error in libc-tls.c when using GCC 10. Use an
|
||||
;; older compiler.
|
||||
(modify-inputs (package-native-inputs glibc)
|
||||
(prepend gcc-8)))
|
||||
(source (origin
|
||||
(inherit (package-source glibc))
|
||||
(uri (string-append "mirror://gnu/glibc/glibc-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1bxqpg91d02qnaz837a5kamm0f43pr1il4r9pknygywsar713i72"))
|
||||
(patches (search-patches "glibc-skip-c++.patch"
|
||||
"glibc-ldd-x86_64.patch"
|
||||
"glibc-CVE-2019-19126.patch"
|
||||
"glibc-hidden-visibility-ldconfig.patch"
|
||||
"glibc-versioned-locpath.patch"
|
||||
"glibc-allow-kernel-2.6.32.patch"
|
||||
"glibc-reinstate-prlimit64-fallback.patch"
|
||||
"glibc-2.29-supported-locales.patch"))))))
|
||||
|
||||
(define-public glibc-2.29
|
||||
(package
|
||||
(inherit glibc-2.30)
|
||||
(version "2.29")
|
||||
(source (origin
|
||||
(inherit (package-source glibc))
|
||||
(uri (string-append "mirror://gnu/glibc/glibc-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0jzh58728flfh939a8k9pi1zdyalfzlxmwra7k0rzji5gvavivpk"))
|
||||
(patches (search-patches "glibc-skip-c++.patch"
|
||||
"glibc-ldd-x86_64.patch"
|
||||
"glibc-CVE-2019-7309.patch"
|
||||
"glibc-CVE-2019-9169.patch"
|
||||
"glibc-2.29-git-updates.patch"
|
||||
"glibc-hidden-visibility-ldconfig.patch"
|
||||
"glibc-versioned-locpath.patch"
|
||||
"glibc-allow-kernel-2.6.32.patch"
|
||||
"glibc-reinstate-prlimit64-fallback.patch"
|
||||
"glibc-2.29-supported-locales.patch"))))))
|
||||
|
||||
(define-public (make-gcc-libc base-gcc libc)
|
||||
"Return a GCC that targets LIBC."
|
||||
(package (inherit base-gcc)
|
||||
@@ -1401,7 +1513,14 @@ with the Linux kernel.")
|
||||
(inherit glibc)
|
||||
(name "glibc-locales")
|
||||
(source (origin (inherit (package-source glibc))
|
||||
(patches (cons (search-patch "glibc-locales.patch")
|
||||
;; The patch for glibc 2.28 and earlier replaces the same
|
||||
;; content, but the context in the patch is different
|
||||
;; enough to fail to merge.
|
||||
(patches (cons (search-patch
|
||||
(if (version>=? (package-version glibc)
|
||||
"2.29")
|
||||
"glibc-locales.patch"
|
||||
"glibc-locales-2.28.patch"))
|
||||
(origin-patches (package-source glibc))))))
|
||||
(synopsis "All the locales supported by the GNU C Library")
|
||||
(description
|
||||
@@ -1555,6 +1674,21 @@ test environments.")
|
||||
(define-public glibc-locales-2.33
|
||||
(package (inherit (make-glibc-locales glibc-2.33))
|
||||
(name "glibc-locales-2.33")))
|
||||
(define-public glibc-locales-2.32
|
||||
(package (inherit (make-glibc-locales glibc-2.32))
|
||||
(name "glibc-locales-2.32")))
|
||||
(define-public glibc-locales-2.31
|
||||
(package (inherit (make-glibc-locales glibc-2.31))
|
||||
(name "glibc-locales-2.31")))
|
||||
(define-public glibc-locales-2.30
|
||||
(package (inherit (make-glibc-locales glibc-2.30))
|
||||
(name "glibc-locales-2.30")))
|
||||
(define-public glibc-locales-2.29
|
||||
(package (inherit (make-glibc-locales glibc-2.29))
|
||||
(name "glibc-locales-2.29")))
|
||||
(define-public glibc-utf8-locales-2.29
|
||||
(package (inherit (make-glibc-utf8-locales glibc-2.29))
|
||||
(name "glibc-utf8-locales-2.29")))
|
||||
|
||||
(define-public which
|
||||
(package
|
||||
@@ -1576,18 +1710,7 @@ variety of options. It is an alternative to the shell \"type\" built-in
|
||||
command.")
|
||||
(license gpl3+))) ; some files are under GPLv2+
|
||||
|
||||
(define-public glibc/hurd
|
||||
(hidden-package
|
||||
(package/inherit glibc
|
||||
(source
|
||||
(origin
|
||||
(inherit (package-source glibc))
|
||||
(patches
|
||||
(append (map search-patch
|
||||
(delete "glibc-hurd64-intr-msg-clobber.patch" %glibc-patches))
|
||||
(search-patches
|
||||
"glibc-hurd-signal-fpe-exception.patch"
|
||||
"glibc-hurd-xstate.patch"))))))))
|
||||
(define-public glibc/hurd glibc)
|
||||
|
||||
(define-public glibc/hurd-headers
|
||||
(package/inherit glibc/hurd
|
||||
@@ -1666,15 +1789,15 @@ command.")
|
||||
(name "tzdata")
|
||||
;; This package should be kept in sync with python-pytz and python-tzdata
|
||||
;; in (gnu packages time).
|
||||
(version "2025b")
|
||||
(version "2025a")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://data.iana.org/time-zones/releases/tzdata"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0x0lswl5v3q3ml8ig4djc76p9zc593xajzp22x881isz6h9h908i"))))
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://data.iana.org/time-zones/releases/tzdata"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1l7hnlgc4wgy2gmaj5zmswpzbyq23h7vsndnw2zhwibw5k3wnpsd"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f
|
||||
@@ -1733,9 +1856,7 @@ command.")
|
||||
(copy-recursively (string-append out "/share/zoneinfo-leaps")
|
||||
(string-append out "/share/zoneinfo/right"))
|
||||
(delete-file-recursively
|
||||
(string-append out "/share/zoneinfo-leaps"))
|
||||
(install-file "leap-seconds.list"
|
||||
(string-append out "/share/zoneinfo")))))
|
||||
(string-append out "/share/zoneinfo-leaps")))))
|
||||
(delete 'configure))))
|
||||
(inputs (list (origin
|
||||
(method url-fetch)
|
||||
@@ -1744,7 +1865,7 @@ command.")
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1v1mw6599afdcmf5dal7zvjbl3caibkzmlw7kka71vi56pdzxy05")))))
|
||||
"0qahpwp1zlyvi7qrlm4r74pmj3c7sx3jlg9xw2siwj3nkzapk5hi")))))
|
||||
(home-page "https://www.iana.org/time-zones")
|
||||
(synopsis "Database of current and historical time zones")
|
||||
(description "The Time Zone Database (often called tz or zoneinfo)
|
||||
@@ -1764,6 +1885,20 @@ and daylight-saving rules.")
|
||||
;;; package.
|
||||
(define-public tzdata-for-tests tzdata)
|
||||
|
||||
;;; TODO: Move the 'install-leap-seconds' phase into the main package's
|
||||
;;; 'post-install' phase on the next rebuild cycle.
|
||||
(define-public tzdata/leap-seconds
|
||||
(hidden-package
|
||||
(package/inherit tzdata
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments tzdata)
|
||||
((#:phases phases)
|
||||
#~(modify-phases #$phases
|
||||
(add-after 'post-install 'install-leap-seconds
|
||||
(lambda _
|
||||
(install-file "leap-seconds.list"
|
||||
(string-append #$output "/share/zoneinfo")))))))))))
|
||||
|
||||
(define-public libiconv
|
||||
(package
|
||||
(name "libiconv")
|
||||
|
||||
+44
-10
@@ -66,7 +66,7 @@
|
||||
|
||||
(define (patch-url seqno)
|
||||
"Return the URL of Bash patch number SEQNO."
|
||||
(format #f "mirror://gnu/bash/bash-5.3-patches/bash53-~3,'0d" seqno))
|
||||
(format #f "mirror://gnu/bash/bash-5.2-patches/bash52-~3,'0d" seqno))
|
||||
|
||||
(define (bash-patch seqno sha256-bv)
|
||||
"Return the origin of Bash patch SEQNO, with expected hash SHA256-BV."
|
||||
@@ -79,13 +79,47 @@
|
||||
(list (bash-patch seqno (base32 hash))
|
||||
...))
|
||||
|
||||
(define %patch-series-5.3
|
||||
;; This is the current patches series for 5.3, generated using
|
||||
(define %patch-series-5.2
|
||||
;; This is the current patches series for 5.2, generated using
|
||||
;; 'download-patches' below.
|
||||
(patch-series
|
||||
(1 "0zr8wgg1gb67vxn7ws971n1znrdinczymc688ndnpy2a6qs88q0z")
|
||||
(2 "009051z55plsy4jmmjdb3ys7li2jraynz99qg7n6a1qk025591g3")
|
||||
(3 "1vb0gnrkmz49rcfpxjcxy0v0k5278wrlkljk9gc20nizvk3xjigj")))
|
||||
(1 "02iibpd3jq8p1bhdzgik8ps6gi1145vr463a82gj1hivjbp2ybzl")
|
||||
(2 "1f6p1z85qh1lavdp3xikgp0bfv0vqhvgpgwmdzlywl35hwdmxk25")
|
||||
(3 "1zxsi869jd90hksx3nyypgyqwrxhw2ws3r6hmk76yc1lsgdhq2ba")
|
||||
(4 "04i5liw5cg6dqkdxfgazqc2jrw40bmclx3dx45bwy259pcj7g0iq")
|
||||
(5 "0mykflv9qnbx3jz71l4f7isadiw9knm4qimqkwsv9cv88dafpq7c")
|
||||
(6 "13265akl8w6zyrg0l7f0x6arjgqjhllcwl6lk46rl53x4mm5dq6i")
|
||||
(7 "146lrwkn5wgxzs6vx34wl47g69zsxdy032k40qzi626b47ya6015")
|
||||
(8 "1s5i8hcayrv25lc8fxcr431v634yx5sii53b8fmip789s0pxjjvb")
|
||||
(9 "1kfk25151ka9wkmk1myf12irgcmvhsd8b0nfifvhrszah9w82npr")
|
||||
(10 "1kf1jrwm30js0v3d1r2rk4x09s1pyjp70wnd1qqhf9bmkw15ww67")
|
||||
(11 "1x5nkvbj6hci7gx42q7qa72hg2a9wwxh85dk79gn521ypwjmy6w3")
|
||||
(12 "0b6lcwzm7v5bzjiwaz2c8n5aj77w8ckhp2vwk4v3zsdq3z70gc9g")
|
||||
(13 "1rkwpibd6j2ghppfhqsva2jm4kdni6b7jpdsxdps52643gc4yjq9")
|
||||
(14 "09766vqqw4ffnmysm725v35qkhp1g9j4qgqag941xvq655pj9y9y")
|
||||
(15 "12im449abnq5gaqjmdxr5i38kmp02fa8l8wffad3jryvd58r0wzg")
|
||||
(16 "05arb0hzmng03cr357lf6p8af0x2a1pznsd3psll03nibfy56n0m")
|
||||
(17 "129cvx4gfz8n23iw1lhbknbw86fyw6vh60jqj1wj3d5pr75wwj0w")
|
||||
(18 "105am94qxjc27gga4a8asvsi01090xwjfim3s16lafwjvm4xsha6")
|
||||
(19 "10njgv5mrc5rhsp5lvxcbm0pnzn59a8spi2nhdasifyl1a32cp1j")
|
||||
(20 "07f0wlmqjdfarp44w3gj9gdqbqm5x20rvlhpn34ngklmxcm2bz5n")
|
||||
(21 "1kahfqqalcwi4m73pg3ssz6lh0kcqsqax09myac7a15d2y0vhd43")
|
||||
(22 "0w74aym0g1fh48864a3qxh89f26iaq7wsbg7244c6kjr94527dbq")
|
||||
(23 "1lywjqbc36j5pdzfcvnz1zy30j76aqmsm190p888av0hw815b45g")
|
||||
(24 "1hq23djqbr7s9y2324jq9mxr5bwdkmgizn3zgpchbsqp054k85cp")
|
||||
(25 "0x9hc4silzl4d3zw4p43i5dm7w86k50j47f87lracwfgwy3z8f2i")
|
||||
(26 "1b1fhm1dsi67r8ip17s0xvx2qq31fsxc1g9n3r931dd0k9a1zvln")
|
||||
(27 "0fdbhvs9dkf4knncifh98a76q4gylhyvfrffq5p9q3ag5q58jap1")
|
||||
(28 "1hdacd6sssjshmry1sscdnxxfb2r51bvdyghlfjaqgc9l85phhk0")
|
||||
(29 "11wrlb20w6v89b96krg0gwxipwhvrda6rq1y9f972m32gsrsqp0j")
|
||||
(30 "13v9fqgim082dmvkslsr0hs793yzhsij2s91mjswsfhj1qip7zy3")
|
||||
(31 "15d7rddj6spwc1fy997lxx6zvzq0zbxgf2h20mhi4wgp5nzbglf2")
|
||||
(32 "05ia6yf32hjprmyyxqawhgckxs3684ikfx8xg08zfgx9xkd7g73v")
|
||||
(33 "1qm2aad9mf2xah6xwchga7s5pk3v308mrv9lgh50d65d236ccgh1")
|
||||
(34 "0bi38dhkkwpm2qrzp8zpykglq6gibvv2n9f8m59gwj406cxvp7w9")
|
||||
(35 "1r8k34y82v02yfkgws17j7i53ybb74dqnwl2jjiv0av9z93hl6l2")
|
||||
(36 "0mwhr9hfbh2czf8klbxg6nbd2g9xl9kygvgk061vird56r4kzj8m")
|
||||
(37 "156sbi3srzkyxajkmhb7iigq0j4nvwnpsbw88xdsxn95a4xiqb4a")))
|
||||
|
||||
(define (download-patches store count)
|
||||
"Download COUNT Bash patches into store. Return a list of
|
||||
@@ -123,7 +157,7 @@ number/base32-hash tuples, directly usable in the 'patch-series' form."
|
||||
" -Wl,-rpath -Wl,"
|
||||
(assoc-ref %build-inputs "ncurses")
|
||||
"/lib")))
|
||||
(version "5.3"))
|
||||
(version "5.2"))
|
||||
(package
|
||||
(name "bash")
|
||||
(source (origin
|
||||
@@ -132,11 +166,11 @@ number/base32-hash tuples, directly usable in the 'patch-series' form."
|
||||
"mirror://gnu/bash/bash-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1fii1xaxbng9x0klxmxkm0xhmycngfz72jsgyrna4sgqcmlxhp0d"))
|
||||
"1yrjmf0mqg2q8pqphjlark0mcmgf88b0acq7bqf4gx3zvxkc2fd1"))
|
||||
(patch-flags '("-p0"))
|
||||
(patches (cons (search-patch "bash-linux-pgrp-pipe.patch")
|
||||
%patch-series-5.3))))
|
||||
(version (string-append version "." (number->string (length %patch-series-5.3))))
|
||||
%patch-series-5.2))))
|
||||
(version (string-append version "." (number->string (length %patch-series-5.2))))
|
||||
(build-system gnu-build-system)
|
||||
|
||||
(outputs '("out"
|
||||
|
||||
@@ -13,7 +13,6 @@
|
||||
;;; Copyright © 2021 Arun Isaac <arunisaac@systemreboot.net>
|
||||
;;; Copyright © 2022 Tomasz Jeneralczyk <tj@schwi.pl>
|
||||
;;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr>
|
||||
;;; Copyright © 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -48,7 +47,6 @@
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages bash)
|
||||
#:use-module (gnu packages c)
|
||||
#:use-module (gnu packages gcc)
|
||||
#:use-module (gnu packages nss)
|
||||
#:use-module (gnu packages check)
|
||||
#:use-module (gnu packages compression)
|
||||
@@ -266,17 +264,17 @@ tests.")
|
||||
(define-public bonnie++
|
||||
(package
|
||||
(name "bonnie++")
|
||||
(version "2.00a")
|
||||
(version "1.98")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://www.coker.com.au/bonnie++/bonnie++-"
|
||||
version ".tgz"))
|
||||
(sha256
|
||||
(base32
|
||||
"03lg8rz2a9wgwn9axd6gkjiswgxmp62fbxjvrrcvazmwh6ykplx8"))))
|
||||
"010bmlmi0nrlp3aq7p624sfaj5a65lswnyyxk3cnz1bqig0cn2vf"))))
|
||||
(build-system gnu-build-system)
|
||||
(native-inputs
|
||||
(list gcc-10 perl))
|
||||
(list perl))
|
||||
(arguments '(#:tests? #f)) ; there are no tests
|
||||
(home-page "https://doc.coker.com.au/projects/bonnie/")
|
||||
(synopsis "Hard drive and file system benchmark suite")
|
||||
@@ -904,31 +902,3 @@ user-provided Lua scripts.
|
||||
aspects of Vulkan performance. The way in which each scene is rendered is
|
||||
configurable through a set of options.")
|
||||
(license license:lgpl2.1+))))
|
||||
|
||||
(define-public osu-micro-benchmarks
|
||||
(package
|
||||
(name "osu-micro-benchmarks")
|
||||
(version "7.5.1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://mvapich.cse.ohio-state.edu/download/mvapich/" name "-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "08ifql3q8kv22xncvp6asfqp62dvfnc7w96b1r925c1w7ig0s38n"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs (list openmpi))
|
||||
(arguments
|
||||
(list
|
||||
#:configure-flags
|
||||
#~(list (string-append
|
||||
"CC=" #$(this-package-input "openmpi") "/bin/mpicc")
|
||||
(string-append
|
||||
"CXX=" #$(this-package-input "openmpi") "/bin/mpicxx"))))
|
||||
(home-page "https://mvapich.cse.ohio-state.edu/benchmarks/")
|
||||
(synopsis "Benchmarking suite from the MVAPICH project")
|
||||
(description
|
||||
"Microbenchmarks suite to evaluate MPI and PGAS (OpenSHMEM, UPC, and
|
||||
UPC++) libraries for CPUs and GPUs.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
@@ -5,7 +5,7 @@
|
||||
;;; Copyright © 2016 Ben Woodcroft <donttrustben@gmail.com>
|
||||
;;; Copyright © 2017, 2022, 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2017, 2018, 2019, 2020, 2021 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2019-2023, 2025 Simon Tournier <zimon.toutoune@gmail.com>
|
||||
;;; Copyright © 2019, 2020, 2021, 2022, 2023 Simon Tournier <zimon.toutoune@gmail.com>
|
||||
;;; Copyright © 2020 Peter Lo <peterloleungyau@gmail.com>
|
||||
;;; Copyright © 2020-2023 Mădălin Ionel Patrașcu <madalinionel.patrascu@mdc-berlin.de>
|
||||
;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
|
||||
@@ -4992,23 +4992,6 @@ create an alternative mapping from sequences.")
|
||||
(base32
|
||||
"0zx0brvcyi9id7xli9h5nk9an7j46p7zgjj3qmwr3jm4b95qahpl"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* '("src/densities.cpp"
|
||||
"src/loghmm.cpp"
|
||||
"src/scalehmm.cpp"
|
||||
"src/utility.cpp")
|
||||
(("Calloc\\(") "R_Calloc(")
|
||||
(("Free\\(") "R_Free(")))))))
|
||||
(native-inputs
|
||||
(list r-bsgenome-hsapiens-ucsc-hg19 r-knitr r-testthat))
|
||||
(propagated-inputs
|
||||
@@ -10207,22 +10190,6 @@ at @url{https://github.com/kharchenkolab/hahmmr/}.")
|
||||
"1jm0ia06ls1m7dsbzp1hk68qi5wbqzhcf6x66534bj1kxdll17k7"))))
|
||||
(properties `((upstream-name . "Harshlight")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'relax-c-standard
|
||||
(lambda _
|
||||
;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
|
||||
;; set custom CFLAGS for R?
|
||||
(setenv "HOME" (getcwd))
|
||||
(mkdir-p ".R")
|
||||
(with-directory-excursion ".R"
|
||||
(with-output-to-file "Makevars"
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CFLAGS=-g -O2"
|
||||
" -std=gnu11"))))))))))
|
||||
(propagated-inputs
|
||||
(list r-affy
|
||||
r-altcdfenvs
|
||||
@@ -11657,13 +11624,6 @@ containers.")
|
||||
'(modify-phases %standard-phases
|
||||
(add-after 'unpack 'set-HOME
|
||||
(lambda _ (setenv "HOME" "/tmp")))
|
||||
;; For unknown reasons, the libxml2 features are misreported without
|
||||
;; this call prior to running BiocGenerics:::testPackage("mzR").
|
||||
(add-after 'unpack 'ensure-libxml2-works
|
||||
(lambda _
|
||||
(substitute* "tests/testthat.R"
|
||||
(("library\\(\"MSnbase\"\\)" m)
|
||||
(string-append "XML::libxmlFeatures()\n" m)))))
|
||||
(add-after 'unpack 'delete-bad-tests
|
||||
(lambda _
|
||||
;; Needs r-prolocdata
|
||||
@@ -11845,13 +11805,6 @@ specific parser.")
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
;; For unknown reasons, the libxml2 features are misreported without
|
||||
;; this call prior to running BiocGenerics:::testPackage("mzR").
|
||||
(add-after 'unpack 'ensure-libxml2-works
|
||||
(lambda _
|
||||
(substitute* "tests/runTests.R"
|
||||
(("library\\(\"mzR\"\\)" m)
|
||||
(string-append "XML::libxmlFeatures()\n" m)))))
|
||||
(add-after 'unpack 'use-system-boost
|
||||
(lambda _
|
||||
(substitute* "src/Makevars"
|
||||
@@ -15438,10 +15391,7 @@ posterior for individual coefficients.")
|
||||
r-rsamtools
|
||||
r-rtracklayer
|
||||
r-summarizedexperiment))
|
||||
(native-inputs (list r-biocgenerics
|
||||
r-biocstyle
|
||||
r-bsgenome-hsapiens-ucsc-hg19
|
||||
r-runit))
|
||||
(native-inputs (list r-biocgenerics r-bsgenome-hsapiens-ucsc-hg19 r-runit))
|
||||
(home-page "https://bioconductor.org/packages/GreyListChIP")
|
||||
(synopsis "Greylist artefact regions based on ChIP inputs")
|
||||
(description "This package identifies regions of ChIP experiments with high
|
||||
@@ -17450,7 +17400,7 @@ to install interface to SYMPHONY.")
|
||||
(propagated-inputs
|
||||
(list r-biocgenerics r-fdrtool r-lpsymphony r-slam))
|
||||
(native-inputs
|
||||
(list r-knitr r-ggplot2 r-testthat r-scales))
|
||||
(list r-knitr r-testthat))
|
||||
(home-page "https://bioconductor.org/packages/IHW")
|
||||
(synopsis "Independent hypothesis weighting")
|
||||
(description
|
||||
@@ -19972,9 +19922,7 @@ footprints.")
|
||||
r-rcpp
|
||||
r-vioplot))
|
||||
(native-inputs
|
||||
(list r-knitr
|
||||
r-homo-sapiens
|
||||
r-testthat))
|
||||
(list r-knitr r-testthat))
|
||||
(home-page "https://bioconductor.org/packages/GOfuncR/")
|
||||
(synopsis "Gene ontology enrichment using FUNC")
|
||||
(description
|
||||
@@ -20399,22 +20347,6 @@ gene-specific binding is expected.")
|
||||
(base32
|
||||
"04a11dsqd5y4b39nny94acnh0qhdazjc6d1803izza4vrgmw2csb"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
|
||||
;; set custom CFLAGS for R?
|
||||
(setenv "HOME" (getcwd))
|
||||
(mkdir-p ".R")
|
||||
(with-directory-excursion ".R"
|
||||
(with-output-to-file "Makevars"
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CFLAGS=-g -O2"
|
||||
" -Wno-error=incompatible-pointer-types\n"))))))))))
|
||||
(propagated-inputs
|
||||
(list r-affy r-biobase r-biocgenerics r-gcrma r-genefilter))
|
||||
(home-page "https://bioconductor.org/packages/simpleaffy/")
|
||||
@@ -21042,7 +20974,7 @@ Gaussian distributions.")
|
||||
(add-after 'unpack 'patch-sources
|
||||
(lambda _
|
||||
(setenv "POPCNT_CAPABILITY" "0")))))))
|
||||
(inputs (list zlib))
|
||||
(inputs (list))
|
||||
(native-inputs
|
||||
(list r-knitr r-testthat))
|
||||
(home-page "https://bioconductor.org/packages/Rbowtie/")
|
||||
@@ -25545,19 +25477,7 @@ decompression of raw bead-level data from the Illumina BeadArray platform.")
|
||||
(delete-file "tests/testthat/test_Axt.R")
|
||||
(substitute* "tests/testthat/test_CNE.R"
|
||||
((".*test_CNE.*" m)
|
||||
(string-append m "skip('guix')\n")))))
|
||||
(add-before 'install 'fix-gcc-14-strictness
|
||||
(lambda _
|
||||
;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
|
||||
;; set custom CFLAGS for R?
|
||||
(setenv "HOME" (getcwd))
|
||||
(mkdir-p ".R")
|
||||
(with-directory-excursion ".R"
|
||||
(with-output-to-file "Makevars"
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CFLAGS=-g -O2"
|
||||
" -std=gnu11 \n"))))))))))
|
||||
(string-append m "skip('guix')\n"))))))))
|
||||
(build-system r-build-system)
|
||||
(inputs (list zlib))
|
||||
(propagated-inputs
|
||||
@@ -27014,23 +26934,6 @@ the earlier snpMatrix package, allowing for uncertainty in genotypes.")
|
||||
"071aipwk1awr71hvzflps49dzp83p12zm1pbyx4l8d2v3wbj0dlz"))))
|
||||
(properties `((upstream-name . "chromstaR")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* '("src/densities.cpp"
|
||||
"src/scalehmm.cpp"
|
||||
"src/utility.cpp")
|
||||
(("Calloc\\(") "R_Calloc(")
|
||||
(("Free\\(") "R_Free(")
|
||||
(("Realloc\\(") "R_Realloc(")))))))
|
||||
(propagated-inputs
|
||||
(list r-bamsignals
|
||||
r-biocgenerics
|
||||
@@ -28274,16 +28177,6 @@ visualizing bisulfite sequencing data.")
|
||||
"0lxva0lvh3xcpkrjalkg2ps8jlzaypnsy3ibd9mk4lnjpbn5hiii"))))
|
||||
(properties `((upstream-name . "dada2")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(substitute* "src/Makevars"
|
||||
(("CXX_STD = CXX11")
|
||||
"CXX_STD = CXX11
|
||||
PKG_CXXFLAGS=-g -O2 -Wno-error=changes-meaning")))))))
|
||||
(propagated-inputs
|
||||
(list r-biocgenerics
|
||||
r-biostrings
|
||||
|
||||
+735
-557
File diff suppressed because it is too large
Load Diff
+19
-62
@@ -23,7 +23,6 @@
|
||||
;;; Copyright © 2025 Tomas Volf <~@wolfsden.cz>
|
||||
;;; Copyright © 2025 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2025 Vinicius Monego <monego@posteo.net>
|
||||
;;; Copyright © 2025 Junker <dk@junkeria.club>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -222,62 +221,21 @@ of the Transmission BitTorrent client, using its HTTP RPC protocol.")
|
||||
(home-page "https://github.com/transmission-remote-gtk/transmission-remote-gtk")
|
||||
(license l:gpl2+)))
|
||||
|
||||
(define-public stig
|
||||
(package
|
||||
(name "stig")
|
||||
(version "0.14.0a0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rndusr/stig")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1jfcgncva94pyzjifar1l6wlmb7aylg0l4fxljc83rkbj1a2aan0"))))
|
||||
(propagated-inputs
|
||||
(list python-urwid
|
||||
python-urwidtrees
|
||||
python-aiohttp
|
||||
python-aiohttp-socks
|
||||
python-pyxdg
|
||||
python-blinker
|
||||
python-natsort
|
||||
python-async-timeout
|
||||
python-setproctitle))
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;tests require network access
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'loosen-version-restrictions
|
||||
(lambda _
|
||||
(substitute* "setup.py"
|
||||
(("urwidtrees==1.0.3") "urwidtrees>=1.0.3")))))))
|
||||
(inputs (list python))
|
||||
(build-system python-build-system)
|
||||
(synopsis "TUI and CLI for the BitTorrent client Transmission")
|
||||
(description
|
||||
"Stig is a @acronym{TUI, Text User Interface} and @acronym{CLI, Command Line
|
||||
Interface} client for the BitTorrent client Transmission.")
|
||||
(home-page "https://github.com/rndusr/stig")
|
||||
(license l:gpl3)))
|
||||
|
||||
(define-public libtorrent
|
||||
(package
|
||||
(name "libtorrent")
|
||||
(version "0.16.1")
|
||||
(version "0.13.8")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rakshasa/libtorrent/")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"http://rtorrent.net/downloads/libtorrent-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1rk5y27r2v3x2v1gngxfw8kj1i8n93dpkvda6idbid6yxvv9slkm"))))
|
||||
"10z9i1rc41cmmi7nx8k7k1agsx6afv09g9cl7g9zr35fyhl5l4gd"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs (list curl openssl zlib))
|
||||
(native-inputs (list autoconf automake cppunit libtool pkg-config))
|
||||
(inputs (list openssl zlib))
|
||||
(native-inputs (list pkg-config cppunit))
|
||||
(synopsis "BitTorrent library of rtorrent")
|
||||
(description
|
||||
"LibTorrent is a BitTorrent library used by and developed in parallel
|
||||
@@ -289,16 +247,15 @@ speed and efficiency.")
|
||||
(define-public rtorrent
|
||||
(package
|
||||
(name "rtorrent")
|
||||
(version "0.16.1")
|
||||
(version "0.9.8")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rakshasa/rtorrent/")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"http://rtorrent.net/downloads/rtorrent-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0azpqclksczh1j7kpkwqh68xp3p9rayf9dym1c2iif56fm960mgh"))))
|
||||
"1bs2fnf4q7mlhkhzp3i1v052v9xn8qa7g845pk9ia8hlpw207pwy"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs (list libtorrent
|
||||
ncurses
|
||||
@@ -306,7 +263,7 @@ speed and efficiency.")
|
||||
cyrus-sasl
|
||||
openssl
|
||||
zlib))
|
||||
(native-inputs (list autoconf automake cppunit libtool pkg-config))
|
||||
(native-inputs (list pkg-config cppunit))
|
||||
(synopsis "BitTorrent client with ncurses interface")
|
||||
(description
|
||||
"rTorrent is a BitTorrent client with an ncurses interface. It supports
|
||||
@@ -607,8 +564,8 @@ features.")
|
||||
(modify-inputs (package-inputs base)
|
||||
(delete "qtsvg"))))))
|
||||
|
||||
(define-deprecated-package qbittorrent-nox
|
||||
qbittorrent-no-x)
|
||||
(define-public qbittorrent-nox
|
||||
(deprecated-package "qbittorrent-nox" qbittorrent-no-x))
|
||||
|
||||
(define-public qbittorrent-enhanced
|
||||
(package
|
||||
@@ -645,8 +602,8 @@ the following features:
|
||||
(arguments (package-arguments qbittorrent-no-x))
|
||||
(inputs (package-inputs qbittorrent-no-x))))
|
||||
|
||||
(define-deprecated-package qbittorrent-enhanced-nox
|
||||
qbittorrent-enhanced-no-x)
|
||||
(define-public qbittorrent-enhanced-nox
|
||||
(deprecated-package "qbittorrent-enhanced-nox" qbittorrent-enhanced-no-x))
|
||||
|
||||
(define-public deluge
|
||||
(package
|
||||
|
||||
+1
-107
@@ -1,17 +1,7 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
|
||||
;;; Copyright © 2017 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2018 Mark H Weaver <mhw@netris.org>
|
||||
;;; Copyright © 2020 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2020 Marius Bakke <marius@gnu.org>
|
||||
;;; Copyright © 2022 jgart <jgart@dismail.de>
|
||||
;;; Copyright © 2023, 2024, 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2023 Adam Faiz <adam.faiz@disroot.org>
|
||||
;;; Copyright © 2023 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2023 宋文武 <iyzsong@envs.net>
|
||||
;;; Copyright © 2023-2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2025 Gabriel Santos <gabrielsantosdesouza@disroot.org>
|
||||
;;; Copyright © 2025 Sharlatan Hellseher <sharlatanus@gmail.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -31,9 +21,7 @@
|
||||
(define-module (gnu packages books)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (guix build-system copy)
|
||||
#:use-module (guix build-system gnu)
|
||||
#:use-module (guix deprecation)
|
||||
#:use-module (guix download)
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix git-download)
|
||||
@@ -62,105 +50,11 @@
|
||||
#:use-module (gnu packages python)
|
||||
#:use-module (gnu packages python-xyz)
|
||||
#:use-module (gnu packages tex)
|
||||
#:use-module (gnu packages texinfo)
|
||||
#:use-module (gnu packages texlive)
|
||||
#:use-module (gnu packages version-control)
|
||||
#:use-module (gnu packages webkit)
|
||||
#:use-module (gnu packages xml))
|
||||
|
||||
(define-public book-faif
|
||||
(package
|
||||
(name "book-faif")
|
||||
(version "2.0")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://www.fsf.org/faif/faif-" version
|
||||
".tar.bz2"))
|
||||
(sha256
|
||||
(base32
|
||||
"0qf14d0n6k1dn9z0fdnx9qkhn4iq685xd443w7l7w54bm931p7dw"))))
|
||||
(build-system copy-build-system)
|
||||
(native-inputs
|
||||
(list (texlive-local-tree
|
||||
(list texlive-caption
|
||||
texlive-endnotes
|
||||
texlive-etoolbox
|
||||
texlive-fncychap
|
||||
texlive-helvetic
|
||||
texlive-times
|
||||
texlive-ucs))))
|
||||
(arguments
|
||||
(list
|
||||
#:install-plan #~'(("faif-2.0.pdf" "share/doc/faif/"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'writable-texmfvar
|
||||
;; Generating font shapes require a writable TEXMFVAR directory.
|
||||
(lambda _ (setenv "TEXMFVAR" "/tmp")))
|
||||
(add-before 'install 'build
|
||||
(lambda _
|
||||
(invoke "pdflatex" "faif-2.0.tex"))))))
|
||||
(home-page "https://www.fsf.org/faif")
|
||||
(synopsis "Free as in Freedom (2.0)")
|
||||
(description
|
||||
"In 2002, Sam Williams wrote Free as in Freedom, a biography of Richard
|
||||
M. Stallman. In its epilogue, Williams expressed hope that choosing to
|
||||
distribute his book under the GNU Free Documentation License would enable and
|
||||
encourage others to share corrections and their own perspectives through
|
||||
modifications to his work. Free as in Freedom (2.0) is Stallman's revision of
|
||||
the original biography. While preserving Williams's viewpoint, it includes
|
||||
factual corrections and extensive new commentary by Stallman, as well as new
|
||||
prefaces by both authors written for the occasion. It is a rare kind of
|
||||
biography, where the reader has the benefit of both the biographer's original
|
||||
words and the subject's response.")
|
||||
(license license:fdl1.3+)))
|
||||
|
||||
(define-public book-sicp
|
||||
(let ((commit "bda03f79d6e2e8899ac2b5ca6a3732210e290a79")
|
||||
(revision "3"))
|
||||
(package
|
||||
(name "book-sicp")
|
||||
(version (git-version "20180718" revision commit))
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/sarabander/sicp")
|
||||
(commit commit)))
|
||||
(sha256
|
||||
(base32
|
||||
"0mng7qrj2dvssyffr9ycnf4a5k0kadp4dslq7mc5bhzq1qxyjs2w"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system copy-build-system)
|
||||
(native-inputs (list gzip texinfo))
|
||||
(arguments
|
||||
(list #:install-plan ''(("html" "share/doc/sicp/")
|
||||
("sicp.info" "share/info/"))
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'remove-obsolete-commands
|
||||
(lambda _
|
||||
;; Reported upstream:
|
||||
;; https://github.com/sarabander/sicp/issues/46.
|
||||
(substitute* "sicp-pocket.texi"
|
||||
(("@setshortcontentsaftertitlepage")
|
||||
""))))
|
||||
(add-before 'install 'build
|
||||
(lambda _
|
||||
(invoke "makeinfo" "--no-split"
|
||||
"--output=sicp.info"
|
||||
"sicp-pocket.texi"))))))
|
||||
(home-page "https://sarabander.github.io/sicp")
|
||||
(synopsis "Structure and Interpretation of Computer Programs")
|
||||
(description "Structure and Interpretation of Computer Programs (SICP) is
|
||||
a textbook aiming to teach the principles of computer programming.
|
||||
|
||||
Using Scheme, a dialect of the Lisp programming language, the book explains
|
||||
core computer science concepts such as abstraction in programming,
|
||||
metalinguistic abstraction, recursion, interpreters, and modular programming.")
|
||||
(license license:cc-by-sa4.0))))
|
||||
|
||||
;; It may be removed after 2025-12-19.
|
||||
(define-deprecated/public-alias sicp book-sicp)
|
||||
|
||||
(define-public book-sparc
|
||||
(package
|
||||
(name "book-sparc")
|
||||
|
||||
@@ -226,8 +226,8 @@ across a broad spectrum of applications.")
|
||||
(base32
|
||||
"13iviiwk1srpw9dmiwabkxv56v0pl0zggjp8zxy1419k5zzfsy34")))))))
|
||||
|
||||
(define-deprecated-package boost-with-python3
|
||||
boost)
|
||||
(define-public boost-with-python3
|
||||
(deprecated-package "boost-with-python3" boost))
|
||||
|
||||
(define-public boost-static
|
||||
(package
|
||||
|
||||
@@ -23,7 +23,6 @@
|
||||
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2025 Esther Flashner <esther@flashner.co.il>
|
||||
;;; Copyright © 2025 André Batista <nandre@riseup.net>
|
||||
;;; Copyright © 2025 dan <i@dan.games>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -907,7 +906,7 @@ also initializes the boards (RAM etc).")
|
||||
(lambda* (#:key make-flags #:allow-other-keys)
|
||||
(let* ((info-dir (string-append #$output "/share/info"))
|
||||
(info (string-append info-dir
|
||||
"/DasUBoot.info.zst")))
|
||||
"/DasUBoot.info.gz")))
|
||||
(with-directory-excursion "doc/output"
|
||||
(apply invoke "make" "-C" "texinfo" "install-info"
|
||||
(string-append "infodir=" info-dir)
|
||||
@@ -928,16 +927,12 @@ Info manual.")))
|
||||
(inherit u-boot)
|
||||
(name "u-boot-tools")
|
||||
(native-inputs
|
||||
(if (string-match "^x86_64-linux" (%current-system))
|
||||
(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)
|
||||
(prepend python-filelock
|
||||
python-pycryptodomex))))
|
||||
(modify-inputs (package-native-inputs u-boot)
|
||||
(prepend python-coverage
|
||||
python-filelock
|
||||
python-pycryptodomex
|
||||
python-pytest
|
||||
python-pytest-xdist)))
|
||||
(arguments
|
||||
`(#:make-flags '("HOSTCC=gcc")
|
||||
#:test-target "tcheck"
|
||||
@@ -1038,7 +1033,9 @@ CONFIG_TOOLS_KWBIMAGE=n")
|
||||
(invoke "test/image/test-imagetools.sh"))))
|
||||
;; Only run full test suite on x86_64 systems, as many tests
|
||||
;; assume x86_64.
|
||||
,@(if (string-match "^x86_64-linux" (%current-system))
|
||||
,@(if (string-match "^x86_64-linux"
|
||||
(or (%current-target-system)
|
||||
(%current-system)))
|
||||
'((add-after 'check 'check-x86
|
||||
(lambda* (#:key make-flags test-target tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
@@ -1551,9 +1548,6 @@ Documentation} for more information (for example by running @samp{info
|
||||
(define-public u-boot-pinebook-pro-rk3399
|
||||
(make-u-boot-rockchip-package "pinebook-pro" 'rk3399))
|
||||
|
||||
(define-public u-boot-nanopi-r4s-rk3399
|
||||
(make-u-boot-rockchip-package "nanopi-r4s" 'rk3399))
|
||||
|
||||
(define*-public (make-u-boot-bin-package u-boot-package
|
||||
#:key
|
||||
(u-boot-bin "u-boot.bin"))
|
||||
|
||||
@@ -193,15 +193,15 @@ ungoogled-chromium.")
|
||||
(define-public passff-host
|
||||
(package
|
||||
(name "passff-host")
|
||||
(version "1.2.5")
|
||||
(home-page "https://codeberg.org/PassFF/passff-host")
|
||||
(version "1.2.4")
|
||||
(home-page "https://github.com/passff/passff-host")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference (url home-page) (commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"01kw5w6ihm4d6l5va7c0mb7539rnmqfn16c9w543xf5s0n5f2i7h"))))
|
||||
"1lcwa1qzfxlifmj33qndp1wgi6yx6vj21ir0az79vhm5k03p961z"))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
(let ((native-manifests "lib/icecat/native-messaging-hosts"))
|
||||
@@ -231,15 +231,15 @@ properly.")
|
||||
(define passff
|
||||
(package
|
||||
(name "passff")
|
||||
(version "1.23")
|
||||
(home-page "https://codeberg.org/passff/passff")
|
||||
(version "1.16")
|
||||
(home-page "https://github.com/passff/passff")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference (url home-page) (commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0y6ji3mqmp9dadj1rm712n1bjpl021a4yssv7m1ydllmw10gs009"))))
|
||||
"0y3cbgy89lgvq6lfabp7mi1zhphdvihcccn3yw5mmaql9yrdm5kc"))))
|
||||
(propagated-inputs (list passff-host))
|
||||
(build-system copy-build-system)
|
||||
(properties '((addon-id . "passff@invicem.pro")))
|
||||
@@ -328,7 +328,7 @@ with the @uref{https://keepassxc.org, KeePassXC} password manager.")
|
||||
(define noscript
|
||||
(package
|
||||
(name "noscript")
|
||||
(version "13.2.1")
|
||||
(version "13.0.9")
|
||||
(source (origin
|
||||
(method url-fetch/zipbomb)
|
||||
(uri (string-append
|
||||
@@ -336,7 +336,7 @@ with the @uref{https://keepassxc.org, KeePassXC} password manager.")
|
||||
".xpi"))
|
||||
(sha256
|
||||
(base32
|
||||
"16p63kg7zwnfss9sb3j2kn9m7dx9prh09h4vbz3b0pg5s7rrf0hr"))))
|
||||
"1xbisx3xqak9aj7nb2lh94an6yfldsl6a2g2qc87vxi1zwdbcnjj"))))
|
||||
(build-system copy-build-system)
|
||||
(properties '((addon-id . "{73a6fe31-595d-460b-a920-fcc0f8843232}")))
|
||||
(arguments
|
||||
|
||||
@@ -371,7 +371,7 @@ resembles Python.")
|
||||
(list meson
|
||||
ninja/pinned
|
||||
python-colorama
|
||||
python-cython
|
||||
python-cython-3
|
||||
python-pyproject-metadata
|
||||
python-tomli
|
||||
python-typing-extensions
|
||||
@@ -381,7 +381,7 @@ resembles Python.")
|
||||
git-minimal/pinned
|
||||
patchelf
|
||||
pkg-config
|
||||
python-cython
|
||||
python-cython-3
|
||||
python-gitpython
|
||||
python-pytest
|
||||
python-pytest-cov
|
||||
@@ -1117,7 +1117,7 @@ maintenance-related files, for convenience.")
|
||||
(define-public maak
|
||||
(package
|
||||
(name "maak")
|
||||
(version "0.2.9")
|
||||
(version "0.2.3")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -1126,7 +1126,7 @@ maintenance-related files, for convenience.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0108sj9rdqwprcx2ihlsfhbqiig08kah3k2yxc5w0yxzxdh8hzwv"))))
|
||||
(base32 "15s6khifk7k002hr9mqgl45r3ipmvsc56z9z8skwclxsj6w1cddl"))))
|
||||
(build-system guile-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -1298,5 +1298,5 @@ The Waf Book and in the API docs
|
||||
|
||||
;; waf is the final program no need to prefix it with "python-", the same way
|
||||
;; as meson or ninja which are written in Python as well.
|
||||
(define-deprecated-package python-waf
|
||||
waf)
|
||||
(define-public python-waf
|
||||
(deprecated-package "python-waf" waf))
|
||||
|
||||
+12
-12
@@ -14,7 +14,7 @@
|
||||
;;; Copyright © 2021 David Dashyan <mail@davie.li>
|
||||
;;; Copyright © 2021 Foo Chuan Wei <chuanwei.foo@hotmail.com>
|
||||
;;; Copyright © 2022 (unmatched parenthesis <paren@disroot.org>
|
||||
;;; Copyright © 2022, 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2022 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2022 Ekaitz Zarraga <ekaitz@elenq.tech>
|
||||
;;; Copyright © 2022 ( <paren@disroot.org>
|
||||
;;; Copyright © 2022 Antero Mejr <antero@mailbox.org>
|
||||
@@ -149,8 +149,8 @@ slicing.")
|
||||
(license license:boost1.0))))
|
||||
|
||||
(define-public cproc
|
||||
(let ((commit "14a8916e23bc6daebcb54f1384fa0eb2455072e3")
|
||||
(revision "3"))
|
||||
(let ((commit "70fe9ef1810cc6c05bde9eb0970363c35fa7e802")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "cproc")
|
||||
(version (git-version "0.0" revision commit))
|
||||
@@ -162,7 +162,7 @@ slicing.")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1yrs1ccsjypfsjsmxxjspaggn0bjwifs2slalnpvsrgzxw5559bx"))
|
||||
(base32 "1qmgzll7z7mn587azkj4cizyyd8ii6iznfxpc66ja08140sbn9yx"))
|
||||
(patches (search-patches "cproc-extra-linkflags.patch"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
@@ -958,17 +958,17 @@ replacement for the syslog() call, but retains its ease of use.")
|
||||
(define-public liblognorm
|
||||
(package
|
||||
(name "liblognorm")
|
||||
(version "2.0.7")
|
||||
(version "2.0.6")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rsyslog/liblognorm")
|
||||
(url "https://github.com/rsyslog/liblognorm.git")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1syh3lx58q6izzgmpq8pj4j5aw6qr5nzplnmk42f2alrw38sprd5"))))
|
||||
"1pyy1swvq6jj12aqma42jimv71z8m66zy6ydd5v19cp2azm4krml"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -1437,7 +1437,7 @@ Telemetry Transport (MQTT) publish-subscribe messaging protocol.")
|
||||
(define-public mimalloc
|
||||
(package
|
||||
(name "mimalloc")
|
||||
(version "3.0.9")
|
||||
(version "2.1.2")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1446,7 +1446,7 @@ Telemetry Transport (MQTT) publish-subscribe messaging protocol.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0y249bmzx6rmc1m8a29d0x2cd52nik2dwqpzg9hd1xkvl9b8z7jc"))))
|
||||
"1pyf05snc1ib7zjjm9kspvbmynd8lmxqw72qcpz8lcyzyywmz24i"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
`(#:build-type "Release"
|
||||
@@ -1572,9 +1572,9 @@ Telemetry Transport (MQTT) publish-subscribe messaging protocol.")
|
||||
,(string-append "--prefix=" #$output)
|
||||
,(string-append "--mandir=" #$output "/share/man")
|
||||
,(string-append "--cores="
|
||||
;; Tests require parallelism, and set upper limit as test
|
||||
;; runtime scales superliniearly in the number of cores.
|
||||
(number->string (max 2 (min 8 (parallel-job-count))))))))))))
|
||||
(if parallel-build?
|
||||
(number->string (parallel-job-count))
|
||||
"1")))))))))
|
||||
(home-page "https://github.com/concurrencykit/ck")
|
||||
(synopsis "C library for concurrent systems")
|
||||
(description "Concurrency Kit (@code{ck}) provides concurrency primitives,
|
||||
|
||||
@@ -0,0 +1,124 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2019 John Soo <jsoo1@asu.edu>
|
||||
;;;
|
||||
;;; 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 cedille)
|
||||
#:use-module (gnu packages)
|
||||
#:use-module (gnu packages agda)
|
||||
#:use-module (gnu packages emacs-xyz)
|
||||
#:use-module (gnu packages haskell)
|
||||
#:use-module (gnu packages haskell-xyz)
|
||||
#:use-module (guix build-system emacs)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (guix packages))
|
||||
|
||||
(define-public cedille
|
||||
(package
|
||||
(name "cedille")
|
||||
(version "1.1.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/cedille/cedille")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1h5s6ayh3s76z184jai3jidcs4cjk8s4nvkkv2am8dg4gfsybq22"))))
|
||||
(inputs
|
||||
(list agda agda-ial ghc ghc-alex ghc-happy))
|
||||
(build-system emacs-build-system)
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-cedille-paths
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
(substitute* "cedille-mode.el"
|
||||
(("/usr/share/emacs/site-lisp/cedille-mode")
|
||||
(string-append
|
||||
out "/share/emacs/site-lisp/cedille")))
|
||||
(substitute* "cedille-mode/cedille-mode-info.el"
|
||||
(("\\(concat cedille-path-el \"cedille-info-main.info\"\\)")
|
||||
(string-append
|
||||
"\"" out "/share/info/cedille-info-main.info.gz\"")))
|
||||
#t)))
|
||||
(add-after 'patch-cedille-paths 'copy-cedille-mode
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(lisp
|
||||
(string-append
|
||||
out "/share/emacs/site-lisp/cedille/")))
|
||||
(mkdir-p (string-append lisp "cedille-mode"))
|
||||
(copy-recursively
|
||||
"cedille-mode"
|
||||
(string-append lisp "cedille-mode"))
|
||||
(mkdir-p (string-append lisp "se-mode"))
|
||||
(copy-recursively
|
||||
"se-mode"
|
||||
(string-append lisp "se-mode"))
|
||||
#t)))
|
||||
;; FIXME: Byte compilation fails
|
||||
(delete 'build)
|
||||
(replace 'check
|
||||
(lambda _
|
||||
(with-directory-excursion "cedille-tests"
|
||||
(invoke "sh" "run-tests.sh"))))
|
||||
(add-after 'unpack 'patch-libraries
|
||||
(lambda _ (patch-shebang "create-libraries.sh") #t))
|
||||
(add-after 'unpack 'copy-ial
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(copy-recursively
|
||||
(search-input-directory inputs "/include/agda/ial")
|
||||
"ial")
|
||||
;; Ambiguous module if main is included from ial
|
||||
(delete-file "ial/main.agda")
|
||||
#t))
|
||||
(add-after 'check 'build-cedille
|
||||
;; Agda has a hard time with parallel compilation
|
||||
(lambda _
|
||||
(invoke "touch" "src/Templates.hs")
|
||||
(make-file-writable "src/Templates.hs")
|
||||
(invoke "touch" "src/templates.agda")
|
||||
(make-file-writable "src/templates.agda")
|
||||
(invoke "make" "--jobs=1")))
|
||||
(add-after 'install 'install-cedille
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
(copy-recursively
|
||||
"lib" (string-append out "/lib/cedille"))
|
||||
(install-file "cedille" (string-append out "/bin"))
|
||||
(install-file "core/cedille-core"
|
||||
(string-append out "/bin"))
|
||||
(install-file "docs/info/cedille-info-main.info"
|
||||
(string-append out "/share/info"))
|
||||
#t))))))
|
||||
(home-page "https://cedille.github.io/")
|
||||
(synopsis
|
||||
"Language based on Calculus of Dependent Lambda Eliminations")
|
||||
(description
|
||||
"Cedille is an interactive theorem-prover and dependently typed
|
||||
programming language, based on extrinsic (aka Curry-style) type theory. This
|
||||
makes it rather different from type theories like Coq and Agda, which are
|
||||
intrinsic (aka Church-style). In Cedille, terms are nothing more than
|
||||
annotated versions of terms of pure untyped lambda calculus. In contrast, in
|
||||
Coq or Agda, the typing annotations are intrinsic parts of terms. The typing
|
||||
annotations can only be erased as an optimization under certain conditions,
|
||||
not by virtue of the definition of the type theory.")
|
||||
(license license:expat)))
|
||||
+23
-44
@@ -819,7 +819,7 @@ format.")
|
||||
(define-public cppcheck
|
||||
(package
|
||||
(name "cppcheck")
|
||||
(version "2.18.0")
|
||||
(version "2.17.1")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -827,12 +827,11 @@ format.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1551pbbvx43j5jl5jz725km7gd65fizf9y7j66anjmdmqzccpdmn"))
|
||||
(base32 "19ap9ai9s4vsygyqfa215mrmpz4vki63d5b4qdb89zvbldaf3hlf"))
|
||||
(patches (search-patches "cppcheck-fix-basedir-test.patch"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
'(#:parallel-tests? #f
|
||||
#:configure-flags '("-DBUILD_TESTS=ON")))
|
||||
'(#:configure-flags '("-DBUILD_TESTS=ON")))
|
||||
(home-page "https://cppcheck.sourceforge.io")
|
||||
(synopsis "Static C/C++ code analyzer")
|
||||
(description "Cppcheck is a static code analyzer for C and C++. Unlike
|
||||
@@ -1101,21 +1100,6 @@ generation.")
|
||||
(sha256
|
||||
(base32 "1zn701fgmbk29y45p49sajaswm01i2bv89ds2kkbiq8i0p2cr08w"))))))
|
||||
|
||||
(define-public googletest-1.13
|
||||
(package
|
||||
(inherit googletest)
|
||||
(name "googletest")
|
||||
(version "1.13.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/google/googletest")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1x5lr1k4kgw3i8d7c12vp759p0w8c8r2y8lwvqswswxvwygw8lid"))))))
|
||||
|
||||
(define-public googletest-1.8
|
||||
(package
|
||||
(inherit googletest)
|
||||
@@ -2394,14 +2378,14 @@ since the last commit or what tests are currently failing.")
|
||||
(define-public python-coverage
|
||||
(package
|
||||
(name "python-coverage")
|
||||
(version "7.11.0")
|
||||
(version "7.9.2")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "coverage" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0l403f6d59q8rik9vvzb6982qad0zrfj87dqydzsz8hwmh2dayqn"))))
|
||||
"12qcm2j4bnc2gp6sci9brly2k406gp4jwjfpzxj04ag3a7x28w4r"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -2417,7 +2401,6 @@ since the last commit or what tests are currently failing.")
|
||||
"--ignore=tests/test_venv.py"
|
||||
"--ignore=tests/test_plugins.py"
|
||||
"--ignore=tests/test_debug.py"
|
||||
"--ignore=tests/test_core.py"
|
||||
;; XXX: Unclear why these fail.
|
||||
"--ignore=tests/test_python.py"
|
||||
"--deselect=tests/test_concurrency.py\
|
||||
@@ -2446,12 +2429,7 @@ since the last commit or what tests are currently failing.")
|
||||
#$@(if (equal? (%current-system) "riscv64-linux")
|
||||
'("--deselect=tests/test_numbits.py::NumbitsOpTest::test_union"
|
||||
"--deselect=tests/test_numbits.py::NumbitsOpTest::test_any_intersection")
|
||||
'())
|
||||
;; Fails some "'p1c' not in 'Name" assertions (see:
|
||||
;; <https://github.com/nedbat/coveragepy/issues/2050#issuecomment-3489704251>).
|
||||
"--ignore=tests/test_api.py"
|
||||
;; This tests fails due to missing file tests/actual/testing/getty.
|
||||
"-k" "not test_good_needs_scrubs")
|
||||
'()))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-pyproject
|
||||
@@ -3100,29 +3078,30 @@ backported from Python 2.7 for Python 2.4+.")
|
||||
(define-public behave
|
||||
(package
|
||||
(name "behave")
|
||||
(version "1.3.3")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/behave/behave")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1fxj51kailsdakqi7qbw700k258n7r3lv75mgxs45ld5xh2jfyxh"))))
|
||||
;; The 1.2.6 release from 2018 has several problems with newer Python
|
||||
;; versions, so we package a recent snapshot.
|
||||
(version "1.2.7.dev5")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/behave/behave")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"14162pclfvy4wy2az4v9gkgb3v0b338zxrb2ikqcqifckrmk8nhv"))))
|
||||
(build-system pyproject-build-system)
|
||||
(native-inputs
|
||||
(list python-assertpy
|
||||
python-chardet
|
||||
python-mock
|
||||
python-path
|
||||
(list python-mock
|
||||
python-assertpy
|
||||
python-pathpy
|
||||
python-pyhamcrest
|
||||
python-pytest
|
||||
python-pytest-html
|
||||
python-setuptools))
|
||||
python-setuptools
|
||||
python-wheel))
|
||||
(propagated-inputs
|
||||
(list python-colorama
|
||||
python-cucumber-expressions
|
||||
python-cucumber-tag-expressions
|
||||
python-parse
|
||||
python-parse-type))
|
||||
|
||||
+29
-54
@@ -60,7 +60,6 @@
|
||||
#:use-module (gnu packages lisp)
|
||||
#:use-module (gnu packages maths)
|
||||
#:use-module (gnu packages mpi)
|
||||
#:use-module (gnu packages onc-rpc)
|
||||
#:use-module (gnu packages perl)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages python)
|
||||
@@ -494,47 +493,23 @@ stored with user-specified precision.")
|
||||
(define-public gromacs
|
||||
(package
|
||||
(name "gromacs")
|
||||
(version "2025.3")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://gitlab.com/gromacs/gromacs")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1p9vvlbrysh8lwnbgy845pgx664k6mkw8p66f8bx468f7z2rp900"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
;; Still bundled: part of gromacs, source behind registration
|
||||
;; but free software anyways
|
||||
;;(delete-file-recursively "src/external/vmd_molfile")
|
||||
;; Still bundled: threads-based OpenMPI-compatible fallback
|
||||
;; designed to be bundled like that
|
||||
;;(delete-file-recursively "src/external/thread_mpi")
|
||||
;; Still bundled: Colvars is intended to be built as part of a
|
||||
;; molecular simulation program.
|
||||
;;(delete-file-recursively "src/external/colvars")
|
||||
;; Unbundling
|
||||
(delete-file-recursively "src/external/lmfit")
|
||||
(delete-file-recursively "src/external/clFFT")
|
||||
(delete-file-recursively "src/external/fftpack")
|
||||
(delete-file-recursively "src/external/build-fftw")
|
||||
(delete-file-recursively "src/external/tng_io")
|
||||
(delete-file-recursively "src/external/tinyxml2")
|
||||
(delete-file-recursively "src/external/googletest")
|
||||
(delete-file-recursively "src/external/muparser")
|
||||
(delete-file-recursively "src/external/rpc_xdr")
|
||||
(delete-file-recursively "src/external/vkfft")))))
|
||||
(version "2022.4")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "http://ftp.gromacs.org/pub/gromacs/gromacs-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"15vjwasxjq0h18dmzacjkdim51zrvr0ni42hbc30557j5xhbw4f5"))
|
||||
;; Our version of tinyxml2 is far newer than the bundled one and
|
||||
;; require fixing `testutils' code. See patch header for more info
|
||||
(patches (search-patches "gromacs-tinyxml2.patch"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list #:configure-flags
|
||||
#~(list "-DGMX_DEVELOPER_BUILD=on" ; Needed to run tests
|
||||
;; Unbundling
|
||||
"-DGMX_USE_LMFIT=EXTERNAL"
|
||||
"-DGMX_USE_MUPARSER=EXTERNAL"
|
||||
"-DGMX_BUILD_OWN_FFTW=off"
|
||||
"-DGMX_EXTERNAL_BLAS=on"
|
||||
"-DGMX_EXTERNAL_LAPACK=on"
|
||||
@@ -546,29 +521,31 @@ stored with user-specified precision.")
|
||||
;; Workaround for cmake/FindSphinx.cmake version parsing that does
|
||||
;; not understand the guix-wrapped `sphinx-build --version' answer
|
||||
(string-append "-DSPHINX_EXECUTABLE_VERSION="
|
||||
#$(package-version python-sphinx))
|
||||
(string-append
|
||||
"-DCMAKE_CXX_FLAGS=-I"
|
||||
(search-input-directory %build-inputs "/include/tirpc")))
|
||||
#$(package-version python-sphinx)))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fixes
|
||||
(lambda _
|
||||
(copy-recursively #$(package-source googletest-1.13)
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
;; Still bundled: part of gromacs, source behind registration
|
||||
;; but free software anyways
|
||||
;;(delete-file-recursively "src/external/vmd_molfile")
|
||||
;; Still bundled: threads-based OpenMPI-compatible fallback
|
||||
;; designed to be bundled like that
|
||||
;;(delete-file-recursively "src/external/thread_mpi")
|
||||
;; Unbundling
|
||||
(delete-file-recursively "src/external/lmfit")
|
||||
(delete-file-recursively "src/external/clFFT")
|
||||
(delete-file-recursively "src/external/fftpack")
|
||||
(delete-file-recursively "src/external/build-fftw")
|
||||
(delete-file-recursively "src/external/tng_io")
|
||||
(delete-file-recursively "src/external/tinyxml2")
|
||||
(delete-file-recursively "src/external/googletest")
|
||||
(copy-recursively #$(package-source googletest)
|
||||
"src/external/googletest")
|
||||
;; This test warns about the build host hardware, disable
|
||||
(substitute* "src/gromacs/hardware/tests/hardwaretopology.cpp"
|
||||
(("TEST\\(HardwareTopologyTest, HwlocExecute\\)")
|
||||
"void __guix_disabled()"))
|
||||
(substitute* "cmake/gmxTestXDR.cmake"
|
||||
(("TestXDR\\.cpp\"" orig)
|
||||
(string-append orig " LINK_LIBRARIES -ltirpc")))
|
||||
(substitute* "CMakeLists.txt"
|
||||
(("set\\(GMX_EXTRA_LIBRARIES.*" orig)
|
||||
(string-append
|
||||
orig "\nlist(APPEND GMX_EXTRA_LIBRARIES \"-ltirpc\")\n")))
|
||||
(substitute* "src/external/CMakeLists.txt"
|
||||
(("add_subdirectory\\(rpc_xdr\\)") "")))))))
|
||||
"void __guix_disabled()")))))))
|
||||
(native-inputs
|
||||
(list doxygen
|
||||
graphviz
|
||||
@@ -579,9 +556,7 @@ stored with user-specified precision.")
|
||||
(inputs
|
||||
(list fftwf
|
||||
`(,hwloc-2 "lib")
|
||||
libtirpc
|
||||
lmfit
|
||||
muparser
|
||||
openblas
|
||||
perl
|
||||
tinyxml2
|
||||
|
||||
+13
-63
@@ -1185,19 +1185,16 @@ Chez Scheme.")
|
||||
(define-public chez-irregex
|
||||
(package
|
||||
(name "chez-irregex")
|
||||
(version "0.9.11")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"http://synthcode.com/scheme/irregex/irregex-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"026kzl96pmwbjqdc7kh8rdh8ng813sjvdsik0dag5acza20sjm19"))
|
||||
(patches
|
||||
;; TODO: Remove this patch if upstream release a new version.
|
||||
;; See https://github.com/ashinn/irregex/issues/49
|
||||
(search-patches "chez-irregex-import-cond-expand.patch"))))
|
||||
(version "0.9.4")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/fedeinthemix/chez-irregex")
|
||||
(commit (string-append "v" version))))
|
||||
(sha256
|
||||
(base32 "0jh6piylw545j81llay9wfivgpv6lcnwd81gm4w17lkasslir50q"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
(list chez-matchable)) ; for tests
|
||||
@@ -1207,21 +1204,11 @@ Chez Scheme.")
|
||||
(list chez-scheme))
|
||||
(arguments
|
||||
(list #:make-flags (chez-make-flags name version)
|
||||
#:tests? #f ; no test available for Chez Scheme
|
||||
#:test-target "test"
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(replace 'configure
|
||||
#$configure-chezschemelibdirs)
|
||||
(replace 'build
|
||||
(lambda* (#:key make-flags #:allow-other-keys)
|
||||
(apply invoke `("make" "chez-build"
|
||||
,@make-flags))))
|
||||
(replace 'install
|
||||
(lambda* (#:key make-flags #:allow-other-keys)
|
||||
(apply invoke `("make" "chez-install"
|
||||
,@make-flags))
|
||||
(apply invoke `("make" "chez-install-src"
|
||||
,@make-flags)))))))
|
||||
(home-page "https://synthcode.com/scheme/irregex")
|
||||
#$configure-chezschemelibdirs))))
|
||||
(home-page "https://github.com/fedeinthemix/chez-irregex")
|
||||
(synopsis "Portable regular expression library for Scheme")
|
||||
(description "This package provides a portable and efficient
|
||||
R[4567]RS implementation of regular expressions, supporting both POSIX
|
||||
@@ -1386,40 +1373,3 @@ required to port the program @code{Scmutils} to Chez Scheme.")
|
||||
Scmutils program to Chez Scheme. The port consists of a set of
|
||||
libraries providing most of the functionality of the original.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public schemesh
|
||||
(package
|
||||
(name "schemesh")
|
||||
(version "0.9.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/cosmos72/schemesh")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256 (base32 "0rnd2mz3vnsxdac5q7i625mkmfc1znp865wxdqqx1c6dqb26bqrv"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-Makefile
|
||||
(lambda _
|
||||
(substitute* "Makefile"
|
||||
(("CC=cc")
|
||||
(string-append "CC=" #$(cc-for-target)))
|
||||
(("^(prefix[^/]*)/.*" all prefix)
|
||||
(string-append prefix #$output "\n")))))
|
||||
(delete 'configure))))
|
||||
(inputs (list chez-scheme
|
||||
lz4
|
||||
zlib
|
||||
ncurses
|
||||
`(,util-linux "lib")))
|
||||
(home-page "https://github.com/cosmos72/schemesh")
|
||||
(synopsis "Unix shell and Lisp REPL, fused together")
|
||||
(description "Schemesh is an interactive shell scriptable in Lisp. It
|
||||
supports interactive line editing, autocompletion, history and the familiar Unix
|
||||
shell syntax.")
|
||||
(license license:gpl2)))
|
||||
|
||||
+2
-2
@@ -72,7 +72,7 @@
|
||||
(define-public cuirass
|
||||
(package
|
||||
(name "cuirass")
|
||||
(version "1.3.3")
|
||||
(version "1.3.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -82,7 +82,7 @@
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0zq56wdjyxnmhr93358db95cc9i7qkffk98vscjr26pb4ab3ym21"))))
|
||||
"0d6ngj51q3pixi2qakc6asvaigqg0cw1qvbwvpkx285zm9csx1vd"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:modules `((guix build utils)
|
||||
|
||||
+15
-4
@@ -156,12 +156,15 @@ using the CMake build system.")
|
||||
(define %common-disabled-tests/hurd
|
||||
'("CTestTestTimeout"
|
||||
"CTestTestRerunFailed"
|
||||
"RunCMake.CompilerChange"
|
||||
"RunCMake.ctest_test"
|
||||
"RunCMake.file"
|
||||
"RunCMake.BundleUtilities"
|
||||
"RunCMake.configure_file"
|
||||
"RunCMake.CTestTimeout"
|
||||
"RunCMake.CTestTimeoutAfterMatch"
|
||||
"RunCMake.CTestCommandLine"
|
||||
;; Fixed in v4.0.0
|
||||
"RunCMake.RuntimePath"))
|
||||
"RunCMake.CommandLine"
|
||||
"RunCMake.CTestCommandLine"))
|
||||
|
||||
(define %preserved-third-party-files
|
||||
'(;; 'Source/cm_getdate.c' includes archive_getdate.c wholesale, so it must
|
||||
@@ -244,7 +247,15 @@ using the CMake build system.")
|
||||
;; CMake uses its own configure script.
|
||||
(replace 'configure
|
||||
(lambda* (#:key (configure-flags '()) #:allow-other-keys)
|
||||
(apply invoke "./configure" configure-flags))))))
|
||||
(apply invoke "./configure" configure-flags)))
|
||||
#$@(if (target-hurd?)
|
||||
#~((add-after 'unpack 'patch-hurd
|
||||
(lambda _
|
||||
;; Version 3.25.0 has a similar fix.
|
||||
(substitute* "Utilities/cmlibuv/src/unix/udp.c"
|
||||
(("!defined\\(__QNX__\\)")
|
||||
"!defined(__GNU__)")))))
|
||||
#~()))))
|
||||
(inputs
|
||||
(list bzip2
|
||||
curl
|
||||
|
||||
+7
-22
@@ -424,7 +424,7 @@ COCOMO model or user-provided parameters.")
|
||||
(define-public cloc
|
||||
(package
|
||||
(name "cloc")
|
||||
(version "2.06")
|
||||
(version "2.02")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -433,7 +433,7 @@ COCOMO model or user-provided parameters.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "02l56ks3p3344nf6lz9s3aym9f0xslkns8q8d8zm1i3whf98iymv"))))
|
||||
(base32 "1syh1gppjr3p2m9mq0zm3n47bhaksxcn5bx1nwqc29xn404c2fm9"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
(list bash-minimal
|
||||
@@ -627,21 +627,6 @@ functionality such as HTML output.")
|
||||
(sha256
|
||||
(base32 "13xmr249c6qygm14gilb0icrsgb35ghsrr14a1zvppmxy9jf5a7g"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-source
|
||||
(lambda _
|
||||
;; Prevent setuptools.errors.InvalidConfigError:
|
||||
;; License classifiers have been superseded by license expressions
|
||||
;; (see https://peps.python.org/pep-0639/). Please remove:
|
||||
;; License :: OSI Approved :: Apache Software License
|
||||
;; Reported upstream:
|
||||
;; https://github.com/eriwen/lcov-to-cobertura-xml/pull/65
|
||||
(substitute* "setup.cfg"
|
||||
(("\tLicense :: OSI Approved :: Apache Software License\n")
|
||||
"")))))))
|
||||
(native-inputs
|
||||
(list python-pytest
|
||||
python-setuptools
|
||||
@@ -1057,17 +1042,17 @@ in a project.")
|
||||
(define-public universal-ctags
|
||||
(package
|
||||
(name "universal-ctags")
|
||||
(version "6.2.1")
|
||||
(version "6.1.20250525.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/universal-ctags/ctags")
|
||||
(commit (string-append "v" version))))
|
||||
(commit (string-append "p" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"04i9fhhifs82d39z2dskscp7v2885g7isjn9r9zm4wsl6dcnb5n7"))
|
||||
"0nxhmpzkxixb303bsihd5j7n0d29ak2lgnqff920q3dm33y965sy"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
@@ -1149,5 +1134,5 @@ requirements is not met.")
|
||||
(properties '((lint-hidden-cpe-vendors . ("vmware"))))
|
||||
(license license:expat)))
|
||||
|
||||
(define-deprecated-package python-xenon
|
||||
xenon)
|
||||
(define-public python-xenon
|
||||
(deprecated-package "python-xenon" xenon))
|
||||
|
||||
+66
-148
@@ -9,7 +9,7 @@
|
||||
;;; Copyright © 2019-2022 Marius Bakke <marius@gnu.org>
|
||||
;;; Copyright © 2020, 2022 Timothy Sample <samplet@ngyro.com>
|
||||
;;; Copyright © 2020 Guy Fleury Iteriteka <gfleury@disroot.org>
|
||||
;;; Copyright © 2021, 2025 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2021 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2021 Chris Marusich <cmmarusich@gmail.com>
|
||||
;;; Copyright © 2021 Julien Lepiller <julien@lepiller.eu>
|
||||
;;; Copyright © 2021 Pierre Langlois <pierre.langlois@gmx.com>
|
||||
@@ -38,8 +38,6 @@
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages bash)
|
||||
#:use-module (gnu packages c)
|
||||
#:use-module (gnu packages digest)
|
||||
#:use-module (gnu packages elf)
|
||||
#:use-module (gnu packages gcc)
|
||||
#:use-module (gnu packages m4)
|
||||
#:use-module (gnu packages gawk)
|
||||
@@ -1241,8 +1239,7 @@ ac_cv_c_float_format='IEEE (little-endian)'
|
||||
"--build=i686-unknown-linux-gnu"
|
||||
"--host=i686-unknown-linux-gnu"
|
||||
"--with-sysroot=/"
|
||||
,(string-append "--prefix=" out))))))
|
||||
(properties '((max-silent-time . 7200)))))
|
||||
,(string-append "--prefix=" out))))))))
|
||||
|
||||
(define gnu-make-mesboot
|
||||
(package
|
||||
@@ -1840,8 +1837,7 @@ exec " gcc "/bin/" program
|
||||
(format (current-error-port) "C_INCLUDE_PATH=~a\n" (getenv "C_INCLUDE_PATH"))
|
||||
(format (current-error-port) "CPLUS_INCLUDE_PATH=~a\n" (getenv "CPLUS_INCLUDE_PATH"))
|
||||
(format (current-error-port) "LIBRARY_PATH=~a\n"
|
||||
(getenv "LIBRARY_PATH"))))))))))
|
||||
(properties '((timeout . 72000))))) ;20 hours
|
||||
(getenv "LIBRARY_PATH"))))))))))))
|
||||
|
||||
(define gcc-mesboot-wrapper
|
||||
;; We need this so gcc-mesboot can be used to create shared binaries that
|
||||
@@ -2252,40 +2248,40 @@ exec " gcc "/bin/" program
|
||||
(source (bootstrap-origin (package-source binutils)))
|
||||
(name "binutils-cross-boot0")
|
||||
(arguments
|
||||
(ensure-keyword-arguments
|
||||
(substitute-keyword-arguments (package-arguments binutils)
|
||||
((#:modules modules '((guix build gnu-build-system)
|
||||
(guix build utils)))
|
||||
(cons '(ice-9 ftw) modules))
|
||||
((#:configure-flags cf ''())
|
||||
#~(append (list #$(string-append "--target="
|
||||
(boot-triplet))
|
||||
"--disable-gprofng") ;requires Bison
|
||||
#$cf))
|
||||
((#:phases phases '%standard-phases)
|
||||
#~(modify-phases #$phases
|
||||
(add-after 'install 'add-symlinks
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; The cross-gcc invokes 'as', 'ld', etc, without the
|
||||
;; triplet prefix, so add symlinks.
|
||||
(let ((out (assoc-ref outputs "out"))
|
||||
(triplet-prefix (string-append #$(boot-triplet)
|
||||
"-")))
|
||||
(define (has-triplet-prefix? name)
|
||||
(string-prefix? triplet-prefix name))
|
||||
(define (remove-triplet-prefix name)
|
||||
(substring name
|
||||
(string-length triplet-prefix)))
|
||||
(append (list #:guile %bootstrap-guile
|
||||
#:implicit-inputs? #f
|
||||
|
||||
(with-directory-excursion (string-append out "/bin")
|
||||
(for-each (lambda (name)
|
||||
(symlink name
|
||||
(remove-triplet-prefix name)))
|
||||
(scandir "."
|
||||
has-triplet-prefix?)))))))))
|
||||
(list #:guile %bootstrap-guile
|
||||
#:implicit-inputs? #f)))
|
||||
(native-inputs '()) ;no Bison
|
||||
#:modules '((guix build gnu-build-system)
|
||||
(guix build utils)
|
||||
(ice-9 ftw)) ; for 'scandir'
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'install 'add-symlinks
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; The cross-gcc invokes 'as', 'ld', etc, without the
|
||||
;; triplet prefix, so add symlinks.
|
||||
(let ((out (assoc-ref outputs "out"))
|
||||
(triplet-prefix (string-append #$(boot-triplet)
|
||||
"-")))
|
||||
(define (has-triplet-prefix? name)
|
||||
(string-prefix? triplet-prefix name))
|
||||
(define (remove-triplet-prefix name)
|
||||
(substring name
|
||||
(string-length triplet-prefix)))
|
||||
|
||||
(with-directory-excursion (string-append out "/bin")
|
||||
(for-each (lambda (name)
|
||||
(symlink name
|
||||
(remove-triplet-prefix name)))
|
||||
(scandir "."
|
||||
has-triplet-prefix?))))))))
|
||||
(substitute-keyword-arguments (package-arguments binutils)
|
||||
((#:configure-flags cf)
|
||||
#~(append (list #$(string-append "--target="
|
||||
(boot-triplet))
|
||||
"--disable-gprofng") ;requires Bison
|
||||
#$cf)))))
|
||||
(native-inputs '()) ;no Bison
|
||||
(inputs (%boot0-inputs))))
|
||||
|
||||
(define libstdc++-boot0
|
||||
@@ -2727,7 +2723,7 @@ memoized as a function of '%current-system'."
|
||||
(package
|
||||
(inherit gnumach-headers)
|
||||
(name "gnumach-headers-boot0")
|
||||
(version "1.8+git20250731")
|
||||
(version "1.8+git20250304")
|
||||
(source
|
||||
(origin
|
||||
(inherit (package-source gnumach-headers))
|
||||
@@ -2741,7 +2737,7 @@ memoized as a function of '%current-system'."
|
||||
"gnumach-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1dc40cf2s8jr6xhhbmy6khmig5zz1gpb4vc9c40aagccxf72jkpv")))))))
|
||||
"1mmjlcbzk1fs64q6vz2p2irp7vgbmyvm5inj3bf522gx50b3v67q")))))))
|
||||
(native-inputs (list autoconf-boot0 automake-boot0 texinfo-boot0))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments gnumach-headers)
|
||||
@@ -2791,7 +2787,7 @@ memoized as a function of '%current-system'."
|
||||
(package
|
||||
(inherit hurd-headers)
|
||||
(name "hurd-headers-boot0")
|
||||
(version "0.9.git20251029")
|
||||
(version "0.9.git20250420")
|
||||
(source
|
||||
(origin
|
||||
(inherit (package-source hurd-headers))
|
||||
@@ -2801,10 +2797,10 @@ memoized as a function of '%current-system'."
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://git.savannah.gnu.org/cgit/hurd/hurd.git/snapshot/"
|
||||
"hurd-" version ".tar.gz"))
|
||||
"hurd-v" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0pjxh4qln8m7jznqlzsz81vi38chjv64jj9824dj7wkm36gxbn3a")))))))
|
||||
"14ldrijzgqkvnii873vjlsmrjr3kvs1aksyc5b4ha8anlnnvdkg1")))))))
|
||||
(native-inputs
|
||||
(list autoconf-boot0 automake-boot0 mig-boot0))
|
||||
(inputs '()))))
|
||||
@@ -3245,8 +3241,7 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
|
||||
"libstdc++")
|
||||
,@(if (target-powerpc? (%current-system))
|
||||
(list static-bash-for-glibc)
|
||||
'())
|
||||
,(gexp-input zstd-final "lib")))
|
||||
'())))
|
||||
(substitute-keyword-arguments (package-arguments binutils)
|
||||
((#:configure-flags flags #~'())
|
||||
;; For gprofng, tell the build system where to look for libstdc++.
|
||||
@@ -3256,58 +3251,13 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
|
||||
"libstdc++")
|
||||
"/lib")))))))
|
||||
(native-inputs (list bison-boot0
|
||||
pkg-config-final ;to detect zstd
|
||||
libstdc++)) ;for gprofng
|
||||
(inputs
|
||||
(modify-inputs (match (%current-system)
|
||||
((? target-powerpc?)
|
||||
`(("bash" ,static-bash-for-glibc)
|
||||
,@(%boot2-inputs)))
|
||||
(_ (%boot2-inputs)))
|
||||
(append `(,zstd-final "lib"))))))
|
||||
|
||||
(define dwz-final
|
||||
(package
|
||||
(inherit dwz)
|
||||
(source (bootstrap-origin (package-source dwz)))
|
||||
(arguments
|
||||
(ensure-keyword-arguments
|
||||
(package-arguments dwz)
|
||||
(list #:guile %bootstrap-guile
|
||||
#:implicit-inputs? #f
|
||||
#:tests? #f
|
||||
#:allowed-references (list "out" glibc-final
|
||||
elfutils-final
|
||||
(gexp-input gcc-final "lib")
|
||||
xxhash-final
|
||||
xz-final
|
||||
zlib-final))))
|
||||
(native-inputs (list pkg-config-final)) ;without test inputs
|
||||
(inputs (modify-inputs (%boot6-inputs)
|
||||
(append elfutils-final
|
||||
xxhash-final)))))
|
||||
|
||||
(define elfutils-final
|
||||
(package
|
||||
(inherit elfutils)
|
||||
(source (bootstrap-origin (package-source elfutils)))
|
||||
(arguments
|
||||
(ensure-keyword-arguments
|
||||
(package-arguments elfutils)
|
||||
(list #:guile %bootstrap-guile
|
||||
#:implicit-inputs? #f
|
||||
;; There is no bunzip2 in the Hurd bootstrap binaries.
|
||||
#:tests? (not (target-hurd?))
|
||||
#:allowed-references (list "out" "bin"
|
||||
bash-final
|
||||
(gexp-input gcc-final "lib")
|
||||
glibc-final
|
||||
xz-final
|
||||
zlib-final))))
|
||||
(native-inputs (list m4-boot0))
|
||||
(inputs (modify-inputs (%boot6-inputs)
|
||||
(append xz-final
|
||||
zlib-final)))))
|
||||
(match (%current-system)
|
||||
((? target-powerpc?)
|
||||
`(("bash" ,static-bash-for-glibc)
|
||||
,@(%boot2-inputs)))
|
||||
(_ (%boot2-inputs))))))
|
||||
|
||||
(define zlib-final
|
||||
;; Zlib used by GCC-FINAL.
|
||||
@@ -3321,32 +3271,6 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
|
||||
,@(package-arguments zlib)))
|
||||
(inputs (%boot2-inputs))))
|
||||
|
||||
(define zstd-final
|
||||
;; Zstd used by BINUTILS-FINAL.
|
||||
(package
|
||||
(inherit zstd)
|
||||
(source (bootstrap-origin (package-source zstd)))
|
||||
(arguments
|
||||
(substitute-keyword-arguments
|
||||
(ensure-keyword-arguments
|
||||
(package-arguments zstd)
|
||||
(list #:guile %bootstrap-guile
|
||||
#:implicit-inputs? #f
|
||||
#:allowed-references (list "out" "lib" glibc-final)))
|
||||
((#:phases phases '%standard-phases)
|
||||
#~(modify-phases #$phases
|
||||
;; Avoid retaining references to bash & grep in the zstdless
|
||||
;; script.
|
||||
(delete 'patch-command-file-names)
|
||||
(add-after 'install 'unpatch-bash-shebangs
|
||||
(lambda _
|
||||
(with-directory-excursion (string-append #$output "/bin")
|
||||
(substitute* '("zstdgrep" "zstdless")
|
||||
(("#!/gnu/store/.*/bin/sh")
|
||||
"#!/bin/sh")))))
|
||||
(delete 'patch-shebangs)))))
|
||||
(inputs (%boot2-inputs))))
|
||||
|
||||
(define/system-dependent ld-wrapper-boot3
|
||||
;; A linker wrapper that uses the bootstrap Guile.
|
||||
(make-ld-wrapper "ld-wrapper-boot3"
|
||||
@@ -3561,26 +3485,24 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
|
||||
(define %boot5-inputs %boot4-inputs)
|
||||
(define with-boot5 with-boot4)
|
||||
|
||||
(define pkg-config-final
|
||||
(package
|
||||
(inherit %pkg-config) ;the native pkg-config
|
||||
(arguments
|
||||
(ensure-keyword-arguments
|
||||
(package-arguments %pkg-config)
|
||||
(list #:implicit-inputs? #f
|
||||
#:guile %bootstrap-guile)))
|
||||
(inputs (%boot2-inputs))))
|
||||
|
||||
(define (make-gnu-make-final)
|
||||
"Compute the final GNU Make, which uses the final Guile."
|
||||
(package
|
||||
(inherit (package-with-bootstrap-guile gnu-make))
|
||||
(inputs `(("guile" ,guile-final)
|
||||
,@(%boot5-inputs)))
|
||||
(native-inputs `(("pkg-config" ,pkg-config-final)))
|
||||
(arguments
|
||||
`(#:implicit-inputs? #f
|
||||
,@(package-arguments gnu-make)))))
|
||||
(let ((pkg-config (package
|
||||
(inherit %pkg-config) ;the native pkg-config
|
||||
(inputs `(("guile" ,guile-final)
|
||||
,@(%boot5-inputs)))
|
||||
(arguments
|
||||
`(#:implicit-inputs? #f
|
||||
,@(package-arguments %pkg-config))))))
|
||||
(package
|
||||
(inherit (package-with-bootstrap-guile gnu-make))
|
||||
(inputs `(("guile" ,guile-final)
|
||||
,@(%boot5-inputs)))
|
||||
(native-inputs `(("pkg-config" ,pkg-config)))
|
||||
(arguments
|
||||
`(#:implicit-inputs? #f
|
||||
,@(package-arguments gnu-make))))))
|
||||
|
||||
|
||||
(define coreutils-final
|
||||
;; The final Coreutils. Treat them specially because some packages, such as
|
||||
@@ -3627,9 +3549,6 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
|
||||
(let ((sed (with-boot6 (package-with-bootstrap-guile sed))))
|
||||
(package/inherit sed (native-inputs `(("perl" ,perl-boot0))))))
|
||||
|
||||
(define xxhash-final
|
||||
((compose with-boot6 package-with-bootstrap-guile) xxhash))
|
||||
|
||||
(define-public %final-inputs
|
||||
;; The 'glibc-final' package is not the same depending on what system is
|
||||
;; targeted, so this whole list must be parameterized.
|
||||
@@ -3655,20 +3574,19 @@ exec ~a/bin/~a-~a -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
|
||||
(native-inputs
|
||||
(list (if (target-hurd?)
|
||||
glibc-utf8-locales-final/hurd
|
||||
glibc-utf8-locales-final)))))))
|
||||
glibc-utf8-locales-final)))))
|
||||
("zstd" ,zstd)))
|
||||
("sed" ,sed-final)
|
||||
("grep" ,grep-final)
|
||||
("xz" ,xz-final)
|
||||
("coreutils" ,coreutils-final)
|
||||
("dwz" ,dwz-final)
|
||||
("make" ,(make-gnu-make-final))
|
||||
("bash" ,bash-final)
|
||||
("ld-wrapper" ,ld-wrapper)
|
||||
("binutils" ,binutils-final)
|
||||
("gcc" ,gcc-final)
|
||||
("libc" ,glibc-final)
|
||||
("libc:static" ,glibc-final "static")
|
||||
("zstd" ,zstd-final))))))
|
||||
("libc:static" ,glibc-final "static"))))))
|
||||
|
||||
(define-public canonical-package
|
||||
(let ((name->package (mlambda (system)
|
||||
|
||||
+89
-100
@@ -4,7 +4,7 @@
|
||||
;;; Copyright © 2014, 2015, 2018 Mark H Weaver <mhw@netris.org>
|
||||
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
|
||||
;;; Copyright © 2015, 2016 Eric Bavier <bavier@member.fsf.org>
|
||||
;;; Copyright © 2015, 2016, 2017, 2018, 2020, 2021, 2022, 2024, 2025 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2015, 2016, 2017, 2018, 2020, 2021, 2022, 2024 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2015, 2017, 2018 Leo Famulari <leo@famulari.name>
|
||||
;;; Copyright © 2015 Jeff Mickey <j@codemac.net>
|
||||
;;; Copyright © 2015-2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
@@ -67,7 +67,6 @@
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (guix build-system ant)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (guix build-system copy)
|
||||
#:use-module (guix build-system glib-or-gtk)
|
||||
#:use-module (guix build-system gnu)
|
||||
#:use-module (guix build-system go)
|
||||
@@ -531,14 +530,7 @@ compressed with pbzip2 can be decompressed with bzip2).")
|
||||
(list
|
||||
#:configure-flags
|
||||
'(list "-DSHRINKWRAP_PREFER_STATIC=OFF"
|
||||
"-DBUILD_TESTS=ON")
|
||||
#:phases
|
||||
'(modify-phases %standard-phases
|
||||
(add-after 'unpack 'add-missing-header
|
||||
(lambda _
|
||||
(substitute* "include/shrinkwrap/xz.hpp"
|
||||
(("#include <cstring>")
|
||||
"#include <cstring>\n#include <cstdint>")))))))
|
||||
"-DBUILD_TESTS=ON")))
|
||||
(propagated-inputs (list bzip2 xz zlib `(,zstd "lib")))
|
||||
(native-inputs (list pkg-config))
|
||||
(home-page "https://github.com/jonathonl/shrinkwrap")
|
||||
@@ -551,7 +543,7 @@ formats, including zstd, xz, gzip, and bgzf.")
|
||||
(define-public xz
|
||||
(package
|
||||
(name "xz")
|
||||
(version "5.8.1")
|
||||
(version "5.4.5")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (list (string-append "http://tukaani.org/xz/xz-" version
|
||||
@@ -560,7 +552,7 @@ formats, including zstd, xz, gzip, and bgzf.")
|
||||
version ".tar.gz")))
|
||||
(sha256
|
||||
(base32
|
||||
"0hsmg58a27jd1vq0lc6yp405978c1nfhqwndl7f10v1mk6sjay2h"))))
|
||||
"1mmpwl4kg1vs6n653gkaldyn43dpbjh8gpk7sk0gps5f6jwr0p0k"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:phases
|
||||
@@ -1468,86 +1460,73 @@ for most inputs, but the resulting compressed files are anywhere from 20% to
|
||||
(license license:asl2.0)
|
||||
(properties '((cpe-vendor . "google")))))
|
||||
|
||||
(define-public 7zip
|
||||
(package
|
||||
(name "7zip")
|
||||
(version "25.01")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/ip7z/7zip")
|
||||
(commit version)))
|
||||
(sha256
|
||||
(base32 "01jg1fkc2zsdngv3ag3pwq4x8i5x01hjxsk30n78ffwiv2ps4rmq"))
|
||||
(file-name (git-file-name name version))
|
||||
(modules '((guix build utils)
|
||||
(ice-9 regex)))
|
||||
(snippet #~(begin
|
||||
(for-each
|
||||
delete-file
|
||||
(append (find-files "CPP/7zip/Compress" "^Rar.*")
|
||||
(find-files "DOC/unRarLicense.txt")))))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:install-plan
|
||||
#~'(("DOC/" "share/doc/7zip")
|
||||
("CPP/7zip/UI/Console/_o/7z" "bin/")
|
||||
("CPP/7zip/Bundles/Format7zF/_o/7z.so" "lib/")
|
||||
("CPP/7zip/Bundles/SFXCon/_o/7zCon" "lib/7zCon.sfx"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(delete 'check)
|
||||
(add-after 'unpack 'patch-sources
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(lib (string-append out "/lib")))
|
||||
(substitute* "CPP/7zip/UI/Client7z/Client7z.cpp"
|
||||
(("if \\(!lib\\.Load\\(dllPrefix + FTEXT\\(kDllName\\)\\)\\)")
|
||||
(string-append "if (!lib.Load(FTEXT(\"" lib
|
||||
"\") + FTEXT(kDllName)) || "
|
||||
"!lib.Load(dllPrefix + FTEXT(kDllName)))")))
|
||||
(substitute* "CPP/7zip/UI/Common/ArchiveCommandLine.cpp"
|
||||
(("s = FTEXT\\(\"\\.\"\\)")
|
||||
(string-append "s = FTEXT(\"" lib "\")"))
|
||||
(("s = fas2fs\\(g_ModuleDirPrefix\\)")
|
||||
(string-append "s = FTEXT(\"" lib "\") "
|
||||
"FSTRING_PATH_SEPARATOR"))))))
|
||||
(add-before 'install 'build
|
||||
(lambda* _
|
||||
(define make-flags
|
||||
'#$(list "DISABLE_RAR=1"
|
||||
(string-append "CC=" (cc-for-target))
|
||||
(string-append "CXX=" (cxx-for-target))
|
||||
(string-append "PLATFORM="
|
||||
(cond
|
||||
((target-x86-64?) "x64")
|
||||
((target-x86-32?) "x86")
|
||||
((target-arm32?) "arm")
|
||||
((target-aarch64?) "arm64")
|
||||
(#t "")))))
|
||||
(with-directory-excursion "CPP/7zip/"
|
||||
(for-each
|
||||
(lambda (dir)
|
||||
(with-directory-excursion dir
|
||||
(apply invoke "make" "-f" "makefile.gcc" make-flags)))
|
||||
'("UI/Console"
|
||||
"Bundles/Format7zF"
|
||||
"Bundles/SFXCon"))))))))
|
||||
(home-page "https://7-zip.org")
|
||||
(synopsis "7-zip file archiver")
|
||||
(description
|
||||
"7-zip is a command-line file compressor that supports a number
|
||||
of archive formats and features self-extracting archives.")
|
||||
(license (list license:lgpl2.1+
|
||||
license:bsd-2
|
||||
license:bsd-3
|
||||
license:public-domain))))
|
||||
|
||||
(define-public p7zip
|
||||
(deprecated-package "p7zip" 7zip))
|
||||
(package
|
||||
(name "p7zip")
|
||||
(version "16.02")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://sourceforge/" name "/" name "/"
|
||||
version "/" name "_" version
|
||||
"_src_all.tar.bz2"))
|
||||
(sha256
|
||||
(base32
|
||||
"07rlwbbgszq8i7m8jh3x6j2w2hc9a72dc7fmqawnqkwlwb00mcjy"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
;; Remove non-free source files
|
||||
(for-each delete-file
|
||||
(append
|
||||
(find-files "CPP/7zip/Compress" "Rar.*")
|
||||
(find-files "CPP/7zip/Crypto" "Rar.*")
|
||||
(find-files "DOC/unRarLicense.txt")
|
||||
(find-files "Utils/file_Codecs_Rar_so.py")))
|
||||
(delete-file-recursively "CPP/7zip/Archive/Rar")
|
||||
(delete-file-recursively "CPP/7zip/Compress/Rar")
|
||||
;; Fix FTBFS with gcc-10.
|
||||
(substitute* "CPP/Windows/ErrorMsg.cpp"
|
||||
(("switch\\(errorCode\\) \\{")
|
||||
"switch(static_cast<HRESULT>(errorCode)) {"))))
|
||||
(patches (search-patches "p7zip-CVE-2016-9296.patch"
|
||||
"p7zip-CVE-2017-17969.patch"
|
||||
"p7zip-fix-build-with-gcc-11.patch"
|
||||
"p7zip-remove-unused-code.patch"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:make-flags
|
||||
(list (string-append "DEST_HOME=" (assoc-ref %outputs "out")) "all3")
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(replace 'configure
|
||||
(lambda _
|
||||
(copy-file
|
||||
,(cond ((target-x86-64?)
|
||||
"makefile.linux_amd64_asm")
|
||||
((target-x86-32?)
|
||||
"makefile.linux_x86_asm_gcc_4.X")
|
||||
(else
|
||||
"makefile.linux_any_cpu_gcc_4.X"))
|
||||
"makefile.machine")))
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
(invoke "make" "test")
|
||||
(invoke "make" "test_7z")
|
||||
(invoke "make" "test_7zr")))))))
|
||||
(native-inputs
|
||||
(cond ((target-x86-64?)
|
||||
(list yasm))
|
||||
((target-x86-32?)
|
||||
(list nasm))
|
||||
(else '())))
|
||||
(home-page "https://p7zip.sourceforge.net/")
|
||||
(synopsis "Command-line file archiver with high compression ratio")
|
||||
(description "p7zip is a command-line port of 7-Zip, a file archiver that
|
||||
handles the 7z format which features very high compression ratios.")
|
||||
(license (list license:lgpl2.1+
|
||||
license:gpl2+
|
||||
license:public-domain))))
|
||||
|
||||
(define-public gzstream
|
||||
(package
|
||||
@@ -1776,14 +1755,14 @@ or junctions, and always follows hard links.")
|
||||
(define-public zstd
|
||||
(package
|
||||
(name "zstd")
|
||||
(version "1.5.7")
|
||||
(version "1.5.6")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://github.com/facebook/zstd/releases/download/"
|
||||
"v" version "/zstd-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "18vgkvh7w6zw4jn2aj1mp0yv98m4fk52ay6da0wh4pm194gyaczb"))))
|
||||
(base32 "1h83si7s70jy7mcy0mv1c9mbkz66qqpawxs0zkmc3b1ayinf0acc"))))
|
||||
(build-system gnu-build-system)
|
||||
(outputs '("out" ;1.5MiB executables and documentation
|
||||
"lib" ;1.2MiB shared library and headers
|
||||
@@ -1850,10 +1829,6 @@ or junctions, and always follows hard links.")
|
||||
;; This isn't picked up correctly in the Makefiles.
|
||||
"EXT=.exe")
|
||||
'())
|
||||
#$@(if (target-hurd?)
|
||||
;; Uses symbols from pthread.
|
||||
`("PCMTLIB=-pthread")
|
||||
'())
|
||||
;; Auto-detection is over-engineered and buggy.
|
||||
"PCLIBDIR=lib"
|
||||
"PCINCDIR=include"
|
||||
@@ -1881,8 +1856,22 @@ speed.")
|
||||
license:public-domain ; zlibWrapper/examples/fitblk*
|
||||
license:zlib)))) ; zlibWrapper/{gz*.c,gzguts.h}
|
||||
|
||||
(define-public zstd-1.5.7
|
||||
(package
|
||||
(inherit zstd)
|
||||
;; Don't hide this package from the UI.
|
||||
(properties '())
|
||||
(version "1.5.7")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://github.com/facebook/zstd/releases/download/"
|
||||
"v" version "/zstd-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "18vgkvh7w6zw4jn2aj1mp0yv98m4fk52ay6da0wh4pm194gyaczb"))))))
|
||||
|
||||
(define-public pzstd
|
||||
(package/inherit zstd
|
||||
(package/inherit zstd-1.5.7
|
||||
(name "pzstd")
|
||||
(outputs '("out"))
|
||||
(inputs
|
||||
@@ -2434,8 +2423,8 @@ with @code{deflate} but offers more dense compression.
|
||||
The specification of the Brotli Compressed Data Format is defined in RFC 7932.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-deprecated-package google-brotli
|
||||
brotli)
|
||||
(define-public google-brotli
|
||||
(deprecated-package "google-brotli" brotli))
|
||||
|
||||
(define-public java-brotli
|
||||
(package
|
||||
|
||||
+38
-30
@@ -169,7 +169,7 @@ runtime (like runc or crun) for a single container.")
|
||||
(define-public distrobox
|
||||
(package
|
||||
(name "distrobox")
|
||||
(version "1.8.2.1")
|
||||
(version "1.8.1.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -177,7 +177,7 @@ runtime (like runc or crun) for a single container.")
|
||||
(url "https://github.com/89luca89/distrobox")
|
||||
(commit version)))
|
||||
(sha256
|
||||
(base32 "1la9qkhmj9277r6b2vfadb3fnvrwa435x6la5bwvm8ch0js2dfx0"))
|
||||
(base32 "168hjzifdvmlr4rplgp2jh4sg1dwjfmbrwj8589zys8r4kqvwfy1"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
@@ -395,46 +395,54 @@ Layer-4 sockets.")
|
||||
(package
|
||||
(name "cni-plugins")
|
||||
(version "1.8.0")
|
||||
;; TODO: Unvendor.
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/containernetworking/plugins")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(url "https://github.com/containernetworking/plugins")
|
||||
(commit (string-append "v" version))))
|
||||
(sha256
|
||||
(base32 "0bwczkf4kbrx47sa6mnp5kyn65dbg52qnlfyjyydrwshal8rz3gw"))
|
||||
(snippet
|
||||
#~(begin (use-modules (guix build utils))
|
||||
(delete-file-recursively "vendor")))))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system go-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:install-source? #f
|
||||
#: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")))))))
|
||||
`(#:unpack-path "github.com/containernetworking/plugins"
|
||||
#:tests? #f ; XXX: see stat /var/run below
|
||||
#:phases (modify-phases %standard-phases
|
||||
(replace 'build
|
||||
(lambda _
|
||||
(with-directory-excursion
|
||||
"src/github.com/containernetworking/plugins"
|
||||
(invoke "./build_linux.sh"))))
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
;; Only pkg/ns tests run without root.
|
||||
(when tests?
|
||||
(with-directory-excursion
|
||||
"src/github.com/containernetworking/plugins/pkg/ns"
|
||||
(invoke "stat" "/var/run") ; XXX: test tries to stat this directory
|
||||
(invoke "unshare" "-rmn" "go" "test")))))
|
||||
(add-before 'check 'set-test-environment
|
||||
(lambda _
|
||||
(setenv "XDG_RUNTIME_DIR" "/tmp/cni-rootless")))
|
||||
(replace 'install
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(copy-recursively
|
||||
"src/github.com/containernetworking/plugins/bin"
|
||||
(string-append (assoc-ref outputs "out") "/bin")))))))
|
||||
;; XXX: Prepare for unvendor.
|
||||
(native-inputs
|
||||
(list go-github-com-alexflint-go-filemutex
|
||||
go-github-com-buger-jsonparser
|
||||
go-github-com-containernetworking-cni
|
||||
go-github-com-coreos-go-iptables
|
||||
(list ;; go-github-com-alexflint-go-filemutex
|
||||
;; go-github-com-buger-jsonparser
|
||||
;; go-github-com-containernetworking-cni
|
||||
;; go-github-com-coreos-go-iptables
|
||||
go-github-com-coreos-go-systemd-v22
|
||||
go-github-com-godbus-dbus-v5
|
||||
go-github-com-insomniacslk-dhcp
|
||||
go-github-com-mattn-go-shellwords
|
||||
;; o-github-com-mattn-go-shellwords
|
||||
;; go-github-com-microsoft-hcsshim
|
||||
go-github-com-networkplumbing-go-nft
|
||||
;; go-github-com-networkplumbing-go-nft
|
||||
go-github-com-onsi-ginkgo-v2
|
||||
go-github-com-onsi-gomega
|
||||
go-github-com-opencontainers-selinux
|
||||
@@ -443,7 +451,7 @@ Layer-4 sockets.")
|
||||
go-github-com-vishvananda-netlink
|
||||
go-github-com-vishvananda-netns
|
||||
go-golang-org-x-sys
|
||||
go-sigs-k8s-io-knftables
|
||||
;; go-sigs-k8s-io-knftables
|
||||
util-linux))
|
||||
(home-page "https://github.com/containernetworking/plugins")
|
||||
(synopsis "Container Network Interface (CNI) network plugins")
|
||||
|
||||
+29
-112
@@ -34,7 +34,7 @@
|
||||
;;; Copyright © 2022, 2023, 2024 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2022 Antero Mejr <antero@mailbox.org>
|
||||
;;; Copyright © 2023, 2025 Sughosha <Sughosha@disroot.org>
|
||||
;;; Copyright © 2023, 2024, 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2023, 2024 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2023 Liliana Marie Prikler <liliana.prikler@gmail.com>
|
||||
;;; Copyright © 2023 Denis 'GNUtoo' Carikli <GNUtoo@cyberdimension.org>
|
||||
;;; Copyright © 2023 Foundation Devices, Inc. <hello@foundationdevices.com>
|
||||
@@ -49,7 +49,6 @@
|
||||
;;; Copyright © 2025 Romain Garbage <romain.garbage@inria.fr>
|
||||
;;; Copyright © 2024, 2025 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2025 Andreas Enge <andreas@enge.fr>
|
||||
;;; Copyright © 2025 Philippe Swartvagher <phil.swart@gmx.fr>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -588,7 +587,7 @@ operating system functions.")
|
||||
(define-public lunasvg
|
||||
(package
|
||||
(name "lunasvg")
|
||||
(version "3.5.0")
|
||||
(version "3.2.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -597,11 +596,11 @@ operating system functions.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1scmm1q35j3r87117p401fg3c1bx2nkiyvc2f3svvr2m2y9ihabr"))))
|
||||
(base32 "14ppk3k6sdbf3lwhv2gjqy32vwa7ck9jcj9xfk0fxwfqbvbp6608"))))
|
||||
(build-system cmake-build-system)
|
||||
(inputs (list plutovg))
|
||||
(arguments
|
||||
'(#:configure-flags '("-DBUILD_SHARED_LIBS=ON -DUSE_SYSTEM_PLUTOVG=ON")
|
||||
'(#:configure-flags '("-DBUILD_SHARED_LIBS=ON")
|
||||
#:tests? #f)) ;No tests.
|
||||
(home-page "https://github.com/sammycage/lunasvg")
|
||||
(synopsis "SVG rendering and manipulation library in C++")
|
||||
@@ -626,20 +625,18 @@ Scalable Vector Graphics (SVG) files.")
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
;; No check target. Setting test-target to "unit_test" runs it twice.
|
||||
#:tests? #f
|
||||
#:configure-flags
|
||||
#~(list "-DBUILD_DOCUMENTATION=OFF"
|
||||
"-DBUILD_EXAMPLES=OFF"
|
||||
"-DBUILD_UNIT_TESTS=OFF")
|
||||
'(;; No check target. Setting test-target to "unit_test" runs it twice.
|
||||
#:tests? #f
|
||||
#:configure-flags
|
||||
'("-DBUILD_DOCUMENTATION=OFF" "-DBUILD_EXAMPLES=OFF")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(modify-phases %standard-phases
|
||||
;; library_test fails in chroot.
|
||||
(add-after 'unpack 'skip-library-test
|
||||
(lambda _
|
||||
(substitute* "src/unit_tests/unit_tests.cmake"
|
||||
(("misc/library_test.cpp") "")))))))
|
||||
(("misc/library_test.cpp") ""))
|
||||
#t)))))
|
||||
(native-inputs (list pkg-config))
|
||||
(home-page "https://github.com/rttrorg/rttr/")
|
||||
(synopsis "C++ Reflection Library")
|
||||
@@ -684,7 +681,7 @@ the name of the library itself, which is written in C++.")
|
||||
(define-public plutovg
|
||||
(package
|
||||
(name "plutovg")
|
||||
(version "1.3.1")
|
||||
(version "0.0.13")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -693,7 +690,7 @@ the name of the library itself, which is written in C++.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1pkil2g9vvnhn7xycha5lwya0kp9h1ndg0lszgh8nkbilnavwig9"))))
|
||||
(base32 "0y2w0qhs89bnh440z1xj65vg4c71rlwinxgs3p8bvh2fmbi7lqff"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
'(#:configure-flags '("-DBUILD_SHARED_LIBS=ON")
|
||||
@@ -703,33 +700,6 @@ the name of the library itself, which is written in C++.")
|
||||
(description "PlutoVG is a standalone 2D vector graphics library in C.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public plutosvg
|
||||
(package
|
||||
(name "plutosvg")
|
||||
(version "0.0.7")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/sammycage/plutosvg")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0vj21y4sr98mb337sr2yrgzs8ipgrnhd23qk3c1gykdxwgiy94p0"))))
|
||||
(build-system cmake-build-system)
|
||||
(native-inputs (list plutovg))
|
||||
(arguments
|
||||
'(#:configure-flags '("-DBUILD_SHARED_LIBS=ON")
|
||||
#:tests? #f)) ;No tests.
|
||||
(home-page "https://github.com/sammycage/plutovg")
|
||||
(synopsis "Tiny SVG rendering library in C")
|
||||
(description
|
||||
"PlutoSVG is a compact and efficient SVG rendering library written in C.
|
||||
It is specifically designed for parsing and rendering SVG documents embedded
|
||||
in OpenType fonts, providing an optimal balance between speed and minimal
|
||||
memory usage. It is also suitable for rendering scalable icons.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public pystring
|
||||
(package
|
||||
(name "pystring")
|
||||
@@ -1293,8 +1263,8 @@ data transfer object.")
|
||||
intuitive syntax and trivial integration.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-deprecated-package json-modern-cxx
|
||||
nlohmann-json)
|
||||
(define-public json-modern-cxx
|
||||
(deprecated-package "json-modern-cxx" nlohmann-json))
|
||||
|
||||
(define-public jthread
|
||||
(let ((commit "0fa8d394254886c555d6faccd0a3de819b7d47f8")
|
||||
@@ -1492,7 +1462,7 @@ tools (containers, algorithms) used by other QuantStack packages.")
|
||||
(define-public ccls
|
||||
(package
|
||||
(name "ccls")
|
||||
(version "0.20250815")
|
||||
(version "0.20241108")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -1500,7 +1470,7 @@ tools (containers, algorithms) used by other QuantStack packages.")
|
||||
(url "https://github.com/MaskRay/ccls")
|
||||
(commit version)))
|
||||
(sha256
|
||||
(base32 "1qpshqj08rc2ws5capyv8kl9rndh3sp2bbzambnx2l9b98pnkvj7"))
|
||||
(base32 "0474ldkkw1m46lkasdk8mn6z3q51vs4g1fbwml0sd70wgdb7h5nj"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
@@ -1726,16 +1696,16 @@ library.")
|
||||
(define-public rapidfuzz-cpp
|
||||
(package
|
||||
(name "rapidfuzz-cpp")
|
||||
(version "3.3.3")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rapidfuzz/rapidfuzz-cpp")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1ma2hpp4c53fwjb8yi7rpkgivhsw7bkd8agw3sw5zwdlwsks88xv"))))
|
||||
(version "3.3.2")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rapidfuzz/rapidfuzz-cpp")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1im0k0pjg1fnzsixl5k7j706kwwdhkw15a9hpkyr8yqbmmbg9q82"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -1743,9 +1713,8 @@ library.")
|
||||
(native-inputs (list catch2))
|
||||
(home-page "https://github.com/rapidfuzz/rapidfuzz-cpp")
|
||||
(synopsis "Rapid fuzzy string matching using the Levenshtein Distance")
|
||||
(description
|
||||
"RapidFuzz is a fast string matching library for Python and C++, which is
|
||||
using the string similarity calculations from FuzzyWuzzy.")
|
||||
(description "RapidFuzz is a fast string matching library for Python and
|
||||
C++, which is using the string similarity calculations from FuzzyWuzzy.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public cpplint
|
||||
@@ -4766,58 +4735,6 @@ written in C99.")
|
||||
(home-page "https://github.com/aklomp/base64")
|
||||
(license license:bsd-2)))
|
||||
|
||||
(define-public unordered-dense
|
||||
(package
|
||||
(name "unordered-dense")
|
||||
(version "4.8.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/martinus/unordered_dense")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "02a86p2abrjkjw6kxd2gcxhknn50mcb1shrch8fhg72n534yblr5"))))
|
||||
;; This library uses CMake as build system to distribute the package, but
|
||||
;; uses Meson to build and launch tests. Hence, the phase 'check is replaced
|
||||
;; to mimic what is defined for meson-build-system.
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
(substitute* "../source/test/app/doctest.h"
|
||||
(("#include <doctest\\.h>")
|
||||
"#include <doctest/doctest.h>"))
|
||||
(setenv "FUZZ_CORPUS_BASE_DIR"
|
||||
(string-append (getcwd) "/../source/data/fuzz/"))
|
||||
(invoke "meson" "setup" "../source/")
|
||||
(invoke "ninja" "--verbose" "-j"
|
||||
(number->string (parallel-job-count)))
|
||||
(setenv "MESON_TESTTHREADS"
|
||||
(number->string (parallel-job-count)))
|
||||
(invoke "meson" "test")))))))
|
||||
(native-inputs (list meson pkg-config))
|
||||
(inputs (list doctest fmt boost))
|
||||
(home-page "https://github.com/martinus/unordered_dense")
|
||||
(synopsis "C++17 fast and densely stored hashmap and hashset library")
|
||||
(description
|
||||
"A fast & densely stored hashmap and hashset based on robin-hood backward
|
||||
shift deletion for C++17 and later.
|
||||
|
||||
The classes @code{ankerl::unordered_dense::map} and
|
||||
@code{ankerl::unordered_dense::set} are (almost) drop-in replacements of
|
||||
@code{std::unordered_map} and @code{std::unordered_set.} While they don't have
|
||||
as strong iterator / reference stability guarantees, they are typically much
|
||||
faster. Additionally, there are @code{ankerl::unordered_dense::segmented_map}
|
||||
and @code{ankerl::unordered_dense::segmented_set} with lower peak memory usage,
|
||||
and stable references (iterators are NOT stable) on insert.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public zpp-serializer
|
||||
(package
|
||||
(name "zpp-serializer")
|
||||
|
||||
+184
-269
@@ -41,7 +41,6 @@
|
||||
;;; Copyright © 2024 Marco Baggio <guix@mawumag.com>
|
||||
;;; Copyright © 2024, 2025 Spencer King <spencer.king@wustl.edu>
|
||||
;;; Copyright © 2024-2025 Tor-björn Claesson <tclaesson@gmail.com>
|
||||
;;; Copyright © 2025 Jonas Freimuth <jonas.freimuth@posteo.de>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -79,7 +78,6 @@
|
||||
#:use-module (gnu packages crypto)
|
||||
#:use-module (gnu packages curl)
|
||||
#:use-module (gnu packages databases)
|
||||
#:use-module (gnu packages duckdb)
|
||||
#:use-module (gnu packages fontutils)
|
||||
#:use-module (gnu packages fribidi)
|
||||
#:use-module (gnu packages gawk)
|
||||
@@ -1824,7 +1822,7 @@ code for possible problems.")
|
||||
(define-public r-colorout
|
||||
(package
|
||||
(name "r-colorout")
|
||||
(version "1.3-3")
|
||||
(version "1.2-2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -1833,24 +1831,8 @@ code for possible problems.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "101mkdfk8w520vxqb5cl3spi8brgs5nrc6ciqidpxydmynp879fm"))))
|
||||
(base32 "1rsx69wjpa73c6x2hacvvvbzdzxn7wg06gizf97kasjdlb7azmp3"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'relax-c-standard
|
||||
(lambda _
|
||||
;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
|
||||
;; set custom CFLAGS for R?
|
||||
(setenv "HOME" (getcwd))
|
||||
(mkdir-p ".R")
|
||||
(with-directory-excursion ".R"
|
||||
(with-output-to-file "Makevars"
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CFLAGS=-g -O2"
|
||||
" -std=gnu17"))))))))))
|
||||
(home-page "https://github.com/jalvesaq/colorout")
|
||||
(synopsis "Colorize output in the R REPL")
|
||||
(description "@code{colorout} is an R package that colorizes R output when
|
||||
@@ -9181,16 +9163,6 @@ statistical analyses or create publication-ready tables and plots.")
|
||||
(base32 "01ly4hxwa64a0ya5gla8rvv72s9mcknsfznivjkh937pbjwb7iih"))))
|
||||
(properties `((upstream-name . "parallelDist")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(substitute* "src/Makevars"
|
||||
(("CXX_STD = CXX11")
|
||||
"CXX_STD = CXX11
|
||||
PKG_CXXFLAGS=-g -O2 -Wno-error=changes-meaning")))))))
|
||||
(propagated-inputs (list r-rcpp r-rcpparmadillo r-rcppparallel))
|
||||
(native-inputs (list r-dtw r-ggplot2 r-proxy r-rcppxptrutils r-testthat))
|
||||
(home-page "https://github.com/alexeckert/parallelDist")
|
||||
@@ -11088,13 +11060,13 @@ matrix) for the double-truncated multinormal case.")
|
||||
(define-public r-rvest
|
||||
(package
|
||||
(name "r-rvest")
|
||||
(version "1.0.5")
|
||||
(version "1.0.4")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "rvest" version))
|
||||
(sha256
|
||||
(base32 "005wadzdhxf6hgr8vl4nl0nfi2crj6467mhwbccqfy26njh38z0y"))))
|
||||
(base32 "19lw0jk8d8x88z247hz761gwbx9f5n3yqnv63mn7pkwl55mpqw3x"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -12802,18 +12774,6 @@ weights.")
|
||||
(list
|
||||
#:phases
|
||||
'(modify-phases %standard-phases
|
||||
;; write_file_attachments copies files from the store but does not
|
||||
;; check their permissions. The files end up with read-only
|
||||
;; permissions. As a result, they cannot be overwritten in
|
||||
;; subsequent passes. This is especially problematic in downstream
|
||||
;; packages like r-bslib.
|
||||
(add-after 'unpack 'fix-file-permissions
|
||||
(lambda _
|
||||
(substitute* "R/layers.R"
|
||||
(("recursive = TRUE")
|
||||
"recursive = TRUE, copy.mode = FALSE")
|
||||
(("fs::file_copy\\(src, dest, overwrite = TRUE\\)")
|
||||
"file.copy(src, dest, overwrite = TRUE, copy.mode = FALSE)"))))
|
||||
;; One test fails when the current locale is the C locale.
|
||||
(add-before 'check 'set-test-locale
|
||||
(lambda _ (setenv "LC_ALL" "en_US.UTF-8"))))))
|
||||
@@ -12909,11 +12869,12 @@ Markdown documents. More generally, icons can be inserted in any
|
||||
"inst/lib/bs5/dist/js/bootstrap.bundle.min.js")))))
|
||||
(properties
|
||||
`((upstream-name . "bslib")
|
||||
(updater-ignored-native-inputs . ("r-rmarkdown" "r-shiny"))
|
||||
(updater-extra-native-inputs . ("r-testthat" "r-yaml"))))
|
||||
(updater-ignored-native-inputs . ("r-rmarkdown" "r-shiny"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
;; Some tests require shiny, leading to a dependency cycle.
|
||||
#:tests? #false
|
||||
#:modules '((guix build r-build-system)
|
||||
(guix build minify-build-system)
|
||||
(guix build utils)
|
||||
@@ -12922,19 +12883,6 @@ Markdown documents. More generally, icons can be inserted in any
|
||||
(guix build minify-build-system))
|
||||
#:phases
|
||||
#~(modify-phases (@ (guix build r-build-system) %standard-phases)
|
||||
;; When using themes, bslib copies theme dependencies, such as
|
||||
;; bootstrap.bundle.min.js or selectize.min.js, into a temporary
|
||||
;; directory. Since these files are copied from the read-only
|
||||
;; store, they end up with read-only permissions. As a result,
|
||||
;; bslib cannot overwrite these files as needed, because it has no
|
||||
;; permission to write to the files.
|
||||
(add-after 'unpack 'fix-file-permissions
|
||||
(lambda _
|
||||
(substitute* "R/bs-dependencies.R"
|
||||
(("overwrite = TRUE")
|
||||
(string-append "overwrite = TRUE, copy.mode = FALSE"))
|
||||
(("file.copy\\(precompiled_css, out_file\\)")
|
||||
"file.copy(precompiled_css, out_file, copy.mode = FALSE)"))))
|
||||
(add-after 'unpack 'process-javascript
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(with-directory-excursion "inst/"
|
||||
@@ -12952,37 +12900,7 @@ Markdown documents. More generally, icons can be inserted in any
|
||||
(,(assoc-ref inputs "js-bootstrap4-bundle")
|
||||
. "lib/bs4/dist/js/bootstrap.bundle.min.js")
|
||||
(,(assoc-ref inputs "js-bootstrap5-bundle")
|
||||
. "lib/bs5/dist/js/bootstrap.bundle.min.js"))))))
|
||||
;; Some tests require shiny, leading to a dependency cycle.
|
||||
(add-after 'unpack 'disable-bad-tests
|
||||
(lambda _
|
||||
(with-directory-excursion "tests/testthat/"
|
||||
(substitute* "test-layout.R"
|
||||
((".*layout_columns\\(\\) with col_widths.*" m)
|
||||
(string-append m "skip('skip');\n")))
|
||||
(substitute* "test-navs-legacy.R"
|
||||
((".*navset_bar\\(\\) warns if using deprecated args.*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*navset_bar\\(\\) warns if `navbar_options\\(\\)` collide with direct deprecated options.*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*shiny:navbarPage\\(\\) is unaffected.*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*navbar markup snapshots.*" m)
|
||||
(string-append m "skip('skip');\n")))
|
||||
(substitute* "test-page.R"
|
||||
((".*page_sidebar\\(\\).*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*save_html\\(\\) works on components and pages with a custom theme.*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*functions can handle trailing commas.*" m)
|
||||
(string-append m "skip('skip');\n")))
|
||||
(substitute* "test-sidebar.R"
|
||||
((".*sidebar\\(\\) - assigns a random `id` if collapsible and `id` not provided.*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*sidebar\\(\\) - sets `aria-expanded` correctly on collapse toggle.*" m)
|
||||
(string-append m "skip('skip');\n"))
|
||||
((".*sidebar\\(\\) - warns if `max_height_mobile` used with `open != 'always'.*" m)
|
||||
(string-append m "skip('skip');\n")))))))))
|
||||
. "lib/bs5/dist/js/bootstrap.bundle.min.js")))))))))
|
||||
(propagated-inputs
|
||||
(list r-base64enc
|
||||
r-cachem
|
||||
@@ -13010,9 +12928,7 @@ Markdown documents. More generally, icons can be inserted in any
|
||||
(uri "https://raw.githubusercontent.com/twbs/bootstrap/v5.3.1/dist/js/bootstrap.bundle.js")
|
||||
(sha256
|
||||
(base32
|
||||
"1bp0a2fin80hwxvd260r1jk57snsgz74vahid64yb2sgj0rlmj8a"))))
|
||||
("r-testthat" ,r-testthat)
|
||||
("r-yaml" ,r-yaml)))
|
||||
"1bp0a2fin80hwxvd260r1jk57snsgz74vahid64yb2sgj0rlmj8a"))))))
|
||||
(home-page "https://rstudio.github.io/bslib/")
|
||||
(synopsis "Custom Bootstrap Sass themes for shiny and rmarkdown")
|
||||
(description
|
||||
@@ -19642,22 +19558,6 @@ phylogenies and ancestral character states.")
|
||||
(base32 "0by01x4qpf1pin5l61wmm600bmsnlnns9knwb0qmjlj72pmwfkqh"))))
|
||||
(properties `((upstream-name . "dtwclust")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
|
||||
;; set custom CFLAGS for R?
|
||||
(setenv "HOME" (getcwd))
|
||||
(mkdir-p ".R")
|
||||
(with-directory-excursion ".R"
|
||||
(with-output-to-file "Makevars"
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CXXFLAGS=-g -O2"
|
||||
" -Wno-error=changes-meaning\n"))))))))))
|
||||
(propagated-inputs
|
||||
(list r-clue
|
||||
r-cluster
|
||||
@@ -19731,22 +19631,6 @@ normalizations, minimum variance matching, and so on.")
|
||||
"1xvcd97ikqsfdpk2fddy3k0z1ajqga7nv9bgac9c1wnjk1gqrpgh"))))
|
||||
(properties `((upstream-name . "SDMTools")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
'(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-constants
|
||||
(lambda _
|
||||
;; Older versions of R used to define PI. As of R 4.5.0 the
|
||||
;; definition from the default math headers is supposed to be
|
||||
;; used instead.
|
||||
(substitute* "src/pointinpolygon.c"
|
||||
(("double TWOPI = " m)
|
||||
(string-append "#define PI M_PI\n" m)))
|
||||
(with-fluids ((%default-port-encoding "ISO-8859-1"))
|
||||
(substitute* "src/vincenty.geodesics.c"
|
||||
(("#include <math.h>" m)
|
||||
(string-append m "\n#define PI M_PI")))))))))
|
||||
(propagated-inputs (list r-r-utils))
|
||||
(home-page "https://www.rforge.net/SDMTools/")
|
||||
(synopsis "Species distribution modelling tools")
|
||||
@@ -21397,18 +21281,7 @@ provides some missing S-PLUS functionality in R.")
|
||||
#define ERROR ),error(R_problem_buf);}
|
||||
#define WARNING(x) ),warning(R_problem_buf);}
|
||||
#define WARN WARNING(NULL)
|
||||
" m)))))
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* "src/ut_alloc.c"
|
||||
(("Calloc") "R_Calloc")
|
||||
(("Free") "R_Free")
|
||||
(("Realloc") "R_Realloc")))))))
|
||||
" m))))))))
|
||||
(propagated-inputs
|
||||
(list r-mass r-splus2r))
|
||||
(home-page "https://cran.r-project.org/web/packages/ifultools/")
|
||||
@@ -22164,18 +22037,18 @@ posterior predictive checking, and quantifying uncertainty.")
|
||||
(define-public r-import
|
||||
(package
|
||||
(name "r-import")
|
||||
(version "1.3.4")
|
||||
(version "1.3.2")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "import" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0i87mlhjig7hzk8fgk3yij1shfwbwa4r05jagibqlv7rabls260g"))))
|
||||
"0ngakg8jqn76c05hrglp4hmmwvm5a9ldc9s1i83a9rc8lni6nb1j"))))
|
||||
(build-system r-build-system)
|
||||
(native-inputs
|
||||
(list r-knitr r-rmarkdown r-testthat))
|
||||
(home-page "https://rticulate.github.io/import/")
|
||||
(home-page "https://github.com/smbache/import")
|
||||
(synopsis "Import mechanism for R")
|
||||
(description
|
||||
"This is an alternative mechanism for importing objects from packages.
|
||||
@@ -25841,17 +25714,6 @@ cross-validation.")
|
||||
(base32 "00pxi5zj68796b3qkil3w66z446ib61xl2l5v1qia1mc9fznlzri"))))
|
||||
(properties `((upstream-name . "blavaan")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(substitute* "configure"
|
||||
;; Modifying src/Makevars directly is overruled.
|
||||
(("config\\(\\)\"")
|
||||
"config()\"
|
||||
echo \"PKG_CXXFLAGS+=-g -O2 -Wno-error=changes-meaning\" >> src/Makevars")))))))
|
||||
(propagated-inputs (list r-bayesplot
|
||||
r-bh
|
||||
r-coda
|
||||
@@ -29821,14 +29683,14 @@ package provides a minimal R interface by relying on the Rcpp package.")
|
||||
(define-public r-rcppparallel
|
||||
(package
|
||||
(name "r-rcppparallel")
|
||||
(version "5.1.11-1")
|
||||
(version "5.1.10")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "RcppParallel" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0qk3gaia5g1da5yqd9a3jcwp1f4jldj1a4r9cqpxbjqjh9a87371"))
|
||||
"0kgkjbiprfw90rdwq352z4jbnwb98s3dsv2xyzkzi413rq2709gb"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(delete-file-recursively "src/tbb/"))))
|
||||
@@ -29854,15 +29716,7 @@ package provides a minimal R interface by relying on the Rcpp package.")
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CXXFLAGS=-g -O2"
|
||||
" -Wno-error=changes-meaning\n")))))))
|
||||
;; This change lets us use GCC 13+. We need to patch things here so
|
||||
;; that packages using RcppParallel to generate code can be compiled
|
||||
;; without errors.
|
||||
(add-after 'install 'gcc-compatibility
|
||||
(lambda _
|
||||
(substitute* (string-append #$output "/site-library/RcppParallel/include/tbb/task.h")
|
||||
(("task\\* next_offloaded")
|
||||
"tbb::task* next_offloaded")))))))
|
||||
" -Wno-error=changes-meaning\n"))))))))))
|
||||
(inputs (list tbb-2020))
|
||||
(native-inputs (list r-rcpp r-runit))
|
||||
(home-page "https://rcppcore.github.io/RcppParallel/")
|
||||
@@ -32499,6 +32353,32 @@ the properties of models. This is mainly for use by other package developers
|
||||
who want to include run-time testing features in their own packages.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public r-assertive-reflection
|
||||
(package
|
||||
(name "r-assertive-reflection")
|
||||
(version "0.0-5")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "assertive.reflection" version))
|
||||
(sha256
|
||||
(base32
|
||||
"1g9lpwzy6r2xmyi2mlbcccnfgyzhzbmx5bsicf3vkffxrlkrpjn2"))))
|
||||
(properties
|
||||
`((upstream-name . "assertive.reflection")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-assertive-base))
|
||||
(native-inputs (list r-testthat))
|
||||
(home-page "https://bitbucket.org/richierocks/assertive.reflection")
|
||||
(synopsis "Assertions for checking the state of R")
|
||||
(description
|
||||
"This package provides a set of predicates and assertions for checking
|
||||
the state and capabilities of R, the operating system it is running on, and
|
||||
the IDE being used. This is mainly for use by other package developers who
|
||||
want to include run-time testing features in their own packages.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public r-assertive-types
|
||||
(package
|
||||
(name "r-assertive-types")
|
||||
@@ -32712,6 +32592,45 @@ for use by other package developers who want to include run-time testing
|
||||
features in their own packages.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public r-assertive
|
||||
(package
|
||||
(name "r-assertive")
|
||||
(version "0.3-6")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "assertive" version))
|
||||
(sha256
|
||||
(base32
|
||||
"02palil82idqhhshcdjsfsja9qkqnd0dczqzj5gbccy4hfg1c0y4"))))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-assertive-base
|
||||
r-assertive-code
|
||||
r-assertive-data
|
||||
r-assertive-data-uk
|
||||
r-assertive-data-us
|
||||
r-assertive-datetimes
|
||||
r-assertive-files
|
||||
r-assertive-matrices
|
||||
r-assertive-models
|
||||
r-assertive-numbers
|
||||
r-assertive-properties
|
||||
r-assertive-reflection
|
||||
r-assertive-sets
|
||||
r-assertive-strings
|
||||
r-assertive-types
|
||||
r-knitr))
|
||||
(native-inputs
|
||||
(list r-knitr r-testthat))
|
||||
(home-page "https://bitbucket.org/richierocks/assertive")
|
||||
(synopsis "Readable check functions to ensure code integrity")
|
||||
(description
|
||||
"This package provides lots of predicates (@code{is_*} functions) to
|
||||
check the state of your variables, and assertions (@code{assert_*} functions)
|
||||
to throw errors if they aren't in the right form.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public r-dotcall64
|
||||
(package
|
||||
(name "r-dotcall64")
|
||||
@@ -33098,21 +33017,7 @@ putative directions).")
|
||||
(build-system r-build-system)
|
||||
;; FIXME: Error in genomePartition(reader, ref) : pCoords: begin must be
|
||||
;; <= end!
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #false
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* '("src/gapSiteList.h" "src/gapSiteListList.h")
|
||||
(("Calloc") "R_Calloc")
|
||||
(("Free") "R_Free")))))))
|
||||
(arguments (list #:tests? #false))
|
||||
(inputs (list zlib))
|
||||
(propagated-inputs
|
||||
(list r-refgenome))
|
||||
@@ -35928,20 +35833,6 @@ lines. It includes maximum likelihood and Bayesian tools.")
|
||||
(base32
|
||||
"0c4svyfd7xjx9k6pl40l7y9rc67zschs0nz1l386xi1m7arsp44n"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* "src/lsConstrain.c"
|
||||
(("Calloc") "R_Calloc")
|
||||
(("Free") "R_Free")))))))
|
||||
(home-page "https://www.mayo.edu/research/labs/\
|
||||
statistical-genetics-genetic-epidemiology/software")
|
||||
(synopsis "Regression methods for IBD linkage with covariates")
|
||||
@@ -38177,7 +38068,7 @@ provided.")
|
||||
`((upstream-name . "XML")))
|
||||
(build-system r-build-system)
|
||||
(inputs
|
||||
(list libxml2-with-zlib zlib))
|
||||
(list libxml2 zlib))
|
||||
(native-inputs
|
||||
(list pkg-config))
|
||||
(home-page "https://www.omegahat.net/RSXML")
|
||||
@@ -39742,8 +39633,8 @@ integrative non-negative matrix factorization to identify shared and
|
||||
dataset-specific factors.")
|
||||
(license license:gpl3)))
|
||||
|
||||
(define-deprecated-package r-liger
|
||||
r-rliger)
|
||||
(define-public r-liger
|
||||
(deprecated-package "r-liger" r-rliger))
|
||||
|
||||
(define-public r-harmony
|
||||
(package
|
||||
@@ -41965,6 +41856,53 @@ floating point chromosomes.")
|
||||
forest) is fit on the kernel matrix of a subset of the training data.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public r-duckdb
|
||||
(package
|
||||
(name "r-duckdb")
|
||||
(version "1.2.2")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "duckdb" version))
|
||||
(sha256
|
||||
(base32 "161zxianyssvsrd2345v4bi1m2z7wj614z8343jb73vhlk6s9yyi"))
|
||||
;; This package bundles the duckdb sources and builds a custom variant
|
||||
;; of duckdb. I'd be happy to link it with our duckdb library instead,
|
||||
;; but it does not seem possible to do that.
|
||||
#;
|
||||
(snippet
|
||||
'(delete-file "src/duckdb.tar.xz"))))
|
||||
(properties
|
||||
'((upstream-name . "duckdb")
|
||||
(updater-extra-native-inputs . ("tzdata-for-tests"))
|
||||
;; We don't seem to need this and I don't want to package it now.
|
||||
(updater-ignored-native-inputs . ("r-dblog"))))
|
||||
(build-system r-build-system)
|
||||
(arguments (list #:tests? #false)) ;tests can time out on the build farm
|
||||
(propagated-inputs (list r-dbi))
|
||||
(native-inputs (list r-adbcdrivermanager
|
||||
r-arrow
|
||||
r-bit64
|
||||
r-callr
|
||||
r-clock
|
||||
r-dbitest
|
||||
r-dbplyr
|
||||
r-dplyr
|
||||
r-remotes
|
||||
r-rlang
|
||||
r-testthat
|
||||
r-tibble
|
||||
r-vctrs
|
||||
r-withr
|
||||
tzdata-for-tests))
|
||||
(home-page "https://r.duckdb.org/")
|
||||
(synopsis "DBI package for the DuckDB database management system")
|
||||
(description
|
||||
"The DuckDB project is an embedded analytical data management system with
|
||||
support for the Structured Query Language (SQL). This package includes all of
|
||||
DuckDB and an R Database Interface (DBI) connector.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public r-dummies
|
||||
(package
|
||||
(name "r-dummies")
|
||||
@@ -43101,13 +43039,13 @@ It also provides a small number of bug fixes to the original code.")
|
||||
(define-public r-torch
|
||||
(package
|
||||
(name "r-torch")
|
||||
(version "0.16.3")
|
||||
(version "0.14.2")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "torch" version))
|
||||
(sha256
|
||||
(base32 "0gqjg9qhsrwh5cvdlk6lyqp2j1d3kr49im3m2ja4c3wkjpk9swhv"))))
|
||||
(base32 "1j0wgxr25h91c7x48svmgd0pbjl2ljn8rv6rsgw5a56vdgr992nb"))))
|
||||
(properties
|
||||
'((upstream-name . "torch")
|
||||
(updater-ignored-native-inputs . ("r-aten"))
|
||||
@@ -43134,7 +43072,8 @@ It also provides a small number of bug fixes to the original code.")
|
||||
inputs "/lib/liblantern.so")
|
||||
(string-append deps "/liblantern.so")))))))))
|
||||
(inputs
|
||||
(list liblantern python-pytorch-for-r-torch))
|
||||
(list python-pytorch-for-r-torch
|
||||
liblantern))
|
||||
(propagated-inputs
|
||||
(list r-bit64
|
||||
r-callr
|
||||
@@ -45626,13 +45565,7 @@ techniques to average Bayesian predictive distributions.")
|
||||
(setenv "TZ" "UTC+1")
|
||||
(setenv "TZDIR"
|
||||
(search-input-directory inputs
|
||||
"share/zoneinfo"))))
|
||||
(add-before 'install 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(substitute* "src/Makevars"
|
||||
(("CXX_STD = CXX17")
|
||||
"CXX_STD = CXX17
|
||||
PKG_CXXFLAGS+=-g -O2 -Wno-error=changes-meaning")))))))
|
||||
"share/zoneinfo")))))))
|
||||
(native-inputs
|
||||
(list r-knitr
|
||||
r-matrix
|
||||
@@ -46539,19 +46472,6 @@ download images.")
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
|
||||
;; set custom CFLAGS for R?
|
||||
(setenv "HOME" (getcwd))
|
||||
(mkdir-p ".R")
|
||||
(with-directory-excursion ".R"
|
||||
(with-output-to-file "Makevars"
|
||||
(lambda _
|
||||
(display (string-append
|
||||
"CFLAGS=-g -O2"
|
||||
" -std=gnu11"
|
||||
" -Wno-error=implicit-function-declaration\n")))))))
|
||||
(add-before 'install 'install-server-binary
|
||||
;; Makevars tries to install to R's store directory.
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
@@ -47822,6 +47742,40 @@ user-level code from spatstat which performs geometrical operations, except
|
||||
for the geometry of linear networks.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public r-spatstat-core
|
||||
(package
|
||||
(name "r-spatstat-core")
|
||||
(version "2.4-4")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "spatstat.core" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0fyi8y1z919nzn47kaviln7gflhcp5qdi3gfvf7nwkdix3pkk373"))))
|
||||
(properties `((upstream-name . "spatstat.core")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-abind
|
||||
r-goftest
|
||||
r-matrix
|
||||
r-mgcv
|
||||
r-nlme
|
||||
r-rpart
|
||||
r-spatstat-data
|
||||
r-spatstat-geom
|
||||
r-spatstat-random
|
||||
r-spatstat-sparse
|
||||
r-spatstat-utils
|
||||
r-tensor))
|
||||
(native-inputs (list r-spatstat-model))
|
||||
(home-page "https://spatstat.org/")
|
||||
(synopsis "Core functionality of the spatstat package")
|
||||
(description
|
||||
"This is a subset of the original spatstat package, containing all of the
|
||||
user-level code from spatstat, except for the code for linear networks.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public r-spatstat-linnet
|
||||
(package
|
||||
(name "r-spatstat-linnet")
|
||||
@@ -48094,22 +48048,6 @@ importance measure as introduced in Kursa (2014)
|
||||
(base32
|
||||
"05x9wgzsmx4vb12lmcspymgmpb2xw8bwryb8ysg7vzg2nkh0ma3g"))))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
'(modify-phases %standard-phases
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* '("src/featContrib.c"
|
||||
"src/featContribClass.c"
|
||||
"src/forest.c")
|
||||
(("Calloc") "R_Calloc")
|
||||
(("Free") "R_Free")))))))
|
||||
(propagated-inputs
|
||||
(list r-randomforest))
|
||||
(home-page "https://r-forge.r-project.org/projects/rffc/")
|
||||
@@ -50257,8 +50195,8 @@ other R users.")
|
||||
(license license:gpl3)))
|
||||
|
||||
;; This is for r-seurat5
|
||||
(define-deprecated-package r-seurat5object
|
||||
r-seuratobject)
|
||||
(define-public r-seurat5object
|
||||
(deprecated-package "r-seurat5object" r-seuratobject))
|
||||
|
||||
(define-public r-seurat
|
||||
(package
|
||||
@@ -50338,8 +50276,8 @@ discovery of differentially expressed genes and markers.")
|
||||
|
||||
;; Seurat5 is only available via the seurat5 branch. It will replace r-seurat
|
||||
;; eventually once it has been released to CRAN.
|
||||
(define-deprecated-package r-seurat5
|
||||
r-seurat)
|
||||
(define-public r-seurat5
|
||||
(deprecated-package "r-seurat5" r-seurat))
|
||||
|
||||
(define-public r-seuratdisk
|
||||
(let ((commit "877d4e18ab38c686f5db54f8cd290274ccdbe295")
|
||||
@@ -50544,20 +50482,6 @@ parabolic or user defined by custom scale factors.")
|
||||
"036cv56wf42q2p3d5h15hbrp5rc29xxy20qwv4k1qzhkq6hmw0qs"))))
|
||||
(properties `((upstream-name . "decon")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'fix-r-4.5.0
|
||||
;; Changes in R 4.5.0: C-Level Facilities.
|
||||
;; Strict R headers are now the default. This removes the legacy
|
||||
;; definitions of PI, Calloc, Realloc and Free: use M_PI,
|
||||
;; R_Calloc, R_Realloc or R_Free instead.
|
||||
;; https://cran.r-project.org/doc/manuals/r-release/NEWS.html
|
||||
(lambda _
|
||||
(substitute* "src/Ckernel.c"
|
||||
(("pow\\(PI") "pow(M_PI")
|
||||
(("fint/PI") "fint/M_PI")))))))
|
||||
(native-inputs
|
||||
(list gfortran))
|
||||
(home-page
|
||||
@@ -50594,17 +50518,6 @@ Journal of Statistical Software, 39(10), 1-24.")
|
||||
(base32 "0ydnjyprv8fz037nkfvjd8w6hg4a19lbnq4kl7yankxksjfdyqc3"))))
|
||||
(properties `((upstream-name . "densEstBayes")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(substitute* "configure"
|
||||
;; Modifying src/Makevars directly is overruled.
|
||||
(("src/Makevars")
|
||||
"src/Makevars
|
||||
echo \"PKG_CXXFLAGS+=-g -O2 -Wno-error=changes-meaning\" >> src/Makevars")))))))
|
||||
(propagated-inputs
|
||||
(list r-bh
|
||||
r-mass
|
||||
@@ -51623,16 +51536,18 @@ avoid system fonts to make sure your outputs are reproducible.")
|
||||
"--without-harfbuzz")))))
|
||||
("static-harfbuzz"
|
||||
,(package
|
||||
(inherit harfbuzz)
|
||||
(inherit (static-package harfbuzz))
|
||||
(arguments
|
||||
`(#:tests? #false ; fail because shared library is disabled
|
||||
#:configure-flags
|
||||
(list "--default-library=static"
|
||||
"--default-both-libraries=static"
|
||||
"-Dfreetype=enabled"
|
||||
"-Dicu=disabled"
|
||||
"-Dcairo=disabled"
|
||||
"-Dglib=disabled")))))))
|
||||
(list "--enable-static=yes"
|
||||
"--enable-shared=no"
|
||||
"--with-pic=yes"
|
||||
"--with-freetype=yes"
|
||||
"--without-icu"
|
||||
"--without-cairo"
|
||||
"--without-fontconfig"
|
||||
"--without-glib")))))))
|
||||
(inputs
|
||||
(list zlib))
|
||||
(home-page "https://cran.r-project.org/package=freetypeharfbuzz")
|
||||
|
||||
@@ -1367,13 +1367,13 @@ API.")
|
||||
(home-page "https://matrix.org/docs/projects/other/olm/")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-deprecated-package libolm
|
||||
olm)
|
||||
(define-public libolm
|
||||
(deprecated-package "libolm" olm))
|
||||
|
||||
(define-public python-olm
|
||||
(package
|
||||
;; python-olm is part of olm and must be updated at the same time.
|
||||
(inherit olm)
|
||||
;; python-olm is part of libolm and must be updated at the same time.
|
||||
(inherit libolm)
|
||||
(name "python-olm")
|
||||
(build-system python-build-system)
|
||||
(arguments
|
||||
@@ -1390,7 +1390,7 @@ API.")
|
||||
(when tests?
|
||||
(add-installed-pythonpath inputs outputs)
|
||||
(invoke "pytest")))))))
|
||||
(inputs (list olm))
|
||||
(inputs (list libolm))
|
||||
(propagated-inputs
|
||||
(list python-cffi python-future))
|
||||
(native-inputs
|
||||
|
||||
@@ -179,8 +179,7 @@ tunneling, and so on.")
|
||||
(license (license:non-copyleft "file://COPYING"
|
||||
"See COPYING in the distribution."))))
|
||||
|
||||
(define-deprecated-package gnurl
|
||||
curl)
|
||||
(define-public gnurl (deprecated-package "gnurl" curl))
|
||||
|
||||
(define-public curl-ssh
|
||||
(package/inherit curl
|
||||
@@ -433,7 +432,7 @@ sugar and output formatting inspired from @code{httpie}.")
|
||||
(define-public trurl
|
||||
(package
|
||||
(name "trurl")
|
||||
(version "0.16.1")
|
||||
(version "0.9")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -442,7 +441,7 @@ sugar and output formatting inspired from @code{httpie}.")
|
||||
(commit (string-append name "-" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1zdq81smm9ddqcmvwpcm01nf812fr8p4g6i2raxv3s0rd3hi68sl"))))
|
||||
(base32 "10gsl0fdpybfcffmgf3qww7cpw3ifczl601042a2mqmwwrlx5zj7"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -452,7 +451,7 @@ sugar and output formatting inspired from @code{httpie}.")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'configure))))
|
||||
(native-inputs (list python-minimal perl))
|
||||
(native-inputs (list python))
|
||||
(inputs (list curl))
|
||||
(home-page "https://curl.se/trurl/")
|
||||
(synopsis "Command line tool for URL parsing and manipulation")
|
||||
|
||||
@@ -110,7 +110,7 @@ Refresh}in-DRAM mitigations effectively and as such can trigger bit flips.")
|
||||
(define-public gallia
|
||||
(package
|
||||
(name "gallia")
|
||||
(version "2.0.0b2")
|
||||
(version "1.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -119,11 +119,10 @@ 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 "0bf9zq89dcnnm8ir322l69assrhxrspa97m7yk153q0vv9vib6q9"))))
|
||||
(base32 "11pyq2jn0py6n4xi5yxbsazybbdn9m8fgllqmfrsiqg9k96i6cwb"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:build-backend "poetry.core.masonry.api" ;XXX: python-uv-build is required
|
||||
;; NOTE: Test steps are sourced from GitHub Actions attached to the
|
||||
;; project. This is a minimal test suite, more precise tests require
|
||||
;; setting up local service with Bats (Bash Automated Testing System)
|
||||
|
||||
+80
-64
@@ -128,7 +128,6 @@
|
||||
#:use-module (gnu packages language)
|
||||
#:use-module (gnu packages libedit)
|
||||
#:use-module (gnu packages libevent)
|
||||
#:use-module (gnu packages libffi)
|
||||
#:use-module (gnu packages linux)
|
||||
#:use-module (gnu packages lisp)
|
||||
#:use-module (gnu packages lisp-xyz)
|
||||
@@ -206,6 +205,39 @@
|
||||
#:use-module (srfi srfi-26)
|
||||
#:use-module (ice-9 match))
|
||||
|
||||
(define-public duckdb
|
||||
(package
|
||||
(name "duckdb")
|
||||
(version "1.3.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/duckdb/duckdb")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1dg3g66az17z4snxxw7cslqdkrvbx2nnyry73yi77yp0vpri1lz8"))))
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f
|
||||
#:configure-flags
|
||||
#~(list "-DBUILD_EXTENSIONS=autocomplete;icu;json;parquet;tpch;"
|
||||
;; There is no git checkout from which to read the version tag.
|
||||
(string-append "-DOVERRIDE_GIT_DESCRIBE="
|
||||
"v" #$version "-0-g0123456789"))))
|
||||
(build-system cmake-build-system)
|
||||
(home-page "https://duckdb.org")
|
||||
(synopsis "In-process SQL OLAP database management system")
|
||||
(description "CLI and C/C++ source libraries for DuckDB, a relational
|
||||
(table-oriented) @acronym{DBMS, Database Management System} that supports
|
||||
@acronym{SQL, Structured Query Language}, contains a columnar-vectorized query
|
||||
execution engine, and provides transactional @acronym{ACID, Atomicity
|
||||
Consistency Isolation and Durability} guarantees via bulk-optimized
|
||||
@acronym{MVCC, Multi-Version Concurrency Control}. Data can be stored in
|
||||
persistent, single-file databases with support for secondary indexes.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public ephemeralpg
|
||||
(package
|
||||
(name "ephemeralpg")
|
||||
@@ -796,7 +828,7 @@ the API, and provides features such as:
|
||||
#:tests? #f
|
||||
#:build-backend "setuptools.build_meta"))
|
||||
(native-inputs
|
||||
(list python-cython
|
||||
(list python-cython-3
|
||||
python-setuptools
|
||||
python-wheel))
|
||||
(propagated-inputs
|
||||
@@ -845,30 +877,6 @@ they exist.")
|
||||
client.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public python-psycopg2cffi
|
||||
(package
|
||||
(name "python-psycopg2cffi")
|
||||
(version "2.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "psycopg2cffi" version))
|
||||
(sha256
|
||||
(base32 "0ljwsglgjm0c28dzlqlyvbz1jnn4hpmqa8dn28fkmpipv3f2w9vy"))))
|
||||
(build-system pyproject-build-system)
|
||||
;; TODO: Fix tests: ImportError: cannot import name 'psycopg2_tests' from
|
||||
;; partially initialized module 'psycopg2cffi.tests' (most likely due to a
|
||||
;; circular import)
|
||||
(arguments '(#:tests? #f))
|
||||
(propagated-inputs (list python-cffi
|
||||
python-six)) ;; hard dependency
|
||||
(native-inputs (list python-setuptools postgresql))
|
||||
(home-page "https://github.com/chtd/psycopg2cffi")
|
||||
(synopsis "Port of psycopg2 to CFFI")
|
||||
(description
|
||||
"This package is an implementation of @code{psycopg2} using CFFI.")
|
||||
(license license:lgpl3)))
|
||||
|
||||
(define-public python-pylibmc
|
||||
(package
|
||||
(name "python-pylibmc")
|
||||
@@ -1034,32 +1042,25 @@ autocompletion and syntax highlighting.")
|
||||
(define-public mycli
|
||||
(package
|
||||
(name "mycli")
|
||||
(version "1.37.1")
|
||||
(version "1.25.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "mycli" version))
|
||||
(sha256
|
||||
(base32 "03kvw0n6s3f06whr7prjfwp1arl66mahlxizv27i9dkm5ibv1qrz"))))
|
||||
(build-system pyproject-build-system)
|
||||
(base32 "0231v7f6q84mjmi1h0ni3s55m2g8p5d7x5q49bgkxlaz2bc2xwgy"))))
|
||||
(build-system python-build-system)
|
||||
(arguments
|
||||
'(#:tests? #f)) ; tests expect a running MySQL
|
||||
(native-inputs
|
||||
(list python-setuptools
|
||||
python-setuptools-scm))
|
||||
(propagated-inputs
|
||||
(list python-cli-helpers
|
||||
python-click-7
|
||||
python-click
|
||||
python-configobj
|
||||
python-cryptography
|
||||
python-prompt-toolkit
|
||||
python-pyaes
|
||||
python-pyfzf
|
||||
python-pygments
|
||||
python-pymysql
|
||||
python-pyperclip
|
||||
python-sqlglot
|
||||
python-sqlglotrs
|
||||
python-sqlparse))
|
||||
(home-page "https://www.mycli.net")
|
||||
(synopsis
|
||||
@@ -2084,8 +2085,8 @@ supports editing, navigation, and querying of recutils database files
|
||||
including field and record folding.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-deprecated-package emacs-recutils
|
||||
emacs-rec-mode)
|
||||
(define-public emacs-recutils
|
||||
(deprecated-package "emacs-recutils" emacs-rec-mode))
|
||||
|
||||
(define-public rocksdb
|
||||
(package
|
||||
@@ -3710,6 +3711,25 @@ streamlined for its use in the context of tortoise-orm. It removes support
|
||||
for many database kinds that tortoise-orm doesn't need, for example.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public python-sphinxcontrib-asyncio
|
||||
(package
|
||||
(name "python-sphinxcontrib-asyncio")
|
||||
(version "0.3.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "sphinxcontrib-asyncio" version))
|
||||
(sha256
|
||||
(base32 "0bkj010ygsr7m769llf2aq4bbjfhdwqrrabi98j8gpvyzvh2dzcr"))))
|
||||
(build-system python-build-system)
|
||||
(arguments '(#:tests? #f)) ;no test suite
|
||||
(propagated-inputs (list python-sphinx))
|
||||
(home-page "https://github.com/aio-libs/sphinxcontrib-asyncio")
|
||||
(synopsis "Sphinx extension to support coroutines in markup")
|
||||
(description "This package is a Sphinx extension providing additional
|
||||
coroutine-specific markup.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public python-asyncpg
|
||||
(package
|
||||
(name "python-asyncpg")
|
||||
@@ -4752,7 +4772,7 @@ with the @code{psycopg} PostgreSQL driver.")
|
||||
(invoke "psql" "-h" dbdir "-d" "postgres"
|
||||
"-c" "CREATE DATABASE nixbld;"))))))))
|
||||
(native-inputs
|
||||
(list python-cython
|
||||
(list python-cython-3
|
||||
python-mypy
|
||||
python-psycopg-pool
|
||||
python-pytest
|
||||
@@ -5018,8 +5038,8 @@ reasonable substitute.")
|
||||
"This package provides a Python interface to the Redis key-value store.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-deprecated-package python-aioredis
|
||||
python-redis)
|
||||
(define-public python-aioredis
|
||||
(deprecated-package "python-aioredis" python-redis))
|
||||
|
||||
(define-public python-rq
|
||||
(package
|
||||
@@ -5562,7 +5582,7 @@ __version_tuple__ = version_tuple = (~a)~%" version version-tuple))))))
|
||||
(native-inputs
|
||||
(list cmake ;needs 3.25
|
||||
pkg-config
|
||||
python-cython
|
||||
python-cython-3
|
||||
python-pytest
|
||||
python-pytest-runner
|
||||
python-setuptools-scm))
|
||||
@@ -5935,7 +5955,7 @@ a Gtk.Grid Widget.")
|
||||
"-DFORCE_INTERNAL_QHEXEDIT=OFF"
|
||||
"-DENABLE_TESTING=ON")))
|
||||
(inputs
|
||||
(list qcustomplot-qt5
|
||||
(list qcustomplot
|
||||
qhexedit
|
||||
qscintilla
|
||||
qtbase-5
|
||||
@@ -6129,16 +6149,16 @@ mechanism of @code{dogpile}.")
|
||||
(define-public datasette
|
||||
(package
|
||||
(name "datasette")
|
||||
(version "1.0a19")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/simonw/datasette")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0wb73iksrc5vg2lnq3q4vr7yhlzxwr711jfmjdndd0s77996zsfh"))))
|
||||
(version "1.0a16")
|
||||
(source (origin
|
||||
(method git-fetch) ;for tests
|
||||
(uri (git-reference
|
||||
(url "https://github.com/simonw/datasette")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"10c754idn9ka5hhai1qwjwlxw4dajdlrh162k71i5gwn4cgq6wr5"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -6148,14 +6168,7 @@ mechanism of @code{dogpile}.")
|
||||
;; These contain two unexpected extra items.
|
||||
"not test_searchable"
|
||||
" and not test_searchmode")
|
||||
"--ignore=tests/test_black.py"
|
||||
"-n" (number->string (parallel-job-count)))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-requirements
|
||||
(lambda _
|
||||
(substitute* "setup.py"
|
||||
(("\"pip\",") "")))))))
|
||||
"-n" (number->string (parallel-job-count)))))
|
||||
(propagated-inputs
|
||||
(list python-aiofiles
|
||||
python-asgi-csrf
|
||||
@@ -6177,14 +6190,17 @@ mechanism of @code{dogpile}.")
|
||||
(native-inputs
|
||||
(list nss-certs-for-test
|
||||
python-beautifulsoup4
|
||||
python-black
|
||||
python-cogapp
|
||||
python-pip
|
||||
python-pytest
|
||||
python-pytest-asyncio-0.26
|
||||
python-pytest-asyncio
|
||||
python-pytest-runner
|
||||
python-pytest-timeout
|
||||
python-pytest-xdist
|
||||
python-setuptools
|
||||
python-trustme))
|
||||
python-trustme
|
||||
python-wheel))
|
||||
(home-page "https://datasette.io/")
|
||||
(synopsis "Multi-tool for exploring and publishing data")
|
||||
(description "Datasette is a tool for exploring and publishing data.
|
||||
|
||||
@@ -148,7 +148,7 @@
|
||||
(("rm (.*) configure") "")
|
||||
(("chmod (.*) config.guess(.*)$") ""))
|
||||
(invoke "sh" "s_config"))))))
|
||||
(native-inputs (list autoconf-2.69 automake-1.16.5 libtool))
|
||||
(native-inputs (list autoconf automake-1.16.5 libtool))
|
||||
(synopsis "Berkeley database")
|
||||
(description
|
||||
"Berkeley DB is an embeddable database allowing developers the choice of
|
||||
|
||||
@@ -533,7 +533,7 @@ server and embedded PowerPC, and S390 guests.")
|
||||
(package
|
||||
(inherit american-fuzzy-lop)
|
||||
(name "aflplusplus")
|
||||
(version "4.34c")
|
||||
(version "4.33c")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -542,7 +542,7 @@ server and embedded PowerPC, and S390 guests.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"14pllv986zwzbqarbsif02k618yns4fvqd3br6irzfcwivpysqfa"))))
|
||||
"1h4ya82s1wd11c04r0g0wsq56asl1np3nmsf6yk4vyic9nm0hsq0"))))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments american-fuzzy-lop)
|
||||
((#:make-flags _ ''())
|
||||
@@ -686,7 +686,6 @@ conditions.")
|
||||
(base32
|
||||
"1mpzjaksc2qg2hzqflf39pl06p53qam2dn3hkhkcv6p00d2n4kx3"))))
|
||||
(build-system gnu-build-system)
|
||||
(native-inputs (list gcc-13))
|
||||
(home-page "https://github.com/samhocevar/zzuf")
|
||||
(synopsis "Transparent application input fuzzer")
|
||||
(description "Zzuf is a transparent application input fuzzer. It works by
|
||||
|
||||
@@ -35,14 +35,14 @@
|
||||
(define-public dezyne
|
||||
(package
|
||||
(name "dezyne")
|
||||
(version "2.19.2")
|
||||
(version "2.19.1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://dezyne.org/download/dezyne/"
|
||||
name "-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "142ng6aq7lcp0jk16yajf2bpm03db9q1wbxs5igwnvszy6aqq243"))))
|
||||
(base32 "17gpzmkafql2d3kj2yx293hgrh3l6zhjk63wcirqr7xsxjhava5n"))))
|
||||
(inputs (list bash-minimal
|
||||
boost
|
||||
guile-3.0
|
||||
|
||||
@@ -14,7 +14,6 @@
|
||||
;;; Copyright © 2022 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2025 Zhu Zihao <all_but_last@163.com>
|
||||
;;; Copyright © 2025 Nigko Yerden <nigko.yerden@gmail.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -37,24 +36,20 @@
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix download)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (guix build-system copy)
|
||||
#:use-module (guix build-system gnu)
|
||||
#:use-module (guix build-system pyproject)
|
||||
#:use-module (guix build-system python)
|
||||
#:use-module (guix build-system qt)
|
||||
#:use-module (guix build-system trivial)
|
||||
#:use-module (guix build-system copy)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (gnu packages)
|
||||
#:use-module (gnu packages autotools)
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages bash)
|
||||
#:use-module (gnu packages bison)
|
||||
#:use-module (gnu packages check)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages cpp)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages crypto)
|
||||
#:use-module (gnu packages curl)
|
||||
#:use-module (gnu packages education)
|
||||
#:use-module (gnu packages emacs)
|
||||
#:use-module (gnu packages flex)
|
||||
#:use-module (gnu packages fribidi)
|
||||
@@ -63,7 +58,6 @@
|
||||
#:use-module (gnu packages groff)
|
||||
#:use-module (gnu packages gsasl)
|
||||
#:use-module (gnu packages guile)
|
||||
#:use-module (gnu packages hunspell)
|
||||
#:use-module (gnu packages icu4c)
|
||||
#:use-module (gnu packages linux)
|
||||
#:use-module (gnu packages m4)
|
||||
@@ -71,55 +65,15 @@
|
||||
#:use-module (gnu packages pcre)
|
||||
#:use-module (gnu packages perl)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages pretty-print)
|
||||
#:use-module (gnu packages python)
|
||||
#:use-module (gnu packages python-build)
|
||||
#:use-module (gnu packages qt)
|
||||
#:use-module (gnu packages readline)
|
||||
#:use-module (gnu packages search)
|
||||
#:use-module (gnu packages speech)
|
||||
#:use-module (gnu packages tcl)
|
||||
#:use-module (gnu packages texinfo)
|
||||
#:use-module (gnu packages textutils)
|
||||
#:use-module (gnu packages video)
|
||||
#:use-module (gnu packages web)
|
||||
#:use-module (gnu packages wordnet)
|
||||
#:use-module (gnu packages xiph)
|
||||
#:use-module (gnu packages xml)
|
||||
#:use-module (gnu packages xorg))
|
||||
|
||||
(define-public cmudict
|
||||
(package
|
||||
(name "cmudict")
|
||||
(properties '((commit . "0f8072f814306c5ee4fbf992ed853601b12c01f9")
|
||||
(revision . "0")))
|
||||
(version (git-version "0"
|
||||
(assoc-ref properties 'revision)
|
||||
(assoc-ref properties 'commit)))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/cmusphinx/cmudict")
|
||||
(commit (assoc-ref properties 'commit))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0ri9r9ljbwv282lmv9cp3gmbwlanf99nhzvw83fjf12bc4nxl0qd"))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'install-license-files))))
|
||||
(home-page "https://github.com/cmusphinx/cmudict")
|
||||
(synopsis "Pronouncing English dictionary")
|
||||
(description
|
||||
"CMUdict (the Carnegie Mellon Pronouncing Dictionary) is a free
|
||||
pronouncing dictionary of English, suitable for uses in speech technology and
|
||||
is maintained by the Speech Group in the School of Computer Science at
|
||||
Carnegie Mellon University.")
|
||||
(license (license:fsdg-compatible
|
||||
"https://github.com/cmusphinx/cmudict/blob/master/LICENSE"))))
|
||||
#:use-module (gnu packages xml))
|
||||
|
||||
(define-public dico
|
||||
(package
|
||||
@@ -792,112 +746,3 @@ Guix package is installed.")
|
||||
and export them to any format and application.")
|
||||
(home-page "https://freedict.org")
|
||||
(license license:gpl2+))))
|
||||
|
||||
(define-public python-cmudict
|
||||
(package
|
||||
(name "python-cmudict")
|
||||
(version "1.1.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/prosegrinder/python-cmudict")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0ia9flqchgr975zjc9l1p379sglg9b56q9m09n05sag8368409k4"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-requirements
|
||||
(lambda _
|
||||
(substitute* "pyproject.toml"
|
||||
((".*importlib-resources.*")
|
||||
""))))
|
||||
(add-after 'ensure-no-mtimes-pre-1980 'inject-data
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((cmudict (search-input-file inputs "cmudict.dict")))
|
||||
(rmdir "src/cmudict/data")
|
||||
(copy-recursively (dirname cmudict) "src/cmudict/data"))))
|
||||
(add-after 'install 'replace-by-symlink
|
||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||
(let ((cmudict (search-input-file inputs "cmudict.dict"))
|
||||
(target (string-append (site-packages inputs outputs)
|
||||
"/cmudict/data")))
|
||||
(delete-file-recursively target)
|
||||
(symlink (dirname cmudict) target)))))))
|
||||
(native-inputs (list python-poetry-core python-pytest python-setuptools))
|
||||
(inputs (list cmudict))
|
||||
(home-page "https://github.com/prosegrinder/python-cmudict")
|
||||
(synopsis "Python wrapper for The CMU Pronouncing Dictionary data files")
|
||||
(description
|
||||
"This package provides a versioned python wrapper package for The CMU
|
||||
Pronouncing Dictionary data files.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public goldendict-ng
|
||||
(let ((commit "2cfc27361d061103a164705e7f85dbdf6cd6056f")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "goldendict-ng")
|
||||
(version (git-version "25.10.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/xiaoyifang/goldendict-ng")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0r3aykiwg1jxam72mn1yrgmndnbf0r6nz5l1brqyqbr4wq3ir0p2"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet #~(for-each delete-file-recursively
|
||||
(list "thirdparty/eb"
|
||||
"thirdparty/fmt"
|
||||
"thirdparty/tomlplusplus")))))
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list #:qtbase qtbase
|
||||
#:configure-flags
|
||||
#~(list
|
||||
;; use system fmt and toml++ instead of the bundled ones
|
||||
"-DUSE_SYSTEM_FMT=ON"
|
||||
"-DUSE_SYSTEM_TOML=ON")
|
||||
;; no tests
|
||||
#:tests? #f))
|
||||
(native-inputs (list pkg-config qttools))
|
||||
(inputs (list `(,zstd "lib")
|
||||
bzip2
|
||||
ffmpeg
|
||||
fmt
|
||||
hunspell
|
||||
icu4c
|
||||
libeb
|
||||
libvorbis
|
||||
libx11
|
||||
libxtst
|
||||
libzim
|
||||
lzo
|
||||
opencc
|
||||
qt5compat
|
||||
qtmultimedia
|
||||
qtsvg
|
||||
qtwebchannel
|
||||
qtwebengine
|
||||
tomlplusplus
|
||||
xapian
|
||||
xz
|
||||
zlib))
|
||||
(synopsis "Advanced dictionary lookup program")
|
||||
(description "GoldenDict-ng is an advanced dictionary lookup program
|
||||
that supports many dictionary formats, such as MDX, DSL, StarDict, Zim, etc.,
|
||||
as well as special types of \"dictionaries\", such as external program,
|
||||
website, audio files. Among ather features are full text search,
|
||||
Anki integration, transliteration for some languages, word stemming and
|
||||
spelling correction via Hunspell's morphology analysis, unicode case,
|
||||
diacritics, punctuation and whitespace folding. It is forked from the
|
||||
original GoldenDict which was developed at http://goldendict.org/.")
|
||||
(home-page "https://xiaoyifang.github.io/goldendict-ng/")
|
||||
(license license:gpl3+))))
|
||||
|
||||
@@ -35,7 +35,6 @@
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages cpio)
|
||||
#:use-module (gnu packages dbm)
|
||||
#:use-module (gnu packages firmware)
|
||||
#:use-module (gnu packages gettext)
|
||||
#:use-module (gnu packages ghostscript)
|
||||
#:use-module (gnu packages gnome)
|
||||
@@ -79,7 +78,7 @@
|
||||
(define-public diffoscope
|
||||
(package
|
||||
(name "diffoscope")
|
||||
(version "308")
|
||||
(version "306")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -88,7 +87,7 @@
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0g4kac0r2plhcl3drpihp2z99yfqlz36xvvfr4v6sn49zj103kny"))))
|
||||
(base32 "1cakqyf6sg4g3y3ykagnk4p0wzk285cb6b864mrafbwjkdv6m32w"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -268,7 +267,7 @@ install.")
|
||||
(define-public reprotest
|
||||
(package
|
||||
(name "reprotest")
|
||||
(version "0.7.32")
|
||||
(version "0.7.30")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -277,7 +276,7 @@ install.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0z67291rv9ii3llv2hwz9ak99818fwkxcqibb5zk8qkamh4y2bww"))))
|
||||
(base32 "013mqbbh6dcia2i4qdi4270lcgzr0k879phsaydf9b5ng9fkdajl"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
|
||||
@@ -471,14 +471,14 @@ output without any plausibility checks.")
|
||||
(define-public gptfdisk
|
||||
(package
|
||||
(name "gptfdisk")
|
||||
(version "1.0.10")
|
||||
(version "1.0.9")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://sourceforge/gptfdisk/gptfdisk/"
|
||||
version "/gptfdisk-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "10m2jgb2m6r0m6snjh0lsxr7ljw0ic5l9h3ki54yrffjqqdxdgia"))))
|
||||
(base32 "1hjh5m77fmfq5m44yy61kchv7mbfgx026aw3jy5qxszsjckavzns"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:test-target "test"
|
||||
@@ -1052,8 +1052,8 @@ a card with a smaller capacity than stated.")
|
||||
(description "This package provides @code{parted} bindings for Python.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-deprecated-package python-parted
|
||||
python-pyparted)
|
||||
(define-public python-parted
|
||||
(deprecated-package "python-parted" python-pyparted))
|
||||
|
||||
(define-public duperemove
|
||||
(package
|
||||
|
||||
+52
-6
@@ -203,13 +203,13 @@ your project into different processes.")
|
||||
(define-public python-django
|
||||
(package
|
||||
(name "python-django")
|
||||
(version "5.2.8")
|
||||
(version "5.2.6")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "django" version))
|
||||
(sha256
|
||||
(base32 "0zvc8p4brwbj4yy8jxcannjfnik2xh4vis04c3x2r6mvlmk4h993"))))
|
||||
(base32 "0yx82k8iilz8l6wkdvjcrz75i144lf211xybrrrks6b34wvh0pns"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
'(#:test-flags
|
||||
@@ -302,13 +302,13 @@ to the @dfn{don't repeat yourself} (DRY) principle.")
|
||||
(package
|
||||
(inherit python-django)
|
||||
(name "python-django-4")
|
||||
(version "4.2.26")
|
||||
(version "4.2.23")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "django" version))
|
||||
(sha256
|
||||
(base32 "0ylxdpkiwdh8yhqxqzm90fxiagm8v7xijvdm5ha3ypmmpj3y964k"))))
|
||||
(base32 "1r7sbhllc6d903di0ydqy737s28m223lgpk69y6xhjb4dsxfmza2"))))
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments python-django)
|
||||
((#:phases phases)
|
||||
@@ -854,6 +854,29 @@ information about the current request and response as a toolbar on the
|
||||
rendered page.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public python-django-debug-toolbar-alchemy
|
||||
(package
|
||||
(name "python-django-debug-toolbar-alchemy")
|
||||
(version "0.1.5")
|
||||
(home-page "https://github.com/miki725/django-debug-toolbar-alchemy")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "django-debug-toolbar-alchemy" version))
|
||||
(sha256
|
||||
(base32
|
||||
"1kmpzghnsc247bc1dl22s4y62k9ijgy1pjms227018h5a4frsa5b"))))
|
||||
(build-system python-build-system)
|
||||
(arguments '(#:tests? #f)) ;XXX: 'make check' does "echo TODO"
|
||||
(propagated-inputs
|
||||
(list python-django python-django-debug-toolbar python-jsonplus
|
||||
python-six python-sqlalchemy))
|
||||
(synopsis "Django Debug Toolbar panel for SQLAlchemy")
|
||||
(description
|
||||
"This package completely mimics the default Django Debug Toolbar SQL
|
||||
panel (internally it is actually subclassed), but instead of displaying
|
||||
queries done via the Django ORM, SQLAlchemy generated queries are displayed.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public python-django-gravatar2
|
||||
(package
|
||||
(name "python-django-gravatar2")
|
||||
@@ -1024,6 +1047,29 @@ applications with a @var{SEARCH_URL} variable.")
|
||||
(description "Pickled object field for Django")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public python-django-bulk-update
|
||||
(package
|
||||
(name "python-django-bulk-update")
|
||||
(version "2.2.0")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "django-bulk-update" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0dxkmrm3skyw82i0qa8vklxw1ma1y308kh9w2hcnvhpacn5cxdss"))))
|
||||
(build-system python-build-system)
|
||||
(arguments
|
||||
;; XXX: Tests require a Postgres database.
|
||||
`(#:tests? #f))
|
||||
(propagated-inputs
|
||||
(list python-django))
|
||||
(home-page "https://github.com/aykut/django-bulk-update")
|
||||
(synopsis "Simple bulk update over Django ORM or with helper function")
|
||||
(description
|
||||
"Simple bulk update over Django ORM or with helper function. This
|
||||
project aims to bulk update given objects using one query over Django ORM.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public python-django-contact-form
|
||||
(package
|
||||
(name "python-django-contact-form")
|
||||
@@ -1609,8 +1655,8 @@ Django projects, which allows association of a number of tags with any
|
||||
provides features like a Web-browsable API and authentication policies.")
|
||||
(license license:bsd-2)))
|
||||
|
||||
(define-deprecated-package python-djangorestframework
|
||||
python-django-rest-framework)
|
||||
(define-public python-djangorestframework
|
||||
(deprecated-package "python-djangorestframework" python-django-rest-framework))
|
||||
|
||||
(define-public python-django-sekizai
|
||||
(package
|
||||
|
||||
+19
-16
@@ -23,7 +23,6 @@
|
||||
;;; Copyright © 2023 Hilton Chain <hako@ultrarare.space>
|
||||
;;; Copyright © 2024 John Kehayias <john.kehayias@protonmail.com>
|
||||
;;; Copyright © 2024, 2025 Ashish SHUKLA <ashish.is@lostca.se>
|
||||
;;; Copyright © 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -643,18 +642,18 @@ BIND and djbdns---whilst using relatively little memory.")
|
||||
(define-public unbound
|
||||
(package
|
||||
(name "unbound")
|
||||
(version "1.24.1")
|
||||
(version "1.24.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://www.unbound.net/downloads/unbound-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "1azfl6dkab043jjs7r8fxkh3mwxhg1wgc9q5mqcrch1rw8ricavz"))))
|
||||
(base32 "11jh8qkjxgry4mlv5lyjzycziz2vhjrm3qh722i8l0677jc24yql"))))
|
||||
(build-system gnu-build-system)
|
||||
(outputs '("out" "python"))
|
||||
(native-inputs
|
||||
(list flex pkg-config swig python-wrapper))
|
||||
(list flex swig python-wrapper))
|
||||
(inputs
|
||||
(list expat
|
||||
libevent
|
||||
@@ -721,7 +720,7 @@ struct protoent *getprotobyname(const char *name) {
|
||||
p->p_name = \"udp\";
|
||||
p->p_proto = 17;
|
||||
p->p_aliases[0] = \"UDP\";
|
||||
} else
|
||||
} else
|
||||
p = NULL;
|
||||
return p;
|
||||
}
|
||||
@@ -757,7 +756,7 @@ struct servent *getservbyname(const char *name, const char *proto) {
|
||||
s->s_name = \"domain\";
|
||||
s->s_port = htons(53);
|
||||
s->s_proto = buf;
|
||||
} else
|
||||
} else
|
||||
s = NULL;
|
||||
return s;
|
||||
}
|
||||
@@ -1080,7 +1079,7 @@ LuaJIT, both a resolver library and a daemon.")
|
||||
(define-public hnsd
|
||||
(package
|
||||
(name "hnsd")
|
||||
(version "2.0.0")
|
||||
(version "1.0.0")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1088,22 +1087,28 @@ LuaJIT, both a resolver library and a daemon.")
|
||||
(commit (string-append "v" version))))
|
||||
(sha256
|
||||
(base32
|
||||
"1pqpf9vz1d01873wvkdnmsj9y2qrk8fka4c636qipsjv6ar2ply0"))
|
||||
"1kdgff8rf8gmvwz2p758ilbjxpvz4xm6z41pa5353asg6xb853bb"))
|
||||
(file-name (git-file-name name version))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
;; Delete the bundled copy of libuv.
|
||||
(delete-file-recursively "uv")
|
||||
(substitute* "configure.ac"
|
||||
(("AC_CONFIG_SUBDIRS\\(\\[uv\\]\\)") ""))
|
||||
(substitute* "Makefile.am"
|
||||
(("SUBDIRS = uv") "\n")
|
||||
(("\\$\\(top_builddir\\)/uv/libuv.la") "-luv")
|
||||
;; Make sure the 'hnsd' binary is dynamically-linked.
|
||||
(("^hnsd_LDFLAGS = -static") "\n"))
|
||||
|
||||
;; Make sure the 'hnsd' binary is installed and
|
||||
;; dynamically-linked.
|
||||
(("noinst_PROGRAMS") "bin_PROGRAMS")
|
||||
(("hnsd_LDFLAGS = -static") ""))
|
||||
|
||||
;; This script tries to chdir to "uv" and doesn't do more
|
||||
;; than "autoreconf" so remove it.
|
||||
(delete-file "autogen.sh")))))
|
||||
(delete-file "autogen.sh")
|
||||
#t))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
'(#:configure-flags '("--disable-static"))) ;no need for libhsk.a
|
||||
@@ -1111,7 +1116,7 @@ LuaJIT, both a resolver library and a daemon.")
|
||||
(list autoconf automake libtool))
|
||||
(inputs
|
||||
(list unbound libuv))
|
||||
(home-page "https://handshake.org/")
|
||||
(home-page "https://www.handshake.org/")
|
||||
(synopsis "Resolver daemon for the Handshake naming protocol")
|
||||
(description
|
||||
"@command{hnsd} is a @dfn{host name resolver} for the Handshake Naming
|
||||
@@ -1286,7 +1291,7 @@ nameservers other than libc.")
|
||||
(define-public smartdns
|
||||
(package
|
||||
(name "smartdns")
|
||||
(version "47")
|
||||
(version "46.1")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1298,7 +1303,7 @@ nameservers other than libc.")
|
||||
((".*SYSTEMDSYSTEMUNITDIR.*") "")))
|
||||
(sha256
|
||||
(base32
|
||||
"10a4nnrnf10n4rq166yixm0va1j0sdj9vca3kpwkzgn9blwvbqph"))))
|
||||
"0jjzvm4i5978gb2xhkx7fhqwzgjnvwyk9a2d88zzv93mal7q9xi2"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:test-target "test"
|
||||
@@ -1333,8 +1338,6 @@ nameservers other than libc.")
|
||||
(add-after 'check 'leave-test-dir
|
||||
(lambda _
|
||||
(chdir "../../source"))))))
|
||||
;; NOTE: DoQ and DoH3 support require OpenSSL 3.4+, which is currently not
|
||||
;; available in Guix.
|
||||
(inputs (list openssl))
|
||||
(native-inputs (list googletest `(,isc-bind "utils") which))
|
||||
(home-page "https://github.com/pymumu/smartdns")
|
||||
|
||||
@@ -49,7 +49,6 @@
|
||||
#:use-module (gnu packages glib)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-build)
|
||||
#:use-module (gnu packages golang-check)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages golang-xyz)
|
||||
#:use-module (gnu packages linux)
|
||||
@@ -68,110 +67,6 @@
|
||||
;; of several associated packages (docker-libnetwork and go-sctp).
|
||||
(define %docker-version "20.10.27")
|
||||
|
||||
(define-public go-github-com-compose-spec-compose-go-v2
|
||||
(package
|
||||
(name "go-github-com-compose-spec-compose-go-v2")
|
||||
(version "2.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/compose-spec/compose-go")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "18z626vjd0cbqs130nsqhx0vfr6hxarvwgrw5acydy7hfv594aiq"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
#~(begin
|
||||
;; Build fails when this file is kept: Code in directory
|
||||
;; /tmp/<...>/src/github.com/compose-spec/compose-go/v2 expects
|
||||
;; import "github.com/compose-spec/compose-go"
|
||||
(delete-file "package.go")))))
|
||||
(build-system go-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:skip-build? #t
|
||||
#:embed-files
|
||||
#~(list "applicator"
|
||||
"content"
|
||||
"core"
|
||||
"format"
|
||||
"format-annotation"
|
||||
"format-assertion"
|
||||
"meta-data"
|
||||
"schema"
|
||||
"unevaluated"
|
||||
"validation")
|
||||
#:import-path "github.com/compose-spec/compose-go/v2"
|
||||
#:test-flags
|
||||
#~(list "-skip" (string-join
|
||||
;; error decoding 'services[test].environment':
|
||||
;; environment variable DEBUG is declared with a
|
||||
;; trailing space
|
||||
(list "TestEnvironmentWhitespace"
|
||||
;; ports_test.go:80: assertion failed: expected
|
||||
;; error "Invalid ip address: 127.0.1", got
|
||||
;; "invalid IP address: 127.0.1"
|
||||
"Test_transformPorts/invalid_IP"
|
||||
;; types_test.go:190: assertion failed: expected
|
||||
;; error "Invalid containerPort: 9999999", got
|
||||
;; "invalid containerPort: 9999999"
|
||||
"TestParsePortConfig")
|
||||
"|"))))
|
||||
(native-inputs
|
||||
(list go-github-com-google-go-cmp
|
||||
go-github-com-stretchr-testify
|
||||
go-gotest-tools-v3))
|
||||
(propagated-inputs
|
||||
(list go-github-com-distribution-reference
|
||||
go-github-com-docker-go-connections
|
||||
go-github-com-docker-go-units
|
||||
go-github-com-go-viper-mapstructure-v2
|
||||
go-github-com-mattn-go-shellwords
|
||||
go-github-com-opencontainers-go-digest
|
||||
go-github-com-santhosh-tekuri-jsonschema-v6
|
||||
go-github-com-sirupsen-logrus
|
||||
go-github-com-xhit-go-str2duration-v2
|
||||
go-go-yaml-in-yaml-v3
|
||||
go-golang-org-x-sync
|
||||
go-golang-org-x-text))
|
||||
(home-page "https://compose-spec.io/")
|
||||
(synopsis "Reference library for parsing and loading Compose YAML files")
|
||||
(description
|
||||
"This package provides a Golang reference library for parsing and
|
||||
loading Compose files as specified by the
|
||||
@url{https://github.com/compose-spec/compose-spec, Compose specification}.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public go-github-com-docker-go-events
|
||||
(package
|
||||
(name "go-github-com-docker-go-events")
|
||||
(version "0.0.0-20250808211157-605354379745")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/docker/go-events")
|
||||
(commit (go-version->git-ref version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0q3ylzyl670m3an32nhb0l5bsc3f4d9b963x3pjwsc94brg9l5qp"))))
|
||||
(build-system go-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:import-path "github.com/docker/go-events"))
|
||||
(propagated-inputs
|
||||
(list go-github-com-sirupsen-logrus))
|
||||
(home-page "https://github.com/docker/go-events")
|
||||
(synopsis "Composable event distribution for Golang")
|
||||
(description
|
||||
"This package implements a composable event distribution library,
|
||||
originally created to implement the notifications in
|
||||
@url{https://github.com/distribution/distribution/blob/v3.0.0/docs/content/about/notifications.md,
|
||||
Docker Registry 2}.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public go-github-com-docker-go-metrics
|
||||
(package
|
||||
(name "go-github-com-docker-go-metrics")
|
||||
|
||||
@@ -410,7 +410,7 @@ the Net to search for documents which are not on the local system.")
|
||||
(define-public zeal
|
||||
(package
|
||||
(name "zeal")
|
||||
(version "0.7.2")
|
||||
(version "0.7.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -419,11 +419,10 @@ the Net to search for documents which are not on the local system.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1slq3asssszim9y4lvqx08svilmyisk3cl35mmb676fsx7pningn"))))
|
||||
(base32 "1yz9zz18rh1d67w40ib4pna70vqkwa9i9nyj423rjysv5rdj2pzp"))))
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:qtbase qtbase
|
||||
#:tests? #f)) ;no tests
|
||||
(native-inputs
|
||||
(list extra-cmake-modules pkg-config))
|
||||
@@ -431,10 +430,12 @@ the Net to search for documents which are not on the local system.")
|
||||
(list bash-minimal
|
||||
libarchive
|
||||
sqlite
|
||||
qtdeclarative
|
||||
qtwayland
|
||||
qtwebchannel
|
||||
qtwebengine
|
||||
qtbase-5
|
||||
qtdeclarative-5
|
||||
qtwayland-5
|
||||
qtwebchannel-5
|
||||
qtwebengine-5
|
||||
qtquickcontrols-5
|
||||
qtx11extras
|
||||
xcb-util-keysyms))
|
||||
(home-page "https://zealdocs.org/")
|
||||
|
||||
@@ -41,7 +41,7 @@
|
||||
(define-public dpdk
|
||||
(package
|
||||
(name "dpdk")
|
||||
(version "25.07")
|
||||
(version "24.07")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -50,7 +50,7 @@
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"12bzmaiw4f4hz62grsp7bid0z2rpibwc21j62bfwmz4j3zci0w81"))))
|
||||
"04i4j4c5vcyldh0435hr01d2d5c0xf6y0sfg64764f79902i8p6i"))))
|
||||
(build-system meson-build-system)
|
||||
(native-inputs (list pkg-config python-minimal python-pyelftools))
|
||||
(inputs (list
|
||||
|
||||
@@ -1,198 +0,0 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2023, 2024 Greg Hogan <code@greghogan.com>
|
||||
;;; Copyright © 2023, 2025 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2024 Felix Gruber <felgru@posteo.net>
|
||||
;;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr>
|
||||
;;; Copyright © 2024, 2025 Ekaitz Zarraga <ekaitz@elenq.tech>
|
||||
;;; Copyright © 2024, 2025 Sharlatan Hellseher <sharlatanus@gmail.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 duckdb)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (guix build-system pyproject)
|
||||
#:use-module ((guix build-system python) #:select (pypi-uri))
|
||||
#:use-module (guix build-system r)
|
||||
#:use-module (guix download)
|
||||
#: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 base)
|
||||
#:use-module (gnu packages cran)
|
||||
#:use-module (gnu packages databases)
|
||||
#:use-module (gnu packages python-build)
|
||||
#:use-module (gnu packages python-science)
|
||||
#:use-module (gnu packages python-xyz)
|
||||
#:use-module (gnu packages statistics))
|
||||
|
||||
;;; Commentary:
|
||||
;;;
|
||||
;;; This module contains DuckDB - an analytical in-process SQL database
|
||||
;;; management system (https://www.duckdb.org/) and it's binding in different
|
||||
;;; programming languages with other related to DuckDB packages.
|
||||
;;;
|
||||
;;; Code:
|
||||
|
||||
(define-public duckdb
|
||||
(package
|
||||
(name "duckdb")
|
||||
(version "1.4.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/duckdb/duckdb")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1vywdhn930z4aw2ljxp5mx3cfivpvv1d88kq4rhizq3c4hpq9yf3"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
;; TODO: Find out how to run tests, see: <.github/workflows>.
|
||||
#:tests? #f
|
||||
#:configure-flags
|
||||
#~(list "-DBUILD_EXTENSIONS=autocomplete;icu;json;parquet;tpch;"
|
||||
;; There is no git checkout from which to read the version tag.
|
||||
(string-append "-DOVERRIDE_GIT_DESCRIBE="
|
||||
"v" #$version "-0-g0123456789"))))
|
||||
(home-page "https://duckdb.org")
|
||||
(synopsis "In-process SQL OLAP database management system")
|
||||
(description
|
||||
"CLI and C/C++ source libraries for DuckDB, a relational (table-oriented)
|
||||
@acronym{DBMS, Database Management System} that supports @acronym{SQL,
|
||||
Structured Query Language}, contains a columnar-vectorized query execution
|
||||
engine, and provides transactional @acronym{ACID, Atomicity Consistency
|
||||
Isolation and Durability} guarantees via bulk-optimized @acronym{MVCC,
|
||||
Multi-Version Concurrency Control}. Data can be stored in persistent,
|
||||
single-file databases with support for secondary indexes.")
|
||||
(license license:expat)))
|
||||
|
||||
;; XXX: Try to inherit from duckdb and build from source with all extensions.
|
||||
(define-public python-duckdb
|
||||
(package
|
||||
(name "python-duckdb")
|
||||
(version "1.3.2")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "duckdb" version))
|
||||
(sha256
|
||||
(base32 "1x8zb47y8lzc4w0g013sim8x9vd1h96ra3dd0bvh91y73f5dyn66"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;FIXME: See <https://codeberg.org/guix/guix/issues/1436>.
|
||||
#:test-flags
|
||||
#~(list "--ignore=tests/slow/test_h2oai_arrow.py"
|
||||
;; Do not relay on mypy.
|
||||
"--ignore=tests/stubs/test_stubs.py"
|
||||
"-k" (string-append
|
||||
;; Don't install anything, thank you.
|
||||
"not test_install_non_existent_extension"
|
||||
;; _pybind11_conduit_v1_ not found.
|
||||
" and not test_wrap_coverage"
|
||||
;; See <https://github.com/duckdb/duckdb/issues/11961>.
|
||||
" and not test_fetchmany"
|
||||
;; See <https://github.com/duckdb/duckdb/issues/10702>.
|
||||
" and not test_connection_interrupt"
|
||||
" and not test_query_interruption"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; Tests need this
|
||||
(add-before 'check 'set-HOME
|
||||
(lambda _ (setenv "HOME" "/tmp")))
|
||||
;; Later versions of pybind replace "_" with "const_name".
|
||||
(add-after 'unpack 'pybind-compatibility
|
||||
(lambda _
|
||||
(with-directory-excursion "src/include/duckdb_python"
|
||||
(substitute* '("python_objects.hpp"
|
||||
"pyfilesystem.hpp"
|
||||
"pybind11/conversions/pyconnection_default.hpp")
|
||||
(("const_name") "_"))))))))
|
||||
(propagated-inputs
|
||||
(list python-adbc-driver-manager))
|
||||
(native-inputs
|
||||
(list pybind11
|
||||
python-fsspec
|
||||
;; python-google-cloud-storage ;python-grpcio fails (see: guix/guix#1436)
|
||||
python-numpy
|
||||
python-pandas
|
||||
python-psutil
|
||||
;; python-pytest
|
||||
python-setuptools-scm
|
||||
python-setuptools
|
||||
python-wheel))
|
||||
(home-page "https://www.duckdb.org")
|
||||
(synopsis "DuckDB embedded database")
|
||||
(description "DuckDB is an in-process SQL OLAP database management
|
||||
system.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public r-duckdb
|
||||
(package
|
||||
(name "r-duckdb")
|
||||
(version "1.2.2")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "duckdb" version))
|
||||
(sha256
|
||||
(base32 "161zxianyssvsrd2345v4bi1m2z7wj614z8343jb73vhlk6s9yyi"))
|
||||
;; This package bundles the duckdb sources and builds a custom variant
|
||||
;; of duckdb. I'd be happy to link it with our duckdb library instead,
|
||||
;; but it does not seem possible to do that.
|
||||
#;
|
||||
(snippet
|
||||
'(delete-file "src/duckdb.tar.xz"))))
|
||||
(properties
|
||||
'((upstream-name . "duckdb")
|
||||
(updater-extra-native-inputs . ("tzdata-for-tests"))
|
||||
;; We don't seem to need this and I don't want to package it now.
|
||||
(updater-ignored-native-inputs . ("r-dblog"))))
|
||||
(build-system r-build-system)
|
||||
(arguments (list #:tests? #false)) ;tests can time out on the build farm
|
||||
(propagated-inputs (list r-dbi))
|
||||
(native-inputs (list r-adbcdrivermanager
|
||||
r-arrow
|
||||
r-bit64
|
||||
r-callr
|
||||
r-clock
|
||||
r-dbitest
|
||||
r-dbplyr
|
||||
r-dplyr
|
||||
r-remotes
|
||||
r-rlang
|
||||
r-testthat
|
||||
r-tibble
|
||||
r-vctrs
|
||||
r-withr
|
||||
tzdata-for-tests))
|
||||
(home-page "https://r.duckdb.org/")
|
||||
(synopsis "DBI package for the DuckDB database management system")
|
||||
(description
|
||||
"The DuckDB project is an embedded analytical data management system with
|
||||
support for the Structured Query Language (SQL). This package includes all of
|
||||
DuckDB and an R Database Interface (DBI) connector.")
|
||||
(license license:expat)))
|
||||
|
||||
;;;
|
||||
;;; Avoid adding new packages to the end of this file. To reduce the chances
|
||||
;;; of a merge conflict, place them above in alphabetic order.
|
||||
;;;
|
||||
+13
-26
@@ -68,7 +68,6 @@
|
||||
#:use-module (gnu packages language)
|
||||
#:use-module (gnu packages libreoffice)
|
||||
#:use-module (gnu packages libusb)
|
||||
#:use-module (gnu packages machine-learning)
|
||||
#:use-module (gnu packages music)
|
||||
#:use-module (gnu packages pantheon)
|
||||
#:use-module (gnu packages pdf)
|
||||
@@ -137,14 +136,14 @@ with Microsoft Compiled HTML (CHM) files")
|
||||
(define-public calibre
|
||||
(package
|
||||
(name "calibre")
|
||||
(version "8.13.0")
|
||||
(version "8.4.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "http://download.calibre-ebook.com/" version
|
||||
"/calibre-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32 "092zv9s0w87vwb5n54ps7lawjmwjqpmk93yp6lslnphpb6hqal6z"))
|
||||
(base32 "1s9m80nakclxvsw0lax9bak23qipnia74xpy9sv061jvidqb3rz6"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
@@ -165,30 +164,29 @@ with Microsoft Compiled HTML (CHM) files")
|
||||
(build-system python-build-system)
|
||||
(native-inputs
|
||||
(list bash-minimal
|
||||
cmake
|
||||
pkg-config
|
||||
python-flake8
|
||||
python-pyqt-builder
|
||||
qtbase ; for qmake
|
||||
xdg-utils))
|
||||
xdg-utils
|
||||
cmake))
|
||||
(inputs
|
||||
(list bash-minimal
|
||||
espeak-ng
|
||||
(list libxkbcommon
|
||||
ffmpeg
|
||||
font-liberation
|
||||
uchardet
|
||||
bash-minimal
|
||||
fontconfig
|
||||
font-liberation
|
||||
glib
|
||||
hunspell
|
||||
hyphen
|
||||
icu4c
|
||||
libjpeg-turbo
|
||||
libjxr
|
||||
libmtp
|
||||
libpng
|
||||
libjpeg-turbo
|
||||
libjxr
|
||||
libstemmer
|
||||
libusb
|
||||
libxkbcommon
|
||||
onnxruntime
|
||||
openssl
|
||||
optipng
|
||||
podofo
|
||||
@@ -219,16 +217,15 @@ with Microsoft Compiled HTML (CHM) files")
|
||||
python-pychm
|
||||
python-pycryptodome
|
||||
python-pygments
|
||||
python-pykakasi
|
||||
python-pyqt-6
|
||||
python-pyqtwebengine-6
|
||||
python-pykakasi
|
||||
python-regex
|
||||
python-xxhash
|
||||
speech-dispatcher
|
||||
python-zeroconf
|
||||
qtwebengine
|
||||
speech-dispatcher
|
||||
sqlite
|
||||
uchardet))
|
||||
sqlite))
|
||||
(arguments
|
||||
(list
|
||||
;; Calibre is using setuptools by itself, but the setup.py is not
|
||||
@@ -258,16 +255,6 @@ with Microsoft Compiled HTML (CHM) files")
|
||||
(substitute* "setup/plugins_mirror.py"
|
||||
(("href=\"//calibre-ebook.com/favicon.ico\"")
|
||||
"href=\"favicon.ico\""))))
|
||||
(add-after 'unpack 'skip-7z-test ;FIXME: require py7zr >= 1.0
|
||||
(lambda _
|
||||
(substitute* "src/calibre/utils/seven_zip.py"
|
||||
(("(def test_basic\\(\\).*)" line)
|
||||
(string-append line "\n return True\n")))))
|
||||
(add-after 'unpack 'skip-flaky-test
|
||||
(lambda _
|
||||
(substitute* "src/calibre/srv/tests/web_sockets.py"
|
||||
(("^([ \t]*)def test_websocket_basic\\(.*" line lead)
|
||||
(string-append line "\n" lead " return True\n")))))
|
||||
(add-before 'build 'configure
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "setup/build.py"
|
||||
|
||||
+76
-76
@@ -4,7 +4,7 @@
|
||||
;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||||
;;; Copyright © 2017-2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2018–2021 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2018-2025 Nicolas Goaziou <mail@nicolasgoaziou.fr>
|
||||
;;; Copyright © 2018-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
|
||||
;;; Copyright © 2020 Robert Smith <robertsmith@posteo.net>
|
||||
;;; Copyright © 2020 Guy Fleury Iteriteka <gfleury@disroot.org>
|
||||
;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
|
||||
@@ -13,8 +13,6 @@
|
||||
;;; Copyright © 2022 Luis Felipe López Acevedo <luis.felipe.la@protonmail.com>
|
||||
;;; Copyright © 2023 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2024 Luis Higino <luishenriquegh2701@gmail.com>
|
||||
;;; Copyright © 2025 Andreas Enge <andreas@enge.fr>
|
||||
;;; Copyright © 2025 Arun Isaac <arunisaac@systemreboot.net>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -38,7 +36,6 @@
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages bash)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages cups)
|
||||
#:use-module (gnu packages curl)
|
||||
#:use-module (gnu packages databases)
|
||||
#:use-module (gnu packages django)
|
||||
@@ -455,42 +452,100 @@ specialized device.")
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:qtbase qtbase
|
||||
#:tests? #f ;no tests
|
||||
#:modules '((guix build qt-build-system)
|
||||
((guix build gnu-build-system) #:prefix gnu:)
|
||||
(guix build utils))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'set-initial-values
|
||||
;; Remove useless "Check for updates" action from menu.
|
||||
;; Remove useless "Check for updates" action from menu. Also
|
||||
;; prevent pop-up window about importing Open Sankore documents
|
||||
;; since we don't package OpenBoard-Importer.
|
||||
(lambda _
|
||||
(substitute* "src/core/UBSettings.cpp"
|
||||
(("(appHideCheckForSoftwareUpdate = .*?)false(\\);)" _ beg end)
|
||||
(string-append beg "true" end))))))))
|
||||
(string-append beg "true" end))
|
||||
(("(appLookForOpenSankoreInstall = .*?)true(\\);)" _ beg end)
|
||||
(string-append beg "false" end)))))
|
||||
(add-after 'unpack 'fix-hard-coded-env
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "src/frameworks/UBPlatformUtils_linux.cpp"
|
||||
(("/usr/bin/env") (search-input-file inputs "/bin/env")))))
|
||||
(add-after 'unpack 'fix-library-path
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "OpenBoard.pro"
|
||||
(("/usr/include/quazip5")
|
||||
(search-input-directory inputs "/include/QuaZip-Qt5-1.5/quazip"))
|
||||
(("-lquazip5")
|
||||
"-lquazip1-qt5")
|
||||
(("/usr/include/poppler")
|
||||
(search-input-directory inputs "/include/poppler")))))
|
||||
(replace 'configure
|
||||
(lambda _
|
||||
(invoke "qmake" "OpenBoard.pro")))
|
||||
(replace 'build (assoc-ref gnu:%standard-phases 'build))
|
||||
(replace 'install
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let* ((share (string-append #$output "/share"))
|
||||
(openboard (string-append share "/openboard"))
|
||||
(i18n (string-append openboard "/i18n")))
|
||||
;; Install data.
|
||||
(with-directory-excursion "resources"
|
||||
(for-each (lambda (directory)
|
||||
(let ((target
|
||||
(string-append openboard "/" directory)))
|
||||
(mkdir-p target)
|
||||
(copy-recursively directory target)))
|
||||
'("customizations" "etc" "library"))
|
||||
(mkdir-p i18n)
|
||||
(for-each (lambda (f)
|
||||
(install-file f i18n))
|
||||
(find-files "i18n" "\\.qm$")))
|
||||
;; Install desktop file an icon.
|
||||
(install-file "resources/images/OpenBoard.png"
|
||||
(string-append share
|
||||
"/icons/hicolor/64x64/apps/"))
|
||||
(make-desktop-entry-file
|
||||
(string-append share "/applications/" #$name ".desktop")
|
||||
#:name "OpenBoard"
|
||||
#:comment "Interactive whiteboard application"
|
||||
#:exec "openboard %f"
|
||||
#:icon "OpenBoard"
|
||||
#:mime-type "application/ubz"
|
||||
#:categories '("Education"))
|
||||
;; Install executable.
|
||||
(install-file "build/linux/release/product/OpenBoard" openboard)
|
||||
(let ((bin (string-append #$output "/bin")))
|
||||
(mkdir-p bin)
|
||||
(symlink (string-append openboard "/OpenBoard")
|
||||
(string-append bin "/openboard")))))))))
|
||||
(native-inputs
|
||||
(list pkg-config qttools))
|
||||
(list qttools-5))
|
||||
(inputs
|
||||
(list alsa-lib
|
||||
coreutils-minimal ;for patched 'env' shebang
|
||||
cups-minimal
|
||||
ffmpeg
|
||||
ffmpeg-4
|
||||
freetype
|
||||
lame
|
||||
libass
|
||||
libfdk
|
||||
libressl
|
||||
libtheora
|
||||
libva
|
||||
libvorbis
|
||||
libvpx
|
||||
libx264
|
||||
openssl
|
||||
opus
|
||||
poppler
|
||||
qt5compat
|
||||
qtdeclarative
|
||||
qtmultimedia
|
||||
qtsvg
|
||||
qtwebchannel
|
||||
qtwebengine
|
||||
quazip
|
||||
qtbase-5
|
||||
qtdeclarative-5
|
||||
qtmultimedia-5
|
||||
qtsvg-5
|
||||
qtwebchannel-5
|
||||
qtwebengine-5
|
||||
qtxmlpatterns-5
|
||||
quazip-5
|
||||
sdl
|
||||
zlib))
|
||||
(home-page "https://openboard.ch/")
|
||||
@@ -505,7 +560,7 @@ a pen-tablet display and a beamer.")
|
||||
(define-public fet
|
||||
(package
|
||||
(name "fet")
|
||||
(version "7.5.4")
|
||||
(version "6.28.4")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
@@ -514,7 +569,7 @@ a pen-tablet display and a beamer.")
|
||||
(list (string-append directory base)
|
||||
(string-append directory "old/" base))))
|
||||
(sha256
|
||||
(base32 "0vjjvr9vs3vxncrikchmk60qa99d5wyxja6b3p46vgfaziv1nj31"))))
|
||||
(base32 "11mcbgi8lima4fng78lqdkd5km212drkk5l4bkzz1pz1k7wcykfn"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -541,7 +596,7 @@ algorithm.
|
||||
Usually, FET is able to solve a complicated timetable in maximum 5-20 minutes.
|
||||
For extremely difficult timetables, it may take a longer time, a matter of
|
||||
hours.")
|
||||
(license license:agpl3)))
|
||||
(license license:agpl3+)))
|
||||
|
||||
(define-public klavaro
|
||||
(package
|
||||
@@ -1075,61 +1130,6 @@ learning for programming languages.")
|
||||
simple concepts using multimedia flash cards and spaced reviews.")
|
||||
(license license:public-domain)))
|
||||
|
||||
(define-public hardv
|
||||
(package
|
||||
(name "hardv")
|
||||
(version "5.0.0")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/dongyx/hardv")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0l1wb7hlyldl5hq0z9a1a1rrgn33rjyqb08jph3q7mcn5p3qx40i"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:make-flags #~(list (string-append "prefix=" #$output)
|
||||
(string-append "CC=" #$(cc-for-target)))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* (list "hardv.man1" "learn.c")
|
||||
(("/bin/sh")
|
||||
(search-input-file inputs "/bin/sh")))))
|
||||
(delete 'configure)
|
||||
(delete 'check)
|
||||
(add-after 'install 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
;; Tests can only be run after installation.
|
||||
(when tests?
|
||||
(setenv "PATH"
|
||||
(string-append #$output "/bin:" (getenv "PATH")))
|
||||
(invoke "make" "test")))))))
|
||||
(home-page "https://github.com/dongyx/hardv")
|
||||
(synopsis "Spaced repetition flash card program")
|
||||
(description "HardV is a powerful spaced repetition flash card program.
|
||||
The key features are:
|
||||
|
||||
@itemize
|
||||
@item HardV runs in the CLI mode by default, but you may configure it
|
||||
to be a TUI program, or to view images in a GUI window.
|
||||
@item HardV can open the editor, send the content you wrote to an online
|
||||
judging system, and determine the next quiz time by the judging result.
|
||||
@item It can be used to implement keyboard shortcut practice, cloze deletion,
|
||||
text-to-speech review, typing in the answer, and more.
|
||||
@item The format of input files are easy to be parsed by both human and other
|
||||
Unix utilities like grep, sed, and awk.
|
||||
@item Metadata like scheduled time is written back to input files; thus all
|
||||
your data is in files created and managed by yourself.
|
||||
@item HardV is a Unix filter in the default mode; that makes it easy to be
|
||||
called by other programs. For example, you could pipe HardV to a voice
|
||||
synthesizer to make an audio quiz.
|
||||
@end itemize")
|
||||
(license license:bsd-2)))
|
||||
|
||||
(define-public tagainijisho
|
||||
(package
|
||||
(name "tagainijisho")
|
||||
|
||||
+30
-295
@@ -13,7 +13,7 @@
|
||||
;;; Copyright © 2022, 2024, 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
|
||||
;;; Copyright © 2016 Danny Milosavljevic <dannym@scratchpost.org>
|
||||
;;; Copyright © 2019 Amin Bandali <bandali@gnu.org>
|
||||
;;; Copyright © 2020, 2021, 2022, 2023, 2024, 2025 Vinicius Monego <monego@posteo.net>
|
||||
;;; Copyright © 2020 Vinicius Monego <monego@posteo.net>
|
||||
;;; Copyright © 2021 Andrew Miloradovsky <andrew@interpretmath.pw>
|
||||
;;; Copyright © 2022 Christian Gelinek <cgelinek@radlogic.com.au>
|
||||
;;; Copyright © 2022 jgart <jgart@dismail.de>
|
||||
@@ -21,9 +21,6 @@
|
||||
;;; Copyright © 2024 Jakob Kirsch <jakob.kirsch@web.de>
|
||||
;;; Copyright © 2025 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2022, 2025 Evgeny Pisemsky <mail@pisemsky.site>
|
||||
;;; Copyright © 2025, Ekaitz Zarraga <ekaitz@elenq.tech>
|
||||
;;; Copyright © 2021, 2022 Guillaume Le Vaillant <glv@posteo.net>
|
||||
;;; Copyright © 2020, 2023 Marius Bakke <marius@gnu.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -76,7 +73,6 @@
|
||||
#:use-module (gnu packages freedesktop)
|
||||
#:use-module (gnu packages fontutils)
|
||||
#:use-module (gnu packages gawk)
|
||||
#:use-module (gnu packages gcc)
|
||||
#:use-module (gnu packages gd)
|
||||
#:use-module (gnu packages gdb)
|
||||
#:use-module (gnu packages gettext)
|
||||
@@ -96,7 +92,6 @@
|
||||
#:use-module (gnu packages maths)
|
||||
#:use-module (gnu packages m4)
|
||||
#:use-module (gnu packages maths)
|
||||
#:use-module (gnu packages mpi)
|
||||
#:use-module (gnu packages perl)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages python)
|
||||
@@ -241,7 +236,7 @@ formal verification.")
|
||||
(package
|
||||
(inherit abc)
|
||||
(name "abc-yosyshq")
|
||||
(version "0.59")
|
||||
(version "0.58")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -250,7 +245,7 @@ formal verification.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"110hvmwspp7bprwwilcwb8kw6wcqrj9z214269fa75j9027k5l0c"))))
|
||||
"191hsznsmsjn8100n50qsh3ng8wgrnyfhr7qcnb8yskiwqp37pjh"))))
|
||||
(home-page "https://github.com/YosysHQ/abc/")
|
||||
(description "ABC is a program for sequential logic synthesis and
|
||||
formal verification. This is the Yosyshq fork of ABC.")
|
||||
@@ -625,48 +620,6 @@ used in the declarative section of design units.")
|
||||
(native-inputs
|
||||
'()))))
|
||||
|
||||
(define-public libngspice
|
||||
;; Note: The ngspice's build system does not allow us to build both the
|
||||
;; library and the executables in one go. Thus, we have two packages.
|
||||
;; See <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=27344#236>.
|
||||
(package
|
||||
(name "libngspice")
|
||||
(version "44.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://git.code.sf.net/p/ngspice/ngspice")
|
||||
(commit (string-append "ngspice-" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1vp27149kx8l7397bv5p708jqph1kma8rb9bl7ckgmbr9sw9cn3q"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;there are no tests for libngspice
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'install 'delete-scripts
|
||||
(lambda _
|
||||
(delete-file-recursively
|
||||
(string-append #$output
|
||||
"/share/ngspice/scripts")))))
|
||||
#:configure-flags #~(list "--enable-openmp" "--enable-cider"
|
||||
"--enable-xspice" "--with-ngshared")))
|
||||
(native-inputs (list autoconf automake bison flex libtool))
|
||||
(inputs (list openmpi))
|
||||
(home-page "https://ngspice.sourceforge.io/")
|
||||
(synopsis "Mixed-level/mixed-signal circuit simulator")
|
||||
(description
|
||||
"Ngspice is a mixed-level/mixed-signal circuit simulator. It includes
|
||||
@code{Spice3f5}, a circuit simulator, and @code{Xspice}, an extension that
|
||||
provides code modeling support and simulation of digital components through
|
||||
an embedded event driven algorithm.")
|
||||
(license (list license:lgpl2.0+ ;code in frontend/numparam
|
||||
(license:non-copyleft "file:///COPYING") ;spice3 bsd-style
|
||||
license:bsd-3 ;ciderlib
|
||||
license:public-domain)))) ;xspice
|
||||
|
||||
(define librnd
|
||||
(package
|
||||
(name "librnd")
|
||||
@@ -1053,32 +1006,13 @@ which allows one to install the M8 firmware on any Teensy.")
|
||||
(synopsis
|
||||
(string-append (package-synopsis nextpnr) " Cli only version."))))
|
||||
|
||||
(define-deprecated-package nextpnr-ice40
|
||||
nextpnr)
|
||||
|
||||
(define-public ngspice
|
||||
;; The ngspice executables (see libngpsice above.)
|
||||
(package
|
||||
(inherit libngspice)
|
||||
(name "ngspice")
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments libngspice)
|
||||
;; Tests require a X server running, so we keep them disabled
|
||||
((#:configure-flags flags)
|
||||
#~(cons* "--enable-rpath" "--with-x" "--with-readline=yes"
|
||||
(delete "--with-ngshared" #$flags)))
|
||||
((#:phases phases)
|
||||
#~(modify-phases #$phases
|
||||
(delete 'delete-scripts)))))
|
||||
(native-inputs
|
||||
(modify-inputs (package-native-inputs libngspice)
|
||||
(append perl)))
|
||||
(inputs (list libngspice readline libxaw libx11))))
|
||||
(define-public nextpnr-ice40
|
||||
(deprecated-package "nextpnr-ice40" nextpnr))
|
||||
|
||||
(define-public nvc
|
||||
(package
|
||||
(name "nvc")
|
||||
(version "1.18.1")
|
||||
(version "1.18.0")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1087,7 +1021,7 @@ which allows one to install the M8 firmware on any Teensy.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1l4aiaf2009wak7bccpm8x2pr27pr2b5w2naz874y8k98wqq5zlr"))))
|
||||
"1b8bsmxv2p9v8g7yzdj8s22l5bx9n58kmbklgnj17gd362lai51y"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:out-of-source? #t
|
||||
@@ -1395,8 +1329,8 @@ The following features are currently available:
|
||||
|
||||
(define-public opensta
|
||||
;; There are no releases, we use last commit.
|
||||
(let ((commit "6e29fcb3f0d8a73af3a0913eb945b665a72e69cb")
|
||||
(revision "1"))
|
||||
(let ((commit "12f03395ec80d3593f4796b2a3cf5480e75735bd")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "opensta")
|
||||
;; The version string is taken from the CMakeLists.txt.
|
||||
@@ -1409,7 +1343,7 @@ The following features are currently available:
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1drhgp4s6q8j4fhsbxn6szmxl48xdlq0x5z4g6z72img453qvglx"))))
|
||||
(base32 "1gka50p4wv2b49d8jbw5fs3qg7cppa8ynl3diqgdf8mqgskwapzf"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -1584,35 +1518,6 @@ verification.")
|
||||
#~(modify-phases #$phases
|
||||
(delete 'fix-scripts)))))))
|
||||
|
||||
(define-public python-pyucis
|
||||
(package
|
||||
(name "python-pyucis")
|
||||
(version "0.1.5")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/fvutils/pyucis/")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "19bxmhqkdmhbibkbzcjqvzvcni1kzg28nqz9vh6zj73hl26lf2ij"))))
|
||||
(build-system pyproject-build-system)
|
||||
(native-inputs
|
||||
(list python-pytest
|
||||
python-setuptools))
|
||||
(propagated-inputs
|
||||
(list python-jsonschema-objects
|
||||
python-lxml
|
||||
python-pyyaml))
|
||||
(home-page "https://fvutils.github.io/pyucis//")
|
||||
(synopsis "Python interface to UCIS data")
|
||||
(description
|
||||
"The code{PyUCIS} library provides two APIs for creating and accessing
|
||||
coverage data via the @acronym{UCIS, Unified Coverage Interoperability
|
||||
Standard} data mode.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public python-cocotb
|
||||
(package
|
||||
(name "python-cocotb")
|
||||
@@ -1911,7 +1816,7 @@ design.")
|
||||
(define-public python-vsg
|
||||
(package
|
||||
(name "python-vsg")
|
||||
(version "3.35.0")
|
||||
(version "3.34.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -1920,7 +1825,7 @@ design.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "01hwida51bdyzv6wy71nby9cllf6nbvin5a0lhl4dizvnp3h4mb4"))))
|
||||
(base32 "0sryf1wv4r5maxj4di5rpsmzcxins3gq8aksv7cpw6ywvdk1nj5l"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -2129,8 +2034,6 @@ input and outputs an XML dataset.")
|
||||
(add-after 'unpack 'adjust-default-settings
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "qucs/settings.cpp"
|
||||
(("\"/usr/local/Xyce.*\"")
|
||||
(format #f "~s" (search-input-file inputs "bin/Xyce")))
|
||||
(("\"ngspice\"")
|
||||
(format #f "~s" (search-input-file inputs "bin/ngspice")))
|
||||
(("\"octave\"")
|
||||
@@ -2141,20 +2044,11 @@ input and outputs an XML dataset.")
|
||||
`("PATH" ":" prefix
|
||||
(,(string-append #$(this-package-input "ngspice") "/bin")
|
||||
,(string-append
|
||||
#$(this-package-input "qucsator-rf") "/bin")
|
||||
,(string-append
|
||||
#$(this-package-input "xyce-serial") "/bin")))))))))
|
||||
#$(this-package-input "qucsator-rf") "/bin")))))))))
|
||||
(native-inputs (list qttools))
|
||||
(inputs
|
||||
(list bash-minimal
|
||||
ngspice
|
||||
octave
|
||||
qtbase
|
||||
qtcharts
|
||||
qtsvg
|
||||
qtwayland
|
||||
qucsator-rf
|
||||
xyce-serial))
|
||||
;; TODO Add xyce-serial to the list.
|
||||
(list bash-minimal octave qtbase qtcharts qtsvg qtwayland qucsator-rf ngspice))
|
||||
(synopsis "GUI for different circuit simulation kernels")
|
||||
(description
|
||||
"@acronym{Qucs-S, Quite universal circuit simulator with SPICE} provides
|
||||
@@ -2249,7 +2143,7 @@ suite.")
|
||||
(define-public sch-rnd
|
||||
(package
|
||||
(name "sch-rnd")
|
||||
(version "1.0.10")
|
||||
(version "1.0.9")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
@@ -2257,7 +2151,7 @@ suite.")
|
||||
"releases/sch-rnd-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1wa43jhgzlchqpql9qdz7q4ps4wfk88akrl3pqgcb61mdwy51s20"))))
|
||||
"07a1ik0rpsa5cscg9l7i5rnipx76543s7cdnkg802747rral7yj5"))))
|
||||
(build-system glib-or-gtk-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -2335,7 +2229,7 @@ them usable as simple logic analyzer and/or oscilloscope hardware.")
|
||||
(define-public symbiyosys
|
||||
(package
|
||||
(name "symbiyosys")
|
||||
(version "0.59")
|
||||
(version "0.58")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -2344,7 +2238,7 @@ them usable as simple logic analyzer and/or oscilloscope hardware.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1viah5rm22d0c2v1fsm04brhavl4522h36gv80d7647alkvdfqb9"))))
|
||||
(base32 "0fja71y1wkqdwc3cwwk9ifaf33hhnxr8khlj9fhadbcc66rg1s56"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -2472,96 +2366,6 @@ using different abstraction levels.")
|
||||
VPI Interface, Elaborator, Serialization, Visitor and Listener.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define trilinos-serial-xyce
|
||||
;; Note: This is a Trilinos containing only the packages Xyce needs, so we
|
||||
;; keep it private. See
|
||||
;; <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=27344#248>.
|
||||
;; TODO: Remove when we have modular Trilinos packages?
|
||||
(package
|
||||
(name "trilinos-serial-xyce")
|
||||
(version "12.12.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/trilinos/Trilinos")
|
||||
(commit (string-append "trilinos-release-"
|
||||
(string-map (lambda (chr)
|
||||
(case chr
|
||||
((#\.) #\-)
|
||||
(else chr)))
|
||||
version)))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1smz3wlpfyjn0czmpl8bj4hw33p1zi9nnfygpsx7jl1523nypa1n"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;no tests
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; Delete unneeded tribits(build system) directory which makes
|
||||
;; validate-runpath phase to fail.
|
||||
(add-before 'validate-runpath 'delete-tribits
|
||||
(lambda _
|
||||
(delete-file-recursively
|
||||
(string-append #$output "/lib/cmake/tribits")))))
|
||||
#:configure-flags
|
||||
#~(list "-DCMAKE_CXX_FLAGS=-O3 -fPIC"
|
||||
"-DCMAKE_C_FLAGS=-O3 -fPIC"
|
||||
"-DCMAKE_Fortran_FLAGS=-O3 -fPIC"
|
||||
"-DTrilinos_ENABLE_NOX=ON"
|
||||
"-DNOX_ENABLE_LOCA=ON"
|
||||
"-DTrilinos_ENABLE_EpetraExt=ON"
|
||||
"-DEpetraExt_BUILD_BTF=ON"
|
||||
"-DEpetraExt_BUILD_EXPERIMENTAL=ON"
|
||||
"-DEpetraExt_BUILD_GRAPH_REORDERINGS=ON"
|
||||
"-DTrilinos_ENABLE_TrilinosCouplings=ON"
|
||||
"-DTrilinos_ENABLE_Ifpack=ON"
|
||||
"-DTrilinos_ENABLE_Isorropia=ON"
|
||||
"-DTrilinos_ENABLE_AztecOO=ON"
|
||||
"-DTrilinos_ENABLE_Belos=ON"
|
||||
"-DTrilinos_ENABLE_Teuchos=ON"
|
||||
"-DTeuchos_ENABLE_COMPLEX=ON"
|
||||
"-DTrilinos_ENABLE_Amesos=ON"
|
||||
"-DAmesos_ENABLE_KLU=ON"
|
||||
"-DAmesos_ENABLE_UMFPACK=ON"
|
||||
"-DTrilinos_ENABLE_Sacado=ON"
|
||||
"-DTrilinos_ENABLE_Kokkos=OFF"
|
||||
"-DTrilinos_ENABLE_ALL_OPTIONAL_PACKAGES=OFF"
|
||||
"-DTPL_ENABLE_AMD=ON"
|
||||
"-DTPL_ENABLE_UMFPACK=ON"
|
||||
"-DTPL_ENABLE_BLAS=ON"
|
||||
"-DTPL_ENABLE_LAPACK=ON")))
|
||||
(native-inputs (list gfortran swig))
|
||||
(inputs (list boost lapack suitesparse))
|
||||
(home-page "https://trilinos.org")
|
||||
(synopsis "Engineering and scientific problems algorithms")
|
||||
(description
|
||||
"The Trilinos Project is an effort to develop algorithms and enabling
|
||||
technologies within an object-oriented software framework for the solution of
|
||||
large-scale, complex multi-physics engineering and scientific problems. A
|
||||
unique design feature of Trilinos is its focus on packages.")
|
||||
(license (list license:lgpl2.1+
|
||||
license:bsd-3))))
|
||||
|
||||
(define trilinos-parallel-xyce
|
||||
(package
|
||||
(inherit trilinos-serial-xyce)
|
||||
(name "trilinos-parallel-xyce")
|
||||
(arguments
|
||||
(substitute-keyword-arguments
|
||||
(package-arguments trilinos-serial-xyce)
|
||||
((#:configure-flags flags)
|
||||
#~(cons* "-DTrilinos_ENABLE_ShyLU=ON"
|
||||
"-DTrilinos_ENABLE_Zoltan=ON"
|
||||
"-DTPL_ENABLE_MPI=ON"
|
||||
#$flags))))
|
||||
(inputs
|
||||
(modify-inputs (package-inputs trilinos-serial-xyce)
|
||||
(prepend openmpi)))))
|
||||
|
||||
(define-public verilator
|
||||
(package
|
||||
(name "verilator")
|
||||
@@ -2622,98 +2426,32 @@ and coverage-analysis points. It outputs single- or multi-threaded
|
||||
(license license:lgpl3)))
|
||||
|
||||
(define-public xoscope
|
||||
(let ((revision "0.0.0")
|
||||
(commit "d97b9b186a4137582ae27fce1da73f51c06f852e"))
|
||||
(package
|
||||
(name "xoscope")
|
||||
(version (git-version "2.3" revision commit))
|
||||
(version "2.3")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://git.code.sf.net/p/xoscope/code")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://sourceforge/xoscope/xoscope/"
|
||||
version "/xoscope-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1jaz14pb8lx1y34f979v507dmkrq3wdczi0hkqzb64zg76cdkwya"))))
|
||||
"0a5ycfc1qdmibvagc82r2mhv2i99m6pndy5i6ixas3j2297g6pgq"))))
|
||||
(build-system gnu-build-system)
|
||||
(native-inputs
|
||||
(list m4 pkg-config automake libtool autoconf))
|
||||
(list m4 pkg-config))
|
||||
(inputs
|
||||
(list alsa-lib comedilib fftw gtk+ gtkdatabox))
|
||||
(synopsis "Digital oscilloscope")
|
||||
(description "Xoscope is a digital oscilloscope that can acquire signals
|
||||
from ALSA, ESD, and COMEDI sources. This package currently does not include
|
||||
support for ESD or COMEDI sources.")
|
||||
support for ESD sources.")
|
||||
(home-page "https://xoscope.sourceforge.net/")
|
||||
(license license:gpl2+))))
|
||||
|
||||
(define-public xyce-serial
|
||||
(package
|
||||
(name "xyce-serial")
|
||||
(version "6.8")
|
||||
(source
|
||||
(origin (method url-fetch)
|
||||
(uri (string-append "https://archive.org/download/Xyce-"
|
||||
version "/Xyce-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"09flp1xywbb2laayd9rg8vd0fjsh115y6k1p71jacy0nrbdvvlcg"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f
|
||||
#:configure-flags
|
||||
#~(list
|
||||
"CXXFLAGS=-O3"
|
||||
(string-append "CFLAGS="
|
||||
" -Wno-error=builtin-declaration-mismatch"
|
||||
" -Wno-error=implicit-function-declaration"
|
||||
" -Wno-error=implicit-int")
|
||||
(string-append "ARCHDIR=" #$trilinos-serial-xyce))))
|
||||
(native-inputs
|
||||
(list bison-3.0 ;'configure' fails with Bison 3.4
|
||||
flex
|
||||
gfortran))
|
||||
(inputs
|
||||
(list fftw lapack suitesparse trilinos-serial-xyce))
|
||||
(home-page "https://xyce.sandia.gov/")
|
||||
(synopsis "High-performance analog circuit simulator")
|
||||
(description
|
||||
"Xyce is a SPICE-compatible, high-performance analog circuit simulator,
|
||||
capable of solving extremely large circuit problems by supporting large-scale
|
||||
parallel computing platforms. It also supports serial execution.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public xyce-parallel
|
||||
(package
|
||||
(inherit xyce-serial)
|
||||
(name "xyce-parallel")
|
||||
(arguments
|
||||
(substitute-keyword-arguments
|
||||
(package-arguments xyce-serial)
|
||||
((#:configure-flags flags)
|
||||
#~(list "CXXFLAGS=-O3"
|
||||
"CXX=mpiCC"
|
||||
"CC=mpicc"
|
||||
"F77=mpif77"
|
||||
"--enable-mpi"
|
||||
(string-append
|
||||
"CFLAGS="
|
||||
" -Wno-error=builtin-declaration-mismatch"
|
||||
" -Wno-error=implicit-function-declaration"
|
||||
" -Wno-error=implicit-int")
|
||||
(string-append "ARCHDIR=" #$trilinos-parallel-xyce)))))
|
||||
(propagated-inputs (list openmpi))
|
||||
(inputs
|
||||
(modify-inputs (package-inputs xyce-serial)
|
||||
(append zlib)
|
||||
(replace "trilinos-serial-xyce" trilinos-parallel-xyce)))))
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public yosys
|
||||
(package
|
||||
(name "yosys")
|
||||
(version "0.59")
|
||||
(version "0.58")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -2721,7 +2459,7 @@ parallel computing platforms. It also supports serial execution.")
|
||||
(url "https://github.com/YosysHQ/yosys")
|
||||
(commit (string-append "v" version))))
|
||||
(sha256
|
||||
(base32 "0bgijlivkhq338rbd056pjhdbjgwbd8l10afzp2dzlhn03j4l140"))
|
||||
(base32 "13095d587dvnj6n1fhw5whda7qhafmmng0qz6qa52cdxriz63kka"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
@@ -2759,11 +2497,9 @@ parallel computing platforms. It also supports serial execution.")
|
||||
(replace 'configure
|
||||
(lambda* (#:key make-flags #:allow-other-keys)
|
||||
(apply invoke "make" "config-gcc" make-flags)))
|
||||
(add-after 'configure 'configure-makefile
|
||||
(add-after 'configure 'use-external-abc
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* '("Makefile")
|
||||
(("ENABLE_EDITLINE \\:= 0")
|
||||
"ENABLE_EDITLINE := 1")
|
||||
(("ABCEXTERNAL \\?=")
|
||||
(string-append "ABCEXTERNAL = "
|
||||
(search-input-file inputs "/bin/abc"))))))
|
||||
@@ -2792,7 +2528,6 @@ parallel computing platforms. It also supports serial execution.")
|
||||
gawk ;for the tests and "make" progress pretty-printing
|
||||
iverilog ;for the tests
|
||||
pkg-config
|
||||
perl
|
||||
python
|
||||
tcl)) ;tclsh for the tests
|
||||
(inputs (list abc-yosyshq
|
||||
|
||||
@@ -15,8 +15,6 @@
|
||||
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2025 John Kehayias <john.kehayias@protonmail.com>
|
||||
;;; Copyright © 2025 Nicolas Graves <ngraves@ngraves.fr>
|
||||
;;; Copyright © 2025 Danny Milosavljevic <dannym@scratchpost.org>
|
||||
;;; Copyright © 2025 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -39,22 +37,13 @@
|
||||
#:use-module (guix packages)
|
||||
#:use-module (guix download)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (guix build-system meson)
|
||||
#:use-module (guix build-system gnu)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (gnu packages)
|
||||
#:use-module (gnu packages autotools)
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages bash)
|
||||
#:use-module (gnu packages dejagnu)
|
||||
#:use-module (gnu packages digest)
|
||||
#:use-module (gnu packages docbook)
|
||||
#:use-module (gnu packages documentation)
|
||||
#:use-module (gnu packages gawk)
|
||||
#:use-module (gnu packages gcc)
|
||||
#:use-module (gnu packages gdb)
|
||||
#:use-module (gnu packages m4)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages python)
|
||||
@@ -86,41 +75,6 @@ dynamic library load path (RPATH and RUNPATH) of compiled programs and
|
||||
libraries.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public dwz
|
||||
(package
|
||||
(name "dwz")
|
||||
(version "0.16")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://sourceware.org/ftp"
|
||||
"/" name "/releases/" name "-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"03nm4yz2sd23zmw65ingphg5gk619xx9r40a5p6dhvlynkhm6n27"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:make-flags #~(list (string-append "CC=" #$(cc-for-target))
|
||||
(string-append "CXX=" #$(cxx-for-target))
|
||||
(string-append "prefix=" #$output))))
|
||||
(native-inputs
|
||||
(list
|
||||
;; XXX: binutils-gold is a complete package that not only
|
||||
;; provides 'gold' but also 'ld', which shadows the
|
||||
;; regular 'ld' (ld-wrapper), causing breakage.
|
||||
(make-ld-wrapper "ld-wrapper" #:binutils binutils)
|
||||
binutils-gold
|
||||
dejagnu
|
||||
`(,elfutils "bin") ;for eu-strip
|
||||
gdb/pinned
|
||||
pkg-config))
|
||||
(inputs (list elfutils xxhash))
|
||||
(synopsis "DWARF optimizer")
|
||||
(description "DWZ is a DWARF optimization and duplicate removal tool.")
|
||||
(home-page "https://sourceware.org/dwz")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public elfutils
|
||||
(package
|
||||
(name "elfutils")
|
||||
@@ -437,60 +391,6 @@ changed.")
|
||||
(substitute* "tests/set-empty-rpath.sh"
|
||||
(("^\\$\\{SCRATCH\\}\\/simple.$") ""))))))))))
|
||||
|
||||
(define-public pax-utils
|
||||
(package
|
||||
(name "pax-utils")
|
||||
(version "1.3.8")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://anongit.gentoo.org/git/proj/pax-utils.git")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1vxklqnabhy15idrg5s2m07lk1hqyf9fnvsfy66n2rdmqijn5rvw"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:modules '((guix build meson-build-system)
|
||||
(guix build utils)
|
||||
(srfi srfi-26))
|
||||
#:configure-flags #~(list "-Dlddtree_implementation=sh")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'install 'wrap-lddtree
|
||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||
(let* ((needed-bin
|
||||
(map (cut string-append <> "/bin")
|
||||
(list #$(this-package-input "coreutils-minimal")
|
||||
#$(this-package-input "gawk")
|
||||
#$(this-package-input "sed")
|
||||
#$output)))
|
||||
(PATH `("PATH" = (,@needed-bin))))
|
||||
(for-each (lambda (p)
|
||||
(wrap-program
|
||||
(search-input-file outputs
|
||||
(string-append "bin/" p))
|
||||
PATH))
|
||||
(list "lddtree" "symtree"))))))))
|
||||
(native-inputs (list docbook-xsl xmlto))
|
||||
(inputs (list bash-minimal coreutils-minimal gawk sed))
|
||||
(home-page "https://wiki.gentoo.org/wiki/Hardened/PaX_Utilities")
|
||||
(synopsis "ELF integrity and security-focused utils")
|
||||
(description "The pax-utils package contains a small set of utilities
|
||||
for performing mostly security checks on systems. It is focused on the ELF
|
||||
format. The included utilities are:
|
||||
@table @command
|
||||
@item pspax List ELF/PaX information about running processes
|
||||
@item scanelf Scan ELF binaries
|
||||
@item dumpelf Dump internal ELF structure
|
||||
@item scanmacho Scan Mach-O binaries
|
||||
@item symtree Display libraries that satisfy undefined symbols, as a tree
|
||||
@item lddtree Display ELF dependencies as a tree.
|
||||
@end table")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public libdwarf
|
||||
(package
|
||||
(name "libdwarf")
|
||||
|
||||
@@ -174,8 +174,8 @@ such as @command{elm make} and @command{elm repl}.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
;; The 'elm' package used to be called 'elm-compiler'.
|
||||
(define-deprecated-package elm-compiler
|
||||
elm)
|
||||
(define-public elm-compiler
|
||||
(deprecated-package "elm-compiler" elm))
|
||||
|
||||
(define-public elm-core
|
||||
(package
|
||||
|
||||
+352
-531
File diff suppressed because it is too large
Load Diff
@@ -9,7 +9,7 @@
|
||||
;;; Copyright © 2016 David Thompson <dthompson2@worcester.edu>
|
||||
;;; Copyright © 2016 Nikita <nikita@n0.is>
|
||||
;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
|
||||
;;; Copyright © 2017, 2019, 2020, 2023-2025 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2017, 2019, 2020, 2023, 2024 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2017 Alex Vong <alexvong1995@gmail.com>
|
||||
;;; Copyright © 2017, 2018 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2017, 2023, 2024, 2025 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
@@ -384,8 +384,7 @@
|
||||
,(map dirname
|
||||
(list (search-input-file inputs "/bin/gzip")
|
||||
;; for coreutils
|
||||
(search-input-file inputs "/bin/yes")
|
||||
(search-input-file inputs "/bin/zstd"))))
|
||||
(search-input-file inputs "/bin/yes"))))
|
||||
`("EMACSLOADPATH" suffix ,lisp-dirs)))
|
||||
(find-files (string-append out "/bin")
|
||||
;; Matches versioned and unversioned emacs binaries.
|
||||
@@ -403,7 +402,7 @@
|
||||
(copy-file
|
||||
(car (find-files "bin" "^emacs-([0-9]+\\.)+[0-9]+$"))
|
||||
"bin/emacs")))))))
|
||||
(inputs (list bash-minimal coreutils findutils gawk gzip ncurses sed zstd))
|
||||
(inputs (list bash-minimal coreutils findutils gawk gzip ncurses sed))
|
||||
(native-inputs (list autoconf libfaketime pkg-config texinfo))
|
||||
(home-page "https://www.gnu.org/software/emacs/")
|
||||
(synopsis "The extensible text editor (minimal build for byte-compilation)")
|
||||
@@ -712,8 +711,8 @@ editor (with wide ints)" )
|
||||
(define-public emacs-next (emacs->emacs-next emacs))
|
||||
(define-public emacs-next-pgtk (emacs->emacs-next emacs-pgtk))
|
||||
(define-public emacs-next-pgtk-xwidgets (emacs->emacs-next emacs-pgtk-xwidgets))
|
||||
(define-deprecated-package emacs-next-tree-sitter
|
||||
emacs-next)
|
||||
(define-public emacs-next-tree-sitter
|
||||
(deprecated-package "emacs-next-tree-sitter" emacs-next))
|
||||
|
||||
(define-public guile-emacs
|
||||
(let ((upstream-version "31.0.50")
|
||||
|
||||
+13
-30
@@ -42,7 +42,6 @@
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (guix build-system gnu)
|
||||
#:use-module (guix build-system pyproject)
|
||||
#:use-module (guix build-system python)
|
||||
#:use-module (guix build-system trivial)
|
||||
#:use-module ((guix build utils) #:select (alist-replace delete-file-recursively))
|
||||
@@ -1754,45 +1753,29 @@ raw USB commands.")
|
||||
(define-public west
|
||||
(package
|
||||
(name "west")
|
||||
(version "1.5.0")
|
||||
(version "0.13.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/zephyrproject-rtos/west")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "west" version))
|
||||
(sha256
|
||||
(base32 "0fa3bbw69khw8la4mi4q18d8brixywwj5yby7dh36hd40wxspzk3"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:test-flags
|
||||
;; XXX: This test tries to access the network.
|
||||
#~(list "-k" "not test_init_with_clone_option_depth_one")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'check 'configure-tests
|
||||
(lambda _
|
||||
(setenv "TOXTEMPDIR"
|
||||
(mkdtemp
|
||||
(string-append (dirname (getcwd)) "/tmpXXXXXX"))))))))
|
||||
(base32
|
||||
"1hw9qas8ry8prn24iqka8kw2nv7ndxr95mvwr5lww53w2sr7p807"))))
|
||||
(propagated-inputs
|
||||
(list python-colorama
|
||||
python-packaging
|
||||
python-pykwalify
|
||||
python-pyyaml))
|
||||
(native-inputs (list git-minimal python-pytest python-setuptools))
|
||||
(build-system python-build-system)
|
||||
(home-page "https://github.com/zephyrproject-rtos/west")
|
||||
(synopsis "Zephyr RTOS Project meta-tool")
|
||||
(description
|
||||
"West is the swiss-army knife command line tool of the Zephyr project.
|
||||
Its built-in commands provide a multiple repository management system with
|
||||
features inspired by Google’s Repo tool and Git submodules. West simplifies
|
||||
configuration and is also pluggable: you can write your own west \"extension
|
||||
commands\" which add additional features to west. Zephyr uses this feature to
|
||||
provide conveniences for building applications, flashing and debugging them,
|
||||
and more.")
|
||||
(description "West is the swiss-army knife command line tool of the Zephyr
|
||||
project. Its built-in commands provide a multiple repository management
|
||||
system with features inspired by Google’s Repo tool and Git submodules. West
|
||||
simplifies configuration and is also pluggable: you can write your own west
|
||||
\"extension commands\" which add additional features to west. Zephyr uses
|
||||
this feature to provide conveniences for building applications, flashing and
|
||||
debugging them, and more.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public ebusd
|
||||
|
||||
+50
-145
@@ -69,7 +69,6 @@
|
||||
#:use-module (gnu packages cmake)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages containers)
|
||||
#:use-module (gnu packages cpp)
|
||||
#:use-module (gnu packages cross-base)
|
||||
#:use-module (gnu packages curl)
|
||||
#:use-module (gnu packages digest)
|
||||
@@ -95,14 +94,12 @@
|
||||
#:use-module (gnu packages libedit)
|
||||
#:use-module (gnu packages libusb)
|
||||
#:use-module (gnu packages linux)
|
||||
#:use-module (gnu packages llvm)
|
||||
#:use-module (gnu packages lua)
|
||||
#:use-module (gnu packages maths)
|
||||
#:use-module (gnu packages mp3)
|
||||
#:use-module (gnu packages music)
|
||||
#:use-module (gnu packages ncurses)
|
||||
#:use-module (gnu packages networking)
|
||||
#:use-module (gnu packages ninja)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages pretty-print)
|
||||
#:use-module (gnu packages pulseaudio)
|
||||
@@ -798,7 +795,7 @@ older games.")
|
||||
;; This is not a patch staging area for DOSBox, but an unaffiliated fork.
|
||||
(package
|
||||
(name "dosbox-staging")
|
||||
(version "0.82.2")
|
||||
(version "0.82.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -807,7 +804,7 @@ older games.")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "074wrkmy2g280kipnnkh2ga6wlh94kgwfp2cl1g17y65y56vmmdv"))))
|
||||
(base32 "1s4c6fiyjm91dnmkval9fvsqszc6yjq5b6pq895xi606dn29b85d"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
;; XXX: When build with debugoptimized, some assertions and tests will
|
||||
@@ -861,7 +858,7 @@ emulate a serial nullmodem over TCP/IP.")
|
||||
(define-public qtmips
|
||||
(package
|
||||
(name "qtmips")
|
||||
(version "0.8.1")
|
||||
(version "0.7.5")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -870,8 +867,47 @@ emulate a serial nullmodem over TCP/IP.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1gmlr43wjq0fki9d77n7s6jly4n6kd6hq2af0zni348b4a4qn8bn"))))
|
||||
"1fal7a8y5g0rqqjrk795jh1l50ihz01ppjnrfjrk9vkjbd59szbp"))))
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:modules '((guix build qt-build-system)
|
||||
((guix build gnu-build-system) #:prefix gnu:)
|
||||
(guix build utils))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(replace 'configure
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(invoke "qmake"
|
||||
(string-append "PREFIX=" (assoc-ref outputs "out"))
|
||||
"qtmips.pro")))
|
||||
(replace 'build (assoc-ref gnu:%standard-phases 'build))
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(substitute* "tests/test.sh"
|
||||
(("qtchooser.*") ""))
|
||||
(substitute* '("tests/cpu_trap/test.sh"
|
||||
"tests/registers/test.sh")
|
||||
(("sub-qtmips_cli") "qtmips_cli"))
|
||||
(if tests?
|
||||
(invoke "tests/run-all.sh")
|
||||
#t)))
|
||||
(replace 'install
|
||||
;; There is no install target.
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(bin (string-append out "/bin"))
|
||||
(apps (string-append out "/share/applications"))
|
||||
(icons (string-append out "/share/icons/hicolor")))
|
||||
(install-file "qtmips_gui/qtmips_gui" bin)
|
||||
(install-file "qtmips_cli/qtmips_cli" bin)
|
||||
(install-file "data/qtmips.desktop" apps)
|
||||
(install-file "data/icons/qtmips_gui.svg"
|
||||
(string-append icons "/scalable/apps"))
|
||||
(install-file "data/icons/qtmips_gui.png"
|
||||
(string-append icons "/48x48/apps"))
|
||||
#t))))
|
||||
#:tests? #f)) ; test suite wants mips toolchain
|
||||
(inputs
|
||||
(list elfutils qtbase-5 qtwayland-5))
|
||||
(home-page "https://github.com/cvut/QtMips")
|
||||
@@ -2042,8 +2078,8 @@ metadata about each known libretro core. The snapshot is taken from the
|
||||
@url{https://github.com/libretro/libretro-super, libretro-super} repository.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-deprecated-package retroarch-core-info
|
||||
libretro-core-info)
|
||||
(define-public retroarch-core-info
|
||||
(deprecated-package "retroarch-core-info" libretro-core-info))
|
||||
|
||||
(define-public libretro-database
|
||||
(package
|
||||
@@ -3590,137 +3626,6 @@ assembler, and debugger for the Intel 8085 microprocessor.
|
||||
improvements.")
|
||||
(license license:gpl2+))))
|
||||
|
||||
(define-public pcsx2-patches
|
||||
(let ((commit "2fdc835f0725b318efcdaae84db1c73a9139b6f6")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "pcsx2-patches")
|
||||
(version (git-version "2025.10.24" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/PCSX2/pcsx2_patches")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0qn9jwk983hxzrf2x550wcb9l782618lm662w5fb6cw81bbrv5is"))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'install 'compress
|
||||
(lambda _
|
||||
(with-directory-excursion "patches"
|
||||
(apply invoke "7z" "a" "-r" "patches.zip"
|
||||
(find-files "."))))))
|
||||
#:install-plan #~(list '("patches/patches.zip" "patches.zip"))))
|
||||
(native-inputs (list 7zip))
|
||||
(home-page "https://github.com/PCSX2/pcsx2_patches")
|
||||
(synopsis "PCSX2 widescreen and de-interlacing patches")
|
||||
(description "This package provides game-specific widescreen and
|
||||
de-interlacing patches for use with PCSX2.")
|
||||
(license license:gpl3+)))) ;same as pcsx2
|
||||
|
||||
(define-public pcsx2
|
||||
(package
|
||||
(name "pcsx2")
|
||||
(version "2.4.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/PCSX2/pcsx2")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0nr53cjifqwnz3icxsj01yd3aw1vfsfxga4zz5zi8aqr175mvq27"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
#~(begin
|
||||
(substitute* "pcsx2/Pcsx2Config.cpp"
|
||||
(("Path::Canonicalize\\(Path::GetDirectory\\(program_path\\)\\);")
|
||||
"Path::Canonicalize(
|
||||
((std::string)Path::GetDirectory(program_path)).append(\"/../share/\"));"))
|
||||
(delete-file-recursively "3rdparty/d3d12memalloc")
|
||||
(delete-file-recursively "3rdparty/winpixeventruntime")
|
||||
(delete-file-recursively "3rdparty/winwil")))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:parallel-build? #t
|
||||
#:configure-flags
|
||||
#~(list "-DCMAKE_C_COMPILER=clang"
|
||||
"-DCMAKE_CXX_COMPILER=clang++"
|
||||
"-DCMAKE_PREFIX_PATH=\"$PWD/deps\""
|
||||
"-GNinja")
|
||||
#:imported-modules `((guix build copy-build-system)
|
||||
,@%cmake-build-system-modules)
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(replace 'build
|
||||
(lambda _
|
||||
(invoke "ninja" "-j" (number->string (parallel-job-count)))))
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests? (invoke "ninja" "unittests"))))
|
||||
(replace 'install
|
||||
(lambda* args
|
||||
(apply
|
||||
(assoc-ref (@ (guix build copy-build-system) %standard-phases)
|
||||
'install)
|
||||
#:install-plan
|
||||
'(("bin/pcsx2-qt" "bin/")
|
||||
("bin/resources" "share/")
|
||||
("bin/translations" "share/")
|
||||
("../source/.github/workflows/scripts/linux/pcsx2-qt.desktop"
|
||||
"share/applications/"))
|
||||
args)))
|
||||
(add-after 'install 'install-patches
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(install-file (search-input-file %build-inputs "/patches.zip")
|
||||
(string-append #$output "/share/resources")))))))
|
||||
(inputs (list (module-ref
|
||||
(resolve-interface '(gnu packages debug)) 'libbacktrace)
|
||||
`(,zstd "lib")
|
||||
curl
|
||||
dbus
|
||||
eudev
|
||||
ffmpeg
|
||||
freetype
|
||||
kddockwidgets
|
||||
libaio
|
||||
libjpeg-turbo
|
||||
libpcap
|
||||
libpng-for-pcsx2
|
||||
libwebp
|
||||
libxrandr
|
||||
lz4
|
||||
pcsx2-patches
|
||||
plutovg
|
||||
plutosvg
|
||||
qtbase
|
||||
qtdeclarative
|
||||
qtsvg
|
||||
qttools
|
||||
qtwayland
|
||||
sdl3
|
||||
shaderc
|
||||
vulkan-headers
|
||||
wayland
|
||||
libxi))
|
||||
(native-inputs (list clang-17 extra-cmake-modules ninja pkg-config))
|
||||
(home-page "https://pcsx2.net")
|
||||
(synopsis "PlayStation 2 (PS2) emulator")
|
||||
(description
|
||||
"PCSX2 is a free and open-source PlayStation 2 (PS2)
|
||||
emulator. Its purpose is to emulate the PS2's hardware, using a combination
|
||||
of MIPS CPU interpreters, recompilers and a virtual machine which manages
|
||||
hardware states and PS2 system memory. This allows you to play PS2 games on
|
||||
your PC, with many additional features and benefits.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public gens-gs
|
||||
(package
|
||||
(name "gens-gs")
|
||||
@@ -4748,14 +4653,14 @@ device contains a @code{exec} port to interface with the host system.")
|
||||
(sha256
|
||||
(base32 "1xahdr6bh3dw5swrc2r8kqa8ljhqlb7k2kxv5mrw5rhcmcnzcyig"))))
|
||||
(build-system pyproject-build-system)
|
||||
;; Tests either require kstool, or Python 2, or are 10 years old and fail.
|
||||
(arguments (list #:tests? #f)) ; no tests
|
||||
(arguments
|
||||
(list #:tests? #f)) ;no tests in PyPI archive
|
||||
(native-inputs
|
||||
(list cmake-minimal
|
||||
python-setuptools))
|
||||
python-setuptools
|
||||
python-wheel))
|
||||
(home-page "https://www.keystone-engine.org")
|
||||
(synopsis
|
||||
"Lightweight multi-platform, multi-architecture assembler framework")
|
||||
(synopsis "Lightweight multi-platform, multi-architecture assembler framework")
|
||||
(description
|
||||
"Keystone is a lightweight multi-platform, multi-architecture
|
||||
assembler framework. It supports a wide-range of different architectures
|
||||
|
||||
+230
-90
@@ -105,7 +105,6 @@
|
||||
#:use-module (gnu packages digest)
|
||||
#:use-module (gnu packages docbook)
|
||||
#:use-module (gnu packages documentation)
|
||||
#:use-module (gnu packages electronics)
|
||||
#:use-module (gnu packages emacs-build)
|
||||
#:use-module (gnu packages emacs-xyz)
|
||||
#:use-module (gnu packages file)
|
||||
@@ -722,21 +721,12 @@ multipole-accelerated algorithm.")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "083nz7vj7a334575smjry6257535h68gglh8a381xxa36dw96aqs"))
|
||||
(patches (search-patches "fritzing-0.9.6-fix-types.patch"))))
|
||||
(base32 "083nz7vj7a334575smjry6257535h68gglh8a381xxa36dw96aqs"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'patch-files
|
||||
(lambda _
|
||||
;; Trick the internal mechanism to load the parts
|
||||
(substitute* "src/version/partschecker.cpp"
|
||||
((".*git_libgit2_init.*")
|
||||
"return \"083nz7vj7a334575smjry6257535h68gglh8a381xxa36dw96aqs\";"))
|
||||
(substitute* "src/utils/textutils.cpp"
|
||||
(("QUuid::createUuid\\(\\)") "QUuid()"))))
|
||||
(replace 'configure
|
||||
(lambda _
|
||||
;; Integrate parts library
|
||||
@@ -753,22 +743,17 @@ multipole-accelerated algorithm.")
|
||||
"INCLUDEPATH += $$LIBGIT2INCLUDE\n"
|
||||
"LIBS += -L$$LIBGIT2LIB -lgit2\n"))
|
||||
(("^.*pri/libgit2detect.pri.") ""))
|
||||
;; Trick the internal mechanism to load the parts
|
||||
(substitute* "src/version/partschecker.cpp"
|
||||
((".*git_libgit2_init.*")
|
||||
"return \"083nz7vj7a334575smjry6257535h68gglh8a381xxa36dw96aqs\";"))
|
||||
;; XXX: NixOS and Gento have a phase where they generate part
|
||||
;; SQLite library, have proper investigation if it's required in
|
||||
;; Guix as well.
|
||||
(invoke "qmake"
|
||||
(string-append "QMAKE_LFLAGS_RPATH=-Wl,-rpath," #$output "/lib")
|
||||
(string-append "PREFIX=" #$output)
|
||||
"phoenix.pro")))
|
||||
(add-after 'install 'generate-parts-db
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let ((out (assoc-ref outputs "out"))
|
||||
(env-qt-qpa-platform (getenv "QT_QPA_PLATFORM"))
|
||||
(env-qt-hash-seed (getenv "QT_HASH_SEED")))
|
||||
(setenv "QT_QPA_PLATFORM" "offscreen")
|
||||
(setenv "QT_HASH_SEED" "0")
|
||||
(invoke (string-append out "/bin/Fritzing")
|
||||
"-db" (string-append out "/share/fritzing/parts/parts.db")
|
||||
"-folder" (string-append out "/share/fritzing"))
|
||||
(setenv "QT_QPA_PLATFORM" env-qt-qpa-platform)
|
||||
(setenv "QT_HASH_SEED" env-qt-hash-seed)))))))
|
||||
"phoenix.pro"))))))
|
||||
(native-inputs
|
||||
(list fritzing-parts))
|
||||
(inputs
|
||||
@@ -1181,32 +1166,24 @@ Emacs).")
|
||||
`("PATH" ":" prefix
|
||||
(,(string-append python "/bin:"))))))))))
|
||||
(native-search-paths
|
||||
;; Currently, KiCad environment variables are single-valued
|
||||
;; (see https://gitlab.com/kicad/code/kicad/-/issues/14792).
|
||||
(list (search-path-specification
|
||||
(variable "KICAD") ;to find kicad-doc
|
||||
(files '(""))
|
||||
(separator #f))
|
||||
(files '("")))
|
||||
(search-path-specification
|
||||
(variable "KICAD9_TEMPLATE_DIR")
|
||||
(files '("share/kicad/template"))
|
||||
(separator #f))
|
||||
(files '("share/kicad/template")))
|
||||
(search-path-specification
|
||||
(variable "KICAD9_SYMBOL_DIR")
|
||||
(files '("share/kicad/symbols"))
|
||||
(separator #f))
|
||||
(files '("share/kicad/symbols")))
|
||||
(search-path-specification
|
||||
(variable "KICAD9_FOOTPRINT_DIR")
|
||||
(files '("share/kicad/footprints"))
|
||||
(separator #f))
|
||||
(files '("share/kicad/footprints")))
|
||||
(search-path-specification
|
||||
(variable "KICAD9_3DMODEL_DIR")
|
||||
(files '("share/kicad/3dmodels"))
|
||||
(separator #f))
|
||||
(files '("share/kicad/3dmodels")))
|
||||
(search-path-specification
|
||||
(variable "KICAD_STOCK_DATA_HOME")
|
||||
(files '("share/kicad"))
|
||||
(separator #f))))
|
||||
(files '("share/kicad")))))
|
||||
(native-inputs (list boost
|
||||
desktop-file-utils
|
||||
gettext-minimal
|
||||
@@ -1726,7 +1703,7 @@ or an Ethernet connection.")
|
||||
(define-public harminv
|
||||
(package
|
||||
(name "harminv")
|
||||
(version "1.4.2")
|
||||
(version "1.4.1")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri
|
||||
@@ -1735,7 +1712,7 @@ or an Ethernet connection.")
|
||||
name "-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"18n71d3wj0jnldh72vb9lfj3vv64s1i2rmnhcpq4494p23vip6js"))))
|
||||
"0w1n4d249vlpda0hi6z1v13qp21vlbp3ykn0m8qg4rd5132j7fg1"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:configure-flags '("--enable-shared")
|
||||
@@ -1806,17 +1783,7 @@ for scientific simulations.")
|
||||
(list (string-append "--with-libctl="
|
||||
(assoc-ref %build-inputs "libctl")
|
||||
"/share/libctl")
|
||||
"--enable-shared")
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-before 'configure 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(setenv "CFLAGS"
|
||||
(string-join
|
||||
(list "-Wno-error=incompatible-pointer-types"
|
||||
"-Wno-error=implicit-function-declaration"
|
||||
"-Wno-error=int-conversion")
|
||||
" ")))))))
|
||||
"--enable-shared")))
|
||||
(native-inputs
|
||||
`(("fortran" ,gfortran)
|
||||
("pkg-config" ,pkg-config)
|
||||
@@ -2267,15 +2234,6 @@ and a fallback for environments without libc for Zydis.")
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(add-before 'build 'relax-gcc-14-strictness
|
||||
(lambda _
|
||||
(substitute* (find-files "." "Makefile")
|
||||
(("CFLAGS = (.*)$" all options)
|
||||
(string-append "CFLAGS = "
|
||||
" -Wno-error=incompatible-pointer-types"
|
||||
" -Wno-error=implicit-function-declaration"
|
||||
" "
|
||||
options)))))
|
||||
(add-before 'build 'fix-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((coreutils (assoc-ref inputs "coreutils-minimal")))
|
||||
@@ -2305,6 +2263,212 @@ and a fallback for environments without libc for Zydis.")
|
||||
high-performance parallel differential evolution (DE) optimization algorithm.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public libngspice
|
||||
;; Note: The ngspice's build system does not allow us to build both the
|
||||
;; library and the executables in one go. Thus, we have two packages.
|
||||
;; See <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=27344#236>.
|
||||
(package
|
||||
(name "libngspice")
|
||||
(version "44.2")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://git.code.sf.net/p/ngspice/ngspice")
|
||||
(commit (string-append "ngspice-" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1vp27149kx8l7397bv5p708jqph1kma8rb9bl7ckgmbr9sw9cn3q"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;there are no tests for libngspice
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'install 'delete-scripts
|
||||
(lambda _
|
||||
(delete-file-recursively
|
||||
(string-append #$output
|
||||
"/share/ngspice/scripts")))))
|
||||
#:configure-flags #~(list "--enable-openmp" "--enable-cider"
|
||||
"--enable-xspice" "--with-ngshared")))
|
||||
(native-inputs (list autoconf automake bison flex libtool))
|
||||
(inputs (list openmpi))
|
||||
(home-page "https://ngspice.sourceforge.io/")
|
||||
(synopsis "Mixed-level/mixed-signal circuit simulator")
|
||||
(description
|
||||
"Ngspice is a mixed-level/mixed-signal circuit simulator. It includes
|
||||
@code{Spice3f5}, a circuit simulator, and @code{Xspice}, an extension that
|
||||
provides code modeling support and simulation of digital components through
|
||||
an embedded event driven algorithm.")
|
||||
(license (list license:lgpl2.0+ ;code in frontend/numparam
|
||||
(license:non-copyleft "file:///COPYING") ;spice3 bsd-style
|
||||
license:bsd-3 ;ciderlib
|
||||
license:public-domain)))) ;xspice
|
||||
|
||||
(define-public ngspice
|
||||
;; The ngspice executables (see libngpsice above.)
|
||||
(package
|
||||
(inherit libngspice)
|
||||
(name "ngspice")
|
||||
(arguments
|
||||
(substitute-keyword-arguments (package-arguments libngspice)
|
||||
;; Tests require a X server running, so we keep them disabled
|
||||
((#:configure-flags flags)
|
||||
#~(cons* "--enable-rpath" "--with-x" "--with-readline=yes"
|
||||
(delete "--with-ngshared" #$flags)))
|
||||
((#:phases phases)
|
||||
#~(modify-phases #$phases
|
||||
(delete 'delete-scripts)))))
|
||||
(native-inputs
|
||||
(modify-inputs (package-native-inputs libngspice)
|
||||
(append perl)))
|
||||
(inputs (list libngspice readline libxaw libx11))))
|
||||
|
||||
(define trilinos-serial-xyce
|
||||
;; Note: This is a Trilinos containing only the packages Xyce needs, so we
|
||||
;; keep it private. See
|
||||
;; <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=27344#248>.
|
||||
;; TODO: Remove when we have modular Trilinos packages?
|
||||
(package
|
||||
(name "trilinos-serial-xyce")
|
||||
(version "12.12.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/trilinos/Trilinos")
|
||||
(commit (string-append "trilinos-release-"
|
||||
(string-map (lambda (chr)
|
||||
(case chr
|
||||
((#\.) #\-)
|
||||
(else chr)))
|
||||
version)))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1smz3wlpfyjn0czmpl8bj4hw33p1zi9nnfygpsx7jl1523nypa1n"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
`(#:out-of-source? #t
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
;; Delete unneeded tribits(build system) directory which makes validate-runpath
|
||||
;; phase to fail.
|
||||
(add-before 'validate-runpath 'delete-tribits
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(delete-file-recursively
|
||||
(string-append (assoc-ref outputs "out")
|
||||
"/lib/cmake/tribits")))))
|
||||
#:configure-flags
|
||||
(list "-DCMAKE_CXX_FLAGS=-O3 -fPIC"
|
||||
"-DCMAKE_C_FLAGS=-O3 -fPIC"
|
||||
"-DCMAKE_Fortran_FLAGS=-O3 -fPIC"
|
||||
"-DTrilinos_ENABLE_NOX=ON"
|
||||
"-DNOX_ENABLE_LOCA=ON"
|
||||
"-DTrilinos_ENABLE_EpetraExt=ON"
|
||||
"-DEpetraExt_BUILD_BTF=ON"
|
||||
"-DEpetraExt_BUILD_EXPERIMENTAL=ON"
|
||||
"-DEpetraExt_BUILD_GRAPH_REORDERINGS=ON"
|
||||
"-DTrilinos_ENABLE_TrilinosCouplings=ON"
|
||||
"-DTrilinos_ENABLE_Ifpack=ON"
|
||||
"-DTrilinos_ENABLE_Isorropia=ON"
|
||||
"-DTrilinos_ENABLE_AztecOO=ON"
|
||||
"-DTrilinos_ENABLE_Belos=ON"
|
||||
"-DTrilinos_ENABLE_Teuchos=ON"
|
||||
"-DTeuchos_ENABLE_COMPLEX=ON"
|
||||
"-DTrilinos_ENABLE_Amesos=ON"
|
||||
"-DAmesos_ENABLE_KLU=ON"
|
||||
"-DAmesos_ENABLE_UMFPACK=ON"
|
||||
"-DTrilinos_ENABLE_Sacado=ON"
|
||||
"-DTrilinos_ENABLE_Kokkos=OFF"
|
||||
"-DTrilinos_ENABLE_ALL_OPTIONAL_PACKAGES=OFF"
|
||||
"-DTPL_ENABLE_AMD=ON"
|
||||
"-DTPL_ENABLE_UMFPACK=ON"
|
||||
"-DTPL_ENABLE_BLAS=ON"
|
||||
"-DTPL_ENABLE_LAPACK=ON")))
|
||||
(native-inputs (list gfortran swig))
|
||||
(inputs (list boost lapack suitesparse))
|
||||
(home-page "https://trilinos.org")
|
||||
(synopsis "Engineering and scientific problems algorithms")
|
||||
(description
|
||||
"The Trilinos Project is an effort to develop algorithms and enabling
|
||||
technologies within an object-oriented software framework for the solution of
|
||||
large-scale, complex multi-physics engineering and scientific problems. A
|
||||
unique design feature of Trilinos is its focus on packages.")
|
||||
(license (list license:lgpl2.1+
|
||||
license:bsd-3))))
|
||||
|
||||
(define-public xyce-serial
|
||||
(package
|
||||
(name "xyce-serial")
|
||||
(version "6.8")
|
||||
(source
|
||||
(origin (method url-fetch)
|
||||
(uri (string-append "https://archive.org/download/Xyce-"
|
||||
version "/Xyce-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"09flp1xywbb2laayd9rg8vd0fjsh115y6k1p71jacy0nrbdvvlcg"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:tests? #f
|
||||
#:configure-flags
|
||||
(list
|
||||
"CXXFLAGS=-O3"
|
||||
(string-append "ARCHDIR="
|
||||
(assoc-ref %build-inputs "trilinos")))))
|
||||
(native-inputs
|
||||
`(("bison" ,bison-3.0) ;'configure' fails with Bison 3.4
|
||||
("flex" ,flex)
|
||||
("fortran" ,gfortran)))
|
||||
(inputs
|
||||
`(("fftw" ,fftw)
|
||||
("suitesparse" ,suitesparse)
|
||||
("lapack" ,lapack)
|
||||
("trilinos" ,trilinos-serial-xyce)))
|
||||
(home-page "https://xyce.sandia.gov/")
|
||||
(synopsis "High-performance analog circuit simulator")
|
||||
(description
|
||||
"Xyce is a SPICE-compatible, high-performance analog circuit simulator,
|
||||
capable of solving extremely large circuit problems by supporting large-scale
|
||||
parallel computing platforms. It also supports serial execution.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define trilinos-parallel-xyce
|
||||
(package (inherit trilinos-serial-xyce)
|
||||
(name "trilinos-parallel-xyce")
|
||||
(arguments
|
||||
`(,@(substitute-keyword-arguments (package-arguments trilinos-serial-xyce)
|
||||
((#:configure-flags flags)
|
||||
`(append (list "-DTrilinos_ENABLE_ShyLU=ON"
|
||||
"-DTrilinos_ENABLE_Zoltan=ON"
|
||||
"-DTPL_ENABLE_MPI=ON")
|
||||
,flags)))))
|
||||
(inputs
|
||||
`(("mpi" ,openmpi)
|
||||
,@(package-inputs trilinos-serial-xyce)))))
|
||||
|
||||
(define-public xyce-parallel
|
||||
(package (inherit xyce-serial)
|
||||
(name "xyce-parallel")
|
||||
(arguments
|
||||
`(,@(substitute-keyword-arguments (package-arguments xyce-serial)
|
||||
((#:configure-flags flags)
|
||||
`(list "CXXFLAGS=-O3"
|
||||
"CXX=mpiCC"
|
||||
"CC=mpicc"
|
||||
"F77=mpif77"
|
||||
"--enable-mpi"
|
||||
(string-append
|
||||
"ARCHDIR="
|
||||
(assoc-ref %build-inputs "trilinos")))))))
|
||||
(propagated-inputs
|
||||
`(("mpi" ,openmpi)))
|
||||
(inputs
|
||||
`(("trilinos" ,trilinos-parallel-xyce)
|
||||
,@(alist-delete "trilinos"
|
||||
(package-inputs xyce-serial))))))
|
||||
|
||||
(define-public librepcb
|
||||
(package
|
||||
(name "librepcb")
|
||||
@@ -3088,7 +3252,7 @@ but also adds new features and improves existing ones.")
|
||||
(define-public emacs-scad-mode
|
||||
(package
|
||||
(name "emacs-scad-mode")
|
||||
(version "97.0")
|
||||
(version "96.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
@@ -3096,7 +3260,7 @@ but also adds new features and improves existing ones.")
|
||||
(url "https://github.com/openscad/emacs-scad-mode")
|
||||
(commit version)))
|
||||
(sha256
|
||||
(base32 "1h86z2qn9q7ww2m7p992fx8abzdffcd3bcp3bmck3c9q2aksjl5j"))
|
||||
(base32 "0vsidz3qws89z8blq5nng7mvzn3kj06lw9417aymhykyjgjn5f8m"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system emacs-build-system)
|
||||
(propagated-inputs (list emacs-compat))
|
||||
@@ -3674,10 +3838,6 @@ program that can perform mesh processing tasks in batch mode, without a GUI.")
|
||||
"/share/vim/vimfiles/pack/guix/start/poke")
|
||||
(string-append "--with-lispdir="
|
||||
(emacs:elpa-directory #$output)))))
|
||||
(native-search-paths
|
||||
(list (search-path-specification
|
||||
(variable "POKE_LOAD_PATH")
|
||||
(files '("share/poke/pickles")))))
|
||||
(home-page "https://www.gnu.org/software/poke/#documentation")
|
||||
(synopsis "Editing of arbitrary binary data")
|
||||
(description "GNU poke is an interactive, extensible editor for binary data.
|
||||
@@ -3686,30 +3846,10 @@ full-fledged procedural, interactive programming language designed to describe
|
||||
data structures and to operate on them.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public poke-elf
|
||||
(package
|
||||
(name "poke-elf")
|
||||
(version "1.0")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/poke/poke-elf-" version
|
||||
".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0x3shih7sjj34f5305kvbp4cfy11m92zwidjk3658m23zkd6gdqa"))))
|
||||
(build-system gnu-build-system)
|
||||
(native-inputs (list poke)) ;for the test suite
|
||||
(home-page "https://jemarch.net/poke-elf")
|
||||
(synopsis "GNU poke pickle for ELF object files")
|
||||
(description "@code{poke-elf} is a GNU poke pickle for editing ELF object files,
|
||||
executables, shared libraries and core dumps. It supports many architectures
|
||||
and extensions.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
;; The 'emacs-poke' name may eventually refer to 'poke' from ELPA, which is
|
||||
;; a different beast.
|
||||
(define-deprecated-package emacs-poke
|
||||
poke)
|
||||
(define-public emacs-poke
|
||||
;; The 'emacs-poke' name may eventually refer to 'poke' from ELPA, which is
|
||||
;; a different beast.
|
||||
(deprecated-package "emacs-poke" poke))
|
||||
|
||||
(define-public pcb2gcode
|
||||
;; XXX: The latest release was on <2022-09-12>, but master branch contains a
|
||||
|
||||
@@ -443,6 +443,47 @@ embedded systems.")
|
||||
Libraries stack (eo, evas, ecore, edje, emotion, ethumb and elementary).")
|
||||
(license license:lgpl3)))
|
||||
|
||||
(define-public edi
|
||||
(package
|
||||
(name "edi")
|
||||
(version "0.8.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://github.com/Enlightenment/edi/releases/"
|
||||
"download/v" version "/edi-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"01k8gp8r2wa6pyg3dkbm35m6hdsbss06hybghg0qjmd4mzswcd3a"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
'(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fix-clang-header
|
||||
(lambda _
|
||||
(substitute* "scripts/clang_include_dir.sh"
|
||||
(("grep clang") "grep clang | head -n1"))
|
||||
#t))
|
||||
(add-after 'unpack 'set-home-directory
|
||||
;; FATAL: Cannot create run dir '/homeless-shelter/.run' - errno=2
|
||||
(lambda _ (setenv "HOME" "/tmp") #t)))
|
||||
#:tests? #f)) ; tests require running dbus service
|
||||
(native-inputs
|
||||
`(("check" ,check)
|
||||
("gettext" ,gettext-minimal)
|
||||
("pkg-config" ,pkg-config)))
|
||||
(inputs
|
||||
(list clang efl))
|
||||
(home-page "https://www.enlightenment.org/about-edi")
|
||||
(synopsis "Development environment for Enlightenment")
|
||||
(description "EDI is a development environment designed for and built using
|
||||
the EFL. It's aim is to create a new, native development environment for Linux
|
||||
that tries to lower the barrier to getting involved in Enlightenment development
|
||||
and in creating applications based on the Enlightenment Foundation Library suite.")
|
||||
(license (list license:public-domain ; data/extra/skeleton
|
||||
license:gpl2 ; edi
|
||||
license:gpl3)))) ; data/extra/examples/images/mono-runtime.png
|
||||
|
||||
(define-public ephoto
|
||||
(package
|
||||
(name "ephoto")
|
||||
@@ -519,3 +560,35 @@ directories.
|
||||
"This is a process monitor and system monitor using the
|
||||
@dfn{Enlightenment Foundation Libraries} (EFL).")
|
||||
(license license:bsd-2)))
|
||||
|
||||
;; XXX: See: <https://codeberg.org/guix/guix/issues/3014>.
|
||||
(define-public epour
|
||||
(package
|
||||
(name "epour")
|
||||
(version "0.7.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://download.enlightenment.org/rel/apps/epour"
|
||||
"/epour-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32 "0g9f9p01hsq6dcf4cs1pwq95g6fpkyjgwqlvdjk1km1i5gj5ygqw"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;no test target
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'find-theme-dir
|
||||
(lambda _
|
||||
(substitute* "epour/gui/__init__.py"
|
||||
(("join\\(data_path")
|
||||
(string-append "join(\"" #$output "/share/epour\""))))))))
|
||||
(native-inputs (list intltool python-distutils-extra python-setuptools-67
|
||||
python-wheel-0.40))
|
||||
(inputs (list libtorrent-rasterbar-1.2 python-dbus python-efl python-pyxdg))
|
||||
(home-page "https://www.enlightenment.org")
|
||||
(synopsis "EFL Bittorrent client")
|
||||
(description "Epour is a BitTorrent client based on the @dfn{Enlightenment
|
||||
Foundation Libraries} (EFL) and rb-libtorrent.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
@@ -36,14 +36,14 @@
|
||||
(define-public entr
|
||||
(package
|
||||
(name "entr")
|
||||
(version "5.7")
|
||||
(version "5.6")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://eradman.com/entrproject/code/entr-"
|
||||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32 "0ryhylhd682m5cxz3zjyv5zxvxd4dqm3h6mlgvrwww0ch91xkich"))))
|
||||
(base32 "0kniklgnqv4j9carm78d3423wlwqw1ykxmlla4xmlfwdjbgvh8h2"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
`(#:test-target "test"
|
||||
@@ -68,7 +68,7 @@
|
||||
(search-input-file inputs command))
|
||||
(("/usr(/bin/clear)" _ command)
|
||||
(search-input-file inputs command))))))))
|
||||
(inputs (list bash-minimal coreutils))
|
||||
(inputs (list bash-minimal coreutils ncurses))
|
||||
(home-page "https://eradman.com/entrproject/")
|
||||
(synopsis "Run arbitrary commands when files change")
|
||||
(description
|
||||
|
||||
+32
-32
@@ -407,13 +407,13 @@ Server.")
|
||||
(define-public erlang-p1-acme
|
||||
(package
|
||||
(name "erlang-p1-acme")
|
||||
(version "1.0.28")
|
||||
(version "1.0.25")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "p1_acme" version))
|
||||
(sha256
|
||||
(base32 "08v4shjng4gdq6nffsvckhs9lcj5rcipbs5ghp95z79zvs36js6f"))))
|
||||
(base32 "136h8nkfd62xd76p8p4mgdiz8hxdqcg4arayl6c4znsx953mpdd7"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-base64url erlang-idna erlang-jiffy erlang-jose
|
||||
erlang-yconf))
|
||||
@@ -450,13 +450,13 @@ Server.")
|
||||
(define-public erlang-p1-utils
|
||||
(package
|
||||
(name "erlang-p1-utils")
|
||||
(version "1.0.28")
|
||||
(version "1.0.26")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "p1_utils" version))
|
||||
(sha256
|
||||
(base32 "0cq0gwd4vy51j1qq2c6p1i6nv98agvfjdy0sd6bdj2m4qi5x96y4"))))
|
||||
(base32 "0k5hfqrjrvgh7gknqj5pzpra9k1g0bgc2ac19zb8pfan2669wdyh"))))
|
||||
(build-system rebar-build-system)
|
||||
(synopsis "ProcessOne utility modules for Erlang")
|
||||
(description "This package provides ProcessOne utility modules for Erlang.")
|
||||
@@ -466,13 +466,13 @@ Server.")
|
||||
(define-public erlang-p1-mysql
|
||||
(package
|
||||
(name "erlang-p1-mysql")
|
||||
(version "1.0.26")
|
||||
(version "1.0.25")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "p1_mysql" version))
|
||||
(sha256
|
||||
(base32 "1v7xz81wqx2c6ndl9rd3kq0v125209cbz7alrywijiy5ya1q04za"))))
|
||||
(base32 "0d7438sfzzh57d0fxq165k75khja6krfcglgx2c60wjvx7x7y676"))))
|
||||
(build-system rebar-build-system)
|
||||
(synopsis "Pure Erlang MySQL driver")
|
||||
(description "This package provides pure Erlang @code{MySQL} driver.")
|
||||
@@ -482,13 +482,13 @@ Server.")
|
||||
(define-public erlang-p1-pgsql
|
||||
(package
|
||||
(name "erlang-p1-pgsql")
|
||||
(version "1.1.35")
|
||||
(version "1.1.29")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "p1_pgsql" version))
|
||||
(sha256
|
||||
(base32 "1hjmw82f6k2dpchgdn2i0j0bvi7m6qihcnvrjq36c721di2995g9"))))
|
||||
(base32 "1h9qigb3qfys46rqpqm6s5a0r7cz38hscgnsjlw3z6bln7l5izx6"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-xmpp))
|
||||
(synopsis "PostgreSQL driver for Erlang")
|
||||
@@ -582,13 +582,13 @@ Erlang-based systems.")
|
||||
(define-public erlang-stringprep
|
||||
(package
|
||||
(name "erlang-stringprep")
|
||||
(version "1.0.33")
|
||||
(version "1.0.30")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "stringprep" version))
|
||||
(sha256
|
||||
(base32 "1h4qvajlsfqfg61c9f0rjf3rmha8sahvqiivnc2zd1q8ql5v7y4n"))))
|
||||
(base32 "16hb49f9ghx8sqrs7928fjig9wyah22z7cl91y1pff50hhrrpz7n"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -665,13 +665,13 @@ dispatch them as Telemetry events.")
|
||||
(define-public erlang-cache-tab
|
||||
(package
|
||||
(name "erlang-cache-tab")
|
||||
(version "1.0.33")
|
||||
(version "1.0.31")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "cache_tab" version))
|
||||
(sha256
|
||||
(base32 "002rqgikbdnzfkzw4n2wi6k03155pcqf4j68w2mjmcjhn2g00n22"))))
|
||||
(base32 "0lb35g3p3ybij5f7fnilq3ni37nfgzhajnrmhvplgch9985bd0l5"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -691,13 +691,13 @@ dispatch them as Telemetry events.")
|
||||
(define-public erlang-eimp
|
||||
(package
|
||||
(name "erlang-eimp")
|
||||
(version "1.0.26")
|
||||
(version "1.0.23")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "eimp" version))
|
||||
(sha256
|
||||
(base32 "0k04abnna5vqd0r248car4xkfjc83p5z0iqy4w7w9pxrfa2lwvfr"))))
|
||||
(base32 "12k2df0mwq16rh77ziiahq9mjd9cy2jfdnsbzkj96a6b4c07hz4h"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -717,13 +717,13 @@ dispatch them as Telemetry events.")
|
||||
(define-public erlang-mqtree
|
||||
(package
|
||||
(name "erlang-mqtree")
|
||||
(version "1.0.19")
|
||||
(version "1.0.17")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "mqtree" version))
|
||||
(sha256
|
||||
(base32 "0g6fz25j942ryc6m6c6iyb9hvs22v3i5l2pq28l8i8a9biqna468"))))
|
||||
(base32 "18z23c1axn6y9799f0ydb0m29wxvq956b57bzk886ixwiz7vgs2z"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -743,13 +743,13 @@ dispatch them as Telemetry events.")
|
||||
(define-public erlang-ezlib
|
||||
(package
|
||||
(name "erlang-ezlib")
|
||||
(version "1.0.15")
|
||||
(version "1.0.13")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "ezlib" version))
|
||||
(sha256
|
||||
(base32 "1arfjvipmfvz52szlsy6gn4s1x25spip6gljwv7za6jj29nbl56x"))))
|
||||
(base32 "1fxz584ry1ib35r74hbmapwq71j5iv5rymm927ys0mgdz2rjmrly"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -769,13 +769,13 @@ dispatch them as Telemetry events.")
|
||||
(define-public erlang-fast-tls
|
||||
(package
|
||||
(name "erlang-fast-tls")
|
||||
(version "1.1.25")
|
||||
(version "1.1.22")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "fast_tls" version))
|
||||
(sha256
|
||||
(base32 "08d894ckv6flwagngk5zwmgrwxz7nmrycsxap010wrqffjsq7qar"))))
|
||||
(base32 "0ns8wbl5gxprficlm653ql6d51z6fy0fy3r3am3mrcbszfp7jmz6"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils openssl))
|
||||
(native-inputs (list erlang-pc openssl))
|
||||
@@ -809,13 +809,13 @@ for Erlang/Elixir.")
|
||||
(define-public erlang-stun
|
||||
(package
|
||||
(name "erlang-stun")
|
||||
(version "1.2.21")
|
||||
(version "1.2.15")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "stun" version))
|
||||
(sha256
|
||||
(base32 "1n8j3vf8g2aq7i271lcm5202vzvvif5vz9m9d8528nyhp7pyhzrx"))))
|
||||
(base32 "1vzdq3mpajv4y7g54nq4dswn44k6rk07ddjqwqn3zlczl90sbn7n"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-fast-tls erlang-p1-utils))
|
||||
(synopsis "STUN and TURN library for Erlang/Elixir")
|
||||
@@ -827,13 +827,13 @@ Erlang/Elixir.")
|
||||
(define-public erlang-fast-xml
|
||||
(package
|
||||
(name "erlang-fast-xml")
|
||||
(version "1.1.57")
|
||||
(version "1.1.55")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "fast_xml" version))
|
||||
(sha256
|
||||
(base32 "0fcwj8yifwhr5m5maqa0ifwp7vad05d67ayxsmky9bxcmn84xhzf"))))
|
||||
(base32 "11czr4iqv2m9b5msigwxf26q6ny90qzrawzcrmkzbm8fg0xf5ww3"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -854,13 +854,13 @@ parsing library.")
|
||||
(define-public erlang-xmpp
|
||||
(package
|
||||
(name "erlang-xmpp")
|
||||
(version "1.11.1")
|
||||
(version "1.9.1")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "xmpp" version))
|
||||
(sha256
|
||||
(base32 "05ipgf53dnz5d7hfz0bvmv1lxs0c85737ni5ak0wxcsaj3gk7jd5"))))
|
||||
(base32 "1p3m6a8x89j8gsfpxf13hdxh9syd276g1jlhpz4a9hg4yqd47cfj"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-ezlib
|
||||
erlang-fast-tls
|
||||
@@ -886,13 +886,13 @@ for Erlang/Elixir.")
|
||||
(define-public erlang-esip
|
||||
(package
|
||||
(name "erlang-esip")
|
||||
(version "1.0.59")
|
||||
(version "1.0.56")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "esip" version))
|
||||
(sha256
|
||||
(base32 "1rpvsfm5y932wfra1mvkqhdabikmwqlh65bky52b3h4x6hy2xpqb"))))
|
||||
(base32 "07ys2n43fdg3cka6v7lh6633a177yiwmrkcd6vvj7dlkxw66dwwy"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-fast-tls erlang-p1-utils erlang-stun))
|
||||
(native-inputs (list erlang-pc))
|
||||
@@ -914,13 +914,13 @@ Erlang.")
|
||||
(define-public erlang-fast-yaml
|
||||
(package
|
||||
(name "erlang-fast-yaml")
|
||||
(version "1.0.39")
|
||||
(version "1.0.37")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "fast_yaml" version))
|
||||
(sha256
|
||||
(base32 "13d7n1zjgvnkrxjk7riignqssrh952hs5x259vb6k4ibksmvkir4"))))
|
||||
(base32 "0sd72nal5i6mbmicsmb494mr4g0gvs719lzp2hj1gqpp3dr6is4d"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-p1-utils))
|
||||
(native-inputs (list erlang-pc libyaml))
|
||||
@@ -945,13 +945,13 @@ Erlang/Elixir.")
|
||||
(define-public erlang-yconf
|
||||
(package
|
||||
(name "erlang-yconf")
|
||||
(version "1.0.21")
|
||||
(version "1.0.17")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (hexpm-uri "yconf" version))
|
||||
(sha256
|
||||
(base32 "0v093p002l0zw8v8g4f3l769fkr0ihv2xk39nj2mv1w6zpqsa965"))))
|
||||
(base32 "098s6if76z37amcqi99m0xq30h5i1znbjmw4ri39li216a994a6x"))))
|
||||
(build-system rebar-build-system)
|
||||
(inputs (list erlang-fast-yaml))
|
||||
(synopsis "YAML configuration processor")
|
||||
|
||||
@@ -545,14 +545,14 @@ including input methods previous bundled inside Fcitx 4:
|
||||
"/fcitx5-configtool/fcitx5-configtool-" version ".tar.zst"))
|
||||
(sha256
|
||||
(base32 "1fb21mbc0k33cadslq0rjwi5y7fxm5jzgdk9yna3h2r62sdmdb60"))))
|
||||
(build-system qt-build-system)
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list #:qtbase qtbase
|
||||
#:tests? #f
|
||||
(list #:tests? #f
|
||||
#:configure-flags #~(list "-DUSE_QT6=ON")))
|
||||
(inputs
|
||||
(list fcitx5
|
||||
fcitx5-qt
|
||||
qtbase
|
||||
qtdeclarative
|
||||
ksvg
|
||||
kcmutils
|
||||
@@ -568,7 +568,6 @@ including input methods previous bundled inside Fcitx 4:
|
||||
kirigami
|
||||
libxkbcommon
|
||||
libx11
|
||||
qtwayland
|
||||
xkeyboard-config
|
||||
libxkbfile
|
||||
gettext-minimal
|
||||
|
||||
@@ -218,8 +218,8 @@ native interface that allows you to integrate Mastodon's social experience
|
||||
seamlessly with your desktop environment.")
|
||||
(license license:gpl3)))
|
||||
|
||||
(define-deprecated-package tootle
|
||||
tuba)
|
||||
(define-public tootle
|
||||
(deprecated-package "tootle" tuba))
|
||||
|
||||
(define-public python-mastodon-py
|
||||
(package
|
||||
|
||||
@@ -49,8 +49,6 @@
|
||||
#:use-module (guix build-system go)
|
||||
#:use-module (guix build-system linux-module)
|
||||
#:use-module (guix build-system pyproject)
|
||||
#:use-module (guix build-system python)
|
||||
#:use-module (guix build-system qt)
|
||||
#:use-module (guix build-system trivial)
|
||||
#:use-module (guix utils)
|
||||
#:use-module (gnu packages)
|
||||
@@ -2011,48 +2009,50 @@ compatible directories.")
|
||||
(define-public dbxfs
|
||||
(package
|
||||
(name "dbxfs")
|
||||
(version "2.0.1")
|
||||
(version "1.0.63")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "dbxfs" version))
|
||||
(sha256
|
||||
(base32 "1ml03anr6zz26ab3d8z1r8klz9bfincrn5v53l725svar9an0b12"))))
|
||||
(origin
|
||||
;; Release tarball contains files not in git repository.
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://thelig.ht/code/dbxfs")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1vzfhw3z2r0rb6s0qdzirh3pl7rv1z8xmxa0z5h7h1wqhpl05ai7"))
|
||||
(patches (search-patches "dbxfs-remove-sentry-sdk.patch"))
|
||||
(snippet
|
||||
#~(begin (use-modules (guix build utils))
|
||||
;; Don't check for package updates.
|
||||
(substitute* "dbxfs/main.py"
|
||||
(("if version") "if False"))))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
;; XXX: No tests in Pypi archive. git-fetch fails to download the
|
||||
;; git source upstream though.
|
||||
#:tests? #f
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-requirements
|
||||
(lambda _
|
||||
(substitute* "setup.py"
|
||||
(("\"sentry_sdk.*\",")
|
||||
""))
|
||||
(substitute* "dbxfs/main.py"
|
||||
(("import sentry_sdk")
|
||||
"")
|
||||
(("^(\\s)sentry_sdk\\.init" all space)
|
||||
(string-append space "import sentry_sdk\n" all))
|
||||
;; Don't check for package updates.
|
||||
(("if version")
|
||||
"if False")))))))
|
||||
(inputs
|
||||
(list python-block-tracing
|
||||
'(#:tests? #f
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-requirements
|
||||
(lambda _
|
||||
(substitute* "setup.py"
|
||||
(("keyrings.alt>=3.1,<5")
|
||||
"keyrings.alt>=3.1")))))))
|
||||
(propagated-inputs
|
||||
(list python-appdirs
|
||||
python-block-tracing
|
||||
python-dropbox
|
||||
python-platformdirs
|
||||
python-keyring
|
||||
python-keyrings-alt
|
||||
python-privy
|
||||
python-userspacefs))
|
||||
(native-inputs
|
||||
(list python-setuptools))
|
||||
(home-page "https://thelig.ht/code/dbxfs/")
|
||||
(synopsis "User-space file system for Dropbox")
|
||||
(description
|
||||
"@code{dbxfs} allows you to mount your Dropbox folder as if it were a
|
||||
(home-page "https://thelig.ht/code/dbxfs/")
|
||||
(synopsis "User-space file system for Dropbox")
|
||||
(description
|
||||
"@code{dbxfs} allows you to mount your Dropbox folder as if it were a
|
||||
local file system using FUSE.")
|
||||
(license license:gpl3+)))
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public rewritefs
|
||||
(let ((revision "1")
|
||||
@@ -2441,7 +2441,7 @@ filtering and ordering functionality.
|
||||
(define-public sirikali
|
||||
(package
|
||||
(name "sirikali")
|
||||
(version "1.8.4")
|
||||
(version "1.6.0")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -2449,21 +2449,19 @@ filtering and ordering functionality.
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0z144ki7664aclnv3p0bpjlzknlsgldl85v76hs2bhnk1jjlgf5y"))))
|
||||
(build-system qt-build-system)
|
||||
(base32
|
||||
"06cl7srxaqpzv7gcd17cl78qhrpqhdvpfcj4pr73fr5hhackrf52"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;No tests
|
||||
#:qtbase qtbase
|
||||
#:configure-flags #~(list "-DBUILD_WITH_QT6=true")))
|
||||
(inputs (list xdg-utils libpwquality libgcrypt libsecret qtwayland))
|
||||
'(#:tests? #f ;No tests
|
||||
#:configure-flags '("-DQT5=true" "-DCMAKE_BUILD_TYPE=RELEASE")))
|
||||
(inputs (list xdg-utils libpwquality libgcrypt libsecret qtbase-5))
|
||||
(native-inputs (list pkg-config))
|
||||
(home-page "https://mhogomchungu.github.io/sirikali/")
|
||||
(synopsis "GUI front end to file system encryption utilities")
|
||||
(description
|
||||
"SiriKali is a Qt/C++ GUI application for managing encrypted folders. It
|
||||
supports various backends, including eCryptfs, CryFS, EncFS, gocryptfs, fscrypt,
|
||||
securefs, SSHFS, and Cryptomator.")
|
||||
(synopsis "GUI front end to sshfs, ecryptfs, cryfs, gocryptfs, securefs, fscrypt and encfs")
|
||||
(description "@dfn{SiriKali} is a Qt/C++ GUI application that manages
|
||||
+ecryptfs, cryfs, encfs, gocryptfs, fscrypt and securefs
|
||||
+based encrypted folders.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public watcher
|
||||
|
||||
+22
-89
@@ -2,7 +2,7 @@
|
||||
;;; Copyright © 2015, 2016, 2023 Andreas Enge <andreas@enge.fr>
|
||||
;;; Copyright © 2016-2018, 2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2016 Alex Griffin <a@ajgrf.com>
|
||||
;;; Copyright © 2016, 2020, 2024, 2025 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||||
;;; Copyright © 2016, 2020 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||||
;;; Copyright © 2017 Carlo Zancanaro <carlo@zancanaro.id.au>
|
||||
;;; Copyright © 2017 Theodoros Foradis <theodoros@foradis.org>
|
||||
;;; Copyright © 2017 Vasile Dumitrascu <va511e@yahoo.com>
|
||||
@@ -110,7 +110,6 @@
|
||||
#:use-module (gnu packages haskell-check)
|
||||
#:use-module (gnu packages haskell-web)
|
||||
#:use-module (gnu packages haskell-xyz)
|
||||
#:use-module (gnu packages iso-codes)
|
||||
#:use-module (gnu packages jemalloc)
|
||||
#:use-module (gnu packages libedit)
|
||||
#:use-module (gnu packages libevent)
|
||||
@@ -1589,30 +1588,6 @@ The module also includes implementations of the Verhoeff,
|
||||
Luhn and family of ISO/IEC 7064 check digit algorithms.")
|
||||
(license license:lgpl2.1+)))
|
||||
|
||||
(define-public python-schwifty
|
||||
(package
|
||||
(name "python-schwifty")
|
||||
(version "2025.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "schwifty" version))
|
||||
(sha256
|
||||
(base32 "16d0q1yzrh9fn6ybbsvhr9wbgld27rvn152w4wdcibidq2jbi0s2"))))
|
||||
(build-system pyproject-build-system)
|
||||
(native-inputs (list python-hatchling python-hatch-vcs python-pytest
|
||||
python-pydantic-2))
|
||||
(propagated-inputs (list python-importlib-resources python-pycountry
|
||||
python-rstr python-typing-extensions))
|
||||
(home-page "http://github.com/mdomke/schwifty/")
|
||||
(synopsis "Python module to work with IBANs and BICs")
|
||||
(description
|
||||
"schwifty is a Python library that let's you easily work with
|
||||
IBANs and BICs as specified by the ISO. IBAN is the Internation Bank Account
|
||||
Number and BIC the Business Identifier Code. Both are used for international
|
||||
money transfer.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public python-duniterpy
|
||||
(package
|
||||
(name "python-duniterpy")
|
||||
@@ -1657,44 +1632,21 @@ main features are:
|
||||
(define-public silkaj
|
||||
(package
|
||||
(name "silkaj")
|
||||
(version "0.12.1")
|
||||
(version "0.10.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://git.duniter.org/clients/python/silkaj")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "silkaj" version))
|
||||
(sha256
|
||||
(base32 "0prglgwvzi676h4lyw9266sqiqbfs2l0mv0bmjvplvdxzzcs63bv"))))
|
||||
(base32 "0p8jqnswrrxri8i2ikdz8mij7gks0yab3wdcb37jf2kjwmrwanpk"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:test-flags
|
||||
;; They require Poetry in the PATH.
|
||||
#~(list "--ignore=tests/integration/"
|
||||
;; Network access is required.
|
||||
"--deselect=tests/unit/money/test_history.py::test_csv_output"
|
||||
;; AssertionError: Expected 'mock' to have been called
|
||||
;; once. Called 0 times
|
||||
"--deselect=tests/unit/test_auth.py::test_authentication_wif")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'check 'set-check-environment
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(setenv "TZ" "UTC")
|
||||
(setenv "TZDIR"
|
||||
(search-input-directory inputs
|
||||
"share/zoneinfo")))))))
|
||||
(native-inputs
|
||||
(list python-poetry-core
|
||||
python-pytest
|
||||
python-pytest-sugar
|
||||
tzdata-for-tests))
|
||||
(list python-poetry-core))
|
||||
(propagated-inputs
|
||||
(list python-duniterpy
|
||||
(list python-click
|
||||
python-duniterpy
|
||||
python-pendulum
|
||||
python-rich-click
|
||||
python-tabulate
|
||||
python-texttable))
|
||||
(home-page "https://git.duniter.org/clients/python/silkaj")
|
||||
(synopsis "Command line client for Duniter network")
|
||||
@@ -2060,16 +2012,11 @@ that allows you to run services and through them access the Bitcoin Cash network
|
||||
(arguments
|
||||
(list
|
||||
#:test-flags
|
||||
#~(list
|
||||
;; These tests require network.
|
||||
"--ignore=beancount/web/web_test.py"
|
||||
"-k" (string-join
|
||||
(list "not test_parse_stdin" ; ModuleNotFoundError: 'pytest'
|
||||
"test_setup" ; AssertionError: 5 not greater than 20
|
||||
;; Require network
|
||||
"test_bake_archive__known"
|
||||
"test_bake_directory")
|
||||
" and not "))
|
||||
#~(list "-k" (string-append
|
||||
;; ModuleNotFoundError: No module named 'pytest'
|
||||
"not test_parse_stdin"
|
||||
;; AssertionError: 5 not greater than 20
|
||||
" and not test_setup"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-requirements
|
||||
@@ -2245,10 +2192,14 @@ from account statements and other documents and for managing documents.")
|
||||
python-werkzeug))
|
||||
(native-inputs
|
||||
(list python-babel
|
||||
python-mypy
|
||||
python-pytest
|
||||
python-pytest-cov
|
||||
python-setuptools
|
||||
python-twine
|
||||
python-types-setuptools
|
||||
python-types-simplejson))
|
||||
python-types-simplejson
|
||||
python-wheel))
|
||||
(home-page "https://beancount.github.io/fava/")
|
||||
(synopsis "Web interface for the accounting tool Beancount")
|
||||
(description "Fava is a web interface for the double-entry bookkeeping
|
||||
@@ -2385,7 +2336,7 @@ trading, and risk management in real-life.")
|
||||
(define-public optionmatrix
|
||||
(package
|
||||
(name "optionmatrix")
|
||||
(version "1.4.4")
|
||||
(version "1.4.3")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
@@ -2393,7 +2344,7 @@ trading, and risk management in real-life.")
|
||||
"mirror://sourceforge/optionmatrix/optionmatrix-"
|
||||
version ".tar.xz"))
|
||||
(sha256
|
||||
(base32 "0ijwj798jli5rw1dj8dkz6sqbsa4hia407imicrk3djqmhn1ky3z"))))
|
||||
(base32 "1zd0pfiphnijh1l94swb3mjrpmjsn37z11mklamd7zw6h2d4zh4d"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
(list gsl gtk+ ncurses))
|
||||
@@ -2437,7 +2388,7 @@ interactive controls. This package provides a GTK+ graphical user interface
|
||||
(invoke "make" "cython"))))))
|
||||
(inputs (list ta-lib))
|
||||
(propagated-inputs (list python-numpy))
|
||||
(native-inputs (list python-cython
|
||||
(native-inputs (list python-cython-3
|
||||
python-pandas
|
||||
python-pytest
|
||||
python-setuptools
|
||||
@@ -2508,24 +2459,6 @@ format used by SWIFT. It returns smart Python collections for statistics
|
||||
and manipulation.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public python-mt940
|
||||
(package
|
||||
(name "python-mt940")
|
||||
(version "0.6.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "mt940" version))
|
||||
(sha256
|
||||
(base32 "00w9m06wxxqg9w1bkddqr6yl6ajlzhbiryqzijax64l6sks6ml6g"))))
|
||||
(build-system pyproject-build-system)
|
||||
(native-inputs (list python-setuptools-67 python-wheel-0.40))
|
||||
(home-page "http://mt940.b2ck.com/")
|
||||
(synopsis "A simple module to parse MT940 files")
|
||||
(description "This package provides a simple module to parse MT940
|
||||
files.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public xmrig
|
||||
(package
|
||||
(name "xmrig")
|
||||
|
||||
@@ -3,19 +3,15 @@
|
||||
;;; Copyright © 2016 Eric Bavier <bavier@member.fsf.org>
|
||||
;;; Copyright © 2017 David Craven <david@craven.ch>
|
||||
;;; Copyright © 2017, 2018, 2022-2025 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2018, 2020, 2021, 2022 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2018, 2019 Vagrant Cascadian <vagrant@debian.org>
|
||||
;;; Copyright © 2018, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2018 Vagrant Cascadian <vagrant@debian.org>
|
||||
;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
|
||||
;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
|
||||
;;; Copyright © 2020, 2021, 2022 Marius Bakke <marius@gnu.org>
|
||||
;;; Copyright © 2021 Petr Hodina <phodina@protonmail.com>
|
||||
;;; Copyright © 2021, 2022, 2023, 2025 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2023 Hilton Chain <hako@ultrarare.space>
|
||||
;;; Copyright © 2022, 2023, 2025 Maxim Cournoyer <maxim@guixotic.coop>
|
||||
;;; Copyright © 2023 Foundation Devices, Inc. <hello@foundationdevices.com>
|
||||
;;; Copyright © 2023, 2024 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2024 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2025 Simen Endsjø <contact@simendsjo.me>
|
||||
;;; Copyright © 2025 Murilo <murilo@disroot.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -42,7 +38,6 @@
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix utils)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (guix build-system cargo)
|
||||
#:use-module (guix build-system copy)
|
||||
#:use-module (guix build-system cmake)
|
||||
#:use-module (guix build-system gnu)
|
||||
@@ -70,7 +65,6 @@
|
||||
#:use-module (gnu packages embedded)
|
||||
#:use-module (gnu packages flashing-tools)
|
||||
#:use-module (gnu packages flex)
|
||||
#:use-module (gnu packages fontutils)
|
||||
#:use-module (gnu packages freedesktop)
|
||||
#:use-module (gnu packages gawk)
|
||||
#:use-module (gnu packages gcc)
|
||||
@@ -220,43 +214,6 @@ assembler, disassembler, and debugging tools for the Linux kernel b43 wireless
|
||||
driver.")
|
||||
(license license:gpl2))))
|
||||
|
||||
(define-public binwalk
|
||||
(package
|
||||
(name "binwalk")
|
||||
(version "3.1.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/ReFirmLabs/binwalk")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1jm1zx8jfj7fsxa87rkbq0qjjb66wqqmvqcs2127wr22g0xa6vvs"))))
|
||||
(build-system cargo-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:install-source? #f
|
||||
;; These tests fail on the v3.1.0 release.
|
||||
;; They will be most likely fixed on the next release, where the
|
||||
;; test files are included in the source itself.
|
||||
;; See <https://github.com/ReFirmLabs/binwalk/issues/882>.
|
||||
#:cargo-test-flags ''("--"
|
||||
"--skip=binwalk::Binwalk"
|
||||
"--skip=binwalk::Binwalk::scan"
|
||||
"--skip=binwalk::Binwalk::analyze"
|
||||
"--skip=binwalk::Binwalk::extract")))
|
||||
(native-inputs (list pkg-config))
|
||||
(inputs (cons* fontconfig xz
|
||||
(cargo-inputs 'binwalk)))
|
||||
(home-page "https://github.com/ReFirmLabs/binwalk")
|
||||
(synopsis "Firmware analysis tool")
|
||||
(description "Binwalk is a tool for analyzing, reverse engineering, and
|
||||
extracting firmware images.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-deprecated-package python-binwalk binwalk)
|
||||
|
||||
(define-public fwupd-efi
|
||||
(package
|
||||
(name "fwupd-efi")
|
||||
@@ -291,7 +248,7 @@ used in the process of installing and updating firmware.")
|
||||
(define-public fwupd
|
||||
(package
|
||||
(name "fwupd")
|
||||
(version "1.9.32")
|
||||
(version "1.8.14")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -300,7 +257,7 @@ used in the process of installing and updating firmware.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0nabjgskbpinj7sj44kblnd8g6psppas4g8qgajfs3p19skp07y1"))))
|
||||
"179yc0nbbyrdya5q16ncf7lkslrhr3i90rgb9vdmv751ikilkby6"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -323,11 +280,7 @@ used in the process of installing and updating firmware.")
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'make-source-writable
|
||||
(lambda _
|
||||
(for-each (lambda (file)
|
||||
;; Skip symlinks as `make-file-writable' fails for those.
|
||||
(unless (eq? 'symlink (stat:type (lstat file)))
|
||||
(format #t "Make writable: ~A~%" file)
|
||||
(make-file-writable file)))
|
||||
(for-each make-file-writable
|
||||
(find-files "."))
|
||||
(substitute* "src/fu-self-test.c"
|
||||
(("/bin/sh")
|
||||
@@ -379,7 +332,6 @@ used in the process of installing and updating firmware.")
|
||||
"/libexec/fwupd/efi")
|
||||
(string-append #$output "/libexec/fwupd/efi")))))))
|
||||
(native-inputs (list gobject-introspection
|
||||
python-jinja2
|
||||
python-pygobject
|
||||
python-pillow
|
||||
python-pycairo
|
||||
@@ -1295,8 +1247,8 @@ Virtual Machines. OVMF contains a sample UEFI firmware for QEMU and KVM.")
|
||||
(install-file "RISCV_VIRT_CODE.fd" fmw)
|
||||
(install-file "RISCV_VIRT_VARS.fd" fmw))))))))))))
|
||||
|
||||
(define-deprecated-package ovmf
|
||||
ovmf-x86-64)
|
||||
(define-public ovmf
|
||||
(deprecated-package "ovmf" ovmf-x86-64))
|
||||
|
||||
(define* (make-arm-trusted-firmware platform #:key
|
||||
(triplet "aarch64-linux-gnu")
|
||||
@@ -1676,7 +1628,6 @@ corresponding layout." layout))
|
||||
gnu-make
|
||||
grep
|
||||
python
|
||||
python-appdirs
|
||||
python-dotty-dict
|
||||
python-hid
|
||||
python-hjson
|
||||
|
||||
@@ -61,7 +61,6 @@
|
||||
#:use-module (gnu packages check)
|
||||
#:use-module (gnu packages compression)
|
||||
#:use-module (gnu packages documentation)
|
||||
#:use-module (gnu packages electronics)
|
||||
#:use-module (gnu packages elf)
|
||||
#:use-module (gnu packages embedded)
|
||||
#:use-module (gnu packages flex)
|
||||
@@ -77,10 +76,7 @@
|
||||
#:use-module (gnu packages pciutils)
|
||||
#:use-module (gnu packages perl)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages python)
|
||||
#:use-module (gnu packages qt)
|
||||
#:use-module (gnu packages readline)
|
||||
#:use-module (gnu packages swig)
|
||||
#:use-module (gnu packages tls)
|
||||
#:use-module (gnu packages xml)
|
||||
#:use-module (srfi srfi-26))
|
||||
@@ -165,29 +161,29 @@ brick your device.")
|
||||
(define-public avrdude
|
||||
(package
|
||||
(name "avrdude")
|
||||
(version "8.1")
|
||||
(version "8.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/avrdudes/avrdude/")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1jfz0z8i5vib181f854zwxd8avw5fy59lh3d78igqxwm08sv8nlb"))))
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/avrdudes/avrdude/")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1r8cfi1lkic8zknb7x44i2mmwxzfwfbblr894x36mffa5da0g7y3"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f)) ;no tests
|
||||
(list #:tests? #f)) ; no tests
|
||||
(inputs
|
||||
(list libelf libusb-compat libftdi libserialport readline))
|
||||
(list libelf libusb-compat libftdi))
|
||||
(native-inputs
|
||||
(list bison flex python-wrapper))
|
||||
(list bison flex))
|
||||
(home-page "https://www.nongnu.org/avrdude/")
|
||||
(synopsis "AVR downloader and uploader")
|
||||
(description
|
||||
"@code{AVRDUDE} is a utility to download/upload/manipulate the ROM and
|
||||
EEPROM contents of AVR microcontrollers using the @acronym{ISP, in-system
|
||||
programming} technique.")
|
||||
"@code{AVRDUDE} is a utility to download/upload/manipulate the ROM and EEPROM
|
||||
contents of AVR microcontrollers using the @acronym{ISP, in-system programming}
|
||||
technique.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public dfu-programmer
|
||||
|
||||
+20
-21
@@ -26,7 +26,6 @@
|
||||
#:use-module (guix gexp)
|
||||
#:use-module (guix utils)
|
||||
#:use-module (gnu packages)
|
||||
#:use-module (gnu packages bootstrap)
|
||||
#:use-module (gnu packages m4)
|
||||
#:use-module (gnu packages man)
|
||||
#:use-module (gnu packages bison)
|
||||
@@ -36,18 +35,26 @@
|
||||
(package
|
||||
(name "flex")
|
||||
(version "2.6.4")
|
||||
(source (bootstrap-origin ;avoid a circular dependency
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://github.com/westes/flex"
|
||||
"/releases/download/v" version "/"
|
||||
"flex-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"15g9bv236nzi665p9ggqjlfn4dwck5835vf0bbw2cz7h5c1swyp8"))
|
||||
(patches (search-patches "flex-fix-make-dependencies.patch")))))
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://github.com/westes/flex"
|
||||
"/releases/download/v" version "/"
|
||||
"flex-" version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"15g9bv236nzi665p9ggqjlfn4dwck5835vf0bbw2cz7h5c1swyp8"))))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
(let ((bison-for-tests
|
||||
(package
|
||||
(inherit bison)
|
||||
(arguments
|
||||
;; Disable tests, since they require flex.
|
||||
(substitute-keyword-arguments (package-arguments bison)
|
||||
((#:tests? _ #f) #f)))
|
||||
(inputs (alist-delete "flex" (package-inputs bison))))))
|
||||
`(("bison" ,bison-for-tests))))
|
||||
(arguments
|
||||
(if (or (target-hurd64?) (%current-target-system))
|
||||
(list #:configure-flags
|
||||
@@ -60,15 +67,7 @@
|
||||
'()))
|
||||
;; m4 is not present in PATH when cross-building
|
||||
(native-inputs
|
||||
(let ((bison-for-tests
|
||||
(package
|
||||
(inherit bison)
|
||||
(arguments
|
||||
;; Disable tests, since they require flex.
|
||||
(substitute-keyword-arguments (package-arguments bison)
|
||||
((#:tests? _ #f) #f)))
|
||||
(inputs (alist-delete "flex" (package-inputs bison))))))
|
||||
(list bison-for-tests help2man m4)))
|
||||
(list help2man m4))
|
||||
(propagated-inputs (list m4))
|
||||
(home-page "https://github.com/westes/flex")
|
||||
(synopsis "Fast lexical analyser generator")
|
||||
|
||||
+39
-33
@@ -68,7 +68,6 @@
|
||||
;;; Copyright © 2025 Gabriel Santos <gabrielsantosdesouza@disroot.org>
|
||||
;;; Copyright © 2025 Liam Hupfer <liam@hpfr.net>
|
||||
;;; Copyright © 2025 Evgeny Pisemsky <mail@pisemsky.site>
|
||||
;;; Copyright © 2025 Lee Thompson <lee.p.thomp@gmail.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -1103,6 +1102,35 @@ Ideographs Extension B of Unicode.
|
||||
of Unicode.
|
||||
@end itemize\n")))
|
||||
|
||||
;; In past, TW-Kai and TW-Sung are distributed in same zip archive. But now
|
||||
;; they are already separated in font-cns11643-kai and font-cns11643-sung.
|
||||
;; This package exists as a backward-compatible definition.
|
||||
(define-public font-cns11643
|
||||
(package
|
||||
(inherit font-cns11643-sung)
|
||||
(name "font-cns11643")
|
||||
(source #f)
|
||||
(build-system trivial-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:modules '((guix build union))
|
||||
#:builder
|
||||
#~(begin
|
||||
(use-modules (ice-9 match)
|
||||
(guix build union))
|
||||
(match %build-inputs
|
||||
(((names . directories) ...)
|
||||
(union-build #$output directories))))))
|
||||
(inputs (list font-cns11643-kai font-cns11643-sung))
|
||||
(synopsis "CJK TrueType fonts, TW-Kai and TW-Sung")
|
||||
(description
|
||||
"@code{CNS 11643} character set (Chinese National Standard, or Chinese
|
||||
Standard Interchange Code) is the standard character set of the Republic of
|
||||
China (Taiwan) for Chinese Characters and other Unicode symbols.
|
||||
|
||||
This package is an amalgamation of @code{font-cns11643-sung} and
|
||||
@code{font-cns11643-kai}.")))
|
||||
|
||||
(define-public font-cns11643-swjz
|
||||
(package
|
||||
(name "font-cns11643-swjz")
|
||||
@@ -1282,7 +1310,7 @@ heavier printing.")
|
||||
(define-public font-amiri
|
||||
(package
|
||||
(name "font-amiri")
|
||||
(version "1.003")
|
||||
(version "1.000")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
@@ -1291,7 +1319,7 @@ heavier printing.")
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0hi3d6s42wk2hgk2x8niga84h1kpk9p4vxkyich1mzmw5b7kq8hw"))))
|
||||
"0c4yg1b03aihdqvz6w5ak8wapni3l8p18mw6bkqhblmm75jb5kif"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
@@ -1963,8 +1991,8 @@ well in user interface (UI) environments.")
|
||||
(license license:silofl1.1)))
|
||||
|
||||
;; https://github.com/adobe-fonts/source-sans/issues/192
|
||||
(define-deprecated-package font-adobe-source-sans-pro
|
||||
font-adobe-source-sans)
|
||||
(define-public font-adobe-source-sans-pro
|
||||
(deprecated-package "font-adobe-source-sans-pro" font-adobe-source-sans))
|
||||
|
||||
(define-public font-adobe-source-serif
|
||||
(package
|
||||
@@ -1990,8 +2018,8 @@ family.")
|
||||
(license license:silofl1.1)))
|
||||
|
||||
;; https://github.com/adobe-fonts/source-serif/issues/77
|
||||
(define-deprecated-package font-adobe-source-serif-pro
|
||||
font-adobe-source-serif)
|
||||
(define-public font-adobe-source-serif-pro
|
||||
(deprecated-package "font-adobe-source-serif-pro" font-adobe-source-serif))
|
||||
|
||||
(define-public font-microsoft-cascadia
|
||||
(package
|
||||
@@ -2901,8 +2929,8 @@ characters mostly intact.")
|
||||
constraint of usability at small point sizes.")
|
||||
(license (list license:silofl1.1))))
|
||||
|
||||
(define-deprecated-package font-iosevka-comfy
|
||||
font-aporetic)
|
||||
(define-public font-iosevka-comfy
|
||||
(deprecated-package "font-iosevka-comfy" font-aporetic))
|
||||
|
||||
(define-public font-junicode
|
||||
(package
|
||||
@@ -3625,8 +3653,8 @@ and legible typeface suitable for web pages and applications.")
|
||||
(license license:silofl1.1)))
|
||||
|
||||
;; https://github.com/rastikerdar/vazirmatn/blob/master/CHANGELOG.md#3200
|
||||
(define-deprecated-package font-vazir
|
||||
font-vazirmatn)
|
||||
(define-public font-vazir
|
||||
(deprecated-package "font-vazir" font-vazirmatn))
|
||||
|
||||
(define-public font-victor-mono
|
||||
(package
|
||||
@@ -4993,25 +5021,3 @@ typeface. It is inspired by many 5×7 pixel grid typefaces, especially Gilles
|
||||
Boccon-Gibod’s MonteCarlo. Unlike traditional bitmap fonts, it is distributed
|
||||
in typical scalable font formats.")
|
||||
(license license:silofl1.1)))
|
||||
|
||||
(define-public font-kawkab-mono
|
||||
(package
|
||||
(name "font-kawkab-mono")
|
||||
(version "0.501")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://github.com/aiaf/kawkab-mono/releases/download/"
|
||||
"v" version "/kawkab-mono-" version ".zip"))
|
||||
(sha256
|
||||
(base32 "0rjn2kdfs81cbpnffxj0sgw6zav5503smjkldlbg1ynyvmbnzh0i"))))
|
||||
(build-system font-build-system)
|
||||
(outputs '("out" "ttf" "woff"))
|
||||
(home-page "https://makkuk.com/kawkab-mono/")
|
||||
(synopsis "Monospaced Arabic typeface")
|
||||
(description
|
||||
"Kawkab Mono (كوكب مونو) is a monospaced Arabic typeface. It is designed
|
||||
for code and text-editing in particular, and whenever having a fixed-pitch font
|
||||
is necessary, such as when composing tabular data using text.")
|
||||
(license license:silofl1.1)))
|
||||
|
||||
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user