Merge branch 'master' into emacs-team

This commit is contained in:
Liliana Marie Prikler 2024-03-27 05:22:31 +01:00
commit 4c70f5242b
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87
156 changed files with 54487 additions and 2777 deletions

View file

@ -426,6 +426,10 @@ AUX_FILES = \
gnu/packages/aux-files/emacs/guix-emacs.el \
gnu/packages/aux-files/findclass.php \
gnu/packages/aux-files/guix.vim \
gnu/packages/aux-files/linux-libre/6.8-arm.conf \
gnu/packages/aux-files/linux-libre/6.8-arm64.conf \
gnu/packages/aux-files/linux-libre/6.8-i686.conf \
gnu/packages/aux-files/linux-libre/6.8-x86_64.conf \
gnu/packages/aux-files/linux-libre/6.7-arm.conf \
gnu/packages/aux-files/linux-libre/6.7-arm64.conf \
gnu/packages/aux-files/linux-libre/6.7-i686.conf \

View file

@ -365,7 +365,7 @@ (define* (syntax-highlighted-html input
#:languages
languages))
(syntax-css-url
"/static/base/css/code.css"))
"/themes/initial/css/code.css"))
"Return a derivation called NAME that processes all the HTML files in INPUT
to (1) add them a link to SYNTAX-CSS-URL, and (2) highlight the syntax of all
its <pre class=\"lisp\"> blocks (as produced by 'makeinfo --html')."
@ -624,7 +624,7 @@ (define* (stylized-html source input
#:key
(languages %languages)
(manual %manual)
(manual-css-url "/static/base/css/manual.css"))
(manual-css-url "/themes/initial/css/manual.css"))
"Process all the HTML files in INPUT; add them MANUAL-CSS-URL as a <style>
link, and add a menu to choose among LANGUAGES. Use the Guix PO files found
in SOURCE."
@ -741,7 +741,7 @@ (define split-node?
(list (menu-dropdown
#:label
`(img (@ (alt "Language")
(src "/static/base/img/language-picker.svg")))
(src "/themes/initial/img/language-picker.svg")))
#:items
(language-menu-items file)))
#:split-node? split-node?)
@ -1141,16 +1141,16 @@ (define (sxml-index language title body)
;; Menu prefetch.
(link (@ (rel "prefetch") (href ,(guix-url "menu/index.html"))))
;; Base CSS.
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/elements.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/common.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/messages.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/navbar.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/breadcrumbs.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/buttons.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/footer.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/elements.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/common.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/messages.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/navbar.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/breadcrumbs.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/buttons.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/footer.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/page.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "static/base/css/post.css")))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/page.css"))))
(link (@ (rel "stylesheet") (href ,(guix-url "themes/initial/css/post.css")))))
(body
(header (@ (class "navbar"))
(h1 (a (@ (class "branding")

View file

@ -23,7 +23,8 @@ choice.
* Building from Git:: The latest and greatest.
* Running Guix Before It Is Installed:: Hacker tricks.
* The Perfect Setup:: The right tools.
* Alternative Setups:: Other posible tools that do the job.
* Alternative Setups:: Other possible tools that do the job.
* Source Tree Structure:: Source code guided tour.
* Packaging Guidelines:: Growing the distribution.
* Coding Style:: Hygiene of the contributor.
* Submitting Patches:: Share your work.
@ -546,6 +547,257 @@ In NeoVim you can even make a similar setup to Geiser using
process and inject your code there live (sadly it's not packaged in Guix yet).
@node Source Tree Structure
@section Source Tree Structure
@cindex structure, of the source tree
If you're willing to contribute to Guix beyond packages, or if you'd
like to learn how it all fits together, this section provides a guided
tour in the code base that you may find useful.
Overall, the Guix source tree contains almost exclusively Guile
@dfn{modules}, each of which can be seen as an independent library
(@pxref{Modules,,, guile, GNU Guile Reference Manual}).
The following table gives an overview of the main directories and what
they contain. Remember that in Guile, each module name is derived from
its file name---e.g., the module in file @file{guix/packages.scm} is
called @code{(guix packages)}.
@table @file
@item guix
This is the location of core Guix mechanisms. To illustrate what is
meant by ``core'', here are a few examples, starting from low-level
tools and going towards higher-level tools:
@table @code
@item (guix store)
Connecting to and interacting with the build daemon (@pxref{The Store}).
@item (guix derivations)
Creating derivations (@pxref{Derivations}).
@item (guix gexps)
Writing G-expressions (@pxref{G-Expressions}).
@item (guix packages)
Defining packages and origins (@pxref{package Reference}).
@item (guix download)
@itemx (guix git-download)
The @code{url-fetch} and @code{git-fetch} origin download methods
(@pxref{origin Reference}).
@item (guix swh)
Fetching source code from the
@uref{https://archive.softwareheritage.org,Software Heritage archive}.
@item (guix search-paths)
Implementing search paths (@pxref{Search Paths}).
@item (guix build-system)
The build system interface (@pxref{Build Systems}).
@item (guix profiles)
Implementing profiles.
@end table
@cindex build system, directory structure
@item guix/build-system
This directory contains specific build system implementations
(@pxref{Build Systems}), such as:
@table @code
@item (guix build-system gnu)
the GNU build system;
@item (guix build-system cmake)
the CMake build system;
@item (guix build-system pyproject)
The Python ``pyproject'' build system.
@end table
@item guix/build
This contains code generally used on the ``build side''
(@pxref{G-Expressions, strata of code}). This includes code used to
build packages or other operating system components, as well as
utilities:
@table @code
@item (guix build utils)
Utilities for package definitions and more (@pxref{Build Utilities}).
@item (guix build gnu-build-system)
@itemx (guix build cmake-build-system)
@itemx (guix build pyproject-build-system)
Implementation of build systems, and in particular definition of their
build phases (@pxref{Build Phases}).
@item (guix build syscalls)
Interface to the C library and to Linux system calls.
@end table
@cindex command-line tools, as Guile modules
@cindex command modules
@item guix/scripts
This contains modules corresponding to @command{guix} sub-commands. For
example, the @code{(guix scripts shell)} module exports the
@code{guix-shell} procedure, which directly corresponds to the
@command{guix shell} command (@pxref{Invoking guix shell}).
@cindex importer modules
@item guix/import
This contains supporting code for the importers and updaters
(@pxref{Invoking guix import}, and @pxref{Invoking guix refresh}). For
example, @code{(guix import pypi)} defines the interface to PyPI, which
is used by the @code{guix import pypi} command.
@end table
The directories we have seen so far all live under @file{guix/}. The
other important place is the @file{gnu/} directory, which contains
primarily package definitions as well as libraries and tools for Guix
System (@pxref{System Configuration}) and Guix Home (@pxref{Home
Configuration}), all of which build upon functionality provided by
@code{(guix @dots{})} modules@footnote{For this reason, @code{(guix
@dots{})} modules must generally not depend on @code{(gnu @dots{})}
modules, with notable exceptions: @code{(guix build-system @dots{})}
modules may look up packages at run time---e.g., @code{(guix
build-system cmake)} needs to access the @code{cmake} variable at run
time---, @code{(guix scripts @dots{})} often rely on @code{(gnu @dots{})}
modules, and the same goes for some of the @code{(guix import @dots{})}
modules.}.
@table @file
@cindex package modules
@item gnu/packages
This is by far the most crowded directory of the source tree: it
contains @dfn{package modules} that export package definitions
(@pxref{Package Modules}). A few examples:
@table @code
@item (gnu packages base)
Module providing ``base'' packages: @code{glibc}, @code{coreutils},
@code{grep}, etc.
@item (gnu packages guile)
Guile and core Guile packages.
@item (gnu packages linux)
The Linux-libre kernel and related packages.
@item (gnu packages python)
Python and core Python packages.
@item (gnu packages python-xyz)
Miscellaneous Python packages (we were not very creative).
@end table
In any case, you can jump to a package definition using @command{guix
edit} (@pxref{Invoking guix edit}) and view its location with
@command{guix show} (@pxref{Invoking guix package}).
@findex search-patches
@item gnu/packages/patches
This directory contains patches applied against packages and obtained
using the @code{search-patches} procedure.
@item gnu/services
This contains service definitions, primarily for Guix System
(@pxref{Services}) but some of them are adapted and reused for Guix Home
as we will see below. Examples:
@table @code
@item (gnu services)
The service framework itself, which defines the service and service type
data types (@pxref{Service Composition}).
@item (gnu services base)
``Base'' services (@pxref{Base Services}).
@item (gnu services desktop)
``Desktop'' services (@pxref{Desktop Services}).
@item (gnu services shepherd)
Support for Shepherd services (@pxref{Shepherd Services}).
@end table
You can jump to a service definition using @command{guix system edit}
and view its location with @command{guix system search} (@pxref{Invoking
guix system}).
@item gnu/system
These are core Guix System modules, such as:
@table @code
@item (gnu system)
Defines @code{operating-system} (@pxref{operating-system Reference}).
@item (gnu system file-systems)
Defines @code{file-system} (@pxref{File Systems}).
@item (gnu system mapped-devices)
Defines @code{mapped-device} (@pxref{Mapped Devices}).
@end table
@item gnu/build
These are modules that are either used on the ``build side'' when
building operating systems or packages, or at run time by operating
systems.
@table @code
@item (gnu build accounts)
Creating @file{/etc/passwd}, @file{/etc/shadow}, etc. (@pxref{User
Accounts}).
@item (gnu build activation)
Activating an operating system at boot time or reconfiguration time.
@item (gnu build file-systems)
Searching, checking, and mounting file systems.
@item (gnu build linux-boot)
@itemx (gnu build hurd-boot)
Booting GNU/Linux and GNU/Hurd operating systems.
@item (gnu build linux-initrd)
Creating a Linux initial RAM disk (@pxref{Initial RAM Disk}).
@end table
@item gnu/home
This contains all things Guix Home (@pxref{Home Configuration});
examples:
@table @code
@item (gnu home services)
Core services such as @code{home-files-service-type}.
@item (gnu home services ssh)
SSH-related services (@pxref{Secure Shell}).
@end table
@item gnu/installer
This contains the text-mode graphical system installer (@pxref{Guided
Graphical Installation}).
@item gnu/machine
These are the @dfn{machine abstractions} used by @command{guix deploy}
(@pxref{Invoking guix deploy}).
@item gnu/tests
This contains system tests---tests that spawn virtual machines to check
that system services work as expected (@pxref{Running the Test Suite}).
@end table
Last, there's also a few directories that contain files that are
@emph{not} Guile modules:
@table @file
@item nix
This is the C++ implementation of @command{guix-daemon}, inherited from
Nix (@pxref{Invoking guix-daemon}).
@item tests
These are unit tests, each file corresponding more or less to one
module, in particular @code{(guix @dots{})} modules (@pxref{Running the
Test Suite}).
@item doc
This is the documentation in the form of Texinfo files: this manual and
the Cookbook. @xref{Writing a Texinfo File,,, texinfo, GNU Texinfo},
for information on Texinfo markup language.
@item po
This is the location of translations of Guix itself, of package synopses
and descriptions, of the manual, and of the cookbook. Note that
@file{.po} files that live here are pulled directly from Weblate
(@pxref{Translating Guix}).
@item etc
Miscellaneous files: shell completions, support for systemd and other
init systems, Git hooks, etc.
@end table
With all this, a fair chunk of your operating system is at your
fingertips! Beyond @command{grep} and @command{git grep}, @pxref{The
Perfect Setup} on how to navigate code from your editor, and
@pxref{Using Guix Interactively} for information on how to use Scheme
modules interactively. Enjoy!
@node Packaging Guidelines
@section Packaging Guidelines

View file

@ -22,7 +22,7 @@ Copyright @copyright{} 2020 André Batista@*
Copyright @copyright{} 2020 Christine Lemmer-Webber@*
Copyright @copyright{} 2021 Joshua Branson@*
Copyright @copyright{} 2022, 2023 Maxim Cournoyer@*
Copyright @copyright{} 2023 Ludovic Courtès@*
Copyright @copyright{} 2023-2024 Ludovic Courtès@*
Copyright @copyright{} 2023 Thomas Ieong
Permission is granted to copy, distribute and/or modify this document
@ -5299,14 +5299,17 @@ export LC_ALL
For convenience, @code{guix package} automatically generates
@file{~/.guix-profile/etc/profile}, which defines all the environment
variables necessary to use the packages---@code{PATH},
@code{C_INCLUDE_PATH}, @code{PYTHONPATH}, etc. Thus it's a good idea to
source it from @code{/etc/profile}:
@code{C_INCLUDE_PATH}, @code{PYTHONPATH}, etc. Likewise, @command{guix
pull} does that under @file{~/.config/guix/current}. Thus it's a good
idea to source both from @code{/etc/profile}:
@example
GUIX_PROFILE="$HOME/.guix-profile"
if [ -f "$GUIX_PROFILE/etc/profile" ]; then
. "$GUIX_PROFILE/etc/profile"
fi
for GUIX_PROFILE in "$HOME/.config/guix/current" "$HOME/.guix-profile"
do
if [ -f "$GUIX_PROFILE/etc/profile" ]; then
. "$GUIX_PROFILE/etc/profile"
fi
done
@end example
Last but not least, Guix provides command-line completion notably for

View file

@ -2728,20 +2728,20 @@ the Cryptsetup/LUKS utilities to do that (see @inlinefmtifelse{html,
@code{man cryptsetup}} for more information).
@quotation Warning
Note that GRUB can unlock LUKS2 devices since version 2.06, but only
supports the PBKDF2 key derivation function, which is not the default
for @command{cryptsetup luksFormat}. You can check which key derivation
function is being used by a device by running @command{cryptsetup
luksDump @var{device}}, and looking for the PBKDF field of your
keyslots.
While efforts are in progress to extend support to LUKS2, please note
that Guix only supports devices of type LUKS1 at the moment. You can
verify that your existing LUKS device is of the right type by running
@command{cryptsetup luksDump @var{device}}. Alternatively, you can
create a new LUKS1 device with @command{cryptsetup luksFormat --type
luks1 @var{device}}.
@end quotation
Assuming you want to store the root partition on @file{/dev/sda2}, the
command sequence to format it as a LUKS2 partition would be along these
command sequence to format it as a LUKS1 partition would be along these
lines:
@example
cryptsetup luksFormat --type luks2 --pbkdf pbkdf2 /dev/sda2
cryptsetup luksFormat --type luks1 /dev/sda2
cryptsetup open /dev/sda2 my-partition
mkfs.ext4 -L my-root /dev/mapper/my-partition
@end example
@ -3445,7 +3445,7 @@ Install the package @var{exp} evaluates to.
@var{exp} must be a Scheme expression that evaluates to a
@code{<package>} object. This option is notably useful to disambiguate
between same-named variants of a package, with expressions such as
@code{(@@ (gnu packages base) guile-final)}.
@code{(@@ (gnu packages commencement) guile-final)}.
Note that this option installs the first output of the specified
package, which may be insufficient when needing a specific output of a
@ -4727,7 +4727,9 @@ the user's @file{~/.config/guix/channels.scm} file, unless @option{-q}
is passed;
@item
the system-wide @file{/etc/guix/channels.scm} file, unless @option{-q}
is passed;
is passed (on Guix System, this file can be declared in the operating
system configuration, @pxref{guix-configuration-channels,
@code{channels} field of @code{guix-configuration}});
@item
the built-in default channels specified in the @code{%default-channels}
variable.
@ -5497,16 +5499,16 @@ $ wget -O - \
@cindex configuration file for channels
@cindex @command{guix pull}, configuration file
@cindex configuration of @command{guix pull}
Guix and its package collection are updated by running @command{guix pull}
(@pxref{Invoking guix pull}). By default @command{guix pull} downloads and
deploys Guix itself from the official GNU@tie{}Guix repository. This can be
customized by defining @dfn{channels} in the
@file{~/.config/guix/channels.scm} file. A channel specifies a URL and branch
of a Git repository to be deployed, and @command{guix pull} can be instructed
to pull from one or more channels. In other words, channels can be used
to @emph{customize} and to @emph{extend} Guix, as we will see below.
Guix is able to take into account security concerns and deal with authenticated
updates.
Guix and its package collection are updated by running @command{guix
pull}. By default @command{guix pull} downloads and deploys Guix itself
from the official GNU@tie{}Guix repository. This can be customized by
providing a file specifying the set of @dfn{channels} to pull from
(@pxref{Invoking guix pull}). A channel
specifies the URL and branch of a Git repository to be deployed, and
@command{guix pull} can be instructed to pull from one or more channels.
In other words, channels can be used to @emph{customize} and to
@emph{extend} Guix, as we will see below. Guix is able to take into
account security concerns and deal with authenticated updates.
@menu
* Specifying Additional Channels:: Extending the package collection.
@ -7632,6 +7634,9 @@ contain OpenPGP public keys in @file{.key} files, either in binary form
or ``ASCII-armored''. By default the keyring is loaded from the branch
named @code{keyring}.
@item --end=@var{commit}
Authenticate revisions up to @var{commit}.
@item --stats
Display commit signing statistics upon completion.
@ -7677,7 +7682,8 @@ assembly is to C programs. The term ``derivation'' comes from the fact
that build results @emph{derive} from them.
This chapter describes all these APIs in turn, starting from high-level
package definitions.
package definitions. @xref{Source Tree Structure}, for a more general
overview of the source code.
@menu
* Package Modules:: Packages from the programmer's viewpoint.
@ -19802,6 +19808,20 @@ few seconds when enough entropy is available and is only done once; you
might want to turn it off for instance in a virtual machine that does
not need it and where the extra boot time is a problem.
@anchor{guix-configuration-channels}
@item @code{channels} (default: @code{%default-channels})
List of channels to be specified in @file{/etc/guix/channels.scm}, which
is what @command{guix pull} uses by default (@pxref{Invoking guix
pull}).
@quotation Note
When reconfiguring a system, the existing @file{/etc/guix/channels.scm}
file is backed up as @file{/etc/guix/channels.scm.bak} if it was
determined to be a manually modified file. This is to facilitate
migration from earlier versions, which allowed for in-place
modifications to @file{/etc/guix/channels.scm}.
@end quotation
@item @code{max-silent-time} (default: @code{3600})
@itemx @code{timeout} (default: @code{(* 3600 24)})
The number of seconds of silence and the number of seconds of activity,
@ -21081,7 +21101,7 @@ the @code{loopback} Shepherd service.
@defvar %qemu-static-networking
This is the @code{static-networking} record representing network setup
when using QEMU's user-mode network stack on @code{eth0} (@pxref{Using
the user mode network stack,,, QEMU, QEMU Documentation}).
the user mode network stack,,, qemu, QEMU Documentation}).
@end defvar
@cindex DHCP, networking service
@ -22716,9 +22736,9 @@ Logging level.
This service type adds a list of known Facebook hosts to the
@file{/etc/hosts} file.
(@pxref{Host Names,,, libc, The GNU C Library Reference Manual})
Each line contains a entry that maps a known server name of the Facebook
on-line service---e.g., @code{www.facebook.com}---to the local
host---@code{127.0.0.1} or its IPv6 equivalent, @code{::1}.
Each line contains an entry that maps a known server name of the Facebook
on-line service---e.g., @code{www.facebook.com}---to unroutable IPv4 and
IPv6 addresses.
This mechanism can prevent programs running locally, such as Web
browsers, from accessing Facebook.
@ -28551,6 +28571,12 @@ Set of mechanisms that will never be offered. See
Defaults to @samp{'("DIGEST-MD5")}.
@end deftypevr
@deftypevr {@code{prosody-configuration} parameter} string-list insecure-sasl-mechanisms
Set of mechanisms that will not be offered on unencrypted connections.
See @url{https://prosody.im/doc/modules/mod_saslauth}.
Defaults to @samp{'("PLAIN" "LOGIN")}.
@end deftypevr
@deftypevr {@code{prosody-configuration} parameter} boolean s2s-require-encryption?
Whether to force all server-to-server connections to be encrypted or not.
See @url{https://prosody.im/doc/modules/mod_tls}.
@ -28630,7 +28656,7 @@ See @url{https://prosody.im/doc/configure#virtual_host_settings}.
Available @code{virtualhost-configuration} fields are:
all these @code{prosody-configuration} fields: @code{admins}, @code{use-libevent?}, @code{modules-enabled}, @code{modules-disabled}, @code{groups-file}, @code{allow-registration?}, @code{ssl}, @code{c2s-require-encryption?}, @code{disable-sasl-mechanisms}, @code{s2s-require-encryption?}, @code{s2s-secure-auth?}, @code{s2s-insecure-domains}, @code{s2s-secure-domains}, @code{authentication}, @code{log}, @code{http-max-content-size}, @code{http-external-url}, @code{raw-content}, plus:
all these @code{prosody-configuration} fields: @code{admins}, @code{use-libevent?}, @code{modules-enabled}, @code{modules-disabled}, @code{groups-file}, @code{allow-registration?}, @code{ssl}, @code{c2s-require-encryption?}, @code{disable-sasl-mechanisms}, @code{insecure-sasl-mechanisms}, @code{s2s-require-encryption?}, @code{s2s-secure-auth?}, @code{s2s-insecure-domains}, @code{s2s-secure-domains}, @code{authentication}, @code{log}, @code{http-max-content-size}, @code{http-external-url}, @code{raw-content}, plus:
@deftypevr {@code{virtualhost-configuration} parameter} string domain
Domain you wish Prosody to serve.
@end deftypevr
@ -28652,7 +28678,7 @@ Defaults to @samp{'()}.
Available @code{int-component-configuration} fields are:
all these @code{prosody-configuration} fields: @code{admins}, @code{use-libevent?}, @code{modules-enabled}, @code{modules-disabled}, @code{groups-file}, @code{allow-registration?}, @code{ssl}, @code{c2s-require-encryption?}, @code{disable-sasl-mechanisms}, @code{s2s-require-encryption?}, @code{s2s-secure-auth?}, @code{s2s-insecure-domains}, @code{s2s-secure-domains}, @code{authentication}, @code{log}, @code{http-max-content-size}, @code{http-external-url}, @code{raw-content}, plus:
all these @code{prosody-configuration} fields: @code{admins}, @code{use-libevent?}, @code{modules-enabled}, @code{modules-disabled}, @code{groups-file}, @code{allow-registration?}, @code{ssl}, @code{c2s-require-encryption?}, @code{disable-sasl-mechanisms}, @code{insecure-sasl-mechanisms}, @code{s2s-require-encryption?}, @code{s2s-secure-auth?}, @code{s2s-insecure-domains}, @code{s2s-secure-domains}, @code{authentication}, @code{log}, @code{http-max-content-size}, @code{http-external-url}, @code{raw-content}, plus:
@deftypevr {@code{int-component-configuration} parameter} string hostname
Hostname of the component.
@end deftypevr
@ -28705,7 +28731,7 @@ Defaults to @samp{'()}.
Available @code{ext-component-configuration} fields are:
all these @code{prosody-configuration} fields: @code{admins}, @code{use-libevent?}, @code{modules-enabled}, @code{modules-disabled}, @code{groups-file}, @code{allow-registration?}, @code{ssl}, @code{c2s-require-encryption?}, @code{disable-sasl-mechanisms}, @code{s2s-require-encryption?}, @code{s2s-secure-auth?}, @code{s2s-insecure-domains}, @code{s2s-secure-domains}, @code{authentication}, @code{log}, @code{http-max-content-size}, @code{http-external-url}, @code{raw-content}, plus:
all these @code{prosody-configuration} fields: @code{admins}, @code{use-libevent?}, @code{modules-enabled}, @code{modules-disabled}, @code{groups-file}, @code{allow-registration?}, @code{ssl}, @code{c2s-require-encryption?}, @code{disable-sasl-mechanisms}, @code{insecure-sasl-mechanisms}, @code{s2s-require-encryption?}, @code{s2s-secure-auth?}, @code{s2s-insecure-domains}, @code{s2s-secure-domains}, @code{authentication}, @code{log}, @code{http-max-content-size}, @code{http-external-url}, @code{raw-content}, plus:
@deftypevr {@code{ext-component-configuration} parameter} string component-secret
Password which the component will use to log in.
@end deftypevr

View file

@ -9,8 +9,8 @@ Description=Build daemon for GNU Guix
ExecStart=@localstatedir@/guix/profiles/per-user/root/current-guix/bin/guix-daemon \
--build-users-group=guixbuild --discover=no
Environment='GUIX_LOCPATH=@localstatedir@/guix/profiles/per-user/root/guix-profile/lib/locale' LC_ALL=en_US.utf8
StandardOutput=syslog
StandardError=syslog
StandardOutput=journal
StandardError=journal
# Work around a nasty systemd feature that kills the entire process tree
# (including the daemon!) if any child, such as cc1plus, runs out of memory.

View file

@ -11,8 +11,8 @@ After=guix-daemon.service
[Service]
ExecStart=@localstatedir@/guix/profiles/per-user/root/current-guix/bin/guix publish --user=nobody --port=8181
Environment='GUIX_LOCPATH=@localstatedir@/guix/profiles/per-user/root/guix-profile/lib/locale' LC_ALL=en_US.utf8
StandardOutput=syslog
StandardError=syslog
StandardOutput=journal
StandardError=journal
# Despite the name, this is rate-limited: a broken daemon will eventually fail.
Restart=always

View file

@ -1,6 +1,6 @@
;; GNU Guix news, for use by 'guix pull'.
;;
;; Copyright © 2019-2023 Ludovic Courtès <ludo@gnu.org>
;; Copyright © 2019-2024 Ludovic Courtès <ludo@gnu.org>
;; Copyright © 20192021 Tobias Geerinckx-Rice <me@tobias.gr>
;; Copyright © 2019, 2020 Miguel Ángel Arruga Vivas <rosen644835@gmail.com>
;; Copyright © 2019, 2020 Konrad Hinsen <konrad.hinsen@fastmail.net>
@ -28,6 +28,75 @@
(channel-news
(version 0)
(entry (commit "ff1251de0bc327ec478fc66a562430fbf35aef42")
(title
(en "Daemon vulnerability allowing store corruption has been fixed")
(de "Schwachstelle im Daemon behoben, durch die der Store verfälscht werden konnte")
(fr "Une faille du démon permettant de corrompre le dépôt a été corrigée"))
(body
(en "A vulnerability in the build daemon, @command{guix-daemon}, was
identified and fixed. The vulnerability would allow unprivileged users to
corrupt the result of @dfn{fixed-output derivations} such as source code
tarballs and Git checkouts, which in turn could lead to local privilege
escalation.
This bug is fixed and Guix System users are advised to upgrade their system,
with a command along the lines of:
@example
sudo guix system reconfigure /run/current-system/configuration.scm
sudo herd restart guix-daemon
@end example
If you are using Guix on another distro, run @command{info \"(guix) Upgrading
Guix\"} or visit
@uref{https://guix.gnu.org/manual/devel/en/html_node/Upgrading-Guix.html} to
learn how to upgrade Guix.
See @uref{https://issues.guix.gnu.org/69728} for more information on this
issue.")
(de "Eine Sicherheitslücke im Erstellungs-Daemon,
@command{guix-daemon}, wurde gefunden und geschlossen. Sie hatte es
unprivilegierten Nutzern ermöglicht, das Ergebnis einer @dfn{Ableitung mit
fester Ausgabe}, wie Quellcode-Tarballs und Git-Checkouts, zu manipulieren.
So war eine lokale Rechteausweitung möglich.
Der Fehler ist behoben und wir raten Nutzern von Guix System, ihr System zu
aktualisieren mit einem Befehl wie:
@example
sudo guix system reconfigure /run/current-system/configuration.scm
sudo herd restart guix-daemon
@end example
Wenn Sie Guix auf einer anderen Distribution verwenden, erfahren Sie mit dem
Befehl @command{info \"(guix.de) Aktualisieren von Guix\"} oder auf
@uref{https://guix.gnu.org/manual/devel/de/html_node/Aktualisieren-von-Guix.html},
wie Sie Guix aktualisieren.
Siehe @uref{https://issues.guix.gnu.org/69728} für mehr Informationen zu dem
Fehler.")
(fr "Une faille de sécurité du démon de compilation,
@command{guix-daemon}, a été identifiée et corrigée. La faille permettait à
un·e utilisateur·rice sans privilège de corrompre le résultat d'une
@dfn{dérivation à sortie fixe} telle qu'une archive ou un @i{checkout} Git, ce
qui peut ensuite permettre une élévation locale de privilèges.
Ce problème est corrigé et les utilisateur·rices de Guix System sont invité·es
à mettre à jour leur système avec une commande telle que:
@example
sudo guix system reconfigure /run/current-system/configuration.scm
sudo herd restart guix-daemon
@end example
Pour voir comment mettre à jour Guix sur une autre distribution, lancer
@command{info \"(guix.fr) Mettre à niveau Guix\"} ou visiter
@uref{https://guix.gnu.org/manual/devel/fr/html_node/Mettre-a-niveau-Guix.html}.
Voir @uref{https://issues.guix.gnu.org/69728} pour plus d'informations sur
cette anomalie.")))
(entry (commit "10a193596368443f441077525ebbddf787d91e4b")
(title
(en "Linux-libre 4.14 removed due to end of upstream support")

View file

@ -587,6 +587,10 @@ (define-member (person "Andreas Enge"
"andreas@enge.fr")
lxqt science tex)
(define-member (person "Tanguy Le Carrour"
"tanguy@bioneland.org")
python home)
(define-member (person "Tobias Geerinckx-Rice"
"me@tobias.gr")
core kernel mentors)

View file

@ -16,10 +16,6 @@
;;; 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 related to linux-libre.
;;; Simplistically, it selects packages whose names begin with "linux-libre".
;;; It is used to assist continuous integration of the kernel packages.
(use-modules (guix packages)
(guix profiles)
(guix utils)

View file

@ -16,10 +16,6 @@
;;; 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 related to linux-libre.
;;; Simplistically, it selects packages whose names begin with "linux-libre".
;;; It is used to assist continuous integration of the kernel packages.
(load "common.scm")
;;; Commentary:

View file

@ -16,10 +16,6 @@
;;; 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 related to linux-libre.
;;; Simplistically, it selects packages whose names begin with "linux-libre".
;;; It is used to assist continuous integration of the kernel packages.
(load "common.scm")
;;; Commentary:

View file

@ -66,21 +66,19 @@ (define (commit->guix-instance commit)
(define %release-commits
;; Release commits: the list of version/commit pairs.
;;
;; Note: To merely compute the derivation of these revisions, we need to be
;; able to build their dependencies. Some of them no longer build from
;; source due to time traps like <https://issues.guix.gnu.org/58650>; those
;; need to be built beforehand in a virtual build machine running "in the
;; past".
'(("1.4.0" . "8e2f32cee982d42a79e53fc1e9aa7b8ff0514714")
("1.3.0" . "a0178d34f582b50e9bdbb0403943129ae5b560ff")
;; FIXME: To merely compute the derivation of these revisions, we need to
;; be able to build their dependencies. However, pre-built binaries are
;; currently missing and some of these no longer build from source due to
;; time bombs like <https://issues.guix.gnu.org/58650>. Thus, comment
;; them output until we have substitutes for these old things.
;; ("1.2.0" . "a099685659b4bfa6b3218f84953cbb7ff9e88063")
;; ("1.1.0" . "d62c9b2671be55ae0305bebfda17b595f33797f2")
;; ("1.0.1" . "d68de958b60426798ed62797ff7c96c327a672ac")
;; ("1.0.0" . "6298c3ffd9654d3231a6f25390b056483e8f407c")
;; ("0.16.0" . "4a0b87f0ec5b6c2dcf82b372dd20ca7ea6acdd9c")
))
("1.2.0" . "a099685659b4bfa6b3218f84953cbb7ff9e88063")
("1.1.0" . "d62c9b2671be55ae0305bebfda17b595f33797f2")
("1.0.1" . "d68de958b60426798ed62797ff7c96c327a672ac")
("1.0.0" . "6298c3ffd9654d3231a6f25390b056483e8f407c")
("0.16.0" . "4a0b87f0ec5b6c2dcf82b372dd20ca7ea6acdd9c")))
(manifest
(map (match-lambda

View file

@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2021 Andrew Tropin <andrew@trop.in>
;;; Copyright © 2022 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2022, 2024 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -67,7 +67,8 @@ (define-record-type* <home-environment> home-environment
this-home-environment)))
(services home-environment-user-services
(default '()))
(default '())
(sanitize validate-service-list))
(location home-environment-location ; <location>
(default (and=> (current-source-location)

View file

@ -77,7 +77,19 @@ (define config
(use-modules (srfi srfi-34)
(system repl error-handling))
(register-services (map load '#$files))
(define (make-user-module)
;; Copied from (shepherd support), where it's private.
(let ((m (make-fresh-user-module)))
(module-use! m (resolve-interface '(shepherd service)))
m))
(register-services
(map (lambda (file)
(save-module-excursion
(lambda ()
(set-current-module (make-user-module))
(load file))))
'#$files))
#$@(if daemonize?
`((action 'root 'daemonize))

View file

@ -425,6 +425,7 @@ GNU_SYSTEM_MODULES = \
%D%/packages/lisp-check.scm \
%D%/packages/lisp-xyz.scm \
%D%/packages/llvm.scm \
%D%/packages/llvm-meta.scm \
%D%/packages/lout.scm \
%D%/packages/logging.scm \
%D%/packages/logo.scm \
@ -487,6 +488,7 @@ GNU_SYSTEM_MODULES = \
%D%/packages/ntp.scm \
%D%/packages/nutrition.scm \
%D%/packages/nvi.scm \
%D%/packages/nx.scm \
%D%/packages/ocaml.scm \
%D%/packages/ocr.scm \
%D%/packages/openkinect.scm \
@ -1040,6 +1042,7 @@ dist_patch_DATA = \
%D%/packages/patches/clang-15.0-libc-search-path.patch \
%D%/packages/patches/clang-16.0-libc-search-path.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-runtime-asan-build-fixes.patch \
%D%/packages/patches/clang-runtime-esan-build-fixes.patch \
%D%/packages/patches/clang-runtime-9-libsanitizer-mode-field.patch \
@ -1514,6 +1517,7 @@ dist_patch_DATA = \
%D%/packages/patches/julia-SOURCE_DATE_EPOCH-mtime.patch \
%D%/packages/patches/julia-Use-MPFR-4.2.patch \
%D%/packages/patches/libcss-check-format.patch \
%D%/packages/patches/libextractor-tidy-support.patch \
%D%/packages/patches/libftdi-fix-paths-when-FTDIPP-set.patch \
%D%/packages/patches/libgeotiff-fix-tests-with-proj-9.1.1.patch \
%D%/packages/patches/libgeotiff-fix-tests-with-proj-9.3.0.patch \
@ -1798,6 +1802,7 @@ dist_patch_DATA = \
%D%/packages/patches/prusa-slicer-fix-tests.patch \
%D%/packages/patches/prusa-slicer-with-cereal-1.3.1.patch \
%D%/packages/patches/pthreadpool-system-libraries.patch \
%D%/packages/patches/python-3.12-fix-tests.patch \
%D%/packages/patches/python-accupy-use-matplotx.patch \
%D%/packages/patches/python-accupy-fix-use-of-perfplot.patch \
%D%/packages/patches/python-chai-drop-python2.patch \
@ -1805,7 +1810,6 @@ dist_patch_DATA = \
%D%/packages/patches/python-feedparser-missing-import.patch \
%D%/packages/patches/python-louvain-fix-test.patch \
%D%/packages/patches/python-random2-getrandbits-test.patch \
%D%/packages/patches/python-poppler-qt5-fix-build.patch \
%D%/packages/patches/python-pyreadstat-link-libiconv.patch \
%D%/packages/patches/python-pyls-black-41.patch \
%D%/packages/patches/python-pypdf-annotate-tests-appropriately.patch \
@ -1944,7 +1948,7 @@ dist_patch_DATA = \
%D%/packages/patches/python-werkzeug-tests.patch \
%D%/packages/patches/python-zeep-Fix-pytest_httpx-test-cases.patch \
%D%/packages/patches/qemu-build-info-manual.patch \
%D%/packages/patches/qemu-disable-some-qtests-tests.patch \
%D%/packages/patches/qemu-disable-bios-tables-test.patch \
%D%/packages/patches/qemu-glibc-2.27.patch \
%D%/packages/patches/qemu-glibc-2.30.patch \
%D%/packages/patches/qemu-fix-agent-paths.patch \
@ -1998,6 +2002,7 @@ dist_patch_DATA = \
%D%/packages/patches/ruby-latex-decode-fix-test.patch \
%D%/packages/patches/ruby-mustache-1.1.1-fix-race-condition-tests.patch \
%D%/packages/patches/ruby-nokogiri.patch \
%D%/packages/patches/ruby-x25519-automatic-fallback-non-x86_64.patch \
%D%/packages/patches/rustc-1.54.0-src.patch \
%D%/packages/patches/rust-1.64-fix-riscv64-bootstrap.patch \
%D%/packages/patches/rust-1.70-fix-rustix-build.patch \

View file

@ -5516,71 +5516,73 @@ (define-public greetd-pam-mount
interfering with any pam-mount configuration.")))
(define-public wlgreet
(package
(name "wlgreet")
(version "0.4.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://git.sr.ht/~kennylevinsen/wlgreet")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"1k0jmgh0rjbnb49gkvs0a4d7z9xb6pad8v5w5f7my4s0rfpk7wd9"))))
(build-system cargo-build-system)
(arguments
(list #:cargo-inputs
`(("rust-chrono" ,rust-chrono-0.4)
("rust-getopts" ,rust-getopts-0.2)
("rust-greetd-ipc" ,rust-greetd-ipc-0.9)
("rust-lazy-static" ,rust-lazy-static-1)
("rust-memmap2" ,rust-memmap2-0.3)
("rust-nix" ,rust-nix-0.25)
("rust-os-pipe" ,rust-os-pipe-1)
("rust-rusttype" ,rust-rusttype-0.9)
("rust-serde" ,rust-serde-1)
("rust-smithay-client-toolkit"
,rust-smithay-client-toolkit-0.15)
("rust-toml" ,rust-toml-0.5)
("rust-wayland-client" ,rust-wayland-client-0.29)
("rust-wayland-protocols" ,rust-wayland-protocols-0.29))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'remove-bundled-fonts
(lambda _
(delete-file-recursively "fonts")))
(add-after 'remove-bundled-fonts 'fix-font-references
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/draw.rs"
(("\\.\\./fonts/dejavu/DejaVuSansMono\\.ttf" _)
(search-input-file
inputs
"share/fonts/truetype/DejaVuSansMono.ttf"))
(("\\.\\./fonts/Roboto-Regular\\.ttf" _)
(search-input-file
inputs
"share/fonts/truetype/Roboto-Regular.ttf")))))
(add-after 'configure 'fix-library-references
(lambda* (#:key inputs vendor-dir #:allow-other-keys)
(substitute* (find-files vendor-dir "\\.rs$")
(("lib(wayland-.*|xkbcommon)\\.so" so-file)
(search-input-file
inputs
(string-append "lib/" so-file)))))))))
(inputs
(list font-dejavu
font-google-roboto
libxkbcommon
wayland))
(home-page "https://git.sr.ht/~kennylevinsen/wlgreet")
(synopsis "Bare-bones Wayland-based greeter for @command{greetd}")
(description
"@command{wlgreet} provides a @command{greetd} greeter
(let ((commit "7e79d6004fc5e765a5c3ece6d377f8c5999d9dfa")
(revision "1"))
(package
(name "wlgreet")
(version (git-version "0.4.1" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://git.sr.ht/~kennylevinsen/wlgreet")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"039a05v6c2i3al86k4fncqr3z47dnrz7y8wmhx6wvm08zx8s89ww"))))
(build-system cargo-build-system)
(arguments
(list #:cargo-inputs
`(("rust-chrono" ,rust-chrono-0.4)
("rust-getopts" ,rust-getopts-0.2)
("rust-greetd-ipc" ,rust-greetd-ipc-0.9)
("rust-lazy-static" ,rust-lazy-static-1)
("rust-memmap2" ,rust-memmap2-0.3)
("rust-nix" ,rust-nix-0.25)
("rust-os-pipe" ,rust-os-pipe-1)
("rust-rusttype" ,rust-rusttype-0.9)
("rust-serde" ,rust-serde-1)
("rust-smithay-client-toolkit"
,rust-smithay-client-toolkit-0.15)
("rust-toml" ,rust-toml-0.5)
("rust-wayland-client" ,rust-wayland-client-0.29)
("rust-wayland-protocols" ,rust-wayland-protocols-0.29))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'remove-bundled-fonts
(lambda _
(delete-file-recursively "fonts")))
(add-after 'remove-bundled-fonts 'fix-font-references
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/draw.rs"
(("\\.\\./fonts/dejavu/DejaVuSansMono\\.ttf" _)
(search-input-file
inputs
"share/fonts/truetype/DejaVuSansMono.ttf"))
(("\\.\\./fonts/Roboto-Regular\\.ttf" _)
(search-input-file
inputs
"share/fonts/truetype/Roboto-Regular.ttf")))))
(add-after 'configure 'fix-library-references
(lambda* (#:key inputs vendor-dir #:allow-other-keys)
(substitute* (find-files vendor-dir "\\.rs$")
(("lib(wayland-.*|xkbcommon)\\.so" so-file)
(search-input-file
inputs
(string-append "lib/" so-file)))))))))
(inputs
(list font-dejavu
font-google-roboto
libxkbcommon
wayland))
(home-page "https://git.sr.ht/~kennylevinsen/wlgreet")
(synopsis "Bare-bones Wayland-based greeter for @command{greetd}")
(description
"@command{wlgreet} provides a @command{greetd} greeter
that runs on a Wayland compositor such as @command{sway}. It
is implemented with pure Wayland APIs, so it does not depend
on a GUI toolkit.")
(license license:gpl3)))
(license license:gpl3))))
(define-public libseat
(package

View file

@ -1,7 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2022, 2023, 2024 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2013, 2015, 2017, 2018, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016-2023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2016-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2014, 2018 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2016, 2018, 2019, 2021, 2023 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2017, 2020-2022 Efraim Flashner <efraim@flashner.co.il>
@ -357,7 +357,7 @@ (define-public cmh
(define-public giac
(package
(name "giac")
(version "1.9.0-45")
(version "1.9.0-93")
(source
(origin
(method url-fetch)
@ -369,7 +369,7 @@ (define-public giac
"~parisse/debian/dists/stable/main/source/"
"giac_" version ".tar.gz"))
(sha256
(base32 "0yxsl1vvwcbpwcmzp9v9rfm9djmapab0nhb3gs7zmjv5yvzbgj4d"))))
(base32 "11acbgd264vi9r3gzx8js8x2piavhybr97iyrh027qvxlbsdsgqm"))))
(build-system gnu-build-system)
(arguments
(list

View file

@ -171,7 +171,7 @@ (define-public arcan-sdl
(inputs
(modify-inputs (package-inputs arcan)
(delete "libdrm")
(prepend sdl)))
(prepend glu libglvnd mesa sdl)))
(arguments
`(,@(ensure-keyword-arguments
(package-arguments arcan)

View file

@ -31,7 +31,7 @@
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
;;; Copyright © 2020, 2021 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2020 Jonathan Frederickson <jonathan@terracrypt.net>
;;; Copyright © 2020 Giacomo Leidi <goodoldpaul@autistici.org>
;;; Copyright © 2020, 2024 Giacomo Leidi <goodoldpaul@autistici.org>
;;; Copyright © 2020, 2021, 2023 Vinicius Monego <monego@posteo.net>
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2021 jgart <jgart@dismail.de>
@ -261,6 +261,41 @@ (define-public wildmidi
;; Player.
license:gpl3+))))
(define-public alsa-midi-latency-test
(let ((version "0.0.5")
(revision "0")
(commit "07e43f8a1e6fd6d3bd97a00f2ee5afb74cb66f95"))
(package
(name "alsa-midi-latency-test")
(version (git-version version revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/koppi/alsa-midi-latency-test")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0b3xd4z7zx6mmh6q2q7wnyd0hzikny2cikwzhaab3q86b551vb9n"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ;there are no tests
#:phases #~(modify-phases %standard-phases
(replace 'bootstrap
(lambda _
(invoke "sh" "./autogen.sh"))))))
(native-inputs (list automake autoconf libtool))
(inputs (list alsa-lib))
(synopsis "Measure the roundtrip time of MIDI messages")
(description
"@code{alsa-midi-latency-test} measures the roundtrip time of a MIDI
message in the alsa subsystem of the Linux kernel using a high precision timer.
It calculates the worst case roundtrip time of all sent MIDI messages and
displays a histogram of the roundtrip time jitter.")
(home-page "https://github.com/koppi/alsa-midi-latency-test")
(license license:gpl2+))))
(define-public webrtc-audio-processing
(package
(name "webrtc-audio-processing")
@ -1562,7 +1597,7 @@ (define-public swh-plugins-lv2
(define-public libdjinterop
(package
(name "libdjinterop")
(version "0.16.0")
(version "0.20.2")
(source
(origin
(method git-fetch)
@ -1571,15 +1606,8 @@ (define-public libdjinterop
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "16nrqpr90vb9ggmp9j73m0hspd7pmfdhh0g6iyp8vd7kx7g17qnk"))))
(build-system meson-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
;; crate_test writes a database file to the source tree.
(add-after 'unpack 'make-git-checkout-writable
(lambda _
(for-each make-file-writable (find-files ".")))))))
(base32 "0gbaji3d105vwshjfmnbxqrs42jjjxp41jqj5srncrfv3xmzsfkr"))))
(build-system cmake-build-system)
(native-inputs
(list boost pkg-config))
(inputs

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

View file

@ -4076,13 +4076,13 @@ (define-public r-asgsca
(define-public r-asics
(package
(name "r-asics")
(version "2.18.0")
(version "2.18.1")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "ASICS" version))
(sha256
(base32
"10wlmnlpn6ji256fp81rhsm2rsbsqsbvbjqqpw9vib11cwpam9wd"))))
"0sii6sg20l6mfm8cj8zas2dm3wq6fwcwanav6fl7wkv8msk02sxb"))))
(properties `((upstream-name . "ASICS")))
(build-system r-build-system)
(propagated-inputs
@ -4838,13 +4838,13 @@ (define-public r-cellid
(define-public r-coregx
(package
(name "r-coregx")
(version "2.6.0")
(version "2.6.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "CoreGx" version))
(sha256
(base32 "0ffbi5afw759mi5r657h67hdh9yr5jrzvl3aigp960jzb5542105"))))
(base32 "16i8xq98vg8xgscwj0w9bsq68vjmhsvwwdw66kcphvf3jjfmn1rv"))))
(properties `((upstream-name . "CoreGx")))
(build-system r-build-system)
(propagated-inputs
@ -6900,13 +6900,13 @@ (define-public r-biocparallel
(define-public r-biostrings
(package
(name "r-biostrings")
(version "2.70.2")
(version "2.70.3")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "Biostrings" version))
(sha256
(base32
"0lmaknlw3mk946h26davr9cz5xpzjp0c8qjxbr7drj8b2cjfm66a"))))
"1704fn4dlswy5silmw2ri4yjbibqv249cnrb5mdgiwjh7l51w725"))))
(properties
`((upstream-name . "Biostrings")))
(build-system r-build-system)
@ -7332,14 +7332,14 @@ (define-public r-deseq
(define-public r-deseq2
(package
(name "r-deseq2")
(version "1.42.0")
(version "1.42.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "DESeq2" version))
(sha256
(base32
"1mz7v0vcl741zjvj63mk48hhbq6sk2fl2dwn9y1a6hr8fb79vy1a"))))
"1s104b9k45b7kjrk56yw2yi4gi716nkcwnpqj4vj9w17xsb5m6zp"))))
(properties `((upstream-name . "DESeq2")))
(build-system r-build-system)
(propagated-inputs
@ -7882,13 +7882,13 @@ (define-public r-genomation
(define-public r-genomeinfodb
(package
(name "r-genomeinfodb")
(version "1.38.6")
(version "1.38.8")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "GenomeInfoDb" version))
(sha256
(base32
"0z8wkv5jhx8wr6idnakm26lhhk4ssj6ivbb7hfbzhkajcbnnf7mq"))))
"126qq2549h3dpjiq36709pym5bfwk6jqbz5q2sb5hl8lwm1apv8w"))))
(properties
`((upstream-name . "GenomeInfoDb")))
(build-system r-build-system)
@ -7973,13 +7973,13 @@ (define-public r-genomicdatacommons
(define-public r-genomicfeatures
(package
(name "r-genomicfeatures")
(version "1.54.3")
(version "1.54.4")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "GenomicFeatures" version))
(sha256
(base32
"1b78fss1nfyph6b7pv3ss6iv6r2qgrmx4klxvq8waz2nxvikxdl5"))))
"0g2fv4r82ql7p2allapmgs2bj4ad70c8030vzkml7ghrxsgrryp3"))))
(properties
`((upstream-name . "GenomicFeatures")))
(build-system r-build-system)
@ -7993,8 +7993,9 @@ (define-public r-genomicfeatures
r-dbi
r-genomeinfodb
r-genomicranges
r-httr
r-iranges
r-rcurl
r-rjson
r-rsqlite
r-rtracklayer
r-s4vectors
@ -8220,13 +8221,13 @@ (define-public r-gseabase
(define-public r-gsva
(package
(name "r-gsva")
(version "1.50.0")
(version "1.50.1")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "GSVA" version))
(sha256
(base32
"01w5j7fmi3hsfd282kcn4v41mi58z2yfhapff2zgf9swdfps4m6z"))))
"0ld0bbl6ar3yhi6ncg9d8q60hg4m4v5kphl044fw63l19ixln7cf"))))
(properties `((upstream-name . "GSVA")))
(build-system r-build-system)
(propagated-inputs (list r-biobase
@ -11724,24 +11725,24 @@ (define-public r-stager
(define-public r-stringdb
(package
(name "r-stringdb")
(version "2.14.0")
(version "2.14.3")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "STRINGdb" version))
(sha256
(base32 "1ffn73sx0qbzbh8cjil9r159g0fjnvi6y8rlbg6nf7p3zx3aya54"))))
(base32 "06bckzczg2rspazcbpp3v265c1dkr9l1vpdhkc7gdn2dk960jlkh"))))
(properties `((upstream-name . "STRINGdb")))
(build-system r-build-system)
(propagated-inputs
(list r-gplots
r-hash
r-httr
r-igraph
r-plotrix
r-plyr
r-png
r-rcolorbrewer
r-rcurl
r-sqldf))
(home-page "https://git.bioconductor.org/packages/STRINGdb")
(synopsis "Search tool for the retrieval of interacting proteins database")
@ -12261,16 +12262,17 @@ (define-public r-xvector
(define-public r-zlibbioc
(package
(name "r-zlibbioc")
(version "1.48.0")
(version "1.48.2")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "zlibbioc" version))
(sha256
(base32
"043xwgw3yclxnxlfl7fdwf7qf7fajzvqdv34qxnngxj9wpgha3gv"))))
"078v1iywzc0ng27r0wjchvkh4znzydq1swlalqb95xkmn72vrq8d"))))
(properties
`((upstream-name . "zlibbioc")))
(build-system r-build-system)
(native-inputs (list r-knitr))
(home-page "https://bioconductor.org/packages/zlibbioc")
(synopsis "Provider for zlib-1.2.5 to R packages")
(description "This package uses the source code of zlib-1.2.5 to create
@ -15912,14 +15914,14 @@ (define-public r-classdiscovery
(define-public r-clusterprofiler
(package
(name "r-clusterprofiler")
(version "4.10.0")
(version "4.10.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "clusterProfiler" version))
(sha256
(base32
"1vlrybyczfci5qnw50k0y2j2853r2p1ff5bpj35rdca4ja0iqh2q"))))
"1jwi9029dy7ga4hv75grib7wdaghslwh4qk5awhgw3192a0qcixf"))))
(properties
`((upstream-name . "clusterProfiler")))
(build-system r-build-system)

View file

@ -9308,6 +9308,69 @@ (define-public samtools-0.1
(delete 'patch-tests)
(delete 'configure))))))))
(define-public morpheus
(package
(name "morpheus")
(version "2.3.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.com/morpheus.lab/morpheus")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1jyzbkz8d39kjicrk3ihcx7yvq5wsynvnlcw922bqqsw8nwnn12c"))
(modules '((guix build utils)))
(snippet
'(begin
(delete-file-recursively "3rdparty/eigen")
(substitute* '("morpheus/core/cpm_shape_tracker.cpp"
"morpheus/core/membranemapper.h"
"morpheus/testing/components/motility/directed_motion_test.cpp"
"morpheus/testing/components/interaction/generator_cell_sorting.cpp"
"morpheus/testing/components/interaction/test_cell_sorting.cpp"
"morpheus/testing/core/cpm/generator_csm_plane.cpp"
"morpheus/testing/test_operators.h")
(("#include \"eigen/") "#include \"eigen3/"))))))
;; This is for a different Morpheus.
(properties '((lint-hidden-cve "CVE-2022-31261")))
(build-system cmake-build-system)
(arguments
(list
#:configure-flags
'(list "-DMORPHEUS_GUI=OFF"
"-DBUILD_TESTING=ON"
"-DDOWNLOAD_XTENSOR=OFF")
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'disable-gtest-download
(lambda _
(substitute* "3rdparty/CMakeLists.txt"
(("add_subdirectory\\(GTest\\)") ""))))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "ctest" "--output-junit" "test_results.xml")))))))
(inputs (list boost
eigen
file
gnuplot
libtiff
libxslt
xsimd
xtensor
xtl
zlib))
(native-inputs
(list doxygen googletest xxd))
(home-page "https://gitlab.com/morpheus.lab/morpheus")
(synopsis "Multicellular simulation")
(description
"Morpheus is a modeling and simulation environment for the study of
multi-scale and multicellular systems.")
(license license:bsd-3)))
(define-public mosaik
(let ((commit "5c25216d3522d6a33e53875cd76a6d65001e4e67"))
(package
@ -11612,30 +11675,6 @@ (define-public r-snapatac
single cell ATAC-seq sequencing data.")
(license license:gpl3)))
(define-public r-tictoc
(package
(name "r-tictoc")
(version "1.2")
(source (origin
(method url-fetch)
(uri (cran-uri "tictoc" version))
(sha256
(base32
"037jbwb58mj5asf3kr6hpf3fy9c6fkinnd8hbpfb141a2jsa8pph"))))
(properties `((upstream-name . "tictoc")))
(build-system r-build-system)
(home-page "https://github.com/jabiru/tictoc")
(synopsis
"Time R scripts and implementations of stack and list structures")
(description
"The tictoc package provides the timing functions @code{tic} and
@code{toc} that can be nested. It provides an alternative to
@code{system.time()} with a different syntax similar to that in another
well-known software package. @code{tic} and @code{toc} are easy to use, and
are especially useful when timing several sections in more than a few lines of
code.")
(license license:asl2.0)))
(define-public r-tsis
(let ((commit "24460298fbe1d26e4da390f6e4f3d4d9d62334dc")
(revision "1"))
@ -12351,6 +12390,59 @@ (define-public vsearch
;; Dual licensed; also includes public domain source.
(license (list license:gpl3 license:bsd-2))))
(define-public pairadise
(package
(name "pairadise")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Xinglab/PAIRADISE")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0ycwcqabm4zdng0a7j593g35d5yzvvwm7dyi3b8s19zdi4rjzrwd"))))
(build-system pyproject-build-system)
(arguments
(list
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'chdir
(lambda _ (chdir "pairadise")))
(add-before 'build '2to3
(lambda _ (invoke "2to3" "--write" "--nobackups" "."))))))
(inputs (list star))
(propagated-inputs (list python-pysam))
(home-page "https://github.com/Xinglab/PAIRADISE")
(synopsis "Paired replicate analysis of allelic differential splicing events")
(description
"PAIRADISE is a method for detecting @dfn{allele-specific alternative
splicing} (ASAS) from RNA-seq data. Unlike conventional approaches that
detect ASAS events one sample at a time, PAIRADISE aggregates ASAS signals
across multiple individuals in a population. By treating the two alleles of
an individual as paired, and multiple individuals sharing a heterozygous SNP
as replicates, PAIRADISE formulates ASAS detection as a statistical problem
for identifying differential alternative splicing from RNA-seq data with
paired replicates.")
(license license:gpl3+)))
(define-public r-pairadise
(package
(inherit pairadise)
(name "r-pairadise")
(build-system r-build-system)
(arguments
(list
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'chdir
(lambda _ (chdir "pairadise/src/pairadise_model"))))))
(inputs '())
(propagated-inputs (list r-doparallel r-foreach r-iterators r-nloptr))
(license license:expat)))
(define-public pardre
(package
(name "pardre")
@ -16417,45 +16509,6 @@ (define-public r-dtmm
Mixtures.")
(license license:cc0))))
(define-public r-dyngen
(package
(name "r-dyngen")
(version "1.0.5")
(source
(origin
(method url-fetch)
(uri (cran-uri "dyngen" version))
(sha256
(base32
"095jqn1rd83qm3ayca9hmv6bhlaa2c338020l46vniq8n38kbnra"))))
(properties `((upstream-name . "dyngen")))
(build-system r-build-system)
(propagated-inputs
(list r-assertthat
r-dplyr
r-dynutils
r-ggplot2
r-ggraph
r-ggrepel
r-gillespiessa2
r-igraph
r-lmds
r-matrix
r-patchwork
r-pbapply
r-purrr
r-rlang
r-tibble
r-tidygraph
r-tidyr
r-viridis))
(home-page "https://github.com/dynverse/dyngen")
(synopsis "Multi-Modal simulator for single-cell omics analyses")
(description
"This package provides a multi-modal simulation engine for studying
dynamic cellular processes at single-cell resolution.")
(license license:expat)))
;; Needed for r-liana
(define-public r-omnipathr/devel
(let ((commit "679bb79e319af246a16968d27d64d8d6937a331a")

View file

@ -326,7 +326,7 @@ (define-public pcc
(define-public qbe
(package
(name "qbe")
(version "1.1")
(version "1.2")
(source (origin
(method git-fetch)
(uri (git-reference
@ -335,7 +335,7 @@ (define-public qbe
(file-name (git-file-name name version))
(sha256
(base32
"07nl1kdgpz7hwfkng0yy4xihk0fmv1a2hq9bxzgvhy3vk9r7fmn8"))))
"1sxz5dn788n5c4v6mxa2kg3hf0a4qryg8wp0w3wx0qkzj6flj2sj"))))
(build-system gnu-build-system)
(arguments
(list #:make-flags

View file

@ -177,13 +177,13 @@ (define zoneinfo (search-input-directory inputs "share/zoneinfo"))
(define-public khal
(package
(name "khal")
(version "0.11.2")
(version "0.11.3")
(source (origin
(method url-fetch)
(uri (pypi-uri "khal" version))
(sha256
(base32
"1flrz01nsmvphiv673b8ia279qcp3gj6a1rsjlsj4gp5f69xif4g"))))
"0pijq7crjpak1rq3hzx68fz34n7ikkcz3xsk9r3brny17z2brk58"))))
(build-system python-build-system)
(arguments
`(#:tests? #f ; The test suite is unreliable. See <https://bugs.gnu.org/44197>

View file

@ -250,6 +250,7 @@ (define-public check-0.14
(inherit check)
(version "0.14.0")
(source (origin
(inherit (package-source check))
(method url-fetch)
(uri (string-append "https://github.com/libcheck/check/releases"
"/download/" version "/check-" version ".tar.gz"))

View file

@ -183,14 +183,14 @@ (define-public complexity
(define-public global ; a global variable
(package
(name "global")
(version "6.6.10")
(version "6.6.12")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnu/global/global-"
version ".tar.gz"))
(sha256
(base32
"1s6c9nzpp4jfq14l3mk9fnyipizljkka8hdr1wwh2g798nlydl9d"))))
"00ari03n0wdzz1ib73p64h8g1p0a9js61fxl92jyq50fhh35najl"))))
(build-system gnu-build-system)
(arguments
(list #:configure-flags
@ -436,7 +436,7 @@ (define-public trio
(define-public universal-ctags
(package
(name "universal-ctags")
(version "6.1.20240218.0")
(version "6.1.20240317.0")
(source
(origin
(method git-fetch)
@ -446,7 +446,7 @@ (define-public universal-ctags
(file-name (git-file-name name version))
(sha256
(base32
"09cjlj7mq3s98x9zsg4slq86h1myixjxxqfnc0kglf2hnr9nrkf5"))
"1bs48bickx04rdr2g60pppyb5r0rjhyslwr1gr05qdv0bsmwf61x"))
(modules '((guix build utils)))
(snippet
'(begin

View file

@ -6,6 +6,7 @@
;;; Copyright © 2023 Zongyuan Li <zongyuan.li@c0x0o.me>
;;; Copyright © 2023 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2024 Tomas Volf <~@wolfsden.cz>
;;; Copyright © 2024 Foundation Devices, Inc. <hello@foundation.xyz>
;;;
;;; This file is part of GNU Guix.
;;;
@ -43,6 +44,7 @@ (define-module (gnu packages containers)
#:use-module (gnu packages glib)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages guile)
#:use-module (gnu packages linux)
#:use-module (gnu packages python)
#:use-module (gnu packages networking)
@ -149,7 +151,7 @@ (define-public conmon
(define-public distrobox
(package
(name "distrobox")
(version "1.5.0.2")
(version "1.7.0")
(source
(origin
(method git-fetch)
@ -157,23 +159,51 @@ (define-public distrobox
(url "https://github.com/89luca89/distrobox")
(commit version)))
(sha256
(base32 "0h6rpgbcmg33vriyzh9nkdxj8yhfn0y35i1wh1zmb7zss3ik9kxj"))
(base32 "1g14q1sm3026h9n85v1gc3m2v9sgrac2mr9yrkh98qg5yahzmpc3"))
(file-name (git-file-name name version))))
(build-system copy-build-system)
(inputs
(list podman wget))
(arguments
(list #:phases
#~(modify-phases %standard-phases
(add-before 'install 'refer-to-inputs
(lambda* (#:key inputs #:allow-other-keys)
(substitute* (find-files "." "^distrobox[^.]*[^1]$")
(("podman") (search-input-file inputs "/bin/podman"))
(("wget") (search-input-file inputs "/bin/wget"))
(("command -v") "test -x"))))
;; Use WRAP-SCRIPT to wrap all of the scripts of distrobox,
;; excluding the host side ones.
(add-after 'install 'wrap-scripts
(lambda _
(let ((path (search-path-as-list
(list "bin")
(list #$(this-package-input "podman")
#$(this-package-input "wget")))))
(for-each (lambda (script)
(wrap-script
(string-append #$output "/bin/distrobox-"
script)
`("PATH" ":" prefix ,path)))
'("assemble"
"create"
"enter"
"ephemeral"
"generate-entry"
"list"
"rm"
"stop"
"upgrade")))))
;; These scripts are used in the container side and the
;; /gnu/store path is not shared with the containers.
(add-after 'patch-shebangs 'unpatch-shebangs
(lambda _
(for-each (lambda (script)
(substitute*
(string-append #$output "/bin/distrobox-"
script)
(("#!.*/bin/sh") "#!/bin/sh\n")))
'("export" "host-exec" "init"))))
(replace 'install
(lambda _
(invoke "./install" "--prefix" #$output))))))
(inputs
(list guile-3.0 ; for wrap-script
podman
wget))
(home-page "https://distrobox.privatedns.org/")
(synopsis "Create and start containers highly integrated with the hosts")
(description
@ -291,7 +321,7 @@ (define-public passt
(define-public cni-plugins
(package
(name "cni-plugins")
(version "1.0.1")
(version "1.4.1")
(source
(origin
(method git-fetch)
@ -299,7 +329,7 @@ (define-public cni-plugins
(url "https://github.com/containernetworking/plugins")
(commit (string-append "v" version))))
(sha256
(base32 "1j91in0mg4nblpdccyq63ncbnn2pc2zzjp1fh3jy0bsndllgv0nc"))
(base32 "0l6f4z762n8blak41wcxdmdhm92gqw2qcxcqd3s4wiql3d7273kj"))
(file-name (git-file-name name version))))
(build-system go-build-system)
(arguments
@ -336,6 +366,50 @@ (define-public cni-plugins
configure network interfaces in Linux containers.")
(license license:asl2.0)))
(define-public gvisor-tap-vsock
(package
(name "gvisor-tap-vsock")
(version "0.7.3")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/containers/gvisor-tap-vsock")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1q1zism0c63k2aq6yhkjqc3b2zsm4lwn0bk39p2kl79h798wfyp4"))))
(build-system gnu-build-system)
(arguments
(list
#:make-flags `(list ,(string-append "GIT_VERSION=v" version))
#:test-target "test"
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(add-before 'build 'setenv
(lambda _
;; For golang toolchain.
(setenv "HOME" "/tmp")))
(add-before 'check 'prune-tests
(lambda _
;; Requires internet connection to fetch QEMU image.
(invoke "rm" "-r" "test")))
(replace 'install
(lambda _
(install-file "bin/gvproxy" (string-append #$output "/bin")))))))
(native-inputs (list go-1.20))
(home-page "https://github.com/containers/gvisor-tap-vsock")
(synopsis "Network stack for virtualization based on gVisor")
(description "This package provides a replacement for @code{libslirp} and
@code{VPNKit}, written in pure Go. It is based on the network stack of gVisor
and brings a configurable DNS server and dynamic port forwarding.
It can be used with QEMU, Hyperkit, Hyper-V and User-Mode Linux.
The binary is called @command{gvproxy}.")
(license license:asl2.0)))
;; For podman to work, the user needs to run
;; `sudo mount -t cgroup2 none /sys/fs/cgroup`

View file

@ -30,7 +30,7 @@
;;; Copyright © 2022 Attila Lendvai <attila@lendvai.name>
;;; Copyright © 2022 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2022, 2023, 2024 David Elsing <david.elsing@posteo.net>
;;; Copyright © 2022, 2023 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2022-2024 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2022, 2023, 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2022 Antero Mejr <antero@mailbox.org>
;;; Copyright © 2023 Sughosha <Sughosha@proton.me>
@ -907,9 +907,12 @@ (define-public gperftools
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
;; The tests are flaky when run in parallel. For more info:
;; https://bugs.gnu.org/46562
'(#:parallel-tests? #f))
;; The tests are flaky when run in parallel. For more info:
;; https://bugs.gnu.org/46562
`(#:parallel-tests? #f
,@(if (target-riscv64?)
`(#:make-flags (list "LDFLAGS=-latomic"))
'())))
(native-inputs
(list autoconf automake libtool
;; For tests.

View file

@ -1344,13 +1344,13 @@ (define-public r-gunifrac
(define-public r-gwasexacthw
(package
(name "r-gwasexacthw")
(version "1.01")
(version "1.2")
(source (origin
(method url-fetch)
(uri (cran-uri "GWASExactHW" version))
(sha256
(base32
"19qmk8h7kxmn9kzw0x4xns5p3qqz27xkqq4q6zmh4jzizd0fsl78"))))
"1xzcvmbh27ibd7g9zlqyp215q4yfkhdypcvm5gjkvw1qhd3pl4yk"))))
(properties `((upstream-name . "GWASExactHW")))
(build-system r-build-system)
(home-page "https://cran.r-project.org/package=GWASExactHW")
@ -2318,13 +2318,13 @@ (define-public r-dlm
(define-public r-zcompositions
(package
(name "r-zcompositions")
(version "1.5.0-1")
(version "1.5.0-3")
(source (origin
(method url-fetch)
(uri (cran-uri "zCompositions" version))
(sha256
(base32
"0sx6i03iyg4jxmjiyzkssz3i6c8nv29wwhbl7yd0wxapwpakmlj8"))))
"1gbwx3vgx5viqnn5jsszild6ikyc2pmf1hdjc9475caf9xx9l589"))))
(properties `((upstream-name . "zCompositions")))
(build-system r-build-system)
(propagated-inputs
@ -3841,6 +3841,30 @@ (define-public r-tgstat
data using K-nn graph partitions.")
(license license:gpl2)))
(define-public r-tictoc
(package
(name "r-tictoc")
(version "1.2.1")
(source (origin
(method url-fetch)
(uri (cran-uri "tictoc" version))
(sha256
(base32
"0cw8r1gn4p2v1l3d80brk9sfr9nyckyyym5nr9xq3d74l74vgkcg"))))
(properties `((upstream-name . "tictoc")))
(build-system r-build-system)
(home-page "https://github.com/jabiru/tictoc")
(synopsis
"Time R scripts and implementations of stack and list structures")
(description
"The tictoc package provides the timing functions @code{tic} and
@code{toc} that can be nested. It provides an alternative to
@code{system.time()} with a different syntax similar to that in another
well-known software package. @code{tic} and @code{toc} are easy to use, and
are especially useful when timing several sections in more than a few lines of
code.")
(license license:asl2.0)))
(define-public r-tidyft
(package
(name "r-tidyft")
@ -4998,14 +5022,14 @@ (define-public r-safetensors
(define-public r-sass
(package
(name "r-sass")
(version "0.4.8")
(version "0.4.9")
(source
(origin
(method url-fetch)
(uri (cran-uri "sass" version))
(sha256
(base32
"0364ndnmlqrga3k4c1hfy1894k5wpm9srf9201g9zb92rlq2kfj2"))))
"1lnl2xssz33vg7p6a8ij55hg6j1p1d3y2mq22pvf0r3rmnd08cz1"))))
(properties `((upstream-name . "sass")))
(build-system r-build-system)
(propagated-inputs
@ -6515,13 +6539,13 @@ (define-public r-ps
(define-public r-pkgbuild
(package
(name "r-pkgbuild")
(version "1.4.3")
(version "1.4.4")
(source
(origin
(method url-fetch)
(uri (cran-uri "pkgbuild" version))
(sha256
(base32 "0rci20gj2x0bgjy51jp8i4gld6arsigj7lhdkpwvdyhadjsyv0qm"))))
(base32 "1a72s2gg7ddjj94naiii44f3vyhky05gaa6xvdf72m1nshy88wjr"))))
(build-system r-build-system)
(propagated-inputs
(list r-callr r-cli r-desc r-processx r-r6))
@ -8945,14 +8969,14 @@ (define-public r-ipred
(define-public r-psych
(package
(name "r-psych")
(version "2.4.1")
(version "2.4.3")
(source
(origin
(method url-fetch)
(uri (cran-uri "psych" version))
(sha256
(base32
"08ip2m91c6hinva18zv575cn6w14pnjc503m1gisrg65c3z3f69b"))))
"0ic479y314knn20m1cjlp15lji7f70xrg95ln570pgkhrk5853bi"))))
(build-system r-build-system)
(propagated-inputs
(list r-lattice r-mnormt r-nlme))
@ -9132,13 +9156,13 @@ (define-public r-ggrepel
(define-public r-coro
(package
(name "r-coro")
(version "1.0.3")
(version "1.0.4")
(source
(origin
(method url-fetch)
(uri (cran-uri "coro" version))
(sha256
(base32 "0wvxdpdh3xrskz5s5wfkva856x849knx1jigbf0ff6s6n6qjjxsf"))))
(base32 "0r6cb2gr29vxjlbfzqxdgbccp57l6raxncljisl1vyj6xi2by8cg"))))
(properties `((upstream-name . "coro")))
(build-system r-build-system)
(propagated-inputs (list r-rlang))
@ -10277,13 +10301,13 @@ (define-public r-debugme
(define-public r-processx
(package
(name "r-processx")
(version "3.8.3")
(version "3.8.4")
(source
(origin
(method url-fetch)
(uri (cran-uri "processx" version))
(sha256
(base32 "0cfq6pq8rg0vhjfgvf48hfvngbn1g6hv28b6pgxh55xqh8acbn0s"))))
(base32 "02z7n59pglz6jw1vyyl0mkc7mz2c7y8yzsnhq5yz62digwnnf9v6"))))
(build-system r-build-system)
(propagated-inputs
(list r-ps r-r6))
@ -10712,14 +10736,14 @@ (define-public r-tinylabels
(define-public r-tinytex
(package
(name "r-tinytex")
(version "0.49")
(version "0.50")
(source
(origin
(method url-fetch)
(uri (cran-uri "tinytex" version))
(sha256
(base32
"0i9icscy5n6p6w3f4v2z3cznywrrv2l6xyyhb0k1fpa4cpn6j4cl"))))
"11k0pl073b4k4wmpxkw4a071jbpvhr1g3cwm9v99rw3gh6p6x15l"))))
(build-system r-build-system)
(propagated-inputs
(list r-xfun))
@ -10797,13 +10821,13 @@ (define-public r-n2r
(define-public r-nestedcv
(package
(name "r-nestedcv")
(version "0.7.4")
(version "0.7.8")
(source
(origin
(method url-fetch)
(uri (cran-uri "nestedcv" version))
(sha256
(base32 "0ymy1dbkcpiyq44zpvpkz1m5ivnchip07q6agh6ij50imddxb48s"))))
(base32 "1pdky7kzqs1rhl0f4hba3sggifplfgbp339imxym4dvvdb81b589"))))
(properties `((upstream-name . "nestedcv")))
(build-system r-build-system)
(propagated-inputs (list r-caret
@ -10812,13 +10836,13 @@ (define-public r-nestedcv
r-foreach
r-ggplot2
r-glmnet
r-magrittr
r-matrixstats
r-matrixtests
r-proc
r-rfast
r-rhpcblasctl
r-rlang))
r-rlang
r-rocr))
(native-inputs (list r-knitr))
(home-page "https://github.com/myles-lewis/nestedcv")
(synopsis "Nested cross-validation with glmnet and caret")
@ -12593,6 +12617,45 @@ (define-public r-dyn
;; Any GPL version.
(license license:gpl2+)))
(define-public r-dyngen
(package
(name "r-dyngen")
(version "1.0.5")
(source
(origin
(method url-fetch)
(uri (cran-uri "dyngen" version))
(sha256
(base32
"095jqn1rd83qm3ayca9hmv6bhlaa2c338020l46vniq8n38kbnra"))))
(properties `((upstream-name . "dyngen")))
(build-system r-build-system)
(propagated-inputs
(list r-assertthat
r-dplyr
r-dynutils
r-ggplot2
r-ggraph
r-ggrepel
r-gillespiessa2
r-igraph
r-lmds
r-matrix
r-patchwork
r-pbapply
r-purrr
r-rlang
r-tibble
r-tidygraph
r-tidyr
r-viridis))
(home-page "https://github.com/dynverse/dyngen")
(synopsis "Multi-Modal simulator for single-cell omics analyses")
(description
"This package provides a multi-modal simulation engine for studying
dynamic cellular processes at single-cell resolution.")
(license license:expat)))
(define-public r-dynutils
(package
(name "r-dynutils")
@ -13709,14 +13772,14 @@ (define-public r-ggseqlogo
(define-public r-ggsci
(package
(name "r-ggsci")
(version "3.0.1")
(version "3.0.2")
(source
(origin
(method url-fetch)
(uri (cran-uri "ggsci" version))
(sha256
(base32
"030rkjx64mlhy19d74p3blsi92nyjq9vbn33323dvm1rihb8avgi"))))
"0qasxv3aliqqmfi3nk3140lrbcrw4lbfw5hm65hfkgf5a3bkca67"))))
(build-system r-build-system)
(propagated-inputs
(list r-ggplot2 r-scales))
@ -14486,14 +14549,14 @@ (define-public r-prettygraphs
(define-public r-insight
(package
(name "r-insight")
(version "0.19.8")
(version "0.19.9")
(source
(origin
(method url-fetch)
(uri (cran-uri "insight" version))
(sha256
(base32
"1f76fqrcv54l01z2nb46ysh3f41j06nqpn4ffn2gmjfggmj4xvwq"))))
"0q6wd28bnav9vwzprwvm9fhpmhqvq85iyg4h503lavcvi5g39a9x"))))
(build-system r-build-system)
(native-inputs
(list r-knitr))
@ -14572,13 +14635,13 @@ (define-public r-sjmisc
(define-public r-nodbi
(package
(name "r-nodbi")
(version "0.10.3")
(version "0.10.4")
(source (origin
(method url-fetch)
(uri (cran-uri "nodbi" version))
(sha256
(base32
"17ghgp6sabj4dlmx3cdn9rrhci7050a73cd17fymjksgvy1jbwf6"))))
"0q4nsxic1jlraipdc6zi711c3316n9wgq1cgbywhjlxb52qhkmd7"))))
(properties `((upstream-name . "nodbi")))
(build-system r-build-system)
(propagated-inputs
@ -14652,14 +14715,14 @@ (define-public r-moonbook
(define-public r-flextable
(package
(name "r-flextable")
(version "0.9.4")
(version "0.9.5")
(source
(origin
(method url-fetch)
(uri (cran-uri "flextable" version))
(sha256
(base32
"1dlsag1y3s7d5lp1dh2kxf1qax4r9xvxycpmxl64gkr50dk13bam"))))
"14mq27k7998405qwpdpxa1csbf5pdgzj9s892xm95bd4chnshdvw"))))
(build-system r-build-system)
(propagated-inputs
(list r-data-table
@ -14730,13 +14793,13 @@ (define-public r-writexls
(define-public r-wrs2
(package
(name "r-wrs2")
(version "1.1-5")
(version "1.1-6")
(source (origin
(method url-fetch)
(uri (cran-uri "WRS2" version))
(sha256
(base32
"028xs424m879siaf3rrhzl1dacp9j7wcl5fpikyx2n0cc7anq4vq"))))
"1wsnsl4gy1hbgxfzzhfybak0jqmxq9fsh3scqyxydd7ia9r2n52k"))))
(properties `((upstream-name . "WRS2")))
(build-system r-build-system)
(propagated-inputs (list r-mass r-plyr r-reshape))
@ -16525,14 +16588,14 @@ (define-public r-magick
(define-public r-survey
(package
(name "r-survey")
(version "4.2-1")
(version "4.4-1")
(source
(origin
(method url-fetch)
(uri (cran-uri "survey" version))
(sha256
(base32
"0l7iml53k2blmcgvbvplln08fn2s6da856m5izcvw87v6bhn2g6c"))))
"1649srmdr8i9j8grqikkm8nbfav31s7iygx6pv96jvr3wh80yh46"))))
(build-system r-build-system)
(propagated-inputs
(list r-lattice
@ -16540,7 +16603,10 @@ (define-public r-survey
r-minqa
r-mitools
r-numderiv
r-rcpp
r-rcpparmadillo
r-survival))
(native-inputs (list r-r-rsp))
(home-page "https://r-survey.r-forge.r-project.org/survey/")
(synopsis "Analysis of complex survey samples")
(description
@ -16607,13 +16673,13 @@ (define-public r-tab
(define-public r-tarchetypes
(package
(name "r-tarchetypes")
(version "0.7.12")
(version "0.8.0")
(source (origin
(method url-fetch)
(uri (cran-uri "tarchetypes" version))
(sha256
(base32
"0l5kk7a3p0pbqh9rrjz43aa4dgcfffcb3wwsl60bm9v48lzv7frv"))))
"18vn2mx5nqlib0by5v7493g8gsbzcdbg0dn92cpbf713r69v1lbk"))))
(properties `((upstream-name . "tarchetypes")))
(build-system r-build-system)
(propagated-inputs (list r-digest
@ -16641,13 +16707,13 @@ (define-public r-tarchetypes
(define-public r-targets
(package
(name "r-targets")
(version "1.5.1")
(version "1.6.0")
(source (origin
(method url-fetch)
(uri (cran-uri "targets" version))
(sha256
(base32
"1g21cp0p5jdghr61w9q3y73jm2k248z4apn7rlxqm6m18i4x7zsb"))))
"1ddpbhvdydxm62k6ay7hpqjh8kh2isjpcdh3gygzcdrghx6d7x65"))))
(properties `((upstream-name . "targets")))
(build-system r-build-system)
(propagated-inputs (list r-base64url
@ -17065,13 +17131,13 @@ (define-public r-multcomp
(define-public r-multcompview
(package
(name "r-multcompview")
(version "0.1-9")
(version "0.1-10")
(source
(origin
(method url-fetch)
(uri (cran-uri "multcompView" version))
(sha256
(base32 "15vki166n2k4ng72hy62c2mzz18s10h6l6w839qplg0zsplr6f8z"))))
(base32 "12mdk12xciq1d3zn94rixahhcah2qq41lvb5n4kzgjaq4yr4kwiq"))))
(properties `((upstream-name . "multcompView")))
(build-system r-build-system)
(home-page "https://cran.r-project.org/package=multcompView")
@ -17780,14 +17846,14 @@ (define-public r-sessioninfo
(define-public r-remotes
(package
(name "r-remotes")
(version "2.4.2.1")
(version "2.5.0")
(source
(origin
(method url-fetch)
(uri (cran-uri "remotes" version))
(sha256
(base32
"1790q52z4fy4zb1hnpn066q9fph53syl7gaxlbgbqq1dcndcma3v"))))
"0345s9q0fyv0wrxkklcy97h7bi85jfb3vwkh80px926d4qa3yrjd"))))
(build-system r-build-system)
(native-inputs
(list r-knitr))
@ -18529,14 +18595,14 @@ (define-public r-biocmanager
(define-public r-rgl
(package
(name "r-rgl")
(version "1.2.8")
(version "1.3.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "rgl" version))
(sha256
(base32
"1x0p2yldg2mjf64xd5dd0bidzgy7b39w7zn18ghan2rdf0wffdg5"))
"0jbda1b4lrkcpdld369687pm7isy69l5sx1wg2yrpvvzvmcppslz"))
(snippet
'(delete-file "inst/htmlwidgets/lib/CanvasMatrix/CanvasMatrix.min.js"))))
;; For OpenGL and X11 support
@ -18561,10 +18627,10 @@ (define-public r-rgl
r-rmarkdown)) ;for vignettes
(inputs
(list freetype
libpng
glu
libpng
libx11
pandoc
zlib
zlib))
(propagated-inputs
(list r-base64enc
@ -18978,13 +19044,13 @@ (define-public r-adimpro
(define-public r-admisc
(package
(name "r-admisc")
(version "0.34")
(version "0.35")
(source
(origin
(method url-fetch)
(uri (cran-uri "admisc" version))
(sha256
(base32 "1psvi8hb7j65abw8g4ya9r43r5kd9mcv478pg2d09za0cig8gkzx"))))
(base32 "0gzdb9dm34qfkjqgfrd3wm96dzhcps4xayyrhp80mzgh14zmnjyg"))))
(properties `((upstream-name . "admisc")))
(build-system r-build-system)
(home-page "https://github.com/dusadrian/admisc")
@ -19198,14 +19264,14 @@ (define-public r-nlp
(define-public r-tm
(package
(name "r-tm")
(version "0.7-11")
(version "0.7-12")
(source
(origin
(method url-fetch)
(uri (cran-uri "tm" version))
(sha256
(base32
"0hp7xamjmifd56qwsin5m0xng592wwxsbfxdz37n4k6zjf28paws"))))
"1z0zpz6jgzg34cz07cdpya2zwwsvywrd8xgwahhlz15vnaij7j3y"))))
(properties `((upstream-name . "tm")))
(build-system r-build-system)
(propagated-inputs
@ -19327,14 +19393,14 @@ (define-public r-wordcloud
(define-public r-colorramps
(package
(name "r-colorramps")
(version "2.3.2")
(version "2.3.4")
(source
(origin
(method url-fetch)
(uri (cran-uri "colorRamps" version))
(sha256
(base32
"0cq8l6ybhff2q2dj2i73b4cnw6v2c6ql24jbrkh0xrpc9wjsarxj"))))
"1y4gn6v8wmwq3wcfgdnx1ah2qa53gayvbfa62kp286ga4c8k3prw"))))
(properties `((upstream-name . "colorRamps")))
(build-system r-build-system)
(home-page "https://cran.r-project.org/web/packages/colorRamps")
@ -19931,14 +19997,14 @@ (define-public r-rnexml
(define-public r-rnifti
(package
(name "r-rnifti")
(version "1.6.0")
(version "1.6.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "RNifti" version))
(sha256
(base32
"0spsdkqvlkk7xn6wz6778gc6cc7dnfcwpz91q8wdzxgcbgxdy0yv"))))
"0wn06fnq5c7f0vwakryb75vzkjh03dqz2z57lgmn68hwgssnpalc"))))
(properties `((upstream-name . "RNifti")))
(build-system r-build-system)
(inputs (list zlib))
@ -20429,14 +20495,14 @@ (define-public r-gargle
(define-public r-bigrquery
(package
(name "r-bigrquery")
(version "1.5.0")
(version "1.5.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "bigrquery" version))
(sha256
(base32
"1s2vvygv4d8mdd67r6j2s9d1xg009lpxysfarmrnqh0s2s1rglkz"))))
"0wkm9xka83skq1cnv830q4jnqvwm8rlmns2mj8n692h2y5qxlmna"))))
(build-system r-build-system)
(propagated-inputs
(list r-bit64
@ -21642,14 +21708,14 @@ (define-public r-listenv
(define-public r-globals
(package
(name "r-globals")
(version "0.16.2")
(version "0.16.3")
(source
(origin
(method url-fetch)
(uri (cran-uri "globals" version))
(sha256
(base32
"02kpdlrx1bannaixz03c0f7bii9g36iy2nw779mfgi56byljcb38"))))
"0nwcl40sbmmf812di9c3lryls9wn2k2dyjvpkp9832wd4jafsg6p"))))
(build-system r-build-system)
(propagated-inputs
(list r-codetools))
@ -22208,14 +22274,14 @@ (define-public r-compositions
(define-public r-cobs
(package
(name "r-cobs")
(version "1.3-7")
(version "1.3-8")
(source
(origin
(method url-fetch)
(uri (cran-uri "cobs" version))
(sha256
(base32
"0gz6i8scvfkmg0z7rcqc422dm360xv5ygcxnj6yyvpcpdv7sdp9k"))))
"08cqpiylbfy5j5xxajpngqaycmmciwhyf3sk3972x2l6rg3lj81c"))))
(build-system r-build-system)
(propagated-inputs
(list r-quantreg r-sparsem))
@ -22798,14 +22864,14 @@ (define-public r-irkernel
(define-public r-gmodels
(package
(name "r-gmodels")
(version "2.18.1.1")
(version "2.19.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "gmodels" version))
(sha256
(base32
"158y7yh4maawn9vki8cq4sil48xib2bbpl6qgj5gvlkw3c14hzfs"))))
"13c8x7iwyz36qir3ikbvjb5dl6gdh4fh82qdxcpcdinwfhrbhmxv"))))
(build-system r-build-system)
(propagated-inputs
(list r-gdata r-mass))
@ -23727,13 +23793,13 @@ (define-public r-polspline
(define-public r-rms
(package
(name "r-rms")
(version "6.7-1")
(version "6.8-0")
(source
(origin
(method url-fetch)
(uri (cran-uri "rms" version))
(sha256
(base32 "199xb98zxsbd8wa9g33bgrvbcpq79glnfmq060ic8f9vjw96r0qz"))))
(base32 "1cd6m6i2ild2f2x9rkyd2aqb33q3xy0596bs3dnvr2mnh5fcar5d"))))
(build-system r-build-system)
(propagated-inputs
(list r-cluster
@ -24829,14 +24895,14 @@ (define-public r-europepmc
(define-public r-ggraph
(package
(name "r-ggraph")
(version "2.2.0")
(version "2.2.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "ggraph" version))
(sha256
(base32
"0zs02xyzvimk8hj1z465zxp1hlca3gfirdcwb3gqriwsmnfhg661"))))
"1w9snb43wpa2rv16fx5vmh7nqpgkr05iz6flnmlfx3xd0ylzh1a4"))))
(build-system r-build-system)
(propagated-inputs
(list r-cli
@ -25631,14 +25697,14 @@ (define-public r-ggpointdensity
(define-public r-arrow
(package
(name "r-arrow")
(version "14.0.2.1")
(version "15.0.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "arrow" version))
(sha256
(base32
"1l1ninmq6mbqm7cckcy0qw4f20fkrixrykcqkh24bszg514r9af5"))))
"070pp0p5h1ij7pg34l5grrx4vwfihagnvnk4kj7l3w0gh8y88ibz"))))
(properties `((upstream-name . "arrow")))
(build-system r-build-system)
(inputs
@ -27262,14 +27328,14 @@ (define-public r-covr
(define-public r-systemfonts
(package
(name "r-systemfonts")
(version "1.0.5")
(version "1.0.6")
(source
(origin
(method url-fetch)
(uri (cran-uri "systemfonts" version))
(sha256
(base32
"08sqw5izpwhawcjkcyscvslz914skwfi0s68rdwrqwwkh8fzn3w4"))))
"1mqxb2njfnk5rfwkqc940xbpwd3dh25zac4sapv5mjyddrxnwn6i"))))
(properties `((upstream-name . "systemfonts")))
(build-system r-build-system)
(propagated-inputs
@ -27291,14 +27357,14 @@ (define-public r-systemfonts
(define-public r-graphlayouts
(package
(name "r-graphlayouts")
(version "1.1.0")
(version "1.1.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "graphlayouts" version))
(sha256
(base32
"14ib4yjcxb6zgci5h89p9swqabab57bzywwp96d3nhn620chap22"))))
"009q5y46lbizdabbb6a61xlfa3g5lf3nd9w42709lcxi0ad4bhkv"))))
(properties `((upstream-name . "graphlayouts")))
(build-system r-build-system)
(propagated-inputs
@ -27443,14 +27509,14 @@ (define-public r-assertr
(define-public r-parameters
(package
(name "r-parameters")
(version "0.21.5")
(version "0.21.6")
(source
(origin
(method url-fetch)
(uri (cran-uri "parameters" version))
(sha256
(base32
"0yxljycspmljj5s4i5knwyhxp29s616f7kg3xcwn0ip15kfg260v"))))
"004ld3m9qdq3bwl8qmp3h700kzqlgbmgz739d7fpiqgrs0s2gv83"))))
(properties `((upstream-name . "parameters")))
(build-system r-build-system)
(propagated-inputs
@ -28550,21 +28616,18 @@ (define-public r-sparselda
(define-public r-accsda
(package
(name "r-accsda")
(version "1.1.2")
(version "1.1.3")
(source
(origin
(method url-fetch)
(uri (cran-uri "accSDA" version))
(sha256
(base32
"0jf4x5j9y7a3mvf2ghjp6bxdq1s5jh2sx3x3ar6f3lyzzvrnls4v"))))
"1s0c4wy4bzrc2fkka7kl519z1yckp6s4ggzy1ik992ygyprdcs1q"))))
(properties `((upstream-name . "accSDA")))
(build-system r-build-system)
(propagated-inputs
(list r-ggplot2
r-ggthemes
r-gridextra
r-mass))
(list r-ggplot2 r-gridextra r-mass))
(home-page "https://github.com/gumeo/accSDA/wiki")
(synopsis "Accelerated sparse discriminant analysis")
(description
@ -28790,14 +28853,14 @@ (define-public r-acfmperiod
(define-public r-gamlss-data
(package
(name "r-gamlss-data")
(version "6.0-2")
(version "6.0-6")
(source
(origin
(method url-fetch)
(uri (cran-uri "gamlss.data" version))
(sha256
(base32
"07mpdl4h9rwmnpl9jmsn6ig8ji11an6pyjfsvg62h2alapwbdcyv"))))
"08mb154mz1kk19zb414i5mg1q1yv7nylwpc5kzsb602mv4cxpq5s"))))
(properties `((upstream-name . "gamlss.data")))
(build-system r-build-system)
(home-page "http://www.gamlss.org/")
@ -29856,14 +29919,14 @@ (define-public r-fds
(define-public r-fda
(package
(name "r-fda")
(version "6.1.7")
(version "6.1.8")
(source
(origin
(method url-fetch)
(uri (cran-uri "fda" version))
(sha256
(base32
"00hiz15v31zs5l0bqdkim1fpfd3bjvssv77iczq0si724s4fqxiq"))))
"01y488zviaj9z8h88vnia9wg4as62jx73la1qji1ljbr5258b3gg"))))
(properties `((upstream-name . "fda")))
(build-system r-build-system)
(propagated-inputs
@ -31470,7 +31533,7 @@ (define-public r-formula-tools
"These utilities facilitate the programmatic manipulations of formulas,
expressions, calls, assignments and other R language objects. These objects
all share the same structure: a left-hand side, operator and right-hand side.
This packages provides methods for accessing and modifying this structures as
This package provides methods for accessing and modifying this structures as
well as extracting and replacing names and symbols from these objects.")
(license license:gpl2)))
@ -32360,14 +32423,14 @@ (define-public r-tam
(define-public r-erm
(package
(name "r-erm")
(version "1.0-5")
(version "1.0-6")
(source
(origin
(method url-fetch)
(uri (cran-uri "eRm" version))
(sha256
(base32
"0bkivhiy02pibdcvb9z0i0yvc3wz3v33n6slhkkik61gcw1idmf0"))))
"059xny2jl81is1qyxgpbf4qi5zqpvdc64322kjz1i011kq9apwmw"))))
(properties `((upstream-name . "eRm")))
(build-system r-build-system)
(propagated-inputs
@ -32714,14 +32777,14 @@ (define-public r-loo
(define-public r-rstan
(package
(name "r-rstan")
(version "2.32.5")
(version "2.32.6")
(source
(origin
(method url-fetch)
(uri (cran-uri "rstan" version))
(sha256
(base32
"0m655pf0lrhqh2mzylximd2vch9wy252k4zwyfqn1sfwmx642dva"))))
"0w0si8sd26c4nivqh85y0imil14sp4vy97yikmrv1lxvj40x141k"))))
(properties
'((upstream-name . "rstan")
(updater-extra-native-inputs . ("tzdata-for-tests"))))
@ -32750,6 +32813,7 @@ (define-public r-rstan
r-rcppeigen
r-rcppparallel
r-stanheaders))
(inputs (list pandoc))
(home-page "https://discourse.mc-stan.org/")
(synopsis "R interface to Stan")
(description
@ -35663,14 +35727,14 @@ (define-public r-diffusionmap
(define-public r-igraph
(package
(name "r-igraph")
(version "2.0.2")
(version "2.0.3")
(source
(origin
(method url-fetch)
(uri (cran-uri "igraph" version))
(sha256
(base32
"0kfc9blyy54cz0m4mdzzwgvn0rkil49kdk438411mx62g2vxby9l"))))
"0xlg5lxzr8dc260fii43chsspqvb962i1yrcars988b78lnig2lf"))))
(properties
`((upstream-name . "igraph")
(updater-extra-native-inputs . ("which"))))
@ -35678,7 +35742,7 @@ (define-public r-igraph
(native-inputs
(list gfortran pkg-config r-knitr which))
(inputs
(list glpk gmp libxml2 zlib))
(list glpk libxml2 zlib))
(propagated-inputs
(list r-cli
r-cpp11
@ -36892,13 +36956,13 @@ (define-public r-seurat5object
(define-public r-seurat
(package
(name "r-seurat")
(version "5.0.2")
(version "5.0.3")
(source (origin
(method url-fetch)
(uri (cran-uri "Seurat" version))
(sha256
(base32
"1d49a9mhip81lvnkr8i4dznkmzyskdzrpi485w7yw2sr0qbyzg5c"))))
"08r5l6sk8i134izd29ydfm7hva7a9b3lfglmgngc9w73qs9dzwz4"))))
(properties `((upstream-name . "Seurat")))
(build-system r-build-system)
(propagated-inputs
@ -37668,13 +37732,13 @@ (define-public r-mlr3
(define-public r-mlr3learners
(package
(name "r-mlr3learners")
(version "0.5.8")
(version "0.6.0")
(source (origin
(method url-fetch)
(uri (cran-uri "mlr3learners" version))
(sha256
(base32
"0q44qmd9zfc68jl2zz684rx9744g83vd7z40dck8cdvnnrxcff5g"))))
"06gz6h19cnb62js1b35nddy453dyj64mr788p8ww56kgfk6yzxr8"))))
(build-system r-build-system)
(propagated-inputs
(list r-checkmate
@ -38019,14 +38083,14 @@ (define-public r-textshaping
(define-public r-ragg
(package
(name "r-ragg")
(version "1.2.7")
(version "1.3.0")
(source
(origin
(method url-fetch)
(uri (cran-uri "ragg" version))
(sha256
(base32
"17qc53scxf02f8hlpyirsjdav4wjh3mk6q04npf82y0j5mk1hynp"))))
"1chlas4i6p8gigx02x1y7nanmz9jbv1h4fa145zk223bbg9j931j"))))
(properties `((upstream-name . "ragg")))
(build-system r-build-system)
(inputs
@ -39592,28 +39656,19 @@ (define-public r-rapiserialize
(define-public r-qs
(package
(name "r-qs")
(version "0.25.7")
(version "0.26.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "qs" version))
(sha256
(base32
"0a0jay9p2k0ahf08s94dr1w66qhbgzs87vkaanwkd4j6lvijncz7"))))
"0qmgnc4igy8mjzarm30cgi4z75hh8f01kvcs6n6s63cy4qk30vs6"))))
(properties `((upstream-name . "qs")))
(build-system r-build-system)
(arguments
(list
#:phases
'(modify-phases %standard-phases
;; Our zstd is at 1.5.0, but this package bundles 1.5.2.
(add-after 'unpack 'use-older-zstd
(lambda _
(substitute* "configure"
(("100502") "100500")))))))
(inputs (list lz4 (list zstd "lib")))
(propagated-inputs
(list r-rapiserialize r-rcpp r-stringfish))
(list r-bh r-rapiserialize r-rcpp r-stringfish))
(native-inputs
(list pkg-config r-knitr))
(home-page "https://github.com/traversc/qs")
@ -40039,14 +40094,14 @@ (define-public r-zoon
(define-public r-paws-common
(package
(name "r-paws-common")
(version "0.7.0")
(version "0.7.1")
(source
(origin
(method url-fetch)
(uri (cran-uri "paws.common" version))
(sha256
(base32
"05rld34brjc32p9f9cbqyyh208rh9idnyih33cpw7bz7bfyicnqm"))))
"1mjbyykav3f5yv59hnaihqsqhinvrlhphp93ks9xp756w6abciqf"))))
(properties `((upstream-name . "paws.common")))
(build-system r-build-system)
(propagated-inputs
@ -41082,13 +41137,13 @@ (define-public r-zoib
(define-public r-logger
(package
(name "r-logger")
(version "0.2.2")
(version "0.3.0")
(source
(origin
(method url-fetch)
(uri (cran-uri "logger" version))
(sha256
(base32 "08kym5i5fvbf5xhh9qdszp4jdgyc7j7zpnwzy68wabqz73aff6sg"))))
(base32 "0ivhrmq408pb7gx7yhmrn6mjkx15dvkb4bpk4z5y642l3j2vv9vd"))))
(properties `((upstream-name . "logger")))
(build-system r-build-system)
(native-inputs (list r-knitr))

View file

@ -9664,6 +9664,7 @@ (define-public rust-carapace-spec-clap-0.1
(description "This package provides spec generation for clap-rs/clap.")
(license license:expat)))
;; TODO: Remove this package in favor of rust-cargo in rust-apps.scm.
(define-public rust-cargo-0.76
(package
(name "rust-cargo")

View file

@ -160,7 +160,6 @@ (define-module (gnu packages databases)
#:use-module (gnu packages sphinx)
#:use-module (gnu packages ssh)
#:use-module (gnu packages sqlite)
#:use-module (gnu packages syncthing) ;for go-github-com-lib-pq
#:use-module (gnu packages tcl)
#:use-module (gnu packages terminals)
#:use-module (gnu packages texinfo)
@ -4514,7 +4513,7 @@ (define-public python-pypika
(define-public apache-arrow
(package
(name "apache-arrow")
(version "14.0.2")
(version "15.0.1")
(source
(origin
(method git-fetch)
@ -4524,7 +4523,7 @@ (define-public apache-arrow
(file-name (git-file-name name version))
(sha256
(base32
"1idw58vs8r6g6xy2qkhccgc79hwx4r5rr4bhd6ilxx56fwq9hkn2"))))
"0zrcwsq9c976xncc1kg6lw24s5r3ag8vfzhmcnkvi5z2c9x4lvvc"))))
(build-system cmake-build-system)
(arguments
(list
@ -5353,11 +5352,10 @@ (define-public sqls
(package
(name "sqls")
(version "0.2.18")
(home-page "https://github.com/lighttiger2505/sqls")
(source (origin
(method git-fetch)
(uri (git-reference
(url home-page)
(url "https://github.com/sqls-server/sqls")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
@ -5365,19 +5363,22 @@ (define-public sqls
"13837v27avdp2nls3vyy7ml12nj7rxragchwf92adn10ffp4aj6c"))))
(build-system go-build-system)
(arguments
'(#:import-path "github.com/lighttiger2505/sqls"))
(list
#:install-source? #f
#:import-path "github.com/lighttiger2505/sqls"))
(inputs (list go-github-com-go-sql-driver-mysql
go-github-com-lib-pq
go-github-com-mattn-go-runewidth
go-github-com-mattn-go-sqlite3
go-github-com-olekukonko-tablewriter
go-github-com-pkg-errors
go-github-com-sourcegraph-jsonrpc2
go-golang-org-x-crypto
go-github-com-mattn-go-runewidth
go-golang-org-x-xerrors
go-gopkg-in-yaml-v2))
(native-inputs (list go-github-com-google-go-cmp-cmp
go-github-com-k0kubun-pp))
(home-page "https://github.com/sqls-server/sqls")
(synopsis "SQL language server written in Go")
(description
"This package implements the @acronym{LSP, Language Server Protocol} for SQL.")

View file

@ -74,7 +74,7 @@ (define-module (gnu packages diffoscope)
(define-public diffoscope
(package
(name "diffoscope")
(version "258")
(version "260")
(source
(origin
(method git-fetch)
@ -83,7 +83,7 @@ (define-public diffoscope
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1wppshi18lyrgxxi8j06ij0qi31zdgqwjj6bycsyvipkc1cj6xhp"))))
(base32 "1yp32g2769mn91k6wx6fs7lhcfi1cdy54apkgfaf7ib6l0ji5hwv"))))
(build-system python-build-system)
(arguments
(list
@ -198,6 +198,7 @@ (define (bin command)
odt2txt
openssh
openssl
p7zip
pgpdump
poppler
python-jsbeautifier

View file

@ -1273,7 +1273,7 @@ (define-public openresolv
(define-public smartdns
(package
(name "smartdns")
(version "43")
(version "45")
(source (origin
(method git-fetch)
(uri (git-reference
@ -1285,7 +1285,7 @@ (define-public smartdns
((".*SYSTEMDSYSTEMUNITDIR.*") "")))
(sha256
(base32
"0s789l6i4yirmarg80mknc1pp65rz01ky9f7gidgclkfcwzz41l3"))))
"1f0j6d8vz1x2f4nr2w3q7azkjh8hlkj81v61a8sw1kq5160qhlb9"))))
(build-system gnu-build-system)
(arguments
(list #:test-target "test"
@ -1293,7 +1293,7 @@ (define-public smartdns
#~(list (string-append "CC=" #$(cc-for-target))
(string-append "DESTDIR=" #$output)
"PREFIX=''"
(string-append "VER=" #$version))
(string-append "VER=" #$(package-version this-package)))
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
@ -1321,7 +1321,7 @@ (define-public smartdns
(lambda _
(chdir "../../source"))))))
(inputs (list openssl))
(native-inputs (list googletest `(,isc-bind "utils")))
(native-inputs (list googletest `(,isc-bind "utils") which))
(home-page "https://github.com/pymumu/smartdns")
(synopsis "Local DNS server")
(description

View file

@ -30,7 +30,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages documentation)
#:use-module (guix licenses)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix gexp)
@ -104,7 +104,7 @@ (define-public latex2html
(description "LaTeX2HTML is a utility that converts LaTeX documents to web
pages in HTML.")
(home-page "https://www.latex2html.org/")
(license gpl2+)))
(license license:gpl2+)))
(define-public asciidoc
(package
@ -175,7 +175,7 @@ (define-public asciidoc
AsciiDoc is highly configurable: both the AsciiDoc source file syntax and
the backend output markups (which can be almost any type of SGML/XML
markup) can be customized and extended by the user.")
(license gpl2+)))
(license license:gpl2+)))
(define-deprecated asciidoc-py3 asciidoc)
@ -241,7 +241,34 @@ (define-public doxygen
programming languages such as C, Objective-C, C#, PHP, Java, Python,
IDL (Corba, Microsoft, and UNO/OpenOffice flavors), Fortran, VHDL, Tcl,
and to some extent D.")
(license gpl3+)))
(license license:gpl3+)))
(define-public halibut
(package
(name "halibut")
(version "1.3")
(source (origin
(method url-fetch)
(uri (string-append
"https://www.chiark.greenend.org.uk/~sgtatham/halibut/halibut-"
version "/halibut-" version ".tar.gz"))
(sha256
(base32
"0ciikn878vivs4ayvwvr63nnhpcg12m8023xv514zxqpdxlzg85a"))))
(build-system cmake-build-system)
(arguments
'(#:tests? #f)) ;No tests.
(native-inputs (list pkg-config perl))
(home-page "https://www.chiark.greenend.org.uk/~sgtatham/halibut/")
(synopsis "Documentation production system for software manuals")
(description
"Halibut is a text formatting system designed primarily for writing software
documentation. It accepts a single source format and outputs any combination of
plain text, HTML, Unix man or info pages, PostScript or PDF. It has extensive
support for indexing and cross-referencing, and generates hyperlinks within output
documents wherever possible. It supports Unicode, with the ability to fall back to
an alternative representation if Unicode output is not available.")
(license license:expat)))
(define-public doc++
(package
@ -266,7 +293,7 @@ (define-public doc++
generate both TeX output for high-quality hardcopies or HTML output for online
browsing. The documentation is extracted directly from the C/C++/IDL source
or Java class files.")
(license gpl2+)))
(license license:gpl2+)))
(define-public pod2pdf
(package
@ -292,7 +319,7 @@ (define-public pod2pdf
Documentation} format to PDF files. It also supports some extensions to the POD
format, and supports the file types JPG, GIF, TIFF, PNG, and PNM for embedded
objects.")
(license artistic2.0)))
(license license:artistic2.0)))
(define-public python-docrepr
(package
@ -344,7 +371,7 @@ (define-public python-docrepr
(description "Docrepr renders Python docstrings to HTML with Sphinx. It
can generate rich and plain representations of docstrings, alongside
additional metadata about the object to which the docstring belongs.")
(license bsd-3)))
(license license:bsd-3)))
(define-public scrollkeeper
(package
@ -377,7 +404,7 @@ (define-public scrollkeeper
provides a simple API to allow help browsers to find, sort, and search the
document catalog. It will also be able to communicate with catalog servers on
the Net to search for documents which are not on the local system.")
(license lgpl2.1+)))
(license license:lgpl2.1+)))
(define-public zeal
(let ((commit "1cfa7c637f745be9d98777f06b4f8dec90892bf2")
@ -425,4 +452,4 @@ (define-public zeal
(synopsis "Offline documentation browser inspired by Dash")
(description "Zeal is a simple offline documentation browser
inspired by Dash.")
(license gpl3+))))
(license license:gpl3+))))

View file

@ -566,7 +566,7 @@ (define-public openboard
(define-public fet
(package
(name "fet")
(version "6.15.0")
(version "6.18.1")
(source
(origin
(method url-fetch)
@ -575,7 +575,7 @@ (define-public fet
(list (string-append directory base)
(string-append directory "old/" base))))
(sha256
(base32 "0mmk9f0b23lmmk40mv25wf9vgb7wdgfn5zsa1qrkvkh7dh1hjpax"))))
(base32 "0yf94z4yybaw53jf0hzi1p53rwa91wl3g6pai7gsr4palssyfxw2"))))
(build-system gnu-build-system)
(arguments
(list

File diff suppressed because it is too large Load diff

View file

@ -6,7 +6,7 @@
;;; Copyright © 2015, 2018, 2023 David Thompson <dthompson2@worcester.edu>
;;; Copyright © 2016 Manolis Fragkiskos Ragkousis <manolis837@gmail.com>
;;; Copyright © 2016, 2017, 2018, 2020 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017-2023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2017-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2017, 2020, 2021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017, 2018, 2019 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz>
@ -410,7 +410,7 @@ (define-public dosbox-staging
;; This is not a patch staging area for DOSBox, but an unaffiliated fork.
(package
(name "dosbox-staging")
(version "0.80.1")
(version "0.81.0")
(source
(origin
(method git-fetch)
@ -419,7 +419,7 @@ (define-public dosbox-staging
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1iqqrw95lpgjbmi777jdl5z1nizxgfy8xwpmy1fasjlb2yh2kp93"))))
(base32 "1fkshxaq12pd72v8m2f3a6d6jk9gh39hn0846gfkfinvw7yykzrl"))))
(build-system meson-build-system)
(arguments
(list #:configure-flags
@ -736,7 +736,7 @@ (define-public mednafen
(define-public mgba
(package
(name "mgba")
(version "0.10.2")
(version "0.10.3")
(source
(origin
(method git-fetch)
@ -746,7 +746,7 @@ (define-public mgba
(file-name (git-file-name name version))
(sha256
(base32
"1wwpjcblp2c1svab4z1if5xb7707wsy6zw590lwdz9za35i0h37q"))
"1h4wsx76kylsn4f4418swbp6zjp1x94dfn751iks1i6i529pfay1"))
(modules '((guix build utils)))
(snippet
;; Make sure we don't use the bundled software.
@ -760,7 +760,8 @@ (define-public mgba
(arguments
`(#:tests? #f ;no "test" target
#:configure-flags
(list "-DUSE_LZMA=OFF" ;do not use bundled LZMA
(list "-DBUILD_LTO=OFF" ;FIXME: <https://github.com/mgba-emu/mgba/issues/3115>
"-DUSE_LZMA=OFF" ;do not use bundled LZMA
"-DUSE_LIBZIP=OFF"))) ;use "zlib" instead
(native-inputs (list pkg-config qttools-5))
(inputs
@ -1574,14 +1575,14 @@ (define-public wasm4
(define-public scummvm
(package
(name "scummvm")
(version "2.7.0")
(version "2.8.1")
(source
(origin
(method url-fetch)
(uri (string-append "https://downloads.scummvm.org/frs/scummvm/" version
"/scummvm-" version ".tar.xz"))
(sha256
(base32 "14wrrzai25mh8qra3lsfibx8z6f96cqbnmsfh9kyhkvpc7yiyjs4"))))
(base32 "1dr70z1dkfw2gp43jq0qp7g73glr36a7qdcv1jvp1m927nhz95vy"))))
(build-system gnu-build-system)
(arguments
(list

View file

@ -43,31 +43,23 @@ (define-module (gnu packages enchant)
(define-public nuspell
(package
(name "nuspell")
(version "3.1.2")
(version "5.1.4")
(source
(origin
(method git-fetch)
(uri
(git-reference
(url "https://github.com/nuspell/nuspell")
(commit
(string-append "v" version))))
(file-name
(git-file-name name version))
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0wbb6dwmzlsyy224y0liis0azgzwbjdvcyzc31pw1aw6vbp36na6"))))
(base32 "05j1hmczy6v9dyxp77vxhgyl7y5hff3v45vlp86gyh7m9lgqpmra"))))
(build-system cmake-build-system)
(native-inputs
(list catch2
git-minimal
perl
;;FIX-ME: Building with ronn fails.
;;("ronn" ,ronn)
pkg-config))
(inputs
(list boost))
(propagated-inputs
(list icu4c))
(native-inputs (list catch2-3 pkg-config))
(propagated-inputs (list icu4c))
(native-search-paths (list (search-path-specification
(variable "DICPATH")
(files '("share/hunspell")))))
(synopsis "Fast and safe spellchecking C++ library")
(description "Nuspell is a fast and safe spelling checker software
program. It is designed for languages with rich morphology and complex word

View file

@ -4302,7 +4302,7 @@ (define-public candle
(define-public rizin
(package
(name "rizin")
(version "0.6.2")
(version "0.7.2")
(source (origin
(method url-fetch)
(uri (string-append
@ -4310,7 +4310,7 @@ (define-public rizin
version "/rizin-src-v" version ".tar.xz"))
(sha256
(base32
"0szq3wr7i7gwm8llgbhssjb63q70rjqqdlj6078vs110waih16p2"))))
"0ajqng66b01phs0hjygg9phyc8p3fs0a1isbc0zmxdz2bas3zzzw"))))
(build-system meson-build-system)
(arguments
(list
@ -4322,11 +4322,13 @@ (define-public rizin
"-Duse_sys_libzip=enabled"
"-Duse_sys_zlib=enabled"
"-Duse_sys_lz4=enabled"
"-Duse_sys_libzstd=enabled"
"-Duse_sys_xxhash=enabled"
"-Duse_sys_openssl=enabled"
"-Duse_sys_tree_sitter=enabled"
"-Duse_sys_lzma=enabled"
"-Duse_sys_libmspack=enabled"
"-Duse_sys_pcre2=enabled"
"-Duse_zlib=true"
"-Duse_lzma=true"
"-Dinstall_sigdb=false"
@ -4342,8 +4344,7 @@ (define-public rizin
(("subdir\\('integration'\\)") ""))
;;; Skip failing tests.
(substitute* "test/unit/meson.build"
(("'bin_mach0',\n") "")
(("'hash',\n") "")))))))
(("'bin_mach0',\n") "")))))))
(native-inputs (list pkg-config))
(inputs
(list capstone
@ -4352,9 +4353,11 @@ (define-public rizin
libzip
lz4
openssl
pcre2
tree-sitter
xxhash
zlib
(list zstd "lib")
libmspack))
(home-page "https://rizin.re")
(synopsis "Disassemble, debug, analyze, and manipulate binary files")

View file

@ -31,12 +31,14 @@
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2022 Philip McGrath <philip@philipmcgrath.com>
;;; Copyright © 2022 Collin J. Doering <collin@rekahsoft.ca>
;;; Copyright © 2023 dan <i@dan.games>
;;; Copyright © 2022 Justin Veilleux <terramorpha@cock.li>
;;; Copyright © 2023 Frank Pursel <frank.pursel@gmail.com>
;;; Copyright © 2023 Skylar Hill <stellarskylark@posteo.net>
;;; Copyright © 2023 Foundation Devices, Inc. <hello@foundationdevices.com>
;;; Copyright © 2023 Attila Lendvai <attila@lendvai.name>
;;; Copyright © 2024 Saku Laesvuori <saku@laesvuori.fi>
;;; Copyright © 2024 Sharlatan Hellseher <sharlatanus@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -608,7 +610,7 @@ (define-public electrum
(define-public electron-cash
(package
(name "electron-cash")
(version "4.3.1")
(version "4.4.0")
(source
(origin
(method git-fetch)
@ -617,7 +619,7 @@ (define-public electron-cash
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0slx7hmlw2gpcqg951vwvnyl7j52pfzqyaldphghhfxbfzjs7v64"))))
(base32 "1hfkp24m1yipadanjf5wm6clmyllkcbh7fbw8whnrvxa2v7sa4l8"))))
(build-system python-build-system)
(arguments
(list
@ -684,7 +686,7 @@ (define-public monero
;; the system's dynamically linked library.
(package
(name "monero")
(version "0.18.3.1")
(version "0.18.3.2")
(source
(origin
(method git-fetch)
@ -702,7 +704,7 @@ (define-public monero
delete-file-recursively
'("external/miniupnp" "external/rapidjson"))))
(sha256
(base32 "1k6mrgsvmqsfk95w8kjmp9v2fghjmmpj40667zndrw9jx1h85mwx"))))
(base32 "0ri3ss5vgsjk5pzmaaw8yi7sg4lasx58d8kz3m6z5vg7p69gdzxv"))))
(build-system cmake-build-system)
(native-inputs
(list doxygen
@ -789,7 +791,7 @@ (define-public monero
(define-public monero-gui
(package
(name "monero-gui")
(version "0.18.3.1")
(version "0.18.3.2")
(source
(origin
(method git-fetch)
@ -805,7 +807,7 @@ (define-public monero-gui
;; See the 'extract-monero-sources' phase.
(delete-file-recursively "monero")))
(sha256
(base32 "1fjx8gdzc1pmfsi14r09gfmkglvh560pnxk70p0k82a4gbs1vyz2"))))
(base32 "0jic43b7jzc1i7x2mqqpbbb2992687nm12kk642yr10dm4maklzb"))))
(build-system qt-build-system)
(native-inputs
`(,@(package-native-inputs monero)
@ -1750,7 +1752,7 @@ (define-public libofx
(define-public bitcoin-unlimited
(package
(name "bitcoin-unlimited")
(version "2.0.0.0")
(version "2.0.0.1")
(source
(origin
(method git-fetch)
@ -1759,7 +1761,7 @@ (define-public bitcoin-unlimited
(commit (string-append "BCHunlimited" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0s4iyjfhjx21xa3z7433m4skfr115565k0ckza87ha2d4nl8kz5h"))))
(base32 "1kkmg0gp86qz3ya8y5a00yic1mals138b9fv2cjlm7683sfjjljx"))))
(build-system gnu-build-system)
(native-inputs
(list autoconf
@ -1969,35 +1971,54 @@ (define-public beancount
(version "2.3.6")
(source
(origin
(method url-fetch)
(uri (pypi-uri "beancount" version))
(method git-fetch) ; no test data files in PyPI archive
(uri (git-reference
(url "https://github.com/beancount/beancount")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0nj7sdh7wxc0hv8wxwqhw9v1zgx1sn4w92368ci2wzdmssz967w0"))
(patches (search-patches "beancount-disable-googleapis-fonts.patch"))))
(build-system python-build-system)
(base32 "1slxsjw29cyr2kbirdpijhpqspk55k38rpmk3zc02pr1wll62qsv"))
(patches (search-patches "beancount-disable-googleapis-fonts.patch"))
(modules '((guix build utils)))
(snippet
#~(begin
;; Remove broken experiments.
(delete-file-recursively "experiments")
;; Remove bundled packages.
(delete-file-recursively "third_party")))))
(build-system pyproject-build-system)
(arguments
`(#:tests? #f ; Says test is missing, not sure why
#:phases
(modify-phases %standard-phases
;; Not importing the googleapis package for now
(add-after 'unpack 'ignore-googleapis
(lambda _
(substitute* "setup.py"
(("'google-api-python-client',") ""))
#t))
;; No module named 'google_auth_oauthlib'
(delete 'sanity-check))))
(inputs
(list
#:test-flags
#~(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
(lambda _
(substitute* "setup.py"
;; Use compatible fork, and do not fail during sanity check.
(("\"pdfminer2\",") ""))))
(add-before 'check 'build-extensions
(lambda _
(invoke "python" "setup.py" "build_ext" "--inplace"))))))
(propagated-inputs
(list python-beautifulsoup4
python-bottle
python-chardet
python-dateutil
python-google-api-client
python-google-auth-oauthlib
python-lxml
python-magic
python-oauth2client
python-ply
python-requests))
(native-inputs
(list python-pytest))
(list gnupg python-pdfminer-six python-pytest))
(home-page "https://beancount.github.io/")
(synopsis "Command-line double-entry accounting tool")
(description
@ -2006,6 +2027,55 @@ (define-public beancount
generate a variety of reports from them, and provides a web interface.")
(license license:gpl2)))
(define-public fava
(package
(name "fava")
;; XXX: A newer version requires Flask > 2.2, which is not available in
;; Guix yet.
(version "1.24.4")
(source
(origin
(method url-fetch)
(uri (pypi-uri "fava" version))
(sha256
(base32 "1iwha9vx223iiyjqbixpz1lp8q766ikhi7xcap3pscjhldxlym4j"))))
(build-system pyproject-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'relax-requirements
(lambda _
(substitute* "setup.cfg"
((">=8,<10") ">8"))))
;; Tests write to $HOME.
;; FileNotFoundError: [Errno 2] No such file or directory
(add-before 'check 'set-home
(lambda _
(setenv "HOME" "/tmp"))))))
(propagated-inputs
(list beancount
python-babel
python-cheroot
python-click
python-flask
python-flask-babel
python-jinja2
python-markdown2
python-ply
python-simplejson
python-werkzeug))
(native-inputs
(list python-pytest
python-chardet
python-dateutil
python-setuptools-scm))
(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
software Beancount with a focus on features and usability.")
(license license:expat)))
(define-public emacs-beancount
;; Note that upstream has not made any release since this project moved
;; into its own repository (it was originally part of beancount itself)
@ -2359,11 +2429,11 @@ (define-public p2pool
(define-public opentaxsolver
;; The OTS version is formatted like tax-year_version. So, at time of
;; writing, the version is 2022_20.00. Each part of this is used in
;; writing, the version is 2023_21.03. Each part of this is used in
;; different places in the source uri, so it's convenient to have them
;; separately like this.
(let ((tax-year "2022")
(ots-version "20.00"))
(let ((tax-year "2023")
(ots-version "21.03"))
(package
(name "opentaxsolver")
(version (string-append tax-year "_" ots-version))
@ -2375,7 +2445,7 @@ (define-public opentaxsolver
"_linux/OpenTaxSolver" version "_linux64.tgz"))
(sha256
(base32
"06k0a72bmwdmr71dvrp8b4vl8vilnggsh92hrp7wjdgcjj9m074w"))
"1i543bvclnyiwnyjlskhr2bxlsigggvwdhg2519rf12lsghgfszq"))
(patches (search-patches "opentaxsolver-file-browser-fix.patch"))))
(build-system glib-or-gtk-build-system)
(arguments

View file

@ -1081,7 +1081,7 @@ (define-public font-gnu-unifont
(define-public font-google-noto
(package
(name "font-google-noto")
(version "23.11.1")
(version "24.2.1")
(source
(origin
(method git-fetch)
@ -1090,8 +1090,53 @@ (define-public font-google-noto
(commit (string-append "noto-monthly-release-" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0vvxhky35l4i0ha60yw0gj26f3v33hpf2zax17yyj16mww4cn4d8"))))
(base32 "087jg8ahpq35xwyrmvm9ivxl0wjic2j4r28bbrwqmgdva9brms40"))))
(build-system font-build-system)
(arguments
(list
#:modules
'((guix build font-build-system)
(guix build utils)
(ice-9 ftw))
#:phases
#~(modify-phases %standard-phases
(replace 'install
(lambda _
(define* (install source #:optional (output #$output))
(let ((%install (assoc-ref %standard-phases 'install)))
(with-directory-excursion source
(%install #:outputs `(("out" . ,output))))))
(define (scan-directory name)
(scandir name (lambda (file)
(not (member file '("." ".." "LICENSE"))))))
(define (install-font-variant variant)
"Given font variant VARIANT, install one of its formats,
variable TTF or OTF or TTF."
(with-directory-excursion variant
(let ((formats (scan-directory ".")))
(cond
((member "variable-ttf" formats)
(install "variable-ttf"))
((member "otf" formats)
(install "otf"))
((member "ttf" formats)
(install "ttf"))))))
(define (install-font font)
"Given FONT, install one of its variants, either full or
unhinted, and install its hinted variant into 'ttf' output. According to the
source, unhinted and hinted variants are always available."
(with-directory-excursion font
(if (member "full" (scan-directory "."))
(install-font-variant "full")
(install-font-variant "unhinted"))
(install "hinted" #$output:ttf)))
(with-directory-excursion "fonts"
(for-each install-font (scan-directory "."))))))))
(outputs '("out" "ttf"))
(home-page "https://www.google.com/get/noto/")
(synopsis "Fonts to cover all languages")
(description "Google Noto Fonts is a family of fonts designed to support
@ -1102,7 +1147,7 @@ (define-public font-google-noto
(define-public font-google-noto-emoji
(package
(name "font-google-noto-emoji")
(version "2.038")
(version "2.042")
(source
(origin
(method git-fetch)
@ -1112,7 +1157,7 @@ (define-public font-google-noto-emoji
(file-name (git-file-name name version))
(sha256
(base32
"1rgmcc6nqq805iqr8kvxxlk5cf50q714xaxk3ld6rjrd69kb8ix9"))))
"17i7awyqz9jv0j2blcf0smmpas375c3pdhjv1zqzl861g8qm1lm2"))))
(build-system font-build-system)
(arguments
(list
@ -1122,11 +1167,10 @@ (define-public font-google-noto-emoji
(lambda _
;; Note this ensures the correct license file is installed.
(chdir "fonts")))
(add-after 'enter-font-directory 'remove-unsupported
(lambda* _
(delete-file "NotoColorEmoji_WindowsCompatible.ttf")
(delete-file "Noto-COLRv1-noflags.ttf")
(delete-file "Noto-COLRv1.ttf"))))))
(replace 'install
(lambda _
(let ((dir (string-append #$output "/share/fonts/truetype")))
(install-file "NotoColorEmoji.ttf" dir)))))))
(home-page "https://fonts.google.com/noto/specimen/Noto+Color+Emoji")
(synopsis "Font for rendering color emoji characters")
(description
@ -1143,11 +1187,23 @@ (define-public font-google-noto-sans-cjk
(method url-fetch)
(uri (string-append
"https://github.com/googlefonts/noto-cjk/releases/download/Sans"
version "/03_NotoSansCJK-OTC.zip"))
version "/01_NotoSansCJK-OTF-VF.zip"))
(file-name (string-append name "-" version ".zip"))
(sha256
(base32 "1v9yda7r98g4a3pk0y3cjbgc1i2lv4ax0f0v6aqasfzz4ldlx3sj"))))
(base32 "1ka37kqyd0sfqwk485nv6ihrdjl5xycr38m4jq40r2lzmpmkmqym"))))
(build-system font-build-system)
(arguments
(list #:phases
#~(modify-phases %standard-phases
(replace 'install
(lambda _
(chdir "..") ;For license.
(let ((install (assoc-ref %standard-phases 'install)))
(with-directory-excursion "Variable/OTC"
(install #:outputs `(("out" . ,#$output))))
(with-directory-excursion "Variable/OTF"
(install #:outputs `(("out" . ,#$output:otf))))))))))
(outputs '("out" "otf"))
(home-page "https://www.google.com/get/noto/")
(synopsis "Fonts to cover all languages")
(description "Google Noto Fonts is a family of fonts designed to support
@ -1159,17 +1215,29 @@ (define-public font-google-noto-sans-cjk
(define-public font-google-noto-serif-cjk
(package
(name "font-google-noto-serif-cjk")
(version "2.001")
(version "2.002")
(source
(origin
(method url-fetch)
(uri (string-append
"https://github.com/googlefonts/noto-cjk/releases/download/Serif"
version "/04_NotoSerifCJKOTC.zip"))
version "/02_NotoSerifCJK-OTF-VF.zip"))
(file-name (string-append name "-" version ".zip"))
(sha256
(base32 "1l6r3sz2s0vcyfx6ria7wqcq45zp40gxgg97lh8hpmajhzw301ig"))))
(base32 "007jk7rmfapq5zq4ji9d1l5gpp34p98l9ylhiw33q42d66v2g717"))))
(build-system font-build-system)
(arguments
(list #:phases
#~(modify-phases %standard-phases
(replace 'install
(lambda _
(chdir "..") ;For license.
(let ((install (assoc-ref %standard-phases 'install)))
(with-directory-excursion "Variable/OTC"
(install #:outputs `(("out" . ,#$output))))
(with-directory-excursion "Variable/OTF"
(install #:outputs `(("out" . ,#$output:otf))))))))))
(outputs '("out" "otf"))
(home-page "https://www.google.com/get/noto/")
(synopsis "Fonts to cover all languages")
(description "Google Noto Fonts is a family of fonts designed to support

View file

@ -11,7 +11,7 @@
;;; Copyright © 2018, 2019, 2020, 2021, 2023 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2019, 2020, 2022 Marius Bakke <marius@gnu.org>
;;; Copyright © 2020 Roel Janssen <roel@gnu.org>
;;; Copyright © 2020, 2021 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2020, 2021, 2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2021, 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2021 Sarah Morgensen <iskarian@mgsn.dev>
;;; Copyright © 2022 Felipe Balbi <balbi@kernel.org>
@ -2049,7 +2049,7 @@ (define-public fntsample
(define-public libraqm
(package
(name "libraqm")
(version "0.8.0")
(version "0.10.1")
(source
(origin
(method git-fetch)
@ -2058,7 +2058,7 @@ (define-public libraqm
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0qrdw67n14n0km2f8l0gk8scgj3ybz662s9x8jwj3rrj33nl2d1a"))))
(base32 "1bzdrvacgj9629r4mgmag9sm5ay5914fbs8pnxf8xphvrbnbxm8z"))))
(build-system meson-build-system)
(native-inputs
(list gtk-doc/stable pkg-config python-wrapper))

View file

@ -33,6 +33,7 @@
;;; Copyright © 2022 Petr Hodina <phodina@protonmail.com>
;;; Copyright © 2022 muradm <mail@muradm.net>
;;; Copyright © 2023 Alex Devaure <ajadevaure@gmail.com>
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -1463,7 +1464,10 @@ (define-public wtype
(base32 "0bpix92vzip9vlhzihj3k8h9flrlna231x3y8ah7p4965l177yjd"))))
(build-system meson-build-system)
(native-inputs
(list pkg-config wayland libxkbcommon))
(list pkg-config
;; for wayland-scanner
wayland))
(inputs (list wayland libxkbcommon))
(synopsis "Xdotool type for Wayland")
(description "Wtype lets you simulate keyboard input and mouse activity,
move and resize windows, etc.")
@ -1474,7 +1478,7 @@ (define-public wtype
(define-public exempi
(package
(name "exempi")
(version "2.5.2")
(version "2.6.5")
(source (origin
(method url-fetch)
(uri (string-append
@ -1482,7 +1486,7 @@ (define-public exempi
name "-" version ".tar.bz2"))
(sha256
(base32
"1mdfxb36p8251n5m7l55gx3fcqpk46yz9v568xfr8igxmqa47xaj"))))
"1zhzwkfna14sy78llhfc94cy5hv3076j5v3p1zmvawzz5gaa7yg9"))))
(build-system gnu-build-system)
(arguments
`(#:configure-flags (list (string-append "--with-boost="
@ -1496,8 +1500,7 @@ (define-public exempi
;; <https://gitlab.freedesktop.org/libopenraw/exempi/-/issues/17>.
;; Simply delete the static library instead to save ~4.3 MiB.
(delete-file (string-append (assoc-ref outputs "out")
"/lib/libexempi.a"))
#t)))))
"/lib/libexempi.a")))))))
(native-inputs
(list boost)) ; tests
(inputs
@ -2427,14 +2430,14 @@ (define-public perl-file-mimeinfo
(define-public uchardet
(package
(name "uchardet")
(version "0.0.7")
(version "0.0.8")
(source
(origin
(method url-fetch)
(uri (string-append "https://www.freedesktop.org/software/"
name "/releases/" name "-" version ".tar.xz"))
(sha256
(base32 "1ca51sryhryqz82v4d0graaiqqq5w2f33a9gj83b910xmq499irz"))))
(base32 "1w659aiphbnczpry771diakrzg9a8aqpn2abcxx1870aq37n0yp9"))))
(build-system cmake-build-system)
(home-page "https://www.freedesktop.org/wiki/Software/uchardet/")
(synopsis "Encoding detector library")
@ -2757,7 +2760,7 @@ (define-public flatpak-xdg-utils
(define-public libportal
(package
(name "libportal")
(version "0.6")
(version "0.7.1")
(source (origin
(method git-fetch)
(uri (git-reference
@ -2766,7 +2769,7 @@ (define-public libportal
(file-name (git-file-name name version))
(sha256
(base32
"1q1kqq72cs7f5b17gzw7218mxs65hijzkll27mh51s02fpiw8c60"))))
"0ypl9ds5g5jzyirjg4ic0r7lzv39w67yrh8njz1cw566g4j1kfny"))))
(build-system meson-build-system)
(arguments
(list
@ -2965,7 +2968,7 @@ (define-public xdg-desktop-portal-kde
(define-public xdg-desktop-portal-wlr
(package
(name "xdg-desktop-portal-wlr")
(version "0.7.0")
(version "0.7.1")
(source (origin
(method git-fetch)
(uri (git-reference
@ -2974,7 +2977,7 @@ (define-public xdg-desktop-portal-wlr
(file-name (git-file-name name version))
(sha256
(base32
"1b3hpp3ybjgnnmnwsyb5bsnvz9q5nr3zz0j1alh02g24f68lf00k"))
"1mbq3czka9swwmfaasnaj89y2m254p3qa522ayclh688jdwh70hq"))
(patches (search-patches "xdg-desktop-portal-wlr-harcoded-length.patch"))))
(build-system meson-build-system)
(arguments

View file

@ -28,14 +28,14 @@ (define-module (gnu packages freeipmi)
(define-public freeipmi
(package
(name "freeipmi")
(version "1.6.11")
(version "1.6.14")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnu/freeipmi/freeipmi-"
version ".tar.gz"))
(sha256
(base32
"15x861i8r1gk44924d2pszlb8mapgkr18m3991vla4601y8xdyv5"))))
"1dgd2izbp6mqk7l0bgw9fkpvl4mjz672p8baz3ac9k5pfrfaqg8s"))))
(build-system gnu-build-system)
(arguments
`(#:configure-flags '("--disable-static"

View file

@ -938,6 +938,41 @@ (define-public rogue
(home-page "https://github.com/Davidslv/rogue")
(license license:bsd-3)))
(define-public sgt-puzzles
(let ((commit "80aac3104096aee4057b675c53ece8e60793aa90")
(revision "0"))
(package
(name "sgt-puzzles")
(version (git-version "20240302" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://git.tartarus.org/simon/puzzles.git")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0z4clv0xi98q28riz323ppn165cm62gj1c6h3xdd2sym4v8gy65z"))))
(build-system cmake-build-system)
(arguments
(list
#:tests? #f ;No tests.
#:configure-flags #~(list "-DNAME_PREFIX=sgt-")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'set-xdg-open-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "gtk.c"
(("(#define HELP_BROWSER_PATH).+" all define)
(format #f "~a ~s~%" define
(search-input-file inputs "/bin/xdg-open")))))))))
(inputs (list gtk+ xdg-utils))
(native-inputs (list pkg-config perl imagemagick halibut))
(home-page "https://www.chiark.greenend.org.uk/~sgtatham/puzzles/")
(synopsis "Simon Tatham's portable puzzle collection")
(description "Simon Tatham's Portable Puzzle Collection contains a number of
popular puzzle games for one player.")
(license license:expat))))
(define-public bzflag
(package
@ -2130,14 +2165,14 @@ (define-public gnushogi
(define-public ltris
(package
(name "ltris")
(version "1.2.6")
(version "1.3")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/lgames/ltris/"
"ltris-" version ".tar.gz"))
(sha256
(base32 "1xj65kn815x2hq1ynzjyc90dj178xwa2xvx7jx99qf60ahaf4g62"))))
(base32 "144zvnnky79z5ychyyb2wsp7h2pcbl50fbzd9w9dvxkw6adz4yip"))))
(build-system gnu-build-system)
(arguments
'(#:phases
@ -4676,7 +4711,7 @@ (define-public gamine
(define-public manaplus
(package
(name "manaplus")
(version "1.9.3.23")
(version "2.1.3.17")
(source (origin
(method url-fetch)
(uri (string-append
@ -4684,18 +4719,15 @@ (define-public manaplus
version "/manaplus-" version ".tar.xz"))
(sha256
(base32
"1ky182p4svwdqm6cf7jbns85hidkhkhq4s17cs2p381f0klapfjz"))))
"0ggswsa3xq7lss3j4k7fyzn56sw7hlrwk744i3d9w0n4932nmlg8"))))
(build-system gnu-build-system)
(arguments
'(#:configure-flags
(list (string-append "CPPFLAGS=-I"
(assoc-ref %build-inputs "sdl-union")
"/include/SDL"))))
(list #:configure-flags #~'("--with-sdl2")))
(native-inputs
(list pkg-config))
(inputs
(list glu curl libxml2 mesa
(sdl-union)))
sdl2 sdl2-image sdl2-mixer sdl2-net sdl2-ttf))
(home-page "https://manaplus.org")
(synopsis "Client for 'The Mana World' and similar games")
(description
@ -7426,7 +7458,7 @@ (define-public 0ad
(define-public open-adventure
(package
(name "open-adventure")
(version "1.16")
(version "1.18")
(source
(origin
(method git-fetch)
@ -7435,7 +7467,7 @@ (define-public open-adventure
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0spciwqcyldalzdd813zwigbldcnyaxi7kfslq1yp0fg4c4a10aa"))))
(base32 "1zl72lsp443aryzmwzh5w4j439jgf5njvh9xig6vjvmzhfcjkk9q"))))
(build-system gnu-build-system)
(arguments
(list
@ -7464,10 +7496,13 @@ (define-public open-adventure
(install-file "advent.6" man)))))))
(native-inputs
(list asciidoc
cppcheck
libedit
pkg-config
python-pylint
python-pyyaml
python-wrapper))
python-wrapper
ruby-asciidoctor))
(home-page "https://gitlab.com/esr/open-adventure")
(synopsis "Colossal Cave Adventure")
(description
@ -8452,7 +8487,7 @@ (define-public frotz
(define-public naev
(package
(name "naev")
(version "0.10.4")
(version "0.11.4")
(source
(origin
(method git-fetch)
@ -8462,7 +8497,7 @@ (define-public naev
(recursive? #t))) ; for game data
(file-name (git-file-name name version))
(sha256
(base32 "0lg8cmzdzzpmqgmh9a1v190vv4d15hwa0inyzdwsq5x8lyc13hyr"))))
(base32 "1gd7jgb996fgnlrlqkfyx416g1kd458vik3nviazwwj83ksafaqb"))))
(build-system meson-build-system)
(arguments
;; XXX: Do not add debugging symbols, which cause the build to fail.
@ -11379,7 +11414,7 @@ (define-public fheroes2
(define-public vcmi
(package
(name "vcmi")
(version "1.4.2")
(version "1.4.5")
(source (origin
(method git-fetch)
(uri (git-reference
@ -11388,7 +11423,7 @@ (define-public vcmi
(file-name (git-file-name name version))
(sha256
(base32
"039d9dvb2i4y1fj6q5py34r17fwb5jqxkjcg7j57asjk4w9b7i8b"))
"1z4vy3drj6dra8rb243pyryr61jnlw3l7yxsxwl9rddv8cdk69lz"))
(patches (search-patches "vcmi-disable-privacy-breach.patch"))))
(build-system cmake-build-system)
(arguments

View file

@ -283,6 +283,49 @@ (define-public gegl
;; application and GUI binary gegl is licensed under GPL.
(license (list license:lgpl3+ license:gpl3+))))
;; gnome-photos does not build against gegl 0.4.46 or newer yet.
;; See also <https://gitlab.gnome.org/GNOME/gnome-photos/-/issues/214>.
(define-public babl-0.1.96
(package
(inherit babl)
(version "0.1.96")
(source
(origin
(method url-fetch)
(uri (list (string-append "https://download.gimp.org/pub/babl/"
(version-major+minor version)
"/babl-" version ".tar.xz")
(string-append "https://ftp.gtk.org/pub/babl/"
(version-major+minor version)
"/babl-" version ".tar.xz")
(string-append "ftp://ftp.gtk.org/pub/babl/"
(version-major+minor version)
"/babl-" version ".tar.xz")))
(sha256
(base32 "1xj5hlmm834lb84rpjlfxbqnm5piswgzhjas4h8z90x9b7j3yrrk"))))))
(define-public gegl-0.4.44
(package
(inherit gegl)
(version "0.4.44")
(source
(origin
(method url-fetch)
(uri (list (string-append "https://download.gimp.org/pub/gegl/"
(string-take version 3)
"/gegl-" version ".tar.xz")
(string-append "https://ftp.gtk.org/pub/gegl/"
(version-major+minor version)
"/gegl-" version ".tar.xz")
(string-append "ftp://ftp.gtk.org/pub/gegl/"
(version-major+minor version)
"/gegl-" version ".tar.xz")))
(sha256
(base32 "09k1sn4h0bakgmq2hgd1iamprngpr81ky3fd9446lh2ycd0xnk0a"))))
(propagated-inputs
(modify-inputs (package-propagated-inputs gegl)
(replace "babl" babl-0.1.96)))))
(define-public gimp
(package
(name "gimp")

View file

@ -857,7 +857,7 @@ (define-public gnome-photos
(inputs
(list babl
cairo
gegl
gegl-0.4.44
geocode-glib
gexiv2
gfbgraph

View file

@ -13,7 +13,7 @@
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be>
;;; Copyright © 2023 Adam Faiz <adam.faiz@disroot.org>
;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2023, 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -32,6 +32,7 @@
(define-module (gnu packages gnunet)
#:use-module (gnu packages)
#:use-module (gnu packages apparmor)
#:use-module (gnu packages base)
#:use-module (gnu packages file)
#:use-module (gnu packages aidc)
@ -65,6 +66,7 @@ (define-module (gnu packages gnunet)
#:use-module (gnu packages python)
#:use-module (gnu packages sphinx)
#:use-module (gnu packages sqlite)
#:use-module (gnu packages texinfo)
#:use-module (gnu packages text-editors)
#:use-module (gnu packages tls)
#:use-module (gnu packages upnp)
@ -83,86 +85,80 @@ (define-module (gnu packages gnunet)
(define-public libextractor
(package
(name "libextractor")
(version "1.11")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnu/libextractor/libextractor-"
version ".tar.gz"))
(sha256
(base32
"13xxv11mif3m0mpk7i43mljhhaqrj52kznm1qi3qb8s6hymk7xhn"))))
(build-system gnu-build-system)
;; WARNING: Checks require /dev/shm to be in the build chroot, especially
;; not to be a symbolic link to /run/shm.
;; FIXME:
;; The following dependencies are all optional, but should be
;; available for maximum coverage:
;; * librpm (rpm) ; investigate failure
;; * libtidy-html (tidy-html) ; investigate failure
(inputs
`(("exiv2" ,exiv2)
("bzip2" ,bzip2)
("flac" ,flac)
("ffmpeg" ,ffmpeg-4)
("file" ,file) ;libmagic, for the MIME plug-in
("glib" ,glib)
("giflib" ,giflib)
("gstreamer" ,gstreamer)
("gst-plugins-base" ,gst-plugins-base)
("gtk+" ,gtk+)
("libarchive" ,libarchive)
("libgsf" ,libgsf)
("libjpeg" ,libjpeg-turbo)
("libltdl" ,libltdl)
("libmpeg2" ,libmpeg2)
("libmp4v2" ,libmp4v2)
("libsmf" ,libsmf)
("libogg" ,libogg)
("libtiff" ,libtiff)
("libvorbis" ,libvorbis)
("zlib" ,zlib)))
(native-inputs
(list pkg-config))
(outputs '("out"
"static")) ; 420 KiB .a files
(arguments
`(#:configure-flags
(list (string-append "--with-ltdl="
(assoc-ref %build-inputs "libltdl")))
#:parallel-tests? #f
#:phases
(modify-phases %standard-phases
(add-after 'configure 'fix-exiv2-tests
;; exiv2>=0.27.3 rounds geolocation
;; https://github.com/Exiv2/exiv2/pull/1107/commits/db1be4ae8e1077949fcb6a960e93069d6a41b395#diff-f3f55183ccbe956c720c86e61f708d9f
(lambda _
(substitute* "src/plugins/test_exiv2.c"
(("17.585\\\\\" ") "18\\\"")
(("21.713\\\\\" ") "22\\\""))
#t))
(add-after 'install 'move-static-libraries
(lambda* (#:key outputs #:allow-other-keys)
;; Move static libraries to the "static" output.
(let* ((out (assoc-ref outputs "out"))
(lib (string-append out "/lib"))
(static (assoc-ref outputs "static"))
(slib (string-append static "/lib")))
(mkdir-p slib)
(for-each (lambda (file)
(install-file file slib)
(delete-file file))
(find-files lib "\\.a$"))
#t))))))
(synopsis "Library to extract meta-data from media files")
(description
"GNU libextractor is a library for extracting metadata from files. It
(name "libextractor")
(version "1.13")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnu/libextractor/libextractor-"
version ".tar.gz"))
(sha256
(base32
"0mgprmwdhdwq9xhfxfhcncd304425nvcc4zi8ci5f0nja4n333xv"))
(patches
(search-patches "libextractor-tidy-support.patch"))))
(build-system gnu-build-system)
(outputs '("out"
"static")) ; 420 KiB .a files
(arguments
(list #:configure-flags
#~(list (string-append "--with-ltdl="
#$(this-package-input "libltdl")))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'force-reconfigure
(lambda _
(delete-file "configure")))
(add-after 'install 'move-static-libraries
(lambda* (#:key outputs #:allow-other-keys)
;; Move static libraries to the "static" output.
(let* ((out #$output)
(lib (string-append out "/lib"))
(slib (string-append #$output:static "/lib")))
(mkdir-p slib)
(for-each (lambda (file)
(install-file file slib)
(delete-file file))
(find-files lib "\\.a$"))))))))
(native-inputs
(list autoconf-2.71
automake
gettext-minimal
libtool
pkg-config
texinfo))
(inputs
(list bzip2
exiv2
file ;libmagic, for the MIME plug-in
flac
gdk-pixbuf
giflib
glib
gst-plugins-base
gstreamer
libapparmor
libarchive
libgsf
libjpeg-turbo
libltdl
libmp4v2
libmpeg2
libogg
libsmf
libtiff
libvorbis
rpm
tidy-html
zlib))
(synopsis "Library to extract meta-data from media files")
(description
"GNU libextractor is a library for extracting metadata from files. It
supports a very large number of file formats, including audio files, document
files, and archive files. Each file format is implemented as a plugin, so
new formats can be added easily. The package also contains a command-line
tool to extract metadata from a file and print the results.")
(license license:gpl3+)
(home-page "https://www.gnu.org/software/libextractor/")))
(license license:gpl3+)
(home-page "https://www.gnu.org/software/libextractor/")))
(define-public libmicrohttpd
(package

View file

@ -3,7 +3,7 @@
;;; Copyright © 2013-2022 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014-2024 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
;;; Copyright © 2016, 2017, 2018, 2019, 2021 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2016-2019, 2021, 2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2016 Alex Griffin <a@ajgrf.com>
;;; Copyright © 2017, 2023 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2017, 2018 Nikita <nikita@n0.is>
@ -522,9 +522,9 @@ (define all-mozilla-locales
;; XXXX: Workaround 'snippet' limitations.
(define computed-origin-method (@@ (guix packages) computed-origin-method))
(define %icecat-base-version "115.8.0")
(define %icecat-base-version "115.9.1")
(define %icecat-version (string-append %icecat-base-version "-guix0-preview1"))
(define %icecat-build-id "20240220000000") ;must be of the form YYYYMMDDhhmmss
(define %icecat-build-id "20240323000000") ;must be of the form YYYYMMDDhhmmss
;; 'icecat-source' is a "computed" origin that generates an IceCat tarball
;; from the corresponding upstream Firefox ESR tarball, using the 'makeicecat'
@ -544,12 +544,12 @@ (define icecat-source
"firefox-" upstream-firefox-version ".source.tar.xz"))
(sha256
(base32
"1slmp2v1q3my81z8kiym9rpxw5d9n4sn07v7hv99517w7vr8d05g"))))
"0agr8s42lpbq5gixsgj5kpcvimbnyx6msr4il4rvmf7gpw47hr93"))))
;; The upstream-icecat-base-version may be older than the
;; %icecat-base-version.
(upstream-icecat-base-version "115.8.0")
(gnuzilla-commit "7e2ff1ad7e03d2bfe0b2daf3f25961b06cab8848")
(upstream-icecat-base-version "115.9.1")
(gnuzilla-commit "a59b8a2c2e4c8b8de47b3ae4d10032154a47a01e")
(gnuzilla-source
(origin
(method git-fetch)
@ -561,7 +561,7 @@ (define icecat-source
(string-take gnuzilla-commit 8)))
(sha256
(base32
"1lv3vfqv0zb634gnvzb37fs04rb1jlrd2n1k51yjsvdznpqfpi1y"))))
"0l07x59c0bmj72n0pdhb4mlphw9nmd88i9jg39xvxcw0cv7bw6qm"))))
;; 'search-patch' returns either a valid file name or #f, so wrap it
;; in 'assume-valid-file-name' to avoid 'local-file' warnings.
@ -763,7 +763,7 @@ (define-public icecat-minimal
;; ,(search-patch "icecat-use-system-media-libs.patch"))
rust
`(,rust "cargo")
rust-cbindgen-0.24
rust-cbindgen
llvm-15
clang-15
perl
@ -1850,7 +1850,7 @@ (define-public icedove-minimal
pkg-config
python-wrapper
rust
rust-cbindgen-0.23
rust-cbindgen
which
yasm))
(home-page "https://www.thunderbird.net")

View file

@ -404,6 +404,31 @@ (define-public go-github-com-jacobsa-ogletest
messages automatically.")
(license license:asl2.0))))
(define-public go-github-com-jbenet-go-cienv
(package
(name "go-github-com-jbenet-go-cienv")
(version "0.1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/jbenet/go-cienv")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1qyfjvr8n5chpb5zi6r9cf0danrwds3k5lbf7vp7ygcl6wnm0vmv"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/jbenet/go-cienv"))
(home-page "https://github.com/jbenet/go-cienv")
(synopsis "CI system environment variables")
(description
"Package @code{cienv} implements some helper functions to use during tests.
Many times certain facilities are not available, or tests must run
differently.")
(license license:expat)))
(define-public go-github-com-onsi-ginkgo
(package
(name "go-github-com-onsi-ginkgo")
@ -779,6 +804,45 @@ (define-public go-honnef-co-go-tools
advanced Go linter.")
(license license:expat)))
(define-public go-pgregory-net-rapid
(package
(name "go-pgregory-net-rapid")
(version "1.1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/flyingmutant/rapid")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1alyhcbdq6113sfymx7xxmxpcbgvkaipsn15cgjrcqrx8ks1hm5i"))))
(build-system go-build-system)
(arguments
(list
#:go go-1.18
#:import-path "pgregory.net/rapid"))
(home-page "https://pgregory.net/rapid/")
(synopsis "Go property-based testing library")
(description
"@code{Rapid} is a Go library for property-based testing.
Rapid checks that properties you define hold for a large number of automatically
generated test cases. If a failure is found, rapid automatically minimizes the
failing test case before presenting it.
Features:
@itemize
@item imperative Go API with type-safe data generation using generics
@item data generation biased to explore \"small\" values and edge cases more
thoroughly
@item fully automatic minimization of failing test cases
@item persistence and automatic re-running of minimized failing test cases
@item support for state machine (\"stateful\" or \"model-based\") testing
@item no dependencies outside the Go standard library
@end itemize")
(license license:mpl2.0)))
;;;
;;; Executables:
;;;

View file

@ -140,6 +140,33 @@ (define-public go-github-com-klauspost-compress
(description "@code{compress} provides various compression algorithms.")
(license license:bsd-3)))
(define-public go-github-com-klauspost-pgzip
(package
(name "go-github-com-klauspost-pgzip")
(version "1.2.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/klauspost/pgzip")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1j29wr6nd9ncdbkjphyziv0h8p5s2mj222cgcfqxmzjnfn7623d8"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/klauspost/pgzip"))
(propagated-inputs (list go-github-com-klauspost-compress))
(home-page "https://github.com/klauspost/pgzip")
(synopsis "Parallel (de)compression of gzip files in Go")
(description
"This package implements parallel gzip compression and decompression in
Golang and is fully compatible with @code{compress/gzip} from the standard
library. This is beneficial for large amounts of data, say more than 1MB at a
time, as otherwise the internal gzip library will likely be faster.")
(license (list license:bsd-3 license:expat))))
(define-public go-github-com-nwaples-rardecode-v2
(package
(name "go-github-com-nwaples-rardecode-v2")
@ -166,23 +193,27 @@ (define-public go-github-com-nwaples-rardecode-v2
(define-public go-github-com-ulikunitz-xz
(package
(name "go-github-com-ulikunitz-xz")
(version "0.5.8")
(version "0.5.11")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ulikunitz/xz.git")
(url "https://github.com/ulikunitz/xz")
(commit (string-append "v" version))))
(file-name (string-append name "-" version "-checkout"))
(file-name (git-file-name name version))
(sha256
(base32 "1xnsymi5fmmm734bi4c6z57p5cvnyxlpi29yxs4v21w5k763aypd"))))
(base32 "1hbs3x7s7d5ch6ipaqi265w0fwpijs0j19xdbhbjjsyr4khxbqd0"))))
(build-system go-build-system)
(arguments
`(#:import-path "github.com/ulikunitz/xz"))
(list
#:import-path "github.com/ulikunitz/xz"))
(home-page "https://github.com/ulikunitz/xz")
(synopsis "Read and write xz compressed streams in Go")
(description "This package provides a library to read and write xz
compressed streams in Go.")
(description
"This package provides a support of reading and writing of xz
compressed streams. It includes also a gxz command for compressing and
decompressing data. The package is completely written in Go and doesn't have
any dependency on any C code.")
(license license:bsd-3)))
;;;

View file

@ -47,7 +47,8 @@ (define-module (gnu packages golang-crypto)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-build)
#:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-compression))
#:use-module (gnu packages golang-compression)
#:use-module (gnu packages golang-web))
;;; Commentary:
;;;
@ -261,6 +262,29 @@ (define-public go-github-com-btcsuite-btcd-btcec
needing to use secp256k1 elliptic curve cryptography.")
(license license:isc))))
(define-public go-github-com-bwesterb-go-ristretto
(package
(name "go-github-com-bwesterb-go-ristretto")
(version "1.2.3")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/bwesterb/go-ristretto")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0h508v790wk6g8jq0gh18296xl87vmgc4fhwnac7mk6i5g3mz6v4"))))
(build-system go-build-system)
(arguments
(list #:unpack-path "github.com/bwesterb/go-ristretto"
#:import-path "github.com/bwesterb/go-ristretto/edwards25519"))
(home-page "https://github.com/bwesterb/go-ristretto")
(synopsis "Operations on the Ristretto prime-order group")
(description "This is a pure Go implementation of the group operations on
the Ristretto prime-order group built from Edwards25519.")
(license license:expat)))
(define-public go-github-com-cespare-xxhash
(package
(name "go-github-com-cespare-xxhash")

View file

@ -1,4 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2018 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2018 Pierre-Antoine Rouby <pierre-antoine.rouby@inria.fr>
;;; Copyright © 2020 Jack Hill <jackhill@jackhill.us>
;;; Copyright © 2020 Joseph LaFreniere <joseph@lafreniere.xyz>
@ -98,6 +99,45 @@ (define-public go-cloud-google-com-go-compute-metadata
API service accounts for Go.")
(license license:asl2.0)))
(define-public go-github-com-alexliesenfeld-health
(package
(name "go-github-com-alexliesenfeld-health")
(version "0.8.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/alexliesenfeld/health")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1fchlvxwidsscskwq07vhxfwcn5wbigbizi51619l8gg09mr158q"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/alexliesenfeld/health"
#:phases #~(modify-phases %standard-phases
;; Examples requires additional dependencies and comes with
;; their own go.mod, consider to pack it as separate
;; package if required.
(add-after 'unpack 'remove-examples
(lambda* (#:key import-path #:allow-other-keys)
(delete-file-recursively
(string-append "src/" import-path "/examples")))))))
(native-inputs (list go-github-com-stretchr-testify))
(home-page "https://github.com/alexliesenfeld/health")
(synopsis "Simple and flexible health check library for Go")
(description
"This library provides a @code{http.Handler} that acts as a health
endpoint. It can be used by cloud infrastructure or other services to
determine the availability of an application.
Rather than simply returning a response with HTTP status code 200, this
library allows building health checks that test the availability of all
required dependencies. The HTTP response contains the aggregated health
result and details about the health status of each component.")
(license license:expat)))
(define-public go-github-com-andybalholm-cascadia
(package
(name "go-github-com-andybalholm-cascadia")
@ -964,6 +1004,35 @@ (define-public go-github-com-gregjones-httpcache
shared proxy).")
(license license:expat))))
(define-public go-github-com-hashicorp-go-cleanhttp
(package
(name "go-github-com-hashicorp-go-cleanhttp")
(version "0.5.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hashicorp/go-cleanhttp")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1i5xslizzwd966w81bz6dxjwzgml4q9bwqa186bsxd1vi8lqxl9p"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/hashicorp/go-cleanhttp"))
(home-page "https://github.com/hashicorp/go-cleanhttp")
(synopsis "Functions for accessing clean Go @code{http.Client} values")
(description
"The Go standard library contains a default @code{http.Client} and it is
a common idiom to tweak it as necessary. Unfortunately, this is a shared
value, and it is not uncommon for libraries to assume that they are free to
modify it at will. This package provides some simple functions to get a
\"clean\" @code{http.Client}, namely one that uses the same default values as
the Go standard library, but returns a client that does not share any state
with other clients.")
(license license:mpl2.0)))
(define-public go-github-com-hjson-hjson-go
(package
(name "go-github-com-hjson-hjson-go")
@ -1166,6 +1235,94 @@ (define-public go-github-com-microcosm-cc-bluemonday
(description "@code{bluemonday} is a HTML sanitizer implemented in Go.")
(license license:bsd-3)))
(define-public go-github-com-multiformats-go-multiaddr
;; This commit is from <2018-10-01> and associated with GX package manager,
;; since that time the project has changed versing stile and GX is dropped.
;; Current versioned tag is v0.12.2 <2024-01-26>.
(let ((commit "fe1c46f8be5af4aff4db286e08839295bd922efb")
(revision "0"))
(package
(name "go-github-com-multiformats-go-multiaddr")
(version (git-version "1.3.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/multiformats/go-multiaddr")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0p5f8h098a4yjjmzsgqs7vhx1iqifb8izwg3559cr4h7clkpzznh"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/multiformats/go-multiaddr"))
(native-inputs
(list go-github-com-gxed-hashland-keccakpg
go-github-com-minio-blake2b-simd
go-github-com-minio-sha256-simd
go-github-com-mr-tron-base58
go-github-com-multiformats-go-multihash
go-github-com-spaolacci-murmur3
go-golang-org-x-crypto))
(home-page "https://github.com/multiformats/go-multiaddr")
(synopsis "Composable and future-proof network addresses")
(description
"Multiaddr is a standard way to represent addresses that does the
following:
@itemize
@item Support any standard network protocols.
@item Self-describe (include protocols).
@item Have a binary packed format.
@item Have a nice string representation.
@item Encapsulate well.
@end itemize\n")
(license license:expat))))
(define-public go-github-com-multiformats-go-multiaddr-net
;; This commit is from <2018-10-01> and associated with GX package manager,
;; since that time the project has changed versing stile and GX is dropped.
;; The latest versioned tag is v0.1.5 <2020-04-30>. The project is archved
;; on <2021-10-05>.
(let ((commit "1cb9a0e8a6de3c8a10f6cee60d01d793603c4f7e")
(revision "0"))
(package
(name "go-github-com-multiformats-go-multiaddr-net")
(version (git-version "1.6.3" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/multiformats/go-multiaddr-net")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1ypgi47xdz3bh8lh7f8cmk7w3ql9g4izx5l3kzdg9gda1xn5zxq3"))))
(build-system go-build-system)
(arguments
(list
;; TODO: Tests fail because they try to access the network.
#:tests? #f
#:import-path "github.com/multiformats/go-multiaddr-net"))
(native-inputs
(list go-github-com-gxed-hashland-keccakpg
go-github-com-minio-blake2b-simd
go-github-com-minio-sha256-simd
go-github-com-mr-tron-base58
go-github-com-multiformats-go-multiaddr
go-github-com-multiformats-go-multihash
go-github-com-spaolacci-murmur3
go-golang-org-x-crypto))
(home-page "https://github.com/multiformats/go-multiaddr-net")
(synopsis "Multiaddress net tools")
(description
"This package provides Multiaddr specific versions of common functions
in stdlib's @command{net} package. This means wrappers of standard net
symbols like @command{net.Dial} and @command{net.Listen}, as well as
conversion to and from @command{net.Addr}.")
(license license:expat))))
(define-public go-github-com-nwidger-jsoncolor
(package
(name "go-github-com-nwidger-jsoncolor")
@ -1293,6 +1450,81 @@ (define-public go-github-com-puerkitobio-goquery
to jQuery to the Go language.")
(license license:bsd-3)))
(define-public go-github-com-quic-go-qpack
(package
(name "go-github-com-quic-go-qpack")
(version "0.4.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/quic-go/qpack")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "00mjz445hhx4yar5l8p21bpp4d06jyg2ajw0ax7bh64d37l4kx39"))))
(build-system go-build-system)
(arguments
(list
;; Tests require ginkgo v2.
#:tests? #f
#:go go-1.20
#:import-path "github.com/quic-go/qpack"))
(propagated-inputs
(list go-github-com-onsi-ginkgo
go-github-com-onsi-gomega
go-golang-org-x-net))
(home-page "https://github.com/quic-go/qpack")
(synopsis "Minimal QPACK (RFC 9204) implementation for Go")
(description
"A minimal QPACK (RFC 9204) implementation in Go. It is minimal in the sense
that it doesn't use the dynamic table at all, but just the static table and (Huffman
encoded) string literals. Wherever possible, it reuses code from the
@url{https://github.com/golang/net/tree/master/http2/hpack, HPACK implementation in
the Go standard library}.")
(license license:expat)))
(define-public go-github-com-quic-go-quic-go
(package
(name "go-github-com-quic-go-quic-go")
(version "0.39.3")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/quic-go/quic-go")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0acabl3cz48nxpggc5s7fwxpmr5amyi09jygn5m5xxkkbhqs2cxq"))))
(build-system go-build-system)
(arguments
(list
;; XXX More packages required...
#:tests? #f
#:go go-1.20
#:import-path "github.com/quic-go/quic-go"))
(propagated-inputs
(list go-github-com-cheekybits-genny
go-github-com-golang-protobuf-proto
go-github-com-marten-seemann-chacha20
go-github-com-quic-go-qpack
go-github-com-quic-go-qtls-go1-20
go-golang-org-x-crypto
go-golang-org-x-exp
go-golang-org-x-net
go-golang-org-x-sync
go-golang-org-x-sys))
(home-page "https://github.com/quic-go/quic-go")
(synopsis "QUIC in Go")
(description
"This package provides a Go language implementation of the QUIC network
protocol.")
(license license:expat)))
(define-public go-github-com-lucas-clemente-quic-go
(deprecated-package "go-github-com-lucas-clemente-quic-go" go-github-com-quic-go-quic-go))
(define-public go-github-com-sourcegraph-jsonrpc2
(package
(name "go-github-com-sourcegraph-jsonrpc2")

View file

@ -4,6 +4,7 @@
;;; Copyright © 2018 Pierre-Antoine Rouby <pierre-antoine.rouby@inria.fr>
;;; Copyright © 2019 Brian Leung <bkleung89@gmail.com>
;;; Copyright © 2019 Leo Famulari <leo@famulari.name>
;;; Copyright © 2019 Vagrant Cascadian <vagrant@debian.org>
;;; Copyright © 2019, 2020, 2021 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2020 Joseph LaFreniere <joseph@lafreniere.xyz>
;;; Copyright © 2020 Oleg Pykhalov <go.wigust@gmail.com>
@ -237,6 +238,31 @@ (define-public go-github-com-benbjohnson-clock
can use the realtime clock while tests can use the mock clock.")
(license license:expat)))
(define-public go-github-com-beorn7-perks-quantile
(package
(name "go-github-com-beorn7-perks-quantile")
(version "1.0.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/beorn7/perks")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "17n4yygjxa6p499dj3yaqzfww2g7528165cl13haj97hlx94dgl7"))))
(build-system go-build-system)
(arguments
(list #:import-path "github.com/beorn7/perks/quantile"
#:unpack-path "github.com/beorn7/perks"))
(home-page "https://github.com/beorn7/perks")
(synopsis "Compute approximate quantiles over an unbounded data stream")
(description
"Perks contains the Go package @code{quantile} that computes
approximate quantiles over an unbounded data stream within low memory and CPU
bounds.")
(license license:expat)))
(define-public go-github-com-bitly-go-hostpool
(package
(name "go-github-com-bitly-go-hostpool")
@ -285,28 +311,51 @@ (define-public go-github-com-bitly-timer-metrics
(license license:expat)))
(define-public go-github-com-blang-semver
(let ((commit "60ec3488bfea7cca02b021d106d9911120d25fe9")
(revision "0"))
(package
(name "go-github-com-blang-semver")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/blang/semver")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "19pli07y5592g4dyjyj0jq5rn548vc3fz0qg3624vm1j5828p1c2"))))
(build-system go-build-system)
(arguments
'(#:import-path "github.com/blang/semver"))
(home-page "https://github.com/blang/semver")
(synopsis "Semantic versioning library written in Go")
(description
"Semver is a library for Semantic versioning written in Go.")
(license license:expat))))
(package
(name "go-github-com-blang-semver")
(version "3.8.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/blang/semver")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "16s66zbfkn35msmxpkiwf5dv91kzw7yzxzkcv8ma44j7lbgzx5qk"))))
(build-system go-build-system)
(arguments
'(#:import-path "github.com/blang/semver"))
(home-page "https://github.com/blang/semver")
(synopsis "Semantic versioning library written in Go")
(description
"Semver is a library for Semantic versioning written in Go.")
(license license:expat)))
(define-public go-github-com-blang-semver-v4
(package
(inherit go-github-com-blang-semver)
(name "go-github-com-blang-semver-v4")
(version "4.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/blang/semver")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "14h9ys4n4kx9cbj42lkdf4i5k3nkll6sd62jcvl7cs565v6fiknz"))))
(arguments
(list
#:import-path "github.com/blang/semver/v4"
#:unpack-path "github.com/blang/semver"
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'remove-examples
(lambda* (#:key import-path #:allow-other-keys)
(delete-file-recursively
(string-append "src/" import-path "/examples")))))))))
(define-public go-github-com-bmizerany-perks-quantile
(package
@ -853,6 +902,40 @@ (define-public go-github-com-hashicorp-hcl-v2
(home-page "https://github.com/hashicorp/hcl")
(license license:mpl2.0)))
(define-public go-github-com-hashicorp-go-hclog
(package
(name "go-github-com-hashicorp-go-hclog")
(version "1.6.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hashicorp/go-hclog")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1lvr4ga95a0xb62vgq1hy558x3r65hn2d0h7bf0a88lsfsrcik0n"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/hashicorp/go-hclog"))
(propagated-inputs
(list go-github-com-fatih-color
go-github-com-mattn-go-isatty
go-golang-org-x-tools))
(native-inputs
(list go-github-com-stretchr-testify))
(home-page "https://github.com/hashicorp/go-hclog")
(synopsis "Key/value logging interface for Go")
(description
"This package provides a simple key/value logging interface for Golang
for use in development and production environments. Unlike the standard
library @code{log} package, this package provides logging levels that provide
decreased output based upon the desired amount of output. It also comes with
a command-line program @code{hclogvet} that can be used to check that the logging level
methods on @code{hclog.Logger} are used correctly.")
(license license:expat)))
(define-public go-github-com-hashicorp-go-multierror
(package
(name "go-github-com-hashicorp-go-multierror")
@ -987,6 +1070,83 @@ (define-public go-github-com-hhrutter-tiff
@end itemize")
(license license:bsd-3)))
(define-public go-github-com-jbenet-go-random
(package
(name "go-github-com-jbenet-go-random")
(version "0.0.0-20190219211222-123a90aedc0c")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/jbenet/go-random")
(commit (go-version->git-ref version))))
(file-name (git-file-name name version))
(sha256
(base32 "0kgx19m8p76rmin8s8y6j1padciv1dx37qzy7jkh9bw49ai3haw3"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/jbenet/go-random"))
(propagated-inputs
(list go-github-com-dustin-go-humanize))
(home-page "https://github.com/jbenet/go-random")
(synopsis "Go library and a program that outputs randomness")
(description
"This is a Unix utility that outputs randomness. It is a thin
wrapper around @code{crypto/rand}.")
(license license:expat)))
(define-public go-github-com-jbenet-go-temp-err-catcher
(package
(name "go-github-com-jbenet-go-temp-err-catcher")
(version "0.1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/jbenet/go-temp-err-catcher")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0n482jhh6jwq43jj21xkq8grqzx78hjh7f44p0q3n01zp1dsh97r"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/jbenet/go-temp-err-catcher"))
(home-page "https://github.com/jbenet/go-temp-err-catcher")
(synopsis "Error handling helper library")
(description "Package @code{temperrcatcher} provides a @code{TempErrCatcher}
object, which implements simple error-retrying functionality.")
(license license:expat)))
(define-public go-github-com-jbenet-goprocess
(package
(name "go-github-com-jbenet-goprocess")
(version "0.1.4")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/jbenet/goprocess")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1z4a5skx9kh2c727pc6zz0vhf9v8acd320s7z0f1kwy3y1nbdhjk"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/jbenet/goprocess"))
(native-inputs
(list go-github-com-jbenet-go-cienv))
(home-page "https://github.com/jbenet/goprocess")
(synopsis "Manage process life cycles in Go")
(description
"@code{goprocess} introduces a way to manage process lifecycles in
Go. It is much like @code{go.net/context} (it actually uses a Context), but it is
more like a Context-WaitGroup hybrid. @code{goprocess} is about being able to start
and stop units of work, which may receive @code{Close} signals from many clients.")
(license license:expat)))
(define-public go-github-com-jinzhu-copier
(package
(name "go-github-com-jinzhu-copier")
@ -1010,6 +1170,31 @@ (define-public go-github-com-jinzhu-copier
struct to another.")
(license license:expat)))
(define-public go-github-com-josharian-intern
(package
(name "go-github-com-josharian-intern")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/josharian/intern")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1za48ppvwd5vg8vv25ldmwz1biwpb3p6qhf8vazhsfdg9m07951c"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/josharian/intern"))
(home-page "https://github.com/josharian/intern")
(synopsis "String interning for Go")
(description
"This library defines functions to perform string interning in Go,
storing only one copy of each unique string in memory. All functions may be
called concurrently with themselves and each other.")
(license license:expat)))
(define-public go-github-com-k0kubun-pp
(package
(name "go-github-com-k0kubun-pp")
@ -1037,6 +1222,33 @@ (define-public go-github-com-k0kubun-pp
customized globally.")
(license license:expat)))
(define-public go-github-com-lib-pq
(package
(name "go-github-com-lib-pq")
(version "1.2.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/lib/pq")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "08j1smm6rassdssdks4yh9aspa1dv1g5nvwimmknspvhx8a7waqz"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/lib/pq"
;; The tests seem to fail without access to the network or a running
;; Postgres instance.
#:tests? #f))
(home-page "https://github.com/lib/pq")
(synopsis "Golang Postgres driver for Go's database/sql")
(description
"This package provides a pure Go Postgres driver for Go's
database/sql package.")
(license license:expat)))
(define-public go-github-com-matryer-try
(package
(name "go-github-com-matryer-try")
@ -1182,6 +1394,30 @@ (define-public go-github-com-mreiferson-go-svc
@url{https://github.com/judwhite/go-svc/raw/master/svc/svc_windows_test.go,here}.")
(license license:expat))))
(define-public go-github-com-multiformats-go-varint
(package
(name "go-github-com-multiformats-go-varint")
(version "0.0.7")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/multiformats/go-varint")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0l4s0z3rc3d350zp6qximl1jjhic6l8w74wkmx244jgfzsxd93af"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/multiformats/go-varint"))
(home-page "https://github.com/multiformats/go-varint")
(synopsis "Varint helpers that enforce minimal encoding")
(description
"This package provides a functionality for encoding and decoding unsigned
varints.")
(license license:expat)))
(define-public go-github-com-nats-io-nats-go
(package
(name "go-github-com-nats-io-nats-go")
@ -1685,6 +1921,34 @@ (define-public go-github-com-vividcortex-ewma
weighted moving averages}.")
(license license:expat)))
(define-public go-github-com-whyrusleeping-go-sysinfo
(package
(name "go-github-com-whyrusleeping-go-sysinfo")
(version "0.0.0-20190219211824-4a357d4b90b1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/whyrusleeping/go-sysinfo")
(commit (go-version->git-ref version))))
(file-name (git-file-name name version))
(sha256
(base32 "0s6yjp9incc579wbbga33vq0hcanv8j2xh9l90ya0r4fihz39jiq"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/whyrusleeping/go-sysinfo"))
(propagated-inputs
(list go-github-com-dustin-go-humanize))
(home-page "https://github.com/whyrusleeping/go-sysinfo")
(synopsis "Package to extract system information")
;; There is not much information provided by the project, see
;; <https://github.com/whyrusleeping/go-sysinfo/issues>.
(description
"This package provides a basic system stats like @code{DiskUsage} and
@code{MemoryInfo}.")
(license license:expat)))
(define-public go-go-uber-org-automaxprocs
(package
(name "go-go-uber-org-automaxprocs")
@ -1756,6 +2020,22 @@ (define-public go-gopkg-in-op-go-logging-v1
;;; Executables:
;;;
(define-public go-hclogvet
(package
(inherit go-github-com-hashicorp-go-hclog)
(name "go-hclogvet")
(arguments
(list
#:import-path "github.com/hashicorp/go-hclog/hclogvet"
#:unpack-path "github.com/hashicorp/go-hclog"
#:install-source? #f))
(propagated-inputs
(list go-golang-org-x-tools))
(description
"@code{hclogvet} is a @code{go vet} tool for checking that the
Trace/Debug/Info/Warn/Error methods on @code{hclog.Logger} are used
correctly.")))
(define-public go-numcpus
(package
(inherit go-github-com-tklauser-numcpus)

View file

@ -5176,86 +5176,6 @@ (define-public go-github-com-mitchellh-copystructure
references.")
(license license:expat)))
(define-public go-github-com-multiformats-go-multiaddr
(let ((commit "fe1c46f8be5af4aff4db286e08839295bd922efb")
(revision "0"))
(package
(name "go-github-com-multiformats-go-multiaddr")
(version (git-version "1.3.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/multiformats/go-multiaddr")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"0p5f8h098a4yjjmzsgqs7vhx1iqifb8izwg3559cr4h7clkpzznh"))))
(build-system go-build-system)
(arguments
'(#:import-path
"github.com/multiformats/go-multiaddr"))
(native-inputs
(list go-github-com-multiformats-go-multihash
go-github-com-gxed-hashland-keccakpg
go-github-com-minio-blake2b-simd
go-github-com-minio-sha256-simd
go-github-com-mr-tron-base58
go-github-com-spaolacci-murmur3
go-golang-org-x-crypto))
(home-page "https://github.com/multiformats/go-multiaddr")
(synopsis "Composable and future-proof network addresses")
(description "Multiaddr is a standard way to represent addresses that
does the following:
@itemize
@item Support any standard network protocols.
@item Self-describe (include protocols).
@item Have a binary packed format.
@item Have a nice string representation.
@item Encapsulate well.
@end itemize\n")
(license license:expat))))
(define-public go-github-com-multiformats-go-multiaddr-net
(let ((commit "1cb9a0e8a6de3c8a10f6cee60d01d793603c4f7e")
(revision "0"))
(package
(name "go-github-com-multiformats-go-multiaddr-net")
(version (git-version "1.6.3" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/multiformats/go-multiaddr-net")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"1ypgi47xdz3bh8lh7f8cmk7w3ql9g4izx5l3kzdg9gda1xn5zxq3"))))
(build-system go-build-system)
(arguments
(quote (#:import-path "github.com/multiformats/go-multiaddr-net"
;; TODO: Tests fail because they try to access the network.
#:tests? #f)))
(native-inputs
(list go-github-com-multiformats-go-multiaddr
go-github-com-multiformats-go-multihash
go-github-com-gxed-hashland-keccakpg
go-github-com-minio-blake2b-simd
go-github-com-minio-sha256-simd
go-github-com-mr-tron-base58
go-github-com-spaolacci-murmur3
go-golang-org-x-crypto))
(home-page "https://github.com/multiformats/go-multiaddr-net")
(synopsis "Multiaddress net tools")
(description "This package provides Multiaddr specific versions of
common functions in stdlib's @command{net} package. This means wrappers of
standard net symbols like @command{net.Dial} and @command{net.Listen}, as well
as conversion to and from @command{net.Addr}.")
(license license:expat))))
(define-public go-github-com-whyrusleeping-tar-utils
(let ((commit "8c6c8ba81d5c71fd69c0f48dbde4b2fb422b6dfc")
(revision "0"))
@ -6051,79 +5971,6 @@ (define-public go-github-com-cheekybits-genny
(home-page "https://github.com/cheekybits/genny/")
(license license:expat)))
(define-public go-github-com-quic-go-qpack
(package
(name "go-github-com-quic-go-qpack")
(version "0.4.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/quic-go/qpack")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "00mjz445hhx4yar5l8p21bpp4d06jyg2ajw0ax7bh64d37l4kx39"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/quic-go/qpack"
;; Tests require ginkgo v2.
#:tests? #f
#:go go-1.20))
(propagated-inputs (list go-github-com-onsi-gomega
go-github-com-onsi-ginkgo
go-golang-org-x-net))
(synopsis "Minimal QPACK (RFC 9204) implementation for Go")
(description
"A minimal QPACK (RFC 9204) implementation in Go. It is minimal in the sense
that it doesn't use the dynamic table at all, but just the static table and (Huffman
encoded) string literals. Wherever possible, it reuses code from the
@url{https://github.com/golang/net/tree/master/http2/hpack, HPACK implementation in
the Go standard library}.")
(home-page "https://github.com/quic-go/qpack")
(license license:expat)))
(define-public go-github-com-quic-go-quic-go
(package
(name "go-github-com-quic-go-quic-go")
(version "0.39.3")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/quic-go/quic-go")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0acabl3cz48nxpggc5s7fwxpmr5amyi09jygn5m5xxkkbhqs2cxq"))))
(build-system go-build-system)
(arguments
(list #:import-path "github.com/quic-go/quic-go"
;; XXX More packages required...
#:tests? #f
#:go go-1.20))
(propagated-inputs
(list go-github-com-quic-go-qtls-go1-20
go-github-com-quic-go-qpack
go-golang-org-x-crypto
go-github-com-cheekybits-genny
go-github-com-marten-seemann-chacha20
go-github-com-golang-protobuf-proto
go-golang-org-x-crypto
go-golang-org-x-exp
go-golang-org-x-net
go-golang-org-x-sys
go-golang-org-x-sync))
(synopsis "QUIC in Go")
(description "This package provides a Go language implementation of the QUIC
network protocol.")
(home-page "https://github.com/quic-go/quic-go")
(license license:expat)))
(define-public go-github-com-lucas-clemente-quic-go
(deprecated-package "go-github-com-lucas-clemente-quic-go" go-github-com-quic-go-quic-go))
(define-public go-github-com-lunixbochs-vtclean
(package
(name "go-github-com-lunixbochs-vtclean")
@ -8519,29 +8366,6 @@ (define-public go-etcd-io-bbolt
(description "This package implements a low-level key/value store in Go.")
(license license:expat)))
(define-public go-github-com-bwesterb-go-ristretto
(package
(name "go-github-com-bwesterb-go-ristretto")
(version "1.2.3")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/bwesterb/go-ristretto")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0h508v790wk6g8jq0gh18296xl87vmgc4fhwnac7mk6i5g3mz6v4"))))
(build-system go-build-system)
(arguments
'(#:unpack-path "github.com/bwesterb/go-ristretto"
#:import-path "github.com/bwesterb/go-ristretto/edwards25519"))
(home-page "https://github.com/bwesterb/go-ristretto")
(synopsis "operations on the Ristretto prime-order group")
(description "This is a pure Go implementation of the group operations on
the Ristretto prime-order group built from Edwards25519.")
(license license:expat)))
(define-public go-github-com-rogpeppe-go-internal
(package
(name "go-github-com-rogpeppe-go-internal")

View file

@ -47,6 +47,7 @@
;;; Copyright © 2022 Evgeny Pisemsky <evgeny@pisemsky.com>
;;; Copyright © 2022 jgart <jgart@dismail.de>
;;; Copyright © 2023 Andrew Tropin <andrew@trop.in>
;;; Copyright © 2024 Ilya Chernyshov <ichernyshovvv@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -1088,7 +1089,7 @@ (define-public guile2.2-sjson
(define-public guile-scheme-json-rpc
(package
(name "guile-scheme-json-rpc")
(version "0.4.0")
(version "0.4.5a")
(source (origin
(method git-fetch)
(uri (git-reference
@ -1097,14 +1098,15 @@ (define-public guile-scheme-json-rpc
(file-name (git-file-name name version))
(sha256
(base32
"0jsampz2ahs18z6yh9b5l3lkj8ycnavs0vg9sjngdj3w3zvrdcvm"))))
"0356hm6phcfgvwvx3ys6b927v40jzb7qrfgvql7g78na24zp2cmi"))))
(build-system gnu-build-system)
(arguments
`(#:phases (modify-phases %standard-phases
(add-after 'unpack 'change-to-guile-dir
(lambda _
(chdir "guile"))))))
(inputs (list guile-3.0 guile-srfi-145 guile-srfi-180))
(inputs (list guile-3.0))
(propagated-inputs (list guile-srfi-145 guile-srfi-180))
(native-inputs (list pkg-config))
(synopsis "Library providing JSON-RPC capability for Guile Scheme")
(description
@ -1117,7 +1119,7 @@ (define-public guile-scheme-json-rpc
(define-public guile-ares-rs
(package
(name "guile-ares-rs")
(version "0.9.1")
(version "0.9.3")
(source
(origin
(method git-fetch)
@ -1127,7 +1129,7 @@ (define-public guile-ares-rs
(file-name (git-file-name name version))
(sha256
(base32
"173jg8z0cwq5r67lzxsmyir5f6cxd9i5gzb3qryq71cqq4h1c77n"))))
"021lg06c5lrp2j1qv8hl4jh4yq07k158h824kjv6b87bxqk7vq54"))))
(build-system guile-build-system)
(arguments
(list
@ -1324,8 +1326,8 @@ (define-public guile2.0-pg
(license license:gpl3+)))
(define-public guile-prometheus
(let ((commit "4aaf902eb45b3a4c1003f854bda56c516fdf4f5b")
(revision "6"))
(let ((commit "e63335e64a1f63967b94ba6dd97889f9f565ca48")
(revision "7"))
(package
(name "guile-prometheus")
(version (git-version "0" revision commit))
@ -1336,7 +1338,7 @@ (define-public guile-prometheus
(commit commit)))
(sha256
(base32
"03sr7wgksi9ys6jyzsnwanl2qqa8csi8jzcgrc3wfzp17vcc16yi"))
"0f8rykqx3mdbi7mgvvanx65i9gn5wmb768vlzrbg002v38284bf2"))
(file-name (string-append name "-" version "-checkout"))))
(build-system gnu-build-system)
(native-inputs

View file

@ -832,14 +832,14 @@ (define-public vips
(define-public gmic
(package
(name "gmic")
(version "3.3.3")
(version "3.3.5")
(source
(origin
(method url-fetch)
(uri (string-append "https://gmic.eu/files/source/gmic_"
version ".tar.gz"))
(sha256
(base32 "0pb474cdlxcp3m7gkxrfpnblag6r3wny7vih44gdyy2q8zb3ffch"))))
(base32 "06vcwn8c8zhr1j0jy79an1f6vvjh47ipm19a20g3qsnxv7h5c905"))))
(build-system cmake-build-system)
(arguments
`(#:tests? #f ;there are no tests
@ -865,7 +865,6 @@ (define-public gmic
libpng
libtiff
libx11
;;opencv ;OpenCV is currently broken in the CI
openexr
zlib))
(home-page "https://gmic.eu/")

View file

@ -241,10 +241,13 @@ (define-public kubo
(snippet '(for-each delete-file-recursively
;; TODO: unbundle the rest as well
'("vendor/github.com/alecthomas"
;; "vendor/github.com/blang"
"vendor/github.com/benbjohnson/clock"
"vendor/github.com/beorn7/perks"
"vendor/github.com/blang"
"vendor/github.com/cespare"
;; TODO: Go files not found
;; "vendor/github.com/cheggaaa"
;; TODO: kubo depends on v1.0.29 which is way too
;; hard to back port.
; "vendor/github.com/cheggaaa/pb"
"vendor/github.com/davecgh"
"vendor/github.com/dustin"
"vendor/github.com/flynn"
@ -261,8 +264,6 @@ (define-public kubo
;; "vendor/github.com/ipld"
"vendor/github.com/jackpal"
"vendor/github.com/klauspost"
;; TODO: Go files not found
;; "vendor/github.com/lucas-clemente"
"vendor/github.com/mattn"
"vendor/github.com/mgutz"
"vendor/github.com/minio"
@ -306,20 +307,19 @@ (define-public kubo
#~(string-append #$output "/bin/ipfs"))
"commands" "completion" "bash")))))))))
(inputs (list go-github-com-alecthomas-units
;; TODO: needs to be updated first
;; go-github-com-blang-semver
go-github-com-benbjohnson-clock
go-github-com-blang-semver-v4
go-github-com-cespare-xxhash
go-github-com-cheekybits-genny
go-github-com-cheggaaa-pb-v3
go-github-com-davecgh-go-spew
go-github-com-dustin-go-humanize
go-github-com-flynn-noise
go-github-com-francoispqt-gojay
go-github-com-fsnotify-fsnotify
go-github-com-gogo-protobuf
go-github-com-google-uuid
go-github-com-golang-groupcache-lru
go-github-com-golang-snappy
go-github-com-google-uuid
go-github-com-gorilla-mux
go-github-com-gorilla-websocket
go-github-com-jackpal-go-nat-pmp
@ -344,12 +344,11 @@ (define-public kubo
go-github-com-spaolacci-murmur3
go-github-com-stretchr-testify
go-github-com-syndtr-goleveldb
go-gopkg-in-yaml-v2
go-gopkg-in-yaml-v3
go-go-uber-org-atomic
go-go-uber-org-multierr
go-go-uber-org-zap
go-golang-org-x-crypto
go-golang-org-x-exp
go-golang-org-x-lint
go-golang-org-x-mod
go-golang-org-x-net
@ -357,10 +356,11 @@ (define-public kubo
go-golang-org-x-sync
go-golang-org-x-sys
go-golang-org-x-term
go-golang-org-x-text
go-golang-org-x-tools
go-golang-org-x-xerrors
go-golang-org-x-exp
go-golang-org-x-text
go-gopkg-in-yaml-v2
go-gopkg-in-yaml-v3
go-lukechampine-com-blake3))
(native-inputs
(append (if (%current-target-system)

View file

@ -1217,7 +1217,7 @@ (define-public openjdk10
(define-public openjdk11
(package
(name "openjdk")
(version "11.0.17")
(version "11.0.22")
(source (origin
(method url-fetch)
(uri (string-append "https://openjdk-sources.osci.io/openjdk11/openjdk-"
@ -1225,7 +1225,7 @@ (define-public openjdk11
(file-name (string-append name "-" version ".tar.xz"))
(sha256
(base32
"1prvqy0ysz0999wrhsrbz6vrknpqfihl9l74l16ph93g89dqi5ia"))
"18ca4syp9xlrqjgyjkb1sp9835riy6aym5xs81r8byrz6jlb2473"))
(modules '((guix build utils)))
(snippet
'(for-each delete-file (find-files "." "\\.(bin|exe|jar)$")))
@ -1534,7 +1534,7 @@ (define-syntax make-openjdk
(define-public openjdk12
(make-openjdk
openjdk11 "12.33" "0mbhdrk12b6878kby0flnbak7444dlpm0ihlmf92vk59y1c02bc2"
openjdk11 "12.33" "0pi2gwib3j2imi4l623iaywrmvfh9rqzh82lj2gxqbrmg55swvjf"
(source
(origin
(method url-fetch)
@ -1542,7 +1542,7 @@ (define-public openjdk12
(file-name (string-append name "-" version ".tar.bz2"))
(sha256
(base32
"0mbhdrk12b6878kby0flnbak7444dlpm0ihlmf92vk59y1c02bc2"))
"0pi2gwib3j2imi4l623iaywrmvfh9rqzh82lj2gxqbrmg55swvjf"))
(modules '((guix build utils)))
(snippet
'(for-each delete-file (find-files "." "\\.(bin|exe|jar)$")))
@ -1573,8 +1573,8 @@ (define-public openjdk12
"#! java BlacklistedCertsConverter SHA-256\n"))))))))))
(define-public openjdk13
(make-openjdk openjdk12 "13.0.13"
"0pxf4dlig61k0pg7amg4mi919hzam7nzwckry01avgq1wj8ambji"
(make-openjdk openjdk12 "13.0.14"
"1v92i5rhahqkjw8mz09c9qasnxqc67ygy0y266kdmm534z0da755"
(source (origin
(inherit (package-source base))
(patches '())))))
@ -1596,8 +1596,8 @@ (define-public openjdk14
(define-public openjdk15
(make-openjdk
openjdk14 "15.0.9"
"1k3x06fv89l84ysjsyw8s89q8blghq85m6xjzv373x6297ln8n7a"
openjdk14 "15.0.10"
"0hdllv348bws6m992bh73jik18x0sv0k2m9l817b3zb7q802sp7x"
(source (origin
(inherit (package-source base))
(modules '())
@ -1623,8 +1623,8 @@ (define-public openjdk16
(define-public openjdk17
(make-openjdk
openjdk16 "17.0.5"
"1asnysg6kxdkrmb88y6qihdr12ljsyxv0mg6hlcs7cwxgsdlqkfs"
openjdk16 "17.0.10"
"1bq1rqnipz6wdr05s20gm8nlpb3328ljxckzvc5ag0gf7fzlhn5f"
(source (origin
(inherit (package-source base))
(patches (search-patches "openjdk-15-xcursor-no-dynamic.patch"))))
@ -1639,8 +1639,8 @@ (define-public openjdk17
(("^#!.*") "#! java BlockedCertsConverter SHA-256\n"))))))))))
(define-public openjdk18
(make-openjdk openjdk17 "18.0.2"
"1yimfdkwpinhg5cf1mcrzk9xvjwnray3cx762kypb9jcwbranjwx"))
(make-openjdk openjdk17 "18.0.2.1"
"0zxanjzz4p3psqahlidh55vx1ldanq70c2ygk3gcfn9a94vnr9rg"))
(define-public openjdk19
(make-openjdk openjdk18 "19.0.2"
@ -1660,12 +1660,12 @@ (define-public openjdk19
(setenv "SOURCE_DATE_EPOCH" "1234567890")))))))))
(define-public openjdk20
(make-openjdk openjdk19 "20"
"0pk5lpwijfv9qv7vwpsq2xfklbnqdfs6xbdhc5aamrpar4xi4ykx"))
(make-openjdk openjdk19 "20.0.2"
"1af1v2c3d8x4c6shzl6cv9qwq7a4hn5map5pjh9vjcky0hkzd489"))
(define-public openjdk21
(make-openjdk openjdk20 "21"
"06wjfwrkqykjdkis2s1nh91cy8vwincnmc699cxvyk3fc12jf3vw"
(make-openjdk openjdk20 "21.0.2"
"0d1g3wnzr5whjpq8gvxq0h7kd7lxd3xgc6bh3kg8vzz096asn0kj"
(source (origin
(inherit (package-source base))
(patches (search-patches "openjdk-21-fix-rpath.patch"

View file

@ -7,6 +7,7 @@
;;; Copyright © 2021 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2022 Frank Pursel <frank.pursel@gmail.com>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -835,15 +836,16 @@ (define-public quickjs
"06pywwpmfwjz225h59wf90q96a2fd66qfcw5xa6m6y9k9k7glnx4"))))
(build-system gnu-build-system)
(arguments
`(#:make-flags
(list "prefix="
(string-append "DESTDIR=" %output))
#:phases
(modify-phases %standard-phases
(delete 'configure)
(replace 'check
(lambda _
(invoke "make" "microbench"))))))
(list #:make-flags
#~(list "prefix="
(string-append "DESTDIR=" #$output)
#$@(if (target-riscv64?) '("LDFLAGS=-latomic") '()))
#:phases #~(modify-phases %standard-phases
(delete 'configure)
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "make" "microbench")))))))
(home-page "https://bellard.org/quickjs/")
(synopsis "Small embeddable Javascript engine")
(description "QuickJS supports the ES2020 specification including modules,

View file

@ -497,73 +497,91 @@ (define (%upstream-linux-source version hash)
;; The current "mainline" kernel.
(define-public linux-libre-6.7-version "6.7.6")
(define-public linux-libre-6.8-version "6.8.1")
(define-public linux-libre-6.8-gnu-revision "gnu")
(define deblob-scripts-6.8
(linux-libre-deblob-scripts
linux-libre-6.8-version
linux-libre-6.8-gnu-revision
(base32 "1kqwcm8baq3zx1z8jrgnvm9yps3y9jbf4pv1pbqqprpdscgl9089")
(base32 "04xk6myysrfrhfpq6zah8wk2ska7idmr968nh6pcd0ixbhas2k92")))
(define-public linux-libre-6.8-pristine-source
(let ((version linux-libre-6.8-version)
(hash (base32 "0s7zgk9m545v8y7qjhv7cprrh58j46gpmb8iynyhy2hlwcv8j34d")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-6.8)))
;; The current "stable" kernels. That is, the most recently released major
;; versions that are still supported upstream.
(define-public linux-libre-6.7-version "6.7.10")
(define-public linux-libre-6.7-gnu-revision "gnu")
(define deblob-scripts-6.7
(linux-libre-deblob-scripts
linux-libre-6.7-version
linux-libre-6.7-gnu-revision
(base32 "1ddngihfmwffgvxxv8xsppi76r6grvdxr6zzfzvgl9qw07a6c9fd")
(base32 "1vb2pd0wdfl9p5qi8hj1i5xg1p4pyrp01iqhap9xbb2yai4l80j5")))
(base32 "1lhsy2qnmz47r8m926k1kng912m64j7pnpcvd1ddgdqpq5byp88j")))
(define-public linux-libre-6.7-pristine-source
(let ((version linux-libre-6.7-version)
(hash (base32 "1lrp7pwnxnqyy8c2l4n4nz997039gbnssrfm8ss8kl3h2c7fr2g4")))
(hash (base32 "00vw90mypcliq0d72jdh1ql2dfmm7gpswln2qycxdz7rfsrrzfd9")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-6.7)))
;; The current "stable" kernels. That is, the most recently released major
;; versions that are still supported upstream.
;; The "longterm" kernels — the older releases with long-term upstream support.
;; Here are the support timelines:
;; <https://www.kernel.org/category/releases.html>
(define-public linux-libre-6.6-version "6.6.18")
(define-public linux-libre-6.6-version "6.6.22")
(define-public linux-libre-6.6-gnu-revision "gnu")
(define deblob-scripts-6.6
(linux-libre-deblob-scripts
linux-libre-6.6-version
linux-libre-6.6-gnu-revision
(base32 "1qm8f3fq4yx59f7b6yky5ryyf229ypxnry922sr8cy0s7mp62cmv")
(base32 "0kavbby960k7wg355p3hjb9v1c4gnk8dv3lkfhpz44ayhv7kihg5")))
(base32 "014w19b9igdy3rpwrqn21why151zlc9hdx2b1qvdkjsbz6smx3lp")))
(define-public linux-libre-6.6-pristine-source
(let ((version linux-libre-6.6-version)
(hash (base32 "07cv97l5jiakmmv35n0ganvqfr0590b02f3qb617qkx1zg2xhhsf")))
(hash (base32 "1x52c6ywmspp3naishzsknhy7i0b7mv9baxx25a0y987cjsygqr3")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-6.6)))
;; The "longterm" kernels — the older releases with long-term upstream support.
;; Here are the support timelines:
;; <https://www.kernel.org/category/releases.html>
(define-public linux-libre-6.1-version "6.1.79")
(define-public linux-libre-6.1-version "6.1.82")
(define-public linux-libre-6.1-gnu-revision "gnu")
(define deblob-scripts-6.1
(linux-libre-deblob-scripts
linux-libre-6.1-version
linux-libre-6.1-gnu-revision
(base32 "1sf80f2i4vf888xjcn84ymn4w5ynn30ib9033zwmv7f09yvfhapy")
(base32 "0vghx43lf7madaihsm279qnw8fsmgwq6p7r39r2m645mvap8mjxw")))
(base32 "08y5smwgbl2l74dlk850pbvn8d1y14cqvll2gbx80vmvfwlzp8c3")))
(define-public linux-libre-6.1-pristine-source
(let ((version linux-libre-6.1-version)
(hash (base32 "16xkd0hcslqlcf55d4ivzhf1fkhfs5yy0m9arbax8pmm5yi9r97s")))
(hash (base32 "01pcrcjp5mifjjmfz7j1jb8nhq8nkxspavxmv1l7d1qnskcx4l6i")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-6.1)))
(define-public linux-libre-5.15-version "5.15.149")
(define-public linux-libre-5.15-version "5.15.152")
(define-public linux-libre-5.15-gnu-revision "gnu")
(define deblob-scripts-5.15
(linux-libre-deblob-scripts
linux-libre-5.15-version
linux-libre-5.15-gnu-revision
(base32 "18ac30kxg2mf2f6gk3p935hzhz2qs110jy4xwk21kblnnkskbxj8")
(base32 "14pw0yl0yxdgcdp01rpi91ylil9irwzxfq04kfvn3gg2abaq37bn")))
(base32 "1a4la9nfdl5qiyfbzhgbqhl638wy1crkgpfnfaj0qf3hg4jsg0g4")))
(define-public linux-libre-5.15-pristine-source
(let ((version linux-libre-5.15-version)
(hash (base32 "1c01fnaghj55mkgsgddznq1zq4mswsa05rz00kmh1d3y6sd8115x")))
(hash (base32 "0zm4wkryj4mim4fr7pf5g9rlzh31yb1c40lkp85lvcm5yhjm507h")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-5.15)))
(define-public linux-libre-5.10-version "5.10.210")
(define-public linux-libre-5.10-version "5.10.213")
(define-public linux-libre-5.10-gnu-revision "gnu1")
(define deblob-scripts-5.10
(linux-libre-deblob-scripts
@ -573,12 +591,12 @@ (define deblob-scripts-5.10
(base32 "12csh2zyjrqzgqcv799gv8h4xaw1irxh2zqddn4jqp5p7psx4j5k")))
(define-public linux-libre-5.10-pristine-source
(let ((version linux-libre-5.10-version)
(hash (base32 "0vggj3a71awc1w803cdzrnkn88rxr7l1xh9mmdcw9hzxj1d3r9jf")))
(hash (base32 "105df7w6m5a3fngi6ajqs5qblaq4lbxsgcppllrk7v1r68i31kw4")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-5.10)))
(define-public linux-libre-5.4-version "5.4.269")
(define-public linux-libre-5.4-version "5.4.272")
(define-public linux-libre-5.4-gnu-revision "gnu1")
(define deblob-scripts-5.4
(linux-libre-deblob-scripts
@ -588,12 +606,12 @@ (define deblob-scripts-5.4
(base32 "0x0xg0fcykpd117x3q0gim8jilhx922ashhckjvafxv2gk2zzjhj")))
(define-public linux-libre-5.4-pristine-source
(let ((version linux-libre-5.4-version)
(hash (base32 "1kqqm4hpif3jy2ycnb0dfjgzyn18vqhm1i5q7d7rkisks33bwm7z")))
(hash (base32 "0rp3waqrm489crcrms2ls7fxcw5jdkjhazvx82z68gj0kaaxb69m")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-5.4)))
(define-public linux-libre-4.19-version "4.19.307")
(define-public linux-libre-4.19-version "4.19.310")
(define-public linux-libre-4.19-gnu-revision "gnu1")
(define deblob-scripts-4.19
(linux-libre-deblob-scripts
@ -603,7 +621,7 @@ (define deblob-scripts-4.19
(base32 "0fgkp3v7qgqpn7l1987xcwwlrmwsbscqnxfv06p8nkavrhymrv3c")))
(define-public linux-libre-4.19-pristine-source
(let ((version linux-libre-4.19-version)
(hash (base32 "0lp3fc7sqy48vpcl2g0n1bz7i1hp9k0nlz3i1xfh9l056ihzzvl3")))
(hash (base32 "0sfy2g9jzxd8ia0idll72l7npi2kssdkz29h8jjxhilgmg299v4m")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-4.19)))
@ -636,6 +654,11 @@ (define (source-with-patches source patches)
(patches (append (origin-patches source)
patches))))
(define-public linux-libre-6.8-source
(source-with-patches linux-libre-6.8-pristine-source
(list %boot-logo-patch
%linux-libre-arm-export-__sync_icache_dcache-patch)))
(define-public linux-libre-6.7-source
(source-with-patches linux-libre-6.7-pristine-source
(list %boot-logo-patch
@ -756,6 +779,11 @@ (define (make-linux-libre-headers* version gnu-revision source)
(description "Headers of the Linux-Libre kernel.")
(license license:gpl2)))
(define-public linux-libre-headers-6.8
(make-linux-libre-headers* linux-libre-6.8-version
linux-libre-6.8-gnu-revision
linux-libre-6.8-source))
(define-public linux-libre-headers-6.7
(make-linux-libre-headers* linux-libre-6.7-version
linux-libre-6.7-gnu-revision
@ -1100,20 +1128,6 @@ (define* (make-linux-libre* version gnu-revision source supported-systems
;;; Generic kernel packages.
;;;
(define-public linux-libre-6.6
(make-linux-libre* linux-libre-6.6-version
linux-libre-6.6-gnu-revision
linux-libre-6.6-source
'("x86_64-linux" "i686-linux" "armhf-linux"
"aarch64-linux" "powerpc64le-linux" "riscv64-linux")
#:configuration-file kernel-config))
(define-public linux-libre-version linux-libre-6.6-version)
(define-public linux-libre-gnu-revision linux-libre-6.6-gnu-revision)
(define-public linux-libre-pristine-source linux-libre-6.6-pristine-source)
(define-public linux-libre-source linux-libre-6.6-source)
(define-public linux-libre linux-libre-6.6)
(define-public linux-libre-6.7
(make-linux-libre* linux-libre-6.7-version
linux-libre-6.7-gnu-revision
@ -1122,6 +1136,28 @@ (define-public linux-libre-6.7
"aarch64-linux" "powerpc64le-linux" "riscv64-linux")
#:configuration-file kernel-config))
(define-public linux-libre-version linux-libre-6.7-version)
(define-public linux-libre-gnu-revision linux-libre-6.7-gnu-revision)
(define-public linux-libre-pristine-source linux-libre-6.7-pristine-source)
(define-public linux-libre-source linux-libre-6.7-source)
(define-public linux-libre linux-libre-6.7)
(define-public linux-libre-6.8
(make-linux-libre* linux-libre-6.8-version
linux-libre-6.8-gnu-revision
linux-libre-6.8-source
'("x86_64-linux" "i686-linux" "armhf-linux"
"aarch64-linux" "powerpc64le-linux" "riscv64-linux")
#:configuration-file kernel-config))
(define-public linux-libre-6.6
(make-linux-libre* linux-libre-6.6-version
linux-libre-6.6-gnu-revision
linux-libre-6.6-source
'("x86_64-linux" "i686-linux" "armhf-linux"
"aarch64-linux" "powerpc64le-linux" "riscv64-linux")
#:configuration-file kernel-config))
(define-public linux-libre-6.1
(make-linux-libre* linux-libre-6.1-version
linux-libre-6.1-gnu-revision
@ -2005,17 +2041,6 @@ (define-public linux-libre-documentation
(package
(inherit linux-libre)
(name "linux-libre-documentation")
(source
(origin
(inherit linux-libre-source)
(patches
(list
(origin
(method url-fetch)
(uri "https://git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux.git/patch/Documentation/sphinx/kernel_feat.py?id=c23de7ceae59e4ca5894c3ecf4f785c50c0fa428")
(sha256
(base32
"0inw2pl7nh82sw8bhvvzqa61552bisl78yc1nyl2x6dmpyppzrld")))))))
(arguments
(list
#:tests? #f

View file

@ -251,6 +251,39 @@ (define-public ecl-reader
;; TODO: Tests fail on call to coreutils echo for ecl.
`(#:tests? #f))))
(define-public sbcl-st-json
(let ((commit "4a0025bcc5b6921454822f1b9f38f697b4eeaf43")
(revision "0"))
(package
(name "sbcl-st-json")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/marijnh/ST-JSON")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "06qrhr5iw73k96lai2x9w52l6gnmlxy7fsr0r35gz6nz1f71x7gx"))))
(build-system asdf-build-system/sbcl)
(home-page "https://marijnhaverbeke.nl/st-json/")
(synopsis "JSON for Common Lisp")
(description
"ST-JSON (@code{ST} because it originated at Streamtech) is a Common Lisp
library for encoding and decoding JSON values (as specified on json.org).
This library does mostly the same thing as CL-JSON, but is simpler and more
precise about types (distinguishing boolean false, the empty array, and the
empty object).")
(license license:zlib))))
(define-public cl-st-json
(sbcl-package->cl-source-package sbcl-st-json))
(define-public ecl-st-json
(sbcl-package->ecl-package sbcl-st-json))
(define-public sbcl-stdutils
(let ((commit "4a4e5a4036b815318282da5dee2a22825369137b")
(revision "0"))
@ -825,21 +858,21 @@ (define-public ecl-list-named-class
(sbcl-package->ecl-package sbcl-list-named-class))
(define-public sbcl-golden-utils
(let ((commit "fe1898f9abbd302b0359f017637c063173cf73e1")
(revision "3"))
(let ((commit "e43914ad2bdb0c8e1b1f10ef591aafc3c55b89e7")
(revision "4"))
(package
(name "sbcl-golden-utils")
(version (git-version "0.0.0" revision commit))
(home-page "https://github.com/mfiano/mfiano-utils")
(home-page "https://github.com/lisp-mirror/golden-utils")
(source
(origin
(method git-fetch)
(uri (git-reference
(url home-page)
(commit commit)))
(file-name (git-file-name "golden-utils" version))
(file-name (git-file-name "cl-golden-utils" version))
(sha256
(base32 "1ljc8yj32lmd1d60446rzl9m0r1ar15gdzacsf6blw1kny8xlrsr"))))
(base32 "09vq29wjr3x7h3fshwxg8h1psy4p73yl61cjljarpqjhsgz7lmbp"))))
(build-system asdf-build-system/sbcl)
(inputs
(list sbcl-alexandria))
@ -1692,6 +1725,42 @@ (define-public ecl-re
(define-public cl-re
(sbcl-package->cl-source-package sbcl-re))
(define-public sbcl-boost-json
(let ((commit "eca166f5ff1f10bad14e00b9fd5bf9fcf3691a47")
(revision "0"))
(package
(name "sbcl-boost-json")
(version (git-version "1.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/cl-boost/json")
(commit commit)))
(file-name (git-file-name "cl-boost-json" version))
(sha256
(base32 "12k0470899qsll2qixksxf2vrhjmskk3nzp1di9k04n1b29nrakd"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:phases
(modify-phases %standard-phases
;; See <https://github.com/cl-boost/json/pull/2>.
(add-after 'unpack 'fix-decode-symbol
(lambda _
(substitute* '("decode.lisp" "encode.lisp")
(("formfeed") "page")))))))
(home-page "https://github.com/cl-boost/json")
(synopsis "JSON encoding and decoding for Common Lisp")
(description
"BOOST-JSON is a simple JSON parsing library for Common Lisp.")
(license license:asl2.0))))
(define-public cl-boost-json
(sbcl-package->cl-source-package sbcl-boost-json))
(define-public ecl-boost-json
(sbcl-package->ecl-package sbcl-boost-json))
(define-public sbcl-boost-parse
(let ((commit "c8f7e536b950752f3e35003e7ee0446e0fd51b50")
(revision "0"))
@ -2922,6 +2991,57 @@ (define-public cl-eager-future2
(define-public ecl-eager-future2
(sbcl-package->ecl-package sbcl-eager-future2))
(define-public sbcl-easy-routes
(let ((commit "7832f8bf3d07825b5eb967a2ef04da7c40c18248")
(revision "0"))
(package
(name "sbcl-easy-routes")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mmontone/easy-routes")
(commit commit)))
(file-name (git-file-name "cl-easy-routes" version))
(sha256
(base32 "1banw54kz2llzb9h5sm47ckfc9l348m7qncm0npsy0w837rxkyzx"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("easy-routes"
"easy-routes+djula"
"easy-routes+errors")))
(native-inputs
(list sbcl-stefil))
(inputs
(list sbcl-djula
sbcl-hunchentoot
sbcl-hunchentoot-errors
sbcl-routes))
(home-page "https://github.com/mmontone/easy-routes/")
(synopsis "Routes handling utility on top of Hunchentoot")
(description
"EASY-ROUTES is yet another routes handling system on top of
Hunchentoot. It's just glue code for Restas routing subsystem (CL-ROUTES).
It supports:
@itemize
@item dispatch based on HTTP method
@item arguments extraction from the url path
@item decorators
@item URL generation from route names
@end itemize
This package provides EASY-ROUTES, EASY-ROUTES+DJULA and EASY-ROUTES+ERRORS
systems.")
(license license:expat))))
(define-public cl-easy-routes
(sbcl-package->cl-source-package sbcl-easy-routes))
(define-public ecl-easy-routes
(sbcl-package->ecl-package sbcl-easy-routes))
(define-public sbcl-jpl-util
(let ((commit "0311ed374e19a49d43318064d729fe3abd9a3b62"))
(package
@ -3687,48 +3807,47 @@ (define-public ecl-pythonic-string-reader
(sbcl-package->ecl-package sbcl-pythonic-string-reader))
(define-public sbcl-slime-swank
(let ((commit "735258a26bb97e85d25f39e4bef83c1f80c12f5d")
(revision "1"))
(package
(name "sbcl-slime-swank")
(version (git-version "2.28" revision commit))
(source
(origin
(file-name (git-file-name "cl-slime-swank" version))
(method git-fetch)
(uri (git-reference
(url "https://github.com/slime/slime/")
(commit commit)))
(sha256
(base32 "0prskgzfqjmn8sc7p9nklnd0n1plwcvh40slgh23km31raplmzk7"))
(modules '((guix build utils)))
(snippet
;; The doc folder drags `gawk' into the closure. Doc is already
;; provided by emacs-slime.
`(begin
(delete-file-recursively "doc")
#t))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("swank" "swank/exts")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'set-fasl-directory
(lambda* (#:key outputs #:allow-other-keys)
(substitute* "swank-loader.lisp"
(("\\(probe-file fasl\\)" all)
;; Do not try to delete Guix store files.
(string-append
all "\n"
" (not (equal (subseq (pathname-directory fasl) 1 3)"
" '(\"gnu\" \"store\"))) ; XXX: GUIX PATCH"))))))))
(home-page "https://github.com/slime/slime")
(synopsis "Common Lisp Swank server")
(description
"This is only useful if you want to start a Swank server in a Lisp
;; Update together with emacs-slime.
(package
(name "sbcl-slime-swank")
(version "2.29.1")
(source
(origin
(file-name (git-file-name "cl-slime-swank" version))
(method git-fetch)
(uri (git-reference
(url "https://github.com/slime/slime/")
(commit (string-append "v" version))))
(sha256
(base32 "1fcasqsdfwsphkfx1vd3r5mr89vgvzb9g2dbw82mc9lijg1mr1ki"))
(modules '((guix build utils)))
(snippet
;; The doc folder drags `gawk' into the closure. Doc is already
;; provided by emacs-slime.
`(begin
(delete-file-recursively "doc")
#t))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-systems '("swank" "swank/exts")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'set-fasl-directory
(lambda* (#:key outputs #:allow-other-keys)
(substitute* "swank-loader.lisp"
(("\\(probe-file fasl\\)" all)
;; Do not try to delete Guix store files.
(string-append
all "\n"
" (not (equal (subseq (pathname-directory fasl) 1 3)"
" '(\"gnu\" \"store\"))) ; XXX: GUIX PATCH"))))))))
(home-page "https://github.com/slime/slime")
(synopsis "Common Lisp Swank server")
(description
"This is only useful if you want to start a Swank server in a Lisp
processes that doesn't run under Emacs. Lisp processes created by
@command{M-x slime} automatically start the server.")
(license (list license:gpl2+ license:public-domain)))))
(license (list license:gpl2+ license:public-domain))))
(define-public cl-slime-swank
(sbcl-package->cl-source-package sbcl-slime-swank))
@ -4279,6 +4398,36 @@ (define-public cl-string-match
(define-public ecl-cl-string-match
(sbcl-package->ecl-package sbcl-cl-string-match))
(define-public sbcl-cl-punch
(package
(name "sbcl-cl-punch")
(version "0.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/windymelt/cl-punch")
(commit (string-append "v" version))))
(file-name (git-file-name "cl-punch" version))
(sha256
(base32 "1vmbaz9y9lq4wvi8mfbyif8vc9yfk2i0qd3ysbzl152wx32dbzs3"))))
(build-system asdf-build-system/sbcl)
(native-inputs
(list sbcl-prove))
(inputs
(list sbcl-cl-syntax))
(home-page "https://github.com/windymelt/cl-punch")
(synopsis "Anonymous lambda literal in Common Lisp, respecting Scala")
(description
"CL-PUNCH is a Scala-like anonymous lambda literal.")
(license license:expat )))
(define-public cl-punch
(sbcl-package->cl-source-package sbcl-cl-punch))
(define-public ecl-cl-punch
(sbcl-package->ecl-package sbcl-cl-punch))
(define-public sbcl-puri
(let ((commit "4bbab89d9ccbb26346899d1f496c97604fec567b")
(revision "2"))
@ -4879,6 +5028,47 @@ (define-public cl-json
(define-public ecl-cl-json
(sbcl-package->ecl-package sbcl-cl-json))
(define-public sbcl-cl-json-pointer
(let ((commit "f6760e2a02972783f96b92a15f801e14a6828e0c")
(revision "0"))
(package
(name "sbcl-cl-json-pointer")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/y2q-actionman/cl-json-pointer")
(commit commit)))
(file-name (git-file-name "cl-json-pointer" version))
(sha256
(base32 "0b7a755wc2ghsd1pv7d32877b21h4nssp41xs017anbmj55czb2h"))))
(build-system asdf-build-system/sbcl)
(arguments
;; FIXME: Component "cl-json-pointer/test" not found.
`(#:tests? #f
#:asd-systems '("cl-json-pointer" "cl-json-pointer/synonyms")))
(inputs
(list sbcl-alexandria
sbcl-boost-json
sbcl-cl-json
sbcl-closer-mop
sbcl-st-json))
(home-page "https://github.com/y2q-actionman/cl-json-pointer")
(synopsis "JSON Pointer processor for Common Lisp")
(description "
This package provides a JSON
Pointer (@url{https://tools.ietf.org/html/rfc6901,RFC6901}) implementation for
Common Lisp. This libary aims to be independent from any JSON libraries (as much
as possible).")
(license license:expat))))
(define-public cl-json-pointer
(sbcl-package->cl-source-package sbcl-cl-json-pointer))
(define-public ecl-cl-json-poiniter
(sbcl-package->ecl-package sbcl-cl-json-pointer))
(define-public sbcl-unix-opts
(let ((commit "0e61f34b2ecf62288437810d4abb31e572048b04")
(revision "1"))
@ -6326,6 +6516,40 @@ (define-public ecl-hunchentoot
;; Tests fail on ECL with 'Socket error in "socket": EINVAL'.
'(#:tests? #f))))
(define-public sbcl-hunchentoot-errors
(let ((commit "69eb3bcea59ed1ccf3dd1960e6d48fb21f1dadab")
(revision "0"))
(package
(name "sbcl-hunchentoot-errors")
(version (git-version "0.0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mmontone/hunchentoot-errors")
(commit commit)))
(file-name (git-file-name "cl-hunchentoot-errors" version))
(sha256
(base32 "0fab7s8qhhs713cw014qqvzm5z61wmxm2fcbkarhg41cz3li9k1j"))))
(build-system asdf-build-system/sbcl)
(inputs
(list sbcl-cl-mimeparse
sbcl-hunchentoot
sbcl-parse-number
sbcl-string-case))
(home-page "https://github.com/mmontone/hunchentoot-errors/")
(synopsis "Hunchentoot error pages and logs with request and session information")
(description
"This package provides a functionality augmenting Hunchentoot error
pages and logs with request and session information.")
(license license:expat))))
(define-public cl-hunchentoot-errors
(sbcl-package->cl-source-package sbcl-hunchentoot-errors))
(define-public ecl-hunchentoot-errors
(sbcl-package->ecl-package sbcl-hunchentoot-errors))
(define-public sbcl-lunamech-matrix-api
(let ((commit "aa54a820149584c237b03d500ad83397fe25dc92")
(revision "0"))
@ -6910,6 +7134,96 @@ (define-public cl-http-body
(define-public ecl-http-body
(sbcl-package->ecl-package sbcl-http-body))
(define-public sbcl-ciel
(let ((commit "6cc1cef5e37e9f495c8163271a5de48de99f348a")
(revision "0"))
(package
(name "sbcl-ciel")
(version (git-version "0.1.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ciel-lang/CIEL")
(commit commit)))
(file-name (git-file-name "ciel" version))
(sha256
(base32 "1bwafbbsppxqvijf43dii55mpzrklh6faj2m5dhajg2f2m8qckgi"))))
(build-system asdf-build-system/sbcl)
(native-inputs
(list sbcl-fiveam))
(inputs
(list sbcl-access
sbcl-alexandria
sbcl-arrow-macros
sbcl-bordeaux-threads
sbcl-cl-ansi-text
sbcl-cl-ansi-text
sbcl-cl-cron
sbcl-cl-csv
sbcl-cl-json-pointer
sbcl-cl-ppcre
sbcl-cl-punch
sbcl-cl-reexport
sbcl-cl-str
sbcl-clesh
sbcl-clingon
sbcl-closer-mop
sbcl-cmd
sbcl-dbi
sbcl-defstar
sbcl-deploy
sbcl-dexador
sbcl-dissect
sbcl-easy-routes
sbcl-file-notify
sbcl-fn
sbcl-for
sbcl-fset
sbcl-generic-cl
sbcl-hunchentoot
sbcl-local-time
sbcl-log4cl
sbcl-lparallel
sbcl-lquery
sbcl-metabang-bind
sbcl-modf
sbcl-named-readtables
sbcl-nodgui
sbcl-parse-float
sbcl-parse-number
sbcl-printv
sbcl-pythonic-string-reader
sbcl-quicksearch
sbcl-quri
sbcl-repl-utilities
sbcl-serapeum
sbcl-shasht
sbcl-shlex
sbcl-spinneret
sbcl-sxql
sbcl-trivia
sbcl-trivial-arguments
sbcl-trivial-do
sbcl-trivial-monitored-thread
sbcl-trivial-package-local-nicknames
sbcl-trivial-types
sbcl-vgplot
sbcl-which))
(home-page "http://ciel-lang.org/")
(synopsis "CIEL Is an Extended Lisp")
(description
"CIEL is a ready-to-use collection of libraries providing: a binary, to
run CIEL scripts; a simple full-featured REPL for the terminal; a Lisp library
and a core image .")
(license license:expat))))
(define-public cl-ciel
(sbcl-package->cl-source-package sbcl-ciel))
(define-public ecl-ciel
(sbcl-package->ecl-package sbcl-ciel))
(define-public sbcl-circular-streams
(let ((commit "e770bade1919c5e8533dd2078c93c3d3bbeb38df")
(revision "1"))
@ -7367,21 +7681,21 @@ (define-public sbcl-clack
(sha256
(base32 "0sfmvqmsg9z13x0v77448rpdqgyprdq739nsbrjw9a28hv9jmkg9"))))
(build-system asdf-build-system/sbcl)
(inputs
`(("alexandria" ,sbcl-alexandria)
("bordeaux-threads" ,sbcl-bordeaux-threads)
("cl-fastcgi" ,sbcl-cl-fastcgi)
("flexi-streams" ,sbcl-flexi-streams)
("hunchentoot" ,sbcl-hunchentoot)
("lack" ,sbcl-lack)
("split-sequence" ,sbcl-split-sequence)
("usocket" ,sbcl-usocket)
("quri" ,sbcl-quri)))
(arguments
'(#:asd-systems '("clack"
"clack-handler-fcgi"
"clack-socket"
"clack-handler-hunchentoot")))
(inputs
(list sbcl-alexandria
sbcl-bordeaux-threads
sbcl-cl-fastcgi
sbcl-flexi-streams
sbcl-hunchentoot
sbcl-lack
sbcl-quri
sbcl-split-sequence
sbcl-usocket))
(home-page "https://github.com/fukamachi/clack")
(synopsis "Web Application Environment for Common Lisp")
(description
@ -7565,6 +7879,40 @@ (define-public ecl-verbose
(define-public cl-verbose
(sbcl-package->cl-source-package sbcl-verbose))
(define-public sbcl-vgplot
(let ((commit "76329928a3709387c0779175af56ec49d16bcd35")
(revision "0"))
(package
(name "sbcl-vgplot")
(version (git-version "0.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/volkers/vgplot")
(commit commit)))
(file-name (git-file-name "vgplot" version))
(sha256
(base32 "1vc5fd787xa8831wjbmwrpg17f9isi5k8dmb85fsysz47plbvi1y"))))
(build-system asdf-build-system/sbcl)
(native-inputs
(list sbcl-lisp-unit))
(inputs
(list sbcl-cl-fad sbcl-cl-ppcre sbcl-ltk))
(home-page "https://github.com/volkers/vgplot")
(synopsis "Common lisp library interfacing to the gnuplot utility")
(description
"This package provides an interface to the @code{gnuplot} plotting
utility. The intention of the API is to resemble to some of the plot commands
of octave or matlab.")
(license license:gpl3+))))
(define-public cl-vgplot
(sbcl-package->cl-source-package sbcl-vgplot))
(define-public ecl-vgplot
(sbcl-package->ecl-package sbcl-vgplot))
(define-public sbcl-find-port
(let ((commit "811727f88d7f000623bf92fdb0e64678a7112a28")
(revision "2"))
@ -8092,6 +8440,38 @@ (define-public cl-trivial-utf-8
(define-public ecl-trivial-utf-8
(sbcl-package->ecl-package sbcl-trivial-utf-8))
(define-public sbcl-trivial-utilities
(let ((commit "279ff255562628196942632c543d91c357067221")
(revision "0"))
(package
(name "sbcl-trivial-utilities")
(version (git-version "0.4.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.com/ediethelm/trivial-utilities")
(commit commit)))
(file-name (git-file-name "trivial-utilities" version))
(sha256
(base32 "0k1xmn5f5dik7scadw0vyy67mik4ypnfqbhlv2vsg9afxzbpx2dz"))))
(build-system asdf-build-system/sbcl)
(inputs
(list sbcl-alexandria sbcl-iterate sbcl-closer-mop))
(home-page "https://gitlab.com/ediethelm/trivial-utilities")
(synopsis "Collection of useful types, functions and macros for Common Lisp")
(description
"This package provides a collection of types, functions and macros. Some
of the functionality is implemented from Graham's On Lisp and Seibel's Practical
Common Lisp.")
(license license:expat))))
(define-public cl-trivial-utilities
(sbcl-package->cl-source-package sbcl-trivial-utilities))
(define-public ecl-trivial-utilities
(sbcl-package->ecl-package sbcl-trivial-utilities))
(define-public sbcl-idna
(package
(name "sbcl-idna")
@ -10190,6 +10570,38 @@ (define-public cl-rutils
(define-public ecl-rutils
(sbcl-package->ecl-package sbcl-rutils))
(define-public sbcl-arrow-macros
;; The latest upstream version tag is dated (pushed in 2020), use the latest
;; commit instead.
(let ((commit "16bdfd31298182099c7d70df4598104e5a38b05e")
(revision "0"))
(package
(name "sbcl-arrow-macros")
(version (git-version "0.2.7" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hipeta/arrow-macros")
(commit commit)))
(file-name (git-file-name "arrow-macros" version))
(sha256
(base32 "0q4vpysk4h9ghs5zmnzzilky9jyz7i8n0x0p98nq528crbrkh6c4"))))
(build-system asdf-build-system/sbcl)
(native-inputs (list sbcl-fiveam))
(home-page "https://github.com/hipeta/arrow-macros/")
(synopsis "Clojure-like arrow macros in Common Lisp")
(description
"Arrow-macros provides clojure-like arrow macros (ex. ->, ->>) and diamond wands
in swiss-arrows.")
(license license:expat))))
(define-public cl-arrow-macros
(sbcl-package->cl-source-package sbcl-arrow-macros))
(define-public ecl-arrow-macros
(sbcl-package->ecl-package sbcl-arrow-macros))
(define-public sbcl-arrows
(let ((commit "df7cf0067e0132d9697ac8b1a4f1b9c88d4f5382")
(revision "0"))
@ -12426,11 +12838,11 @@ (define-public cl-svg
(sbcl-package->cl-source-package sbcl-cl-svg))
(define-public sbcl-nodgui
(let ((commit "6baccf45371afd4dcc8cd3f38332b300614783b6")
(let ((commit "35fd379e11162995ed48c2f8ebe6a5bf0a6f48cb")
(revision "1"))
(package
(name "sbcl-nodgui")
(version (git-version "0.4.8.6" revision commit))
(version (git-version "0.6.0.2" revision commit))
(source
(origin
(method git-fetch)
@ -12439,7 +12851,7 @@ (define-public sbcl-nodgui
(commit commit)))
(file-name (git-file-name "cl-nodgui" version))
(sha256
(base32 "0fjz8362qmvkbzj9ylyllkdxg7vvj38l3y5qn4xi2gim92x4lx67"))))
(base32 "01l1hyzf8ryc35ydrjhqjn4az8asdwn46knl5gx8v02z2jcv7j24"))))
(build-system asdf-build-system/sbcl)
(inputs
(list sbcl-alexandria
@ -12451,8 +12863,11 @@ (define-public sbcl-nodgui
sbcl-esrap
sbcl-jpeg-turbo
sbcl-named-readtables
sbcl-cl-opengl
sbcl-parse-number
sbcl-pngload
sbcl-sdl2
sbcl-zpng
tk
tklib))
(arguments
@ -16653,7 +17068,7 @@ (define-public ecl-static-dispatch
(define-public sbcl-cl-form-types
(package
(name "sbcl-cl-form-types")
(version "0.3.1")
(version "0.3.2")
(source
(origin
(method git-fetch)
@ -16663,7 +17078,7 @@ (define-public sbcl-cl-form-types
(file-name (git-file-name name version))
(sha256
(base32
"17kdjqmm2ib347b8lqm3k4kca2j53kr0azb6h7m0v5i157ibndsw"))))
"0k4j657vfh4zblp9a7d3z15r82yyz4fzqh8vfn2s7ljsj1dmhp2n"))))
(build-system asdf-build-system/sbcl)
(inputs
(list sbcl-agutil
@ -16691,7 +17106,15 @@ (define-public cl-form-types
(sbcl-package->cl-source-package sbcl-cl-form-types))
(define-public ecl-cl-form-types
(sbcl-package->ecl-package sbcl-cl-form-types))
(let ((pkg (sbcl-package->ecl-package sbcl-cl-form-types)))
(package
(inherit pkg)
(arguments
;; FIXME: Syntax error in declaration (TYPE T (FORM &KEY STRICT
;; EXPAND-COMPILER-MACROS (TEST (QUOTE FORM-TYPE=))))
;; An error occurred during initialization: COMPILE-FILE-ERROR while...
;; See <https://github.com/alex-gutev/cl-form-types/issues/22>.
'(#:tests? #f)))))
(define-public sbcl-generic-cl
(package
@ -16708,21 +17131,21 @@ (define-public sbcl-generic-cl
(base32
"1c40vqb49g0adfv17jxgk0ds1n6a2dph30cibq01sicmqdgrrbi8"))))
(build-system asdf-build-system/sbcl)
(inputs
`(("agutil" ,sbcl-agutil)
("alexandria" ,sbcl-alexandria)
("anaphora" ,sbcl-anaphora)
("arrows" ,sbcl-arrows)
("cl-custom-hash-table" ,sbcl-custom-hash-table)
("cl-form-types" ,sbcl-cl-form-types)
("static-dispatch" ,sbcl-static-dispatch)
("trivia" ,sbcl-trivia)))
(native-inputs
(list sbcl-prove))
(arguments
;; Tests fail because SBCL head size is not high enough.
;; https://github.com/alex-gutev/generic-cl/issues/6
`(#:tests? #f))
(inputs
(list sbcl-agutil
sbcl-alexandria
sbcl-anaphora
sbcl-arrows
sbcl-cl-form-types
sbcl-custom-hash-table
sbcl-static-dispatch
sbcl-trivia))
(native-inputs
(list sbcl-prove))
(home-page "https://alex-gutev.github.io/generic-cl/")
(synopsis "Generic function interface to standard Common Lisp functions")
(description "@code{generic-cl} provides a generic function wrapper over
@ -16786,12 +17209,9 @@ (define-public sbcl-deploy
(base32 "07pfkibaridihg8lbq2czwa4iqifqk24n6rx7bfnv7i49p1ppja1"))))
(build-system asdf-build-system/sbcl)
(native-inputs
`(("cl-mpg123" ,sbcl-cl-mpg123)
("cl-out123" ,sbcl-cl-out123)))
(list sbcl-cl-mpg123 sbcl-cl-out123))
(inputs
`(("cffi" ,sbcl-cffi)
("documentation-utils" ,sbcl-documentation-utils)
("trivial-features" ,sbcl-trivial-features)))
(list sbcl-cffi sbcl-documentation-utils sbcl-trivial-features))
(home-page "https://shinmera.github.io/deploy/")
(synopsis "Deployment tools for standalone Common Lisp application")
(description
@ -19105,37 +19525,39 @@ (define-public cl-tooter
(sbcl-package->cl-source-package sbcl-tooter))
(define-public sbcl-croatoan
(package
(name "sbcl-croatoan")
(version "0.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/McParen/croatoan")
(commit (string-append "v" version))))
(file-name (git-file-name "cl-croatoan" version))
(sha256
(base32 "0x2rlckyn8kn5mqy0fib8piggz694g3naarz2dvha1hsy4jhb1wg"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "ncurses/ncurses.lisp"
(("libncursesw.so")
(search-input-file inputs "/lib/libncursesw.so"))))))))
(inputs
(list ncurses
sbcl-cffi
sbcl-trivial-gray-streams
sbcl-bordeaux-threads))
(synopsis "Common Lisp bindings for the ncurses terminal library")
(description "Croatoan provides high-level Common Lisp CLOS bindings for
(let ((commit "282145ff9e9005fddc4241bc6827b3ab09c5bd25")
(revision "1"))
(package
(name "sbcl-croatoan")
(version (git-version "2.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/McParen/croatoan")
(commit commit)))
(file-name (git-file-name "cl-croatoan" version))
(sha256
(base32 "021h2f2yj4j9gynr3k7qi36x94jm5b95p3vaddbaih96wyzgbmq5"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "ncurses/ncurses.lisp"
(("libncursesw.so")
(search-input-file inputs "/lib/libncursesw.so"))))))))
(inputs
(list ncurses
sbcl-cffi
sbcl-trivial-gray-streams
sbcl-bordeaux-threads))
(synopsis "Common Lisp bindings for the ncurses terminal library")
(description "Croatoan provides high-level Common Lisp CLOS bindings for
the ncurses terminal library.")
(home-page "https://github.com/McParen/croatoan")
(license license:expat)))
(home-page "https://github.com/McParen/croatoan")
(license license:expat))))
(define-public ecl-croatoan
(sbcl-package->ecl-package sbcl-croatoan))
@ -20289,6 +20711,41 @@ (define-public ecl-cl-mime
(define-public cl-mime
(sbcl-package->cl-source-package sbcl-cl-mime))
(define-public sbcl-cl-mimeparse
(let ((commit "93cbdf6f6fe8a2eb5f652f8adec453eb98ea0547")
(revision "0"))
(package
(name "sbcl-cl-mimeparse")
(version (git-version "0.0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mmontone/cl-mimeparse")
(commit commit)))
(file-name (git-file-name "cl-mimeparse" version))
(sha256
(base32 "0gdkpi3620va0a3q56svcn1q9f5w0pqfhx30lnldg8fjnrdfiwkk"))))
(build-system asdf-build-system/sbcl)
(arguments
'(#:asd-test-systems '("cl-mimeparse-tests")))
(native-inputs
(list sbcl-rt))
(inputs
(list sbcl-cl-ppcre sbcl-parse-number))
(home-page "https://github.com/mmontone/cl-mimeparse/")
(synopsis "Common Lisp library for parsing MIME types")
(description
"This package provides a library for parsing MIME types, in the spirit
of http://code.google.com/p/mimeparse/, with a Common Lisp flavor.")
(license license:expat))))
(define-public cl-mimeparse
(sbcl-package->cl-source-package sbcl-cl-mimeparse))
(define-public ecl-cl-mimeparse
(sbcl-package->ecl-package sbcl-cl-mimeparse))
(define-public sbcl-cl-mixed
(let ((commit "4aaff134d3902d93a2a8605c10de4bcfc62d7afa")
(revision "0"))
@ -21245,6 +21702,39 @@ (define-public ecl-trivial-main-thread
(define-public cl-trivial-main-thread
(sbcl-package->cl-source-package sbcl-trivial-main-thread))
(define-public sbcl-trivial-monitored-thread
(let ((commit "b0bab23f9a9bd06f0f33809635c7ba4e6a3d5a21")
(revision "0"))
(package
(name "sbcl-trivial-monitored-thread")
(version (git-version "0.3.11" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.com/ediethelm/trivial-monitored-thread")
(commit commit)))
(file-name (git-file-name "trivial-monitored-thread" version))
(sha256
(base32 "1ipnp2l944hc587bifxsnmiymw468imar0v8bqvgxv8pc5sym4ib"))))
(build-system asdf-build-system/sbcl)
(native-inputs
(list sbcl-fiveam))
(inputs
(list sbcl-iterate sbcl-log4cl sbcl-trivial-utilities))
(home-page "https://gitlab.com/ediethelm/trivial-monitored-thread")
(synopsis "Thread monitoring library for Common Lisp")
(description
"Trivial Monitored Thread offers a very simple (aka trivial) way of
spawning threads and being informed when one any of them crash and die.")
(license license:expat))))
(define-public cl-trivial-monitored-thread
(sbcl-package->cl-source-package sbcl-trivial-monitored-thread))
(define-public ecl-trivial-monitored-thread
(sbcl-package->ecl-package sbcl-trivial-monitored-thread))
(define-public sbcl-moira
(let ((commit "21f1cfd5942fcaea2ed2e4f6055b2a5a39ac4c6e")
(revision "0"))
@ -21506,24 +21996,23 @@ (define-public sbcl-woo
;; clack-test and dexador.
`(#:tests? #f))
(native-inputs
`(("clack" ,sbcl-clack)
("rove" ,sbcl-rove)))
(list sbcl-clack sbcl-rove))
(inputs
`(("alexandria" ,sbcl-alexandria)
("bordeaux-threads" ,sbcl-bordeaux-threads)
("cffi" ,sbcl-cffi)
("cl-speedy-queue" ,sbcl-cl-speedy-queue) ;; Required for ecl build
("clack-socket" ,sbcl-clack)
("fast-http" ,sbcl-fast-http)
("fast-io" ,sbcl-fast-io)
("lev" ,sbcl-lev)
("quri" ,sbcl-quri)
("rove" ,sbcl-rove)
("smart-buffer" ,sbcl-smart-buffer)
("static-vectors" ,sbcl-static-vectors)
("swap-bytes" ,sbcl-swap-bytes)
("trivial-utf-8" ,sbcl-trivial-utf-8)
("vom" ,sbcl-vom)))
(list sbcl-alexandria
sbcl-bordeaux-threads
sbcl-cffi
sbcl-cl-speedy-queue ;; Required for ecl build
sbcl-clack
sbcl-fast-http
sbcl-fast-io
sbcl-lev
sbcl-quri
sbcl-rove
sbcl-smart-buffer
sbcl-static-vectors
sbcl-swap-bytes
sbcl-trivial-utf-8
sbcl-vom))
(home-page "https://github.com/fukamachi/woo")
(synopsis "Non-blocking HTTP server based on libev")
(description
@ -22084,8 +22573,8 @@ (define-public cl-glfw3
(sbcl-package->cl-source-package sbcl-cl-glfw3))
(define-public sbcl-cl-gltf
(let ((commit "dab186ebf9169926ccfcdec121a157162ad6ed83")
(revision "0"))
(let ((commit "7a3af05a7f491d8973b217f096806ef12a97474b")
(revision "1"))
(package
(name "sbcl-cl-gltf")
(version (git-version "2.0.0" revision commit))
@ -22097,7 +22586,7 @@ (define-public sbcl-cl-gltf
(commit commit)))
(file-name (git-file-name "cl-gltf" version))
(sha256
(base32 "0ijy0paph7w037a2k14pv8j44mnj4gwhddhxzyqsz3qwl6fpb7yb"))))
(base32 "1d64fg2l2c0wns3wpp1xypd8687gnp3k70fv9fb48m1kpzg4kvrh"))))
(build-system asdf-build-system/sbcl)
(arguments
;; No tests provided.
@ -22124,6 +22613,8 @@ (define-public sbcl-cl-gltf
;; initialization: COMPILE-FILE-ERROR while compiling #<cl-source-file
;; "trivial-extensible-sequences" "fallback">.
;;
;; See <https://github.com/Shirakumo/cl-gltf/issues/3>
;;
;; (define-public ecl-cl-gltf
;; (sbcl-package->ecl-package sbcl-cl-gltf))

View file

@ -1003,7 +1003,7 @@ (define man-for-txr
(define-public txr
(package
(name "txr")
(version "293")
(version "294")
(source
(origin
(method git-fetch)
@ -1012,7 +1012,7 @@ (define-public txr
(commit (string-append "txr-" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1b3vhlnw4ymznnlh9d71qhkcdc1p69a53hilckc3rql9y4jsik57"))))
(base32 "0cd0ah6lzwszn4jjxrbwknhscdm6rgsprpiybzlikcckgcylpkdn"))))
(build-system gnu-build-system)
(arguments
(list #:configure-flags

View file

@ -0,0 +1,83 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages llvm-meta)
#:use-module (guix utils)
#:export (clang-compiler-cpu-architectures))
(define (clang-compiler-cpu-architectures version)
"Return package properties for Clang VERSION."
`((compiler-cpu-architectures
;; These lists were obtained by running:
;;
;; guix shell clang -- llc -march=x86-64 -mattr=help
;;
;; and then filtering against clang/test/Misc/target-invalid-cpu-note.c
("powerpc64le"
,@(if (version>=? version "11.0")
'("power8" "power9" "power10" "powerpc64le")))
("x86_64"
,@(cond
((version>=? version "17.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "raptorlake" "meteorlake" "sierraforest" "grandridge"
"graniterapids" "graniterapids-d" "emeraldrapids" "knl" "knm" "k8"
"athlon64" "athlon-fx" "opteron" "k8-sse3" "athlon64-sse3"
"opteron-sse3" "amdfam10" "barcelona" "btver1" "btver2" "bdver1"
"bdver2" "bdver3" "bdver4" "znver1" "znver2" "znver3" "znver4"
"x86-64" "x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "16.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "raptorlake" "meteorlake" "sierraforest" "grandridge"
"graniterapids" "emeraldrapids" "knl" "knm" "k8" "athlon64"
"athlon-fx" "opteron" "k8-sse3" "athlon64-sse3" "opteron-sse3"
"amdfam10" "barcelona" "btver1" "btver2" "bdver1" "bdver2"
"bdver3" "bdver4" "znver1" "znver2" "znver3" "znver4" "x86-64"
"x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "13.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "knl" "knm" "k8" "athlon64" "athlon-fx" "opteron"
"k8-sse3" "athlon64-sse3" "opteron-sse3" "amdfam10" "barcelona"
"btver1" "btver2" "bdver1" "bdver2" "bdver3" "bdver4" "znver1"
"znver2" "znver3" "x86-64" "x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "9.0")
'("atom" "silvermont" "slm" "goldmont" "goldmont-plus" "tremont"
"nehalem" "corei7" "westmere" "sandybridge" "corei7-avx"
"ivybridge" "core-avx-i" "haswell" "core-avx2" "broadwell"
"skylake" "skylake-avx512" "skx" "cascadelake" "cooperlake"
"cannonlake" "icelake-client" "icelake-server" "knl" "knm" "k8"
"athlon64" "athlon-fx" "opteron" "k8-sse3" "athlon64-sse3"
"opteron-sse3" "amdfam10" "barcelona" "btver1" "btver2" "bdver1"
"bdver2" "bdver3" "bdver4" "znver1" "znver2" "x86-64"))
(else '()))))))

View file

@ -7,7 +7,7 @@
;;; Copyright © 2017 Roel Janssen <roel@gnu.org>
;;; Copyright © 20182022 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018, 2021-2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2018, 2021-2023 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2018 Tim Gesthuizen <tim.gesthuizen@yahoo.de>
;;; Copyright © 2018 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2019 Rutger Helling <rhelling@mykolab.com>
@ -65,6 +65,7 @@ (define-module (gnu packages llvm)
#:use-module (gnu packages compression)
#:use-module (gnu packages libedit)
#:use-module (gnu packages libffi)
#:use-module (gnu packages llvm-meta)
#:use-module (gnu packages lua)
#:use-module (gnu packages mpi)
#:use-module (gnu packages ncurses)
@ -79,8 +80,7 @@ (define-module (gnu packages llvm)
#:use-module (srfi srfi-1)
#:use-module (ice-9 match)
#:export (make-lld-wrapper
system->llvm-target
clang-properties))
system->llvm-target))
(define* (system->llvm-target #:optional
(system (or (and=> (%current-target-system)
@ -481,73 +481,7 @@ (define* (clang-from-llvm llvm clang-runtime
(define (clang-properties version)
"Return package properties for Clang VERSION."
`((compiler-cpu-architectures
("powerpc64le"
;; This list was obtained from clang/test/Misc/target-invalid-cpu-note.c
;; and then trimmed down.
,@(if (version>=? version "11.0")
'("power8" "power9" "power10" "powerpc64le")))
("x86_64"
;; This list was obtained from clang/test/Misc/target-invalid-cpu-note.c
,@(cond
((version>=? version "17.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "raptorlake" "meteorlake" "sierraforest" "grandridge"
"graniterapids" "graniterapids-d" "emeraldrapids" "knl" "knm" "k8"
"athlon64" "athlon-fx" "opteron" "k8-sse3" "athlon64-sse3"
"opteron-sse3" "amdfam10" "barcelona" "btver1" "btver2" "bdver1"
"bdver2" "bdver3" "bdver4" "znver1" "znver2" "znver3" "znver4"
"x86-64" "x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "16.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "raptorlake" "meteorlake" "sierraforest" "grandridge"
"graniterapids" "emeraldrapids" "knl" "knm" "k8" "athlon64"
"athlon-fx" "opteron" "k8-sse3" "athlon64-sse3" "opteron-sse3"
"amdfam10" "barcelona" "btver1" "btver2" "bdver1" "bdver2"
"bdver3" "bdver4" "znver1" "znver2" "znver3" "znver4" "x86-64"
"x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "15.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "knl" "knm" "k8" "athlon64" "athlon-fx" "opteron"
"k8-sse3" "athlon64-sse3" "opteron-sse3" "amdfam10" "barcelona"
"btver1" "btver2" "bdver1" "bdver2" "bdver3" "bdver4" "znver1"
"znver2" "znver3" "x86-64" "x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "13.0")
'("nocona" "core2" "penryn" "bonnell" "atom" "silvermont" "slm"
"goldmont" "goldmont-plus" "tremont" "nehalem" "corei7" "westmere"
"sandybridge" "corei7-avx" "ivybridge" "core-avx-i" "haswell"
"core-avx2" "broadwell" "skylake" "skylake-avx512" "skx"
"cascadelake" "cooperlake" "cannonlake" "icelake-client"
"rocketlake" "icelake-server" "tigerlake" "sapphirerapids"
"alderlake" "knl" "knm" "k8" "athlon64" "athlon-fx" "opteron"
"k8-sse3" "athlon64-sse3" "opteron-sse3" "amdfam10" "barcelona"
"btver1" "btver2" "bdver1" "bdver2" "bdver3" "bdver4" "znver1"
"znver2" "znver3" "x86-64" "x86-64-v2" "x86-64-v3" "x86-64-v4"))
((version>=? version "9.0")
'("atom" "silvermont" "slm" "goldmont" "goldmont-plus" "tremont"
"nehalem" "corei7" "westmere" "sandybridge" "corei7-avx"
"ivybridge" "core-avx-i" "haswell" "core-avx2" "broadwell"
"skylake" "skylake-avx512" "skx" "cascadelake" "cooperlake"
"cannonlake" "icelake-client" "icelake-server" "knl" "knm" "k8"
"athlon64" "athlon-fx" "opteron" "k8-sse3" "athlon64-sse3"
"opteron-sse3" "amdfam10" "barcelona" "btver1" "btver2" "bdver1"
"bdver2" "bdver3" "bdver4" "znver1" "znver2" "x86-64"))
(else '()))))))
`((clang-compiler-cpu-architectures version)))
(define-public (make-clang-toolchain clang libomp)
(package
@ -616,7 +550,8 @@ (define %llvm-patches
'(("14.0.6" . ("clang-14.0-libc-search-path.patch"))
("15.0.7" . ("clang-15.0-libc-search-path.patch"))
("16.0.6" . ("clang-16.0-libc-search-path.patch"))
("17.0.6" . ("clang-17.0-libc-search-path.patch"))))
("17.0.6" . ("clang-17.0-libc-search-path.patch"
"clang-17.0-link-dsymutil-latomic.patch"))))
(define (llvm-monorepo version)
(origin

View file

@ -26,6 +26,7 @@
(define-module (gnu packages logging)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix gexp)
#:use-module (guix packages)
#:use-module (guix utils)
#:use-module (guix download)
@ -227,10 +228,12 @@ (define-public spdlog
;; TODO run benchmark. Currently not possible, as adding
;; (gnu packages benchmark) forms a dependency cycle
(arguments
'(#:configure-flags
(list "-DSPDLOG_BUILD_BENCH=OFF"
"-DSPDLOG_BUILD_SHARED=ON"
"-DSPDLOG_BUILD_TESTS=ON")))
(list #:configure-flags
#~(list "-DSPDLOG_BUILD_BENCH=OFF"
"-DSPDLOG_BUILD_SHARED=ON"
#$@(if (%current-target-system)
'()
'("-DSPDLOG_BUILD_TESTS=ON")))))
(native-inputs (list catch2-3))
(home-page "https://github.com/gabime/spdlog")
(synopsis "Fast C++ logging library")

View file

@ -2331,13 +2331,13 @@ (define-public python-hyperopt
(define-public python-deepxde
(package
(name "python-deepxde")
(version "1.10.1")
(version "1.11.0")
(source (origin
(method url-fetch)
(uri (pypi-uri "DeepXDE" version))
(sha256
(base32
"1lgn4sa9bnmhsccddb9vjz7nsvdnccxqkvv7xssxmfb413dpg1mz"))))
"0qx6iq8n2j8ab80bs2n85v8g6xi2bnq83vfiaj7a4nsmf62rhkzg"))))
(build-system pyproject-build-system)
(arguments
(list #:tests? #f ; there are no tests
@ -4246,6 +4246,61 @@ (define-public python-pytorch
Note: currently this package does not provide GPU support.")
(license license:bsd-3)))
(define-public python-pytorch2
(package
(inherit python-pytorch)
(name "python-pytorch")
(version "2.2.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/pytorch/pytorch")
(commit (string-append "v" version))
(recursive? #t)))
(file-name (git-file-name name version))
(sha256
(base32
"0hdr0d6n072qd0nq2dkxhc9pva6vggj9hpzc0glpc60vfgk0cgzb"))
(patches (search-patches "python-pytorch2-system-libraries.patch"
"python-pytorch-runpath.patch"))
(modules '((guix build utils)))
(snippet
'(begin
;; XXX: Let's be clear: this package is a bundling fest. We
;; delete as much as we can, but there's still a lot left.
(for-each (lambda (directory)
(delete-file-recursively
(string-append "third_party/" directory)))
'("benchmark" "cpuinfo" "eigen"
;; FIXME: QNNPACK (of which XNNPACK is a fork)
;; needs these.
;; "FP16" "FXdiv" "gemmlowp" "psimd"
"gloo" "googletest" "ios-cmake" "NNPACK"
"onnx" "protobuf" "pthreadpool"
"pybind11" "python-peachpy"
"tbb" "XNNPACK" "zstd"))
(substitute* "caffe2/CMakeLists.txt"
(("target_link_libraries\\(\\$\\{test_name\\}_\\$\\{CPU_CAPABILITY\\} c10 sleef gtest_main\\)")
"target_link_libraries(${test_name}_${CPU_CAPABILITY} c10 sleef gtest gtest_main)"))
(substitute* "functorch/CMakeLists.txt"
(("\\$\\{_rpath_portable_origin\\}/../torch/lib")
"$ORIGIN/../torch/lib"))))))
(inputs
(modify-inputs (package-inputs python-pytorch)
(replace "xnnpack" xnnpack-for-torch2)))
(propagated-inputs
(modify-inputs (package-propagated-inputs python-pytorch)
(append python-filelock
python-fsspec
python-jinja2
python-networkx
python-opt-einsum
python-sympy)
(replace "onnx" onnx-for-torch2)
(replace "onnx-optimizer" onnx-optimizer-for-torch2)))))
(define-public python-pytorch-for-r-torch
(package
(inherit python-pytorch)

View file

@ -1,5 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019 Leo Famulari <leo@famulari.name>
;;; Copyright © 2024 normally_js <normally_js@posteo.net>
;;; Copyright © 2024 Sharlatan Hellseher <sharlatanus@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -17,12 +19,13 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages magic-wormhole)
#:use-module (guix packages)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system pyproject)
#:use-module ((guix build-system python) #:select (pypi-uri))
#:use-module (guix download)
#:use-module (guix licenses)
#:use-module (guix build-system python)
#:use-module (guix gexp)
#:use-module (guix packages)
#:use-module (gnu packages check)
#:use-module (gnu packages python-check)
#:use-module (gnu packages python-crypto)
#:use-module (gnu packages python-web)
#:use-module (gnu packages python-xyz))
@ -32,24 +35,15 @@ (define-public magic-wormhole-mailbox-server
(name "magic-wormhole-mailbox-server")
(version "0.4.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "magic-wormhole-mailbox-server" version))
(sha256
(base32
"1yw8i8jv5iv1kkz1aqimskw7fpichjn6ww0fq0czbalwj290bw8s"))))
(build-system python-build-system)
(arguments
'(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-tests
(lambda _
;; This test requires network access.
(substitute* "src/wormhole_mailbox_server/test/test_web.py"
(("test_log_http") "disabled_test_log_http"))
#t)))))
(origin
(method url-fetch)
(uri (pypi-uri "magic-wormhole-mailbox-server" version))
(sha256
(base32
"1yw8i8jv5iv1kkz1aqimskw7fpichjn6ww0fq0czbalwj290bw8s"))))
(build-system pyproject-build-system)
(native-inputs
(list python-mock))
(list python-mock python-pytest))
(propagated-inputs
(list python-attrs
python-autobahn
@ -58,79 +52,77 @@ (define-public magic-wormhole-mailbox-server
python-six
python-treq
python-twisted))
(home-page "https://github.com/warner/magic-wormhole-mailbox-server")
(home-page "https://github.com/magic-wormhole/magic-wormhole-mailbox-server")
(synopsis "Magic-Wormhole central mailbox server")
(description "This package provides the main server that Magic-Wormhole
clients connect to. The server performs store-and-forward delivery for small
(description
"This package provides the main server that Magic-Wormhole clients
connect to. The server performs store-and-forward delivery for small
key-exchange and control messages. Bulk data is sent over a direct TCP
connection, or through a transit-relay.")
(license expat)))
(license license:expat)))
(define-public magic-wormhole-transit-relay
(package
(name "magic-wormhole-transit-relay")
(version "0.2.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "magic-wormhole-transit-relay" version))
(sha256
(base32
"0ppsx2s1ysikns1h053x67z2zmficbn3y3kf52bzzslhd2s02j6b"))))
(build-system python-build-system)
(origin
(method url-fetch)
(uri (pypi-uri "magic-wormhole-transit-relay" version))
(sha256
(base32
"0ppsx2s1ysikns1h053x67z2zmficbn3y3kf52bzzslhd2s02j6b"))))
(build-system pyproject-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'install 'install-docs
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(docs (string-append out "/share/doc/magic-wormhole-transit-relay")))
(for-each (lambda (file)
(install-file file docs))
(find-files "docs/"))
#t))))))
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'install-docs
(lambda _
(let* ((out #$output)
(docs (string-append out "/share/doc/magic-wormhole-transit-relay")))
(for-each (lambda (file)
(install-file file docs))
(find-files "docs/"))))))))
(native-inputs
(list python-mock python-pyflakes python-tox))
(list python-mock python-pytest))
(propagated-inputs
(list python-twisted))
(home-page
"https://github.com/warner/magic-wormhole-transit-relay")
(home-page "https://github.com/magic-wormhole/magic-wormhole-transit-relay")
(synopsis "Magic-Wormhole relay server")
(description "This package provides the Magic-Wormhole Transit Relay
server, which helps clients establish bulk-data transit connections even when
both are behind NAT boxes. Each side makes a TCP connection to this server and
(description
"This package provides the Magic-Wormhole Transit Relay server, which
helps clients establish bulk-data transit connections even when both are
behind NAT boxes. Each side makes a TCP connection to this server and
presents a handshake. Two connections with identical handshakes are glued
together, allowing them to pretend they have a direct connection.")
(license expat)))
(license license:expat)))
(define-public magic-wormhole
(package
(name "magic-wormhole")
(version "0.12.0")
(version "0.13.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "magic-wormhole" version))
(sha256
(base32
"0q41j99718y7m95zg1vaybnsp31lp6lhyqkbv4yqz5ys6jixh3qv"))))
(build-system python-build-system)
(origin
(method url-fetch)
(uri (pypi-uri "magic-wormhole" version))
(sha256
(base32
"05hm5pnrxli69a28h3pbgx6s6pwy8279l506kha7y3i7hs1dcfxc"))))
(build-system pyproject-build-system)
(arguments
'(#:phases
(modify-phases %standard-phases
;; XXX I can't figure out how to build the docs properly.
;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=34515#101
(add-after 'install 'install-docs
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(man (string-append out "/share/man/man1")))
(install-file "docs/wormhole.1" man))
#t)))))
(list
#:phases
#~(modify-phases %standard-phases
;; XXX I can't figure out how to build the docs properly.
;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=34515#101
(add-after 'install 'install-docs
(lambda _
(install-file "docs/wormhole.1"
(string-append #$output "/share/man/man1")))))))
(native-inputs
(list python-mock
;; XXX These are required for the test suite but end up being referenced
;; by the built package.
;; https://bugs.gnu.org/25235
python-pytest
magic-wormhole-mailbox-server
magic-wormhole-transit-relay))
(propagated-inputs
@ -138,22 +130,24 @@ (define-public magic-wormhole
python-click
python-hkdf
python-humanize
python-noiseprotocol
python-pynacl
python-spake2
python-tqdm
python-twisted
python-txtorcon))
(home-page "https://github.com/warner/magic-wormhole")
(home-page "https://github.com/magic-wormhole/magic-wormhole")
(synopsis "Securely transfer data between computers")
(description "Magic-Wormhole is a library and a command-line tool named
wormhole, which makes it possible to securely transfer arbitrary-sized files and
(description
"Magic-Wormhole is a library and a command-line tool named wormhole,
which makes it possible to securely transfer arbitrary-sized files and
directories (or short pieces of text) from one computer to another. The two
endpoints are identified by using identical \"wormhole codes\": in general, the
sending machine generates and displays the code, which must then be typed into
the receiving machine.
endpoints are identified by using identical \"wormhole codes\": in general,
the sending machine generates and displays the code, which must then be typed
into the receiving machine.
The codes are short and human-pronounceable, using a phonetically-distinct
wordlist. The receiving side offers tab-completion on the codewords, so usually
only a few characters must be typed. Wormhole codes are single-use and do not
need to be memorized.")
(license expat)))
wordlist. The receiving side offers tab-completion on the codewords, so
usually only a few characters must be typed. Wormhole codes are single-use
and do not need to be memorized.")
(license license:expat)))

View file

@ -54,6 +54,7 @@
;;; Copyright © 2023 Timo Wilken <guix@twilken.net>
;;; Copyright © 2023 Arjan Adriaanse <arjan@adriaan.se>
;;; Copyright © 2023 Wilko Meyer <w@wmeyer.eu>
;;; Copyright © 2024 Benjamin Slade <slade@lambda-y.net>
;;;
;;; This file is part of GNU Guix.
;;;
@ -1214,14 +1215,14 @@ (define-public emacs-mew
(define-public mu
(package
(name "mu")
(version "1.10.8")
(version "1.12.2")
(source
(origin
(method url-fetch)
(uri (string-append "https://github.com/djcb/mu/releases/download/v"
version "/mu-" version ".tar.xz"))
(sha256
(base32 "129m6rz8vbd7370c3h3ma66bxqdkm6wsdix5qkmv1vm7sanxh4bb"))))
(base32 "065nqrsz5bpvhniaacfq67fh78m5pm96svingdviw2hj1y21s6kv"))))
(build-system meson-build-system)
(native-inputs
(list pkg-config
@ -1229,7 +1230,7 @@ (define-public mu
gnupg ; for tests
texinfo))
(inputs
(list glib gmime guile-3.0 xapian))
(list glib gmime guile-3.0 xapian readline python))
(arguments
(list
#:modules '((guix build meson-build-system)
@ -1244,13 +1245,13 @@ (define-public mu
(add-after 'unpack 'patch-bin-references
(lambda _
(substitute* '("guile/tests/test-mu-guile.cc"
"mu/tests/test-mu-cmd.cc"
"mu/tests/test-mu-cmd-cfind.cc"
"mu/tests/test-mu-query.cc")
(("/bin/sh") (which "sh")))
(substitute* '("lib/tests/bench-indexer.cc"
"lib/utils/mu-test-utils.cc")
(("/bin/rm") (which "rm")))))
(("/bin/rm") (which "rm")))
(substitute* '("lib/mu-maildir.cc")
(("/bin/mv") (which "mv")))))
(add-after 'install 'fix-ffi
(lambda _
(substitute* (find-files #$output "mu.scm")
@ -2642,13 +2643,13 @@ (define-public procmail
(define-public khard
(package
(name "khard")
(version "0.18.0")
(version "0.19.1")
(source (origin
(method url-fetch)
(uri (pypi-uri name version))
(sha256
(base32
"05860fdayqap128l7i6bcmi9kdyi2gx02g2pmh88d56xgysd927y"))))
"1464j728hjjpzlc89v4rbml3p4b38zp1igjd9yq3xnn3lc6hmwsr"))))
(build-system python-build-system)
(arguments
`(#:phases

View file

@ -10,7 +10,7 @@
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2021 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2022, 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2022 Imran Iqbal <imran@imraniqbal.org>
;;;
;;; This file is part of GNU Guix.
@ -219,6 +219,51 @@ (define-public man-db
the traditional flat-text whatis databases.")
(license license:gpl2+)))
(define-public man2html
(package
(name "man2html")
(version "1.6g-16")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://salsa.debian.org/debian/man2html")
(commit (string-append "debian/" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1cxm8b2x4cjmyidi4gfz9q29zrhaxhbnsiqcmlnyr1bdhjsmk786"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ;no test suite
;; The source include a man page viewer as well as the man2html
;; converter. We're only interested in the converter, so we specify the
;; explicit 'manhtml' target.
#:make-flags #~(list (string-append "bindir=" #$output "/bin")
"manhtml")
#:phases #~(modify-phases %standard-phases
(replace 'configure
(lambda _
(setenv "CC" #$(cc-for-target))
(invoke "./configure"
(string-append "-prefix=" #$output))))
(add-before 'install 'chdir
(lambda _
(chdir "man2html")))
(replace 'install
;; This is needed because the 'manhtml' top level target
;; doesn't exist in man2html/Makefile.
(lambda* (#:key make-flags #:allow-other-keys
#:rest args)
(apply (assoc-ref %standard-phases 'install)
`(,@args #:make-flags
,(delete "manhtml" make-flags))))))))
(home-page "https://salsa.debian.org/debian/man2html")
(synopsis "Man pages to HTML format converter")
(description "@command{man2html} is a command-line tool for converting man
pages into HTML format.")
(license license:gpl2+)))
(define-public mandoc
(package
(name "mandoc")

View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019-2023 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2019-2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2021 Taiju HIGASHI <higashi@taiju.info>
;;;
@ -24,6 +24,7 @@ (define-module (gnu packages mastodon)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix build-system meson)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system python)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages)
@ -37,6 +38,7 @@ (define-module (gnu packages mastodon)
#:use-module (gnu packages gtk)
#:use-module (gnu packages image)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python-build)
#:use-module (gnu packages python-check)
#:use-module (gnu packages python-crypto)
#:use-module (gnu packages python-web)
@ -47,14 +49,14 @@ (define-module (gnu packages mastodon)
(define-public toot
(package
(name "toot")
(version "0.38.1")
(version "0.42.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "toot" version))
(sha256
(base32 "1cn646jzys9vjaw20sxmgzc7zq5a5ma8vabvrw9zpa0yl9wm97my"))))
(build-system python-build-system)
(base32 "1vw3j504dxmq22s40kysps3d09hl7l48cwznwrfr9zqif67i4v3g"))))
(build-system pyproject-build-system)
(arguments
'(#:phases
(modify-phases %standard-phases
@ -64,12 +66,17 @@ (define-public toot
(add-installed-pythonpath inputs outputs)
(invoke "py.test")))))))
(native-inputs
(list python-psycopg2 python-pytest))
(list python-psycopg2-binary
python-pytest
python-pyyaml
python-typing-extensions))
(inputs
(list python-beautifulsoup4
python-tomlkit
python-click
python-requests
python-tomlkit
python-urwid
python-urwidgets
python-wcwidth))
(home-page "https://github.com/ihabunek/toot/")
(synopsis "Mastodon CLI client")

View file

@ -3515,7 +3515,8 @@ (define-public petsc
data structures and routines for the scalable (parallel) solution of
scientific applications modeled by partial differential equations.")
(license (license:non-copyleft
"https://www.mcs.anl.gov/petsc/documentation/copyright.html"))))
"https://www.mcs.anl.gov/petsc/documentation/copyright.html"))
(properties '((tunable? . #t)))))
(define-public petsc-complex
(package
@ -7135,16 +7136,21 @@ (define-public hypre
(lambda _
(invoke "make" "-C" "docs")))
(replace 'check
(lambda _
(setenv "LD_LIBRARY_PATH" (string-append (getcwd) "/hypre/lib"))
(setenv "PATH" (string-append "." ":" (getenv "PATH")))
(invoke "make" "check" "CHECKRUN=")
(for-each (lambda (filename)
(let ((size (stat:size (stat filename))))
(when (positive? size)
(error (format #f "~a size ~d; error indication~%"
filename size)))))
(find-files "test" ".*\\.err$"))))
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(setenv "LD_LIBRARY_PATH"
(string-append (getcwd) "/hypre/lib"))
(setenv "PATH"
(string-append "." ":"
(getenv "PATH")))
(invoke "make" "check" "CHECKRUN=")
(for-each (lambda (filename)
(let ((size (stat:size (stat filename))))
(when (positive? size)
(error (format #f
"~a size ~d; error indication~%"
filename size)))))
(find-files "test" ".*\\.err$")))))
(add-after 'install 'install-docs
(lambda* (#:key outputs #:allow-other-keys)
;; Custom install because docs/Makefile doesn't honor ${docdir}.
@ -8069,7 +8075,7 @@ (define-public combinatorial-blas
".tgz"))
(sha256
(base32
"1a9wbgdqyy1whhfc0yl0yqkax3amnqa6iihhq48d063gc0jwfd9a"))
"0gzxgd2ybnh49h57rh47vrqnsyk11jn206j5kf9y7p5vksc79ffz"))
(patches (search-patches "combinatorial-blas-awpm.patch"
"combinatorial-blas-io-fix.patch"))))
(build-system cmake-build-system)
@ -8088,6 +8094,12 @@ (define-public combinatorial-blas
#:parallel-tests? #f ;tests use 'mpiexec -n4'
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-tests
(lambda _
;; Skip failing tests (SIGFPE and SIGSEGV).
(substitute* "ReleaseTests/CMakeLists.txt"
(("^.*SpAsgnTest.*$") "")
(("^.*IndexingTest.*$") ""))))
(add-before 'check 'mpi-setup
,%openmpi-setup)
(add-before 'check 'test-setup

View file

@ -10,7 +10,7 @@
;;; Copyright © 2016 Alex Griffin <a@ajgrf.com>
;;; Copyright © 2017 nikita <nikita@n0.is>
;;; Copyright © 2017 Rodger Fox <thylakoid@openmailbox.org>
;;; Copyright © 20172023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 20172024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2017, 2018, 2019, 2021 Pierre Langlois <pierre.langlois@gmx.com>
;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 20172022 Tobias Geerinckx-Rice <me@tobias.gr>
@ -54,6 +54,7 @@
;;; Copyright © 2023 Antero Mejr <antero@mailbox.org>
;;; Copyright © 2023, 2024 Sharlatan Hellseher <sharlatanus@gmail.com>
;;; Copyright © 2023 Yovan Naumovski <yovan@gorski.stream>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -867,7 +868,7 @@ (define-public dumb-allegro4
(define-public hydrogen
(package
(name "hydrogen")
(version "1.2.0")
(version "1.2.3")
(source
(origin
(method git-fetch)
@ -876,7 +877,7 @@ (define-public hydrogen
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0v4ir1my8zndw5rvz6jr42ysprwycgxrlsc53070y3620n699nha"))))
(base32 "0qb16yn3igs95silvngwy5mjwlzsyz5axwbd3lz6pjhwbf81rn7d"))))
(build-system cmake-build-system)
(arguments
`(#:test-target "tests"
@ -1508,7 +1509,7 @@ (define-public ninjas2
(define-public lilypond
(package
(name "lilypond")
(version "2.24.1")
(version "2.24.3")
(source
(origin
(method url-fetch)
@ -1516,7 +1517,7 @@ (define-public lilypond
"v" (version-major+minor version) "/"
"lilypond-" version ".tar.gz"))
(sha256
(base32 "028m31fjcfgsq3f8ahz4hp2r36shsvkq1fjjibqdcp2aas3r1ifm"))))
(base32 "1gj4xjc9842wnqvqj08lkykpz2r72mqqw3x1fk6s9xbsxxv5y06z"))))
(build-system gnu-build-system)
(arguments
(list #:tests? #f ;out-test/collated-files.html fails
@ -3040,38 +3041,63 @@ (define-public portmidi
using a system-independent interface.")
(license license:expat)))
(define-public python-pyportmidi
(define-public portmidi-2
(package
(name "python-pyportmidi")
(version (package-version portmidi))
(source (package-source portmidi))
(build-system python-build-system)
(name "portmidi")
(version "2.0.4")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/PortMidi/portmidi")
(commit "b808babecdc5d05205467dab5c1006c5ac0fdfd4")))
(sha256
(base32 "05a3dfpgbpcg08p8a3acjrrd1qy5hvvray2kz2asygy1vf3mx85s"))
(file-name (git-file-name name version))))
(build-system cmake-build-system)
(arguments
`(#:tests? #f ; no tests included
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'enter-dir
(lambda _ (chdir "pm_python") #t))
(add-after 'enter-dir 'fix-setup.py
(lambda _
(substitute* "setup.py"
;; Use Python 3 syntax
(("print (\".*\")" _ text)
(string-append "print(" text ")\n"))
;; TODO.txt and CHANGES.txt don't exist
(("CHANGES =.*") "CHANGES = \"\"\n")
(("TODO =.*") "TODO = \"\"\n"))
#t)))))
(inputs
(list portmidi alsa-lib))
(native-inputs
(list python-cython unzip))
(home-page "https://portmedia.sourceforge.net/portmidi/")
(synopsis "Python bindings to PortMidi")
`(#:tests? #f ;Tests are interactive and can be found in the
#:configure-flags ;pm_tests/ directory of the build tree.
(list "-DBUILD_PORTMIDI_TESTS=On")
#:phases (modify-phases %standard-phases
(add-after 'unpack 'fix-version
(lambda _
(substitute* "CMakeLists.txt"
(("2.0.3")
(version))))))))
(inputs (list alsa-lib))
(native-inputs (list unzip))
(home-page "https://github.com/PortMidi/")
(synopsis "Library for MIDI I/O")
(description
"This package provides Python bindings to the PortMidi library.")
"PortMidi is a library supporting real-time input and output of MIDI data
using a system-independent interface.")
(license license:expat)))
(define-public python-pyportmidi
(let ((commit "d9e5ee00b208b09618fa0d4a5bbce3c9c077b386")
(revision "0"))
(package
(name "python-pyportmidi")
(version (git-version "0.0.7" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/PortMidi/pm_python")
(commit commit)))
(sha256
(base32 "1jvp9na8d1hw46w9ybhkimbavfb3ysw7hp30cbk6dj40k5y5vgvz"))
(file-name (git-file-name name version))))
(build-system python-build-system)
(inputs (list portmidi-2 alsa-lib))
(native-inputs (list python-cython))
(home-page "https://github.com/PortMidi")
(synopsis "Python bindings to PortMidi")
(description
"This package provides Python bindings to the PortMidi library.")
(license license:expat))))
(define-public frescobaldi
(package
(name "frescobaldi")
@ -3080,32 +3106,39 @@ (define-public frescobaldi
(origin
(method url-fetch)
(uri (string-append
"https://github.com/wbsoft/frescobaldi/releases/download/v"
"https://github.com/frescobaldi/frescobaldi/releases/download/v"
version "/frescobaldi-" version ".tar.gz"))
(sha256
(base32 "1n60gfnf6x0l1bac088g9adzx0lskbl9knd4y1ynr3y0zcs0kfcz"))))
(build-system python-build-system)
(arguments
(list
#:tests? #f ;no tests included
#:phases
#~(modify-phases %standard-phases
(add-before 'build 'generate-translations
(lambda _
(invoke "make" "-C" "i18n")))
(add-before 'build 'generate-metadata
(lambda _
(invoke "make" "-C" "linux"))))))
(inputs
(list lilypond
poppler
portmidi
python-ly
python-poppler-qt5
python-pyportmidi
python-pyqt
python-sip
qpageview))
#:tests? #f ;no tests included
#:phases #~(modify-phases %standard-phases
(add-before 'build 'generate-translations
(lambda _
(invoke "make" "-C" "i18n")))
(add-before 'build 'generate-metadata
(lambda _
(invoke "make" "-C" "linux")))
(add-after 'install 'wrap-executable
(lambda _
;; Ensure that icons are found at runtime.
(wrap-program (string-append #$output
"/bin/frescobaldi")
`("QT_PLUGIN_PATH" prefix
,(list (getenv "QT_PLUGIN_PATH")))))))))
(inputs (list bash-minimal
lilypond
poppler
portmidi-2
python-ly
python-poppler-qt5
python-pyportmidi
python-pyqt
python-sip
qpageview
qtsvg-5))
(home-page "https://www.frescobaldi.org/")
(synopsis "LilyPond sheet music text editor")
(description
@ -5015,7 +5048,7 @@ (define-public sfizz
(define-public musescore
(package
(name "musescore")
(version "4.1.1")
(version "4.2.1")
(source
(origin
(method git-fetch)
@ -5024,7 +5057,7 @@ (define-public musescore
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "12h26k9qnsq027gdpch579nchwrqva1ymwm2fj5xmlh0aayrwy4d"))
(base32 "0rc5ma1k0cjllfl86apbyj61sh0691lsmqnvqicyn0zi53z8w9v0"))
(modules '((guix build utils)))
(snippet
'(begin
@ -5157,7 +5190,7 @@ (define-public muse-sequencer
(define-public gsequencer
(package
(name "gsequencer")
(version "6.1.3")
(version "6.5.2")
(source
(origin
(method git-fetch)
@ -5166,7 +5199,7 @@ (define-public gsequencer
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1h5zw9047qmhhc6n4ny11id1h1p8322wadl7p8j65bwrz8kbfx99"))))
(base32 "16rkwb60v7igixligkcm86l8l8vab1bhmwg8m7ihb051ryqixa3i"))))
(build-system glib-or-gtk-build-system)
(arguments
`(#:phases
@ -5252,7 +5285,7 @@ (define-public dssi
(define-public rosegarden
(package
(name "rosegarden")
(version "23.06")
(version "23.12")
(source
(origin
(method url-fetch)
@ -5260,7 +5293,7 @@ (define-public rosegarden
(version-major+minor version) "/"
"rosegarden-" version ".tar.xz"))
(sha256
(base32 "1k3j5p6lx3w6pbsh95xiyfj8g8ysmvd18v0wmx7kdb3vyj5mfd0z"))))
(base32 "0clkzrs931dypvqcn5hzx2v3bq9gc439g71phahgwkh4c1jfcmrz"))))
(build-system cmake-build-system)
(arguments
(list
@ -7214,22 +7247,27 @@ (define-public a2jmidid
(uri (git-reference
(url "https://github.com/jackaudio/a2jmidid")
(commit version)))
(modules '((guix build utils)))
(snippet
;; Fix build for for riscv64-linux, same as:
;; https://github.com/jackaudio/a2jmidid/pull/18
'(substitute* "sigsegv.c"
(("!defined[(]__aarch64__[)]")
"!defined(__arch64__) && !defined(__riscv)")))
(sha256
(base32 "1x6rcl3f4nklnx4p5jln9a7fpj9y7agjxs9rw7cccmwnski7pnsq"))
(file-name (git-file-name name version))))
(arguments
`(#:tests? #f ; No tests.
#:phases
(modify-phases %standard-phases
(add-after 'install 'wrap-programs
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin/")))
(substitute* (string-append bin "a2j")
(("a2j_control") (string-append bin "a2j_control")))
(wrap-program (string-append bin "a2j_control")
`("PYTHONPATH" prefix (,(getenv "GUIX_PYTHONPATH"))))
#t))))))
(list #:tests? #f ; No tests.
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'wrap-programs
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((bin (string-append #$output "/bin/")))
(substitute* (string-append bin "a2j")
(("a2j_control") (string-append bin "a2j_control")))
(wrap-program (string-append bin "a2j_control")
`("PYTHONPATH" prefix (,(getenv "GUIX_PYTHONPATH"))))))))))
(build-system meson-build-system)
(inputs
(list alsa-lib

246
gnu/packages/nx.scm Normal file
View file

@ -0,0 +1,246 @@
;;; This file is part of GNU Guix.
;;; Copyright © 2024 Nicolas Debonnaire <nicolas.debonnaire@gmail.com>
;;; Copyright © 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;;
;;; 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 nx)
#:use-module (guix build-system gnu)
#:use-module (guix download)
#:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (gnu packages autotools)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
#:use-module (gnu packages commencement)
#:use-module (gnu packages cups)
#:use-module (gnu packages glib)
#:use-module (gnu packages gtk)
#:use-module (gnu packages image)
#:use-module (gnu packages man)
#:use-module (gnu packages onc-rpc)
#:use-module (gnu packages openldap)
#:use-module (gnu packages patchutils)
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages pulseaudio)
#:use-module (gnu packages python)
#:use-module (gnu packages qt)
#:use-module (gnu packages ssh)
#:use-module (gnu packages xdisorg)
#:use-module (gnu packages xml)
#:use-module (gnu packages xorg))
(define-public nx-libs
(package
(name "nx-libs")
(version "3.5.99.27")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ArcticaProject/nx-libs")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0ykbza39ksycpyydaiwwbp7hkmdk96v7b36pn989k39lhfwnn8kz"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ;no test suite
;; The build randomly fails when run in parallel (see:
;; https://github.com/ArcticaProject/nx-libs/issues/1072).
#:parallel-build? #f
#:make-flags #~(let ((sh (search-input-file %build-inputs "bin/sh")))
(list (string-append "PREFIX=" #$output)
(string-append "ETCDIR_NX=" #$output "/etc")
(string-append "LOCAL_LDFLAGS=-Wl,"
"-rpath=" #$output "/lib,"
"-rpath=" #$output "/lib/nx/X11")
(string-append "IMAKE_DEFINES=-DUseTIRPC=1"
" -DBourneShell=" sh
" -DProjectRoot=" #$output
" -DDefaultUserPath="
#$output "/bin")
(string-append "CONFIG_SHELL=" sh)
(string-append "SHELL=" sh)
;; Autoreconf being run by Make, the generated
;; configure script shebangs thus haven't been
;; patched; workaround this by running explicitly
;; via the shell.
(string-append "CONFIGURE=" sh " ./configure "
"--prefix=" #$output)
"VERBOSE=1"))
#:phases #~(modify-phases %standard-phases
(delete 'configure)
(add-before 'build 'adjust-Makefile
(lambda _
;; It's best to source a script via its absolute path,
;; otherwise it's looked from PATH and fails for POSIX
;; shells, such as our Bash-provided 'sh' (see:
;; https://github.com/ArcticaProject/nx-libs/issues/1071).
(substitute* "Makefile"
(("\\. replace.sh")
". ./replace.sh"))))
(add-after 'install 'wrap-nxdialog
(lambda* (#:key inputs #:allow-other-keys)
(wrap-program (string-append #$output "/bin/nxdialog")
`("GUIX_PYTHONPATH" =
(,(getenv "GUIX_PYTHONPATH")))
;; Ensure GObject Introspection typelibs are found.
`("GI_TYPELIB_PATH" ":" =
(,(getenv "GI_TYPELIB_PATH")))))))))
(native-inputs
(list autoconf
automake
bash-minimal ;for wrap-program
font-util
gccmakedep
imake
libtool
perl
pkg-config
quilt
which))
(inputs
(list gtk+
libjpeg-turbo
libtirpc
libxcomposite
libxdamage
libxext
libxfont
libxinerama
libxml2
libxpm
libxrandr
libxtst
pixman
python-pygobject
python-wrapper
xkbcomp))
(propagated-inputs
(list libpng)) ;in Requires of nxcomp.pc
(synopsis "NX X11 protocol compression libraries")
(description "NX is a software suite which implements very efficient
compression of the X11 protocol. This increases performance when using X
applications over a network, especially a slow one. This package provides the
following libraries:
@table @code
@item NX_X11
NX's modified X Window System (X11) library
@item Xcomp
NX differential compression library for X11
@item Xcompshad
Session shadowing library
@end table
The following commands are also provided:
@table @command
@item nxagent
Agent providing NX transport of X sessions
@item nxproxy
The NX proxy (client) binary
@item nxdialog
Helper script
@end table")
(home-page "https://github.com/ArcticaProject/nx-libs")
(license license:gpl2)))
(define-public x2goclient
(package
(name "x2goclient")
(version "4.1.2.3")
(source
(origin
(method url-fetch)
(uri (string-append
"https://code.x2go.org/releases/source/x2goclient/x2goclient-"
version ".tar.gz"))
(sha256
(base32 "0g6aba8kpsixq4486a8mga945lp31y0mzwa2krs5qqiiip3v72xb"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ;no test suite
#:make-flags
#~(list (string-append "SHELL="
(search-input-file %build-inputs "bin/bash"))
"QT_VERSION=5"
"INSTALL_DIR=install -d -m 755"
"INSTALL_FILE=install -m 644"
"INSTALL_PROGRAM=install -m 755"
(string-append "PREFIX=" #$output)
(string-append "ETCDIR=" #$output "/etc"))
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(add-before 'build 'patch-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/onmainwindow.cpp"
(("/usr/sbin/sshd")
(search-input-file inputs "sbin/sshd"))))))))
(native-inputs
(list man2html
pkg-config
qtbase-5
qttools-5))
(inputs
(list cups
libssh
libxpm
nx-libs
openldap
openssh
pulseaudio
qtbase-5
qtx11extras
qtsvg-5))
(synopsis "Remote desktop and application solution")
(description
"X2Go enables you to access a graphical desktop of a computer via
SSH (Secure Shell). This package provides the X2Go Client, which can connect
to the X2Go Server. Basic features of X2Go include:
@itemize
@item
Graphical remote desktop that works well over both low bandwidth and high
bandwidth connections
@item
The ability to disconnect and reconnect to a session, even from another
client
@item
Support for sound
@item
Support for as many simultaneous users as the computer's resources will
allow
@item
Traffic is securely tunneled over SSH
@item
File sharing from client to server
@item
Printer sharing from client to server
@item
Easily select from multiple desktop environments (e.g., MATE, GNOME, KDE)
@item
Remote support possible via desktop sharing
@item
The ability to access single applications by specifying the name of the
desired executable in the client configuration or selecting one of the
pre-defined common applications.
@end itemize")
(home-page "https://wiki.x2go.org/doku.php")
(license license:gpl2)))

View file

@ -4,7 +4,7 @@
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Alex Vong <alexvong1995@gmail.com>
;;; Copyright © 2021, 2024 Andy Tai <atai@atai.org>
;;; Copyright © 2021, 2022 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2021, 2022, 2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;;
;;; This file is part of GNU Guix.
@ -210,7 +210,7 @@ (define-public tesseract-ocr-4
(define-public gimagereader
(package
(name "gimagereader")
(version "3.4.1")
(version "3.4.2")
(source
(origin
(method url-fetch)
@ -219,7 +219,7 @@ (define-public gimagereader
"/download/v" version "/"
"gimagereader-" version ".tar.xz"))
(sha256
(base32 "1972bvnk2bkgbh70vy2prcmdzf4wlna862p2vja9yjxi2c0scmwc"))))
(base32 "0r52j5q2d0mvzw6qkds6vrapcqhdgyj2jvp7bh8w9zw6gpjsyk0q"))))
(build-system cmake-build-system)
(arguments
(list

View file

@ -176,8 +176,8 @@ (define-public guix
;; Note: the 'update-guix-package.scm' script expects this definition to
;; start precisely like this.
(let ((version "1.4.0")
(commit "aeb494322ca9dec4a4d66a7d063239c8536bd538")
(revision 16))
(commit "4c94b9e983bc51d9504655f1e7727c4f6d14b6b7")
(revision 18))
(package
(name "guix")
@ -193,7 +193,7 @@ (define-public guix
(commit commit)))
(sha256
(base32
"1xl769lkpvkjpvq4vwkxm4dp77sr9finvr6izvf4kvyi6s3hbsys"))
"19lqlfafs5mrnciw4jz4iccx5zzhj4pyb20bz6cdqcqbf9nmkfp1"))
(file-name (string-append "guix-" version "-checkout"))))
(build-system gnu-build-system)
(arguments
@ -991,8 +991,8 @@ (define-public rpm
(license license:gpl2+)))
(define-public bffe
(let ((commit "006b96a9ff41f5d8e639f93f81eeab87d204bd89")
(revision "4"))
(let ((commit "bdfaab91e82d7d43c35405da3b18c46cde8096de")
(revision "5"))
(package
(name "bffe")
(version (git-version "0" revision commit))
@ -1003,7 +1003,7 @@ (define-public bffe
(commit commit)))
(sha256
(base32
"1ai3dzwp5ddn5i7xzvg0qcj0nbip03jx0d3vhvxqr1vnlr71rzvh"))
"0qwnd49apwdx8wrfms2spii1kdg5ashf4591kyfyr89070jjmpa7"))
(file-name (string-append name "-" version "-checkout"))))
(build-system gnu-build-system)
(native-inputs
@ -1530,8 +1530,8 @@ (define-public gwl/next
"0k9zkdyyzir3fvlbcfcqy17k28b51i20rpbjwlx2i1mwd2pw9cxc")))))))
(define-public guix-build-coordinator
(let ((commit "1c80525d21f183ed2556def6fcd021f6ea9a88a4")
(revision "98"))
(let ((commit "14e18eed98d1836662d8787d08f7a37cf8c2f69d")
(revision "100"))
(package
(name "guix-build-coordinator")
(version (git-version "0" revision commit))
@ -1542,7 +1542,7 @@ (define-public guix-build-coordinator
(commit commit)))
(sha256
(base32
"0krw4v04ynp8v12zgc87cx6d3rldr13b48kix9rzq4z17x7f39yc"))
"1vv1l6y80ymqi7qz70bfq4is4y1xh21jm4d4gapn63931ac4fiij"))
(file-name (string-append name "-" version "-checkout"))))
(build-system gnu-build-system)
(arguments
@ -1779,8 +1779,8 @@ (define-public guix-jupyter
(license license:gpl3+)))
(define-public nar-herder
(let ((commit "5ccd6cbbdf5fc41e43a491d3414c1663e1fba64d")
(revision "23"))
(let ((commit "ccef906e8ee1f370850734f1e66fcc164ffd5dd7")
(revision "24"))
(package
(name "nar-herder")
(version (git-version "0" revision commit))
@ -1791,7 +1791,7 @@ (define-public nar-herder
(commit commit)))
(sha256
(base32
"1lid5k4wgghl9lzhazx1c473qv18yxp0xxrvj04b33pdvxnaawl8"))
"1aw7maa1a5f1mjb9akf6c4wg40p0cz85lpxi3pv4wdq2k3zvbgky"))
(file-name (string-append name "-" version "-checkout"))))
(build-system gnu-build-system)
(arguments

View file

@ -12,7 +12,7 @@
;;; Copyright © 20172021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017 Jelle Licht <jlicht@fsfe.org>
;;; Copyright © 2017, 2019 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2017, 2020-2022 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2017, 2020-2022, 2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2017 Manolis Fragkiskos Ragkousis <manolis837@gmail.com>
;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2018, 2022 Marius Bakke <marius@gnu.org>
@ -149,7 +149,7 @@ (define-public pwgen
(define-public keepassxc
(package
(name "keepassxc")
(version "2.7.6")
(version "2.7.7")
(source
(origin
(method url-fetch)
@ -157,7 +157,7 @@ (define-public keepassxc
"/releases/download/" version "/keepassxc-"
version "-src.tar.xz"))
(sha256
(base32 "0w6nh2lnzfqcxasfsppmh4q309p1flzgfiv25hahzsd8kx879055"))))
(base32 "0rzfh8xdsd1r0xb7yb0h2zyzwhbsp7si8c0haaqgzcz4k2p4bz2q"))))
(build-system qt-build-system)
(arguments
(list
@ -425,7 +425,7 @@ (define-public shroud
(define-public ssh-to-age
(package
(name "ssh-to-age")
(version "1.1.2")
(version "1.1.7")
(source
(origin
(method git-fetch)
@ -434,7 +434,7 @@ (define-public ssh-to-age
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "09rhga9iqmyyq8pkprydy8y15qhzqvbpgzvs681rcyllf8szrj73"))))
(base32 "134gpbalyll238wvj9ci0rascgm4csayz863ci99cy5qq8266wrl"))))
(build-system go-build-system)
(arguments
'(#:import-path "github.com/Mic92/ssh-to-age/cmd/ssh-to-age"
@ -443,7 +443,7 @@ (define-public ssh-to-age
go-filippo-io-edwards25519
go-filippo-io-age))
(home-page "https://github.com/Mic92/ssh-to-age")
(synopsis "Convert SSH @code{ed25519} keys to @code{age} keys.")
(synopsis "Convert SSH @code{ed25519} keys to @code{age} keys")
(description "This package provides a simple command-line tool to
convert SSH @code{ed25519} keys to @code{age} keys.")
(license license:expat)))

View file

@ -0,0 +1,14 @@
This was mistakenly added to llvm-17 while a patch was being rebased.
---
diff --git a/llvm/tools/dsymutil/CMakeLists.txt b/llvm/tools/dsymutil/CMakeLists.txt
index 3cb88a50ce25..8699d0bb1d6b 100644
--- a/llvm/tools/dsymutil/CMakeLists.txt
+++ b/llvm/tools/dsymutil/CMakeLists.txt
@@ -42,4 +42,4 @@ if(APPLE)
target_link_libraries(dsymutil PRIVATE "-framework CoreFoundation")
endif(APPLE)
-# target_link_libraries(dsymutil PRIVATE ${LLVM_ATOMIC_LIB})
+target_link_libraries(dsymutil PRIVATE ${LLVM_ATOMIC_LIB})

View file

@ -0,0 +1,81 @@
Upstream status: submitted to bug-libextractor@gnu.org.
From 1fc6daaeaf829fb941a176831c011888a73c43b9 Mon Sep 17 00:00:00 2001
From: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Date: Mon, 11 Mar 2024 09:36:26 -0400
Subject: [PATCH] html_extractor: Add support for modern tidy-html.
* configure.ac: Use PKG_PROG_PKG_CONFIG to initialize pkg-config detection.
<tidy>: Check for library via pkg-config.
* src/plugins/html_extractor.c: Standardize tidy include file names.
---
configure.ac | 28 +++++++++-------------------
src/plugins/html_extractor.c | 4 ++--
2 files changed, 11 insertions(+), 21 deletions(-)
diff --git a/configure.ac b/configure.ac
index d17ff39..e89d70c 100644
--- a/configure.ac
+++ b/configure.ac
@@ -176,6 +176,8 @@ AS_CASE(["$target_os"],
AM_ICONV
+PKG_PROG_PKG_CONFIG()
+
# We define the paths here, because MinGW/GCC expands paths
# passed through the command line ("-DLOCALEDIR=..."). This would
# lead to hard-coded paths ("C:\mingw\mingw\bin...") that do
@@ -424,25 +426,13 @@ AC_CHECK_LIB(magic, magic_open,
AM_CONDITIONAL(HAVE_MAGIC, false))],
AM_CONDITIONAL(HAVE_MAGIC, false))
-AC_MSG_CHECKING(for tidyNodeGetValue -ltidy)
-AC_LANG_PUSH(C++)
-SAVED_LIBS=$LIBS
-LIBS="$LIBS -ltidy"
-AC_LINK_IFELSE(
- [AC_LANG_PROGRAM([[#include <tidy/tidy.h>]],
- [[ Bool b = tidyNodeGetValue (NULL, NULL, NULL); ]])],
- [AC_MSG_RESULT(yes)
- AM_CONDITIONAL(HAVE_TIDY, true)
- AC_DEFINE(HAVE_TIDY,1,[Have tidyNodeGetValue in libtidy])],
- [AC_MSG_RESULT(no)
- AM_CONDITIONAL(HAVE_TIDY, false)])
-LIBS=$SAVED_LIBS
-AC_LANG_POP(C++)
-
-# restore LIBS
-LIBS=$LIBSOLD
-
-
+dnl tidyNodeGetValue was already available in 5.0.0, released in 2015.
+PKG_CHECK_MODULES([TIDY], [tidy >= 5.0.0],
+ [AC_DEFINE(HAVE_TIDY, 1, [Have tidy])
+ AM_CONDITIONAL(HAVE_TIDY, true)],
+ [AM_CONDITIONAL(HAVE_TIDY, false)])
+CFLAGS="$CFLAGS $TIDY_CFLAGS"
+LIBS="$LIBS $TIDY_LIBS"
# should 'make check' run tests?
AC_MSG_CHECKING(whether to run tests)
diff --git a/src/plugins/html_extractor.c b/src/plugins/html_extractor.c
index 5ebf97b..88100d3 100644
--- a/src/plugins/html_extractor.c
+++ b/src/plugins/html_extractor.c
@@ -26,8 +26,8 @@
#include "platform.h"
#include "extractor.h"
#include <magic.h>
-#include <tidy/tidy.h>
-#include <tidy/tidybuffio.h>
+#include <tidy.h>
+#include <tidybuffio.h>
/**
* Mapping of HTML META names to LE types.
base-commit: a75f40b64b5868967c95ea214e8eaac4f7088b23
--
2.41.0

View file

@ -0,0 +1,334 @@
From f0698133e7d6c353a3e6ae0fc62e57ba558a9bc0 Mon Sep 17 00:00:00 2001
From: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Date: Wed, 28 Oct 2020 22:55:05 -0400
Subject: [PATCH] Skip problematic Python 3 tests in Guix.
A subset of the hunks in this patch is tracked upstream at
https://bugs.python.org/issue38845, which was contributed by Tanguy Le
Carrour <tanguy@bioneland.org>.
diff --git a/Lib/test/_test_multiprocessing.py b/Lib/test/_test_multiprocessing.py
index e42c7ab4bd..8087c84dab 100644
--- a/Lib/test/_test_multiprocessing.py
+++ b/Lib/test/_test_multiprocessing.py
@@ -1695,6 +1695,7 @@ def _test_wait_result(cls, c, pid):
if pid is not None:
os.kill(pid, signal.SIGINT)
+ @unittest.skipIf(True, "This fails for unknown reasons on Guix")
def test_wait_result(self):
if isinstance(self, ProcessesMixin) and sys.platform != 'win32':
pid = os.getpid()
@@ -4150,6 +4151,7 @@ def test_shared_memory_across_processes(self):
sms.close()
@unittest.skipIf(os.name != "posix", "not feasible in non-posix platforms")
+ @unittest.skipUnless(sys.stdin.isatty(), "KeyboardInterrupts require a TTY device")
def test_shared_memory_SharedMemoryServer_ignores_sigint(self):
# bpo-36368: protect SharedMemoryManager server process from
# KeyboardInterrupt signals.
diff --git a/Lib/test/test_asyncio/test_base_events.py b/Lib/test/test_asyncio/test_base_events.py
index 85c8152d49..e35cfffe84 100644
--- a/Lib/test/test_asyncio/test_base_events.py
+++ b/Lib/test/test_asyncio/test_base_events.py
@@ -1377,6 +1377,8 @@ def test_create_connection_no_inet_pton(self, m_socket):
self._test_create_connection_ip_addr(m_socket, False)
@patch_socket
+ @unittest.skipUnless(support.is_resource_enabled('network'),
+ 'network is not enabled')
def test_create_connection_service_name(self, m_socket):
m_socket.getaddrinfo = socket.getaddrinfo
sock = m_socket.socket.return_value
diff --git a/Lib/test/test_ctypes/test_find.py b/Lib/test/test_ctypes/test_find.py
index a41e94971d..1291af3057 100644
--- a/Lib/test/test_ctypes/test_find.py
+++ b/Lib/test/test_ctypes/test_find.py
@@ -117,6 +117,7 @@ def test_find_library_with_gcc(self):
with unittest.mock.patch("ctypes.util._findSoname_ldconfig", lambda *args: None):
self.assertNotEqual(find_library('c'), None)
+ @unittest.skipIf(True, 'Fails on Guix.')
def test_find_library_with_ld(self):
with unittest.mock.patch("ctypes.util._findSoname_ldconfig", lambda *args: None), \
unittest.mock.patch("ctypes.util._findLib_gcc", lambda *args: None):
diff --git a/Lib/test/test_generators.py b/Lib/test/test_generators.py
index 1ee9958445..ab6b41befe 100644
--- a/Lib/test/test_generators.py
+++ b/Lib/test/test_generators.py
@@ -34,6 +34,7 @@ def generator2(self):
else:
return "FAILED"
+ @unittest.skipIf(True, 'Keyboard interrupts do not work in the Guix build environment')
def test_raise_and_yield_from(self):
gen = self.generator1()
gen.send(None)
diff --git a/Lib/test/test_pathlib.py b/Lib/test/test_pathlib.py
index ec105ae1a0..ae4c5b672e 100644
--- a/Lib/test/test_pathlib.py
+++ b/Lib/test/test_pathlib.py
@@ -3069,6 +3069,7 @@ def test_rglob(self):
'pwd module does not expose getpwall()')
@unittest.skipIf(sys.platform == "vxworks",
"no home directory on VxWorks")
+ @unittest.skipIf(True, "Guix builder home is '/' which causes trouble for these tests")
def test_expanduser(self):
P = self.cls
import_helper.import_module('pwd')
diff --git a/Lib/test/test_pdb.py b/Lib/test/test_pdb.py
index 51b844262e..004d3133cf 100644
--- a/Lib/test/test_pdb.py
+++ b/Lib/test/test_pdb.py
@@ -1580,6 +1580,7 @@ def test_pdb_next_command_subiterator():
(Pdb) continue
"""
+@unittest.skipIf(True, 'Fails on Guix… but skipIf not taken into account?!')
def test_pdb_issue_20766():
"""Test for reference leaks when the SIGINT handler is set.
@@ -1598,11 +1599,11 @@ def test_pdb_issue_20766():
> <doctest test.test_pdb.test_pdb_issue_20766[0]>(6)test_function()
-> print('pdb %d: %s' % (i, sess._previous_sigint_handler))
(Pdb) continue
- pdb 1: <built-in function default_int_handler>
+ pdb 1: 1
> <doctest test.test_pdb.test_pdb_issue_20766[0]>(6)test_function()
-> print('pdb %d: %s' % (i, sess._previous_sigint_handler))
(Pdb) continue
- pdb 2: <built-in function default_int_handler>
+ pdb 2: 1
"""
def test_pdb_issue_43318():
diff --git a/Lib/test/test_regrtest.py b/Lib/test/test_regrtest.py
index 2ab6f6a986..8cf6b4d1c8 100644
--- a/Lib/test/test_regrtest.py
+++ b/Lib/test/test_regrtest.py
@@ -1049,6 +1049,7 @@ def test_fromfile(self):
output = self.run_tests('--fromfile', filename)
self.check_executed_tests(output, tests, stats=stats)
+ @unittest.skipIf(True, 'Keyboard interrupts do not work in the Guix build environment.')
def test_interrupted(self):
code = TEST_INTERRUPTED
test = self.create_test('sigint', code=code)
@@ -1066,6 +1067,7 @@ def test_slowest(self):
% (self.TESTNAME_REGEX, len(tests)))
self.check_line(output, regex)
+ @unittest.skipIf(True, 'Keyboard interrupts do not work in the Guix build environment.')
def test_slowest_interrupted(self):
# Issue #25373: test --slowest with an interrupted test
code = TEST_INTERRUPTED
diff --git a/Lib/test/test_resource.py b/Lib/test/test_resource.py
index 317e7ca8f8..7f272daf24 100644
--- a/Lib/test/test_resource.py
+++ b/Lib/test/test_resource.py
@@ -151,6 +151,7 @@ def test_freebsd_contants(self):
@unittest.skipUnless(hasattr(resource, 'prlimit'), 'no prlimit')
@support.requires_linux_version(2, 6, 36)
+ @unittest.skipIf(True, "Bug: the PermissionError is not raised")
def test_prlimit(self):
self.assertRaises(TypeError, resource.prlimit)
self.assertRaises(ProcessLookupError, resource.prlimit,
diff --git a/Lib/test/test_shutil.py b/Lib/test/test_shutil.py
index bf60f37934..5e3a96380a 100644
--- a/Lib/test/test_shutil.py
+++ b/Lib/test/test_shutil.py
@@ -1743,6 +1743,7 @@ def test_make_archive(self):
base_name = os.path.join(tmpdir, 'archive')
self.assertRaises(ValueError, make_archive, base_name, 'xxx')
+ @unittest.skipIf(True, "The Guix build container has no root user")
@support.requires_zlib()
def test_make_archive_owner_group(self):
# testing make_archive with owner and group, with various combinations
@@ -1771,6 +1772,7 @@ def test_make_archive_owner_group(self):
self.assertTrue(os.path.isfile(res))
+ @unittest.skipIf(True, "The Guix build container has no root user")
@support.requires_zlib()
@unittest.skipUnless(UID_GID_SUPPORT, "Requires grp and pwd support")
def test_tarfile_root_owner(self):
diff --git a/Lib/test/test_signal.py b/Lib/test/test_signal.py
index 637a0ca3b3..2fb804e340 100644
--- a/Lib/test/test_signal.py
+++ b/Lib/test/test_signal.py
@@ -160,6 +160,7 @@ def test_valid_signals(self):
self.assertLess(signum, signal.NSIG)
@unittest.skipUnless(sys.executable, "sys.executable required.")
+ @unittest.skipUnless(sys.stdin.isatty(), "KeyboardInterrupts require a TTY device")
@support.requires_subprocess()
def test_keyboard_interrupt_exit_code(self):
"""KeyboardInterrupt triggers exit via SIGINT."""
@@ -211,6 +212,7 @@ def test_issue9324(self):
signal.signal(7, handler)
@unittest.skipUnless(sys.executable, "sys.executable required.")
+ @unittest.skipUnless(sys.stdin.isatty(), "KeyboardInterrupts require a TTY device")
@support.requires_subprocess()
def test_keyboard_interrupt_exit_code(self):
"""KeyboardInterrupt triggers an exit using STATUS_CONTROL_C_EXIT."""
@@ -1407,6 +1409,7 @@ def cycle_handlers():
class RaiseSignalTest(unittest.TestCase):
+ @unittest.skipUnless(sys.stdin.isatty(), "KeyboardInterrupts require a TTY device")
def test_sigint(self):
with self.assertRaises(KeyboardInterrupt):
signal.raise_signal(signal.SIGINT)
@@ -1452,6 +1455,7 @@ def __del__(self):
class PidfdSignalTest(unittest.TestCase):
+ @unittest.skipUnless(sys.stdin.isatty(), "KeyboardInterrupts require a TTY device")
@unittest.skipUnless(
hasattr(signal, "pidfd_send_signal"),
"pidfd support not built in",
diff --git a/Lib/test/test_socket.py b/Lib/test/test_socket.py
index 4eb5af99d6..9c7b8f6dbc 100644
--- a/Lib/test/test_socket.py
+++ b/Lib/test/test_socket.py
@@ -1016,6 +1016,8 @@ def testHostnameRes(self):
if not fqhn in all_host_names:
self.fail("Error testing host resolution mechanisms. (fqdn: %s, all: %s)" % (fqhn, repr(all_host_names)))
+ @unittest.skipUnless(support.is_resource_enabled('network'),
+ 'network is not enabled')
def test_host_resolution(self):
for addr in [socket_helper.HOSTv4, '10.0.0.1', '255.255.255.255']:
self.assertEqual(socket.gethostbyname(addr), addr)
@@ -1161,6 +1163,8 @@ def testNtoHErrors(self):
self.assertRaises(OverflowError, socket.ntohl, k)
self.assertRaises(OverflowError, socket.htonl, k)
+ @unittest.skipUnless(os.path.exists("/etc/services"),
+ "getservbyname uses /etc/services, which is not in the chroot")
def testGetServBy(self):
eq = self.assertEqual
# Find one service that exists, then check all the related interfaces.
@@ -1521,6 +1525,8 @@ def test_sio_loopback_fast_path(self):
raise
self.assertRaises(TypeError, s.ioctl, socket.SIO_LOOPBACK_FAST_PATH, None)
+ @unittest.skipUnless(os.path.exists("/etc/gai.conf"),
+ "getaddrinfo() will fail")
def testGetaddrinfo(self):
try:
socket.getaddrinfo('localhost', 80)
@@ -1653,6 +1659,8 @@ def test_getnameinfo(self):
# only IP addresses are allowed
self.assertRaises(OSError, socket.getnameinfo, ('mail.python.org',0), 0)
+ @unittest.skipUnless(os.path.exists("/etc/gai.conf"),
+ "getaddrinfo() will fail")
@unittest.skipUnless(support.is_resource_enabled('network'),
'network is not enabled')
def test_idna(self):
diff --git a/Lib/test/test_spwd.py b/Lib/test/test_spwd.py
index 50766c2548..0c7eb7a83a 100644
--- a/Lib/test/test_spwd.py
+++ b/Lib/test/test_spwd.py
@@ -9,8 +9,7 @@
spwd = import_helper.import_module('spwd')
-@unittest.skipUnless(hasattr(os, 'geteuid') and os.geteuid() == 0,
- 'root privileges required')
+@unittest.skipUnless(os.path.exists("/etc/shadow"), 'spwd tests require /etc/shadow')
class TestSpwdRoot(unittest.TestCase):
def test_getspall(self):
@@ -60,8 +59,7 @@ def test_getspnam(self):
self.assertRaises(TypeError, spwd.getspnam, bytes_name)
-@unittest.skipUnless(hasattr(os, 'geteuid') and os.geteuid() != 0,
- 'non-root user required')
+@unittest.skipUnless(os.path.exists("/etc/shadow"), 'spwd tests require /etc/shadow')
class TestSpwdNonRoot(unittest.TestCase):
def test_getspnam_exception(self):
diff --git a/Lib/test/test_tarfile.py b/Lib/test/test_tarfile.py
index 71489ea493..33351919fe 100644
--- a/Lib/test/test_tarfile.py
+++ b/Lib/test/test_tarfile.py
@@ -2911,9 +2911,12 @@ def root_is_uid_gid_0():
import pwd, grp
except ImportError:
return False
- if pwd.getpwuid(0)[0] != 'root':
- return False
- if grp.getgrgid(0)[0] != 'root':
+ try:
+ if pwd.getpwuid(0)[0] != 'root':
+ return False
+ if grp.getgrgid(0)[0] != 'root':
+ return False
+ except KeyError:
return False
return True
diff --git a/Lib/test/test_threading.py b/Lib/test/test_threading.py
index 00d9e591c7..2515603715 100644
--- a/Lib/test/test_threading.py
+++ b/Lib/test/test_threading.py
@@ -1962,6 +1962,7 @@ def check_interrupt_main_noerror(self, signum):
# Restore original handler
signal.signal(signum, handler)
+ @unittest.skipIf(True, 'Keyboard interrupts do not work in the Guix build container.')
def test_interrupt_main_subthread(self):
# Calling start_new_thread with a function that executes interrupt_main
# should raise KeyboardInterrupt upon completion.
@@ -1973,6 +1974,8 @@ def call_interrupt():
t.join()
t.join()
+
+ @unittest.skipIf(True, 'Keyboard interrupts do not work in the Guix build container.')
def test_interrupt_main_mainthread(self):
# Make sure that if interrupt_main is called in main thread that
# KeyboardInterrupt is raised instantly.
diff --git a/Lib/test/test_tools/test_freeze.py b/Lib/test/test_tools/test_freeze.py
index 0e7ed67de7..6539a2983b 100644
--- a/Lib/test/test_tools/test_freeze.py
+++ b/Lib/test/test_tools/test_freeze.py
@@ -23,6 +23,7 @@
'test is too slow with PGO')
class TestFreeze(unittest.TestCase):
+ @unittest.skipIf(True, 'Fails on Guix.')
@support.requires_resource('cpu') # Building Python is slow
def test_freeze_simple_script(self):
script = textwrap.dedent("""
diff --git a/Lib/test/test_unicodedata.py b/Lib/test/test_unicodedata.py
index 515c3840cb..a96dfad0fe 100644
--- a/Lib/test/test_unicodedata.py
+++ b/Lib/test/test_unicodedata.py
@@ -342,6 +342,7 @@ def test_linebreak_7643(self):
self.assertEqual(len(lines), 1,
r"\u%.4x should not be a linebreak" % i)
+@requires_resource('network')
class NormalizationTest(unittest.TestCase):
@staticmethod
def check_version(testfile):
diff --git a/Tools/scripts/run_tests.py b/Tools/scripts/run_tests.py
index 445a34ae3e..8f750537c3 100644
--- a/Tools/scripts/run_tests.py
+++ b/Tools/scripts/run_tests.py
@@ -69,7 +69,7 @@ def main(regrtest_args):
else:
args.extend(['-j', '0']) # Use all CPU cores
if not any(is_resource_use_flag(arg) for arg in regrtest_args):
- args.extend(['-u', 'all,-largefile,-audio,-gui'])
+ args.extend(['-u', 'all,-largefile,-audio,-gui,-network'])
if cross_compile and hostrunner:
# If HOSTRUNNER is set and -p/--python option is not given, then

View file

@ -1,116 +0,0 @@
Patch taken from the upstream repository
https://github.com/frescobaldi/python-poppler-qt5/issues/43
From 92e5962ec3751ab051d0b655fd61afc7a1cf709e Mon Sep 17 00:00:00 2001
From: Ben Greiner <code@bnavigator.de>
Date: Thu, 4 Mar 2021 17:02:51 +0100
Subject: [PATCH] map type QVector< QPair<TYPE, TYPE> > for
FormFieldChoice::choicesWithExportValues() (#45)
---
types.sip | 93 +++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 93 insertions(+)
diff --git a/types.sip b/types.sip
index 239b8c9..81cb283 100644
--- a/types.sip
+++ b/types.sip
@@ -331,5 +331,98 @@ template <TYPE>
};
+/**
+ * Convert QVector< QPair<TYPE, TYPE> >
+ * from and to a Python list of a 2-item tuple
+ */
+
+template<TYPE>
+%MappedType QVector< QPair<TYPE, TYPE> >
+{
+%TypeHeaderCode
+#include <qvector.h>
+#include <qpair.h>
+%End
+
+%ConvertFromTypeCode
+ // Create the list.
+ PyObject *l;
+
+ if ((l = PyList_New(sipCpp->size())) == NULL)
+ return NULL;
+
+ // Set the list elements.
+ for (int i = 0; i < sipCpp->size(); ++i)
+ {
+ QPair<TYPE, TYPE>* p = new QPair<TYPE, TYPE>(sipCpp->at(i));
+ PyObject *ptuple = PyTuple_New(2);
+ PyObject *pfirst;
+ PyObject *psecond;
+
+ TYPE *sfirst = new TYPE(p->first);
+ if ((pfirst = sipConvertFromType(sfirst, sipType_TYPE, sipTransferObj)) == NULL)
+ {
+ Py_DECREF(l);
+ Py_DECREF(ptuple);
+ return NULL;
+ }
+ PyTuple_SET_ITEM(ptuple, 0, pfirst);
+
+ TYPE *ssecond = new TYPE(p->second);
+ if ((psecond = sipConvertFromType(ssecond, sipType_TYPE, sipTransferObj)) == NULL)
+ {
+ Py_DECREF(l);
+ Py_DECREF(ptuple);
+ Py_DECREF(pfirst);
+ return NULL;
+ }
+ PyTuple_SET_ITEM(ptuple, 1, psecond);
+
+ PyList_SET_ITEM(l, i, ptuple);
+ }
+
+ return l;
+%End
+
+%ConvertToTypeCode
+ const sipTypeDef* qpair_type = sipFindType("QPair<TYPE, TYPE>");
+
+ // Check the type if that is all that is required.
+ if (sipIsErr == NULL)
+ {
+ if (!PySequence_Check(sipPy))
+ return 0;
+
+ for (int i = 0; i < PySequence_Size(sipPy); ++i)
+ if (!sipCanConvertToType(PySequence_ITEM(sipPy, i), qpair_type, SIP_NOT_NONE))
+ return 0;
+
+ return 1;
+ }
+
+
+ QVector< QPair<TYPE, TYPE> > *qv = new QVector< QPair<TYPE, TYPE> >;
+
+ for (int i = 0; i < PySequence_Size(sipPy); ++i)
+ {
+ int state;
+ QPair<TYPE, TYPE> * p = reinterpret_cast< QPair<TYPE, TYPE> * >(sipConvertToType(PySequence_ITEM(sipPy, i), qpair_type, sipTransferObj, SIP_NOT_NONE, &state, sipIsErr));
+
+ if (*sipIsErr)
+ {
+ sipReleaseType(p, qpair_type, state);
+ delete qv;
+ return 0;
+ }
+ qv->append(*p);
+ sipReleaseType(p, qpair_type, state);
+ }
+
+ *sipCppPtr = qv;
+ return sipGetState(sipTransferObj);
+%End
+
+};
+
/* kate: indent-width 4; space-indent on; hl c++; indent-mode cstyle; */

View file

@ -13,50 +13,33 @@ readers.
Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
diff --git a/docs/meson.build b/docs/meson.build
index 9040f860ae..2ae7886fcb 100644
--- a/docs/meson.build
+++ b/docs/meson.build
@@ -92,4 +92,25 @@ if build_docs
@@ -98,4 +98,26 @@ if build_docs
alias_target('sphinxdocs', sphinxdocs)
alias_target('html', sphinxdocs)
alias_target('man', sphinxmans)
+
+ # Generate a Texinfo version of the QEMU manual.
+ # Add a target to build and install a Texinfo version of the QEMU
+ # manual, if 'makeinfo' is available.
+ makeinfo = find_program(['texi2any', 'makeinfo'])
+ if makeinfo.found()
+ sphinxtexi = custom_target(
+ 'QEMU manual generated texinfo source',
+ output: ['QEMU.texi', 'sphinxtexi.stamp'],
+ 'qemu.texi',
+ output: ['qemu.texi', 'sphinxtexi.stamp'],
+ depfile: 'sphinxtexi.d',
+ command: [SPHINX_ARGS, '-Ddepfile=@DEPFILE@',
+ '-Ddepfile_stamp=@OUTPUT1@', '-b', 'texinfo',
+ meson.current_source_dir(), meson.current_build_dir()])
+ '-d', private_dir, input_dir, meson.current_build_dir()])
+ sphinxinfo = custom_target(
+ 'QEMU info manual',
+ 'qemu.info',
+ input: sphinxtexi,
+ output: 'QEMU.info',
+ output: 'qemu.info',
+ install: true,
+ install_dir: get_option('infodir'),
+ command: [makeinfo, '--no-split', '@INPUT0@', '--output=@OUTPUT@'])
+ command: [makeinfo, '--no-split', '--output=@OUTPUT@', '@INPUT0@'])
+ alias_target('texi', sphinxtexi)
+ alias_target('info', sphinxinfo)
+ endif
endif
diff --git a/meson.build b/meson.build
--- a/meson.build
+++ b/meson.build
@@ -37,6 +37,7 @@ endif
qemu_confdir = get_option('sysconfdir') / get_option('qemu_suffix')
qemu_datadir = get_option('datadir') / get_option('qemu_suffix')
qemu_docdir = get_option('docdir') / get_option('qemu_suffix')
+qemu_infodir = get_option('infodir') / get_option('qemu_suffix')
qemu_moddir = get_option('libdir') / get_option('qemu_suffix')
qemu_desktopdir = get_option('datadir') / 'applications'
@@ -3698,6 +3699,7 @@ else
summary_info += {'local state directory': 'queried at runtime'}
endif
summary_info += {'Doc directory': get_option('prefix') / get_option('docdir')}
+summary_info += {'Info directory': get_option('prefix') / get_option('infodir')}
summary_info += {'Build directory': meson.current_build_dir()}
summary_info += {'Source path': meson.current_source_dir()}
summary_info += {'GIT submodules': config_host['GIT_SUBMODULES']}

View file

@ -1,20 +1,18 @@
Disable the qtest-aarch64/migration-test, which sometimes fail
non-deterministically (see:
https://gitlab.com/qemu-project/qemu/-/issues/1230).
The bios-tables-test may fail; disable it (see: https://gitlab.com/qemu-project/qemu/-/issues/1098)
Also disable the bios-tables-test, which may fail on older machines (see:
https://gitlab.com/qemu-project/qemu/-/issues/1098).
--- qemu-8.1.0/tests/qtest/meson.build.old 2023-08-30 11:48:27.871146249 -0400
+++ qemu-8.1.0/tests/qtest/meson.build 2023-08-30 13:53:25.994084948 -0400
@@ -1,6 +1,5 @@
diff --git a/tests/qtest/meson.build b/tests/qtest/meson.build
index f096cf3ecd..82f6e1ffeb 100644
--- a/tests/qtest/meson.build
+++ b/tests/qtest/meson.build
@@ -1,7 +1,6 @@
slow_qtests = {
'ahci-test' : 60,
'aspeed_smc-test': 360,
- 'bios-tables-test' : 120,
'boot-serial-test' : 60,
'migration-test' : 150,
'npcm7xx_pwm-test': 150,
@@ -81,9 +80,6 @@
@@ -82,9 +81,6 @@ qtests_i386 = \
config_all_devices.has_key('CONFIG_Q35') and \
config_all_devices.has_key('CONFIG_VIRTIO_PCI') and \
slirp.found() ? ['virtio-net-failover'] : []) + \
@ -24,27 +22,17 @@ https://gitlab.com/qemu-project/qemu/-/issues/1098).
qtests_pci + \
qtests_cxl + \
['fdc-test',
@@ -212,7 +208,6 @@
@@ -213,7 +209,6 @@ qtests_arm = \
# TODO: once aarch64 TCG is fixed on ARM 32 bit host, make bios-tables-test unconditional
qtests_aarch64 = \
- (cpu != 'arm' and unpack_edk2_blobs ? ['bios-tables-test'] : []) + \
(config_all.has_key('CONFIG_TCG') and config_all_devices.has_key('CONFIG_TPM_TIS_SYSBUS') ? \
['tpm-tis-device-test', 'tpm-tis-device-swtpm-test'] : []) + \
(config_all_devices.has_key('CONFIG_XLNX_ZYNQMP_ARM') ? ['xlnx-can-test', 'fuzz-xlnx-dp-test'] : []) + \
@@ -222,8 +217,7 @@
config_all_devices.has_key('CONFIG_TPM_TIS_I2C') ? ['tpm-tis-i2c-test'] : []) + \
['arm-cpu-features',
'numa-test',
- 'boot-serial-test',
- 'migration-test']
+ 'boot-serial-test']
qtests_s390x = \
qtests_filter + \
@@ -301,7 +295,6 @@
@@ -304,7 +299,6 @@ if gnutls.found()
endif
qtests = {
- 'bios-tables-test': [io, 'boot-sector.c', 'acpi-utils.c', 'tpm-emu.c'],
'cdrom-test': files('boot-sector.c'),

View file

@ -0,0 +1,45 @@
from https://patch-diff.githubusercontent.com/raw/RubyCrypto/x25519/pull/36.patch
From 5886507e08488c0ed116b1979a073b78b9495683 Mon Sep 17 00:00:00 2001
From: Eric Long <i@hack3r.moe>
Date: Sat, 15 Apr 2023 02:58:26 +0800
Subject: [PATCH] Add automatic fallback for non-x86_64 targets
---
Rakefile | 2 +-
ext/x25519_precomputed/extconf.rb | 6 +++---
2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/Rakefile b/Rakefile
index 535697c..6e4f4d3 100644
--- a/Rakefile
+++ b/Rakefile
@@ -7,7 +7,7 @@ CLEAN.include("**/*.o", "**/*.so", "**/*.bundle", "pkg", "tmp")
require "rake/extensiontask"
%w[precomputed ref10].each do |provider|
- next if provider == "precomputed" && RUBY_PLATFORM =~ /arm64-darwin/
+ next if provider == "precomputed" && RUBY_PLATFORM !~ /x86_64|x64/
Rake::ExtensionTask.new("x25519_#{provider}") do |ext|
ext.ext_dir = "ext/x25519_#{provider}"
diff --git a/ext/x25519_precomputed/extconf.rb b/ext/x25519_precomputed/extconf.rb
index 7f2ba4d..b049f98 100644
--- a/ext/x25519_precomputed/extconf.rb
+++ b/ext/x25519_precomputed/extconf.rb
@@ -4,12 +4,12 @@
require "mkmf"
-if RUBY_PLATFORM =~ /arm64-darwin|aarch64-linux/
- File.write("Makefile", "install clean: ;")
-else
+if RUBY_PLATFORM =~ /x86_64|x64/
$CFLAGS << " -Wall -O3 -pedantic -std=c99 -mbmi -mbmi2 -march=haswell"
create_makefile "x25519_precomputed"
+else
+ File.write("Makefile", "install clean: ;")
end
# rubocop:enable Style/GlobalVars

View file

@ -17,7 +17,7 @@
;;; Copyright © 2019 Alex Griffin <a@ajgrf.com>
;;; Copyright © 2019 Ben Sturmfels <ben@sturm.com.au>
;;; Copyright © 2019,2020 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;; Copyright © 2020-2023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2020-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2020, 2022 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2020, 2024 Timotej Lazar <timotej.lazar@araneo.si>
;;; Copyright © 2020, 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
@ -26,6 +26,7 @@
;;; Copyright © 2022 Petr Hodina <phodina@protonmail.com>
;;; Copyright © 2023 Felix Gruber <felgru@posteo.net>
;;; Copyright © 2024 dan <i@dan.games>
;;; Copyright © 2023 Benjamin Slade <slade@lambda-y.net>
;;;
;;; This file is part of GNU Guix.
;;;
@ -56,6 +57,7 @@ (define-module (gnu packages pdf)
#:use-module (guix build-system python)
#:use-module (guix build-system qt)
#:use-module (gnu packages)
#:use-module (gnu packages aidc)
#:use-module (gnu packages audio)
#:use-module (gnu packages autotools)
#:use-module (gnu packages backup)
@ -432,40 +434,25 @@ (define-public poppler-qt5
(define-public python-poppler-qt5
(package
(name "python-poppler-qt5")
(version "21.1.0")
(version "21.3.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "python-poppler-qt5" version))
(sha256
(base32
"0b82gm4i75q5v19kfbq0h4y0b2vcwr2213zkhxh6l0h45kdndmxd"))
(patches (search-patches "python-poppler-qt5-fix-build.patch"))))
(build-system python-build-system)
(origin
(method url-fetch)
(uri (pypi-uri "python-poppler-qt5" version))
(sha256
(base32 "1q3gvmsmsq3llf9mcbhlkryrgprqrw2z7wmnvagy180f3y2fhxxl"))))
(build-system pyproject-build-system)
(arguments
`(;; There are no tests. The check phase just causes a rebuild.
#:tests? #f
#:phases
(modify-phases %standard-phases
(replace 'build
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "setup.py"
;; This check always fails, so disable it.
(("if not check_qtxml\\(\\)")
"if True"))
;; We need to pass an extra flag here. This cannot be in
;; configure-flags because it should not be passed for the
;; installation phase.
((@@ (guix build python-build-system) call-setuppy)
"build_ext" (list (string-append "--pyqt-sip-dir="
(assoc-ref inputs "python-pyqt")
"/share/sip")) #t))))))
(native-inputs
(list pkg-config))
(inputs
(list python-sip-4 python-pyqt poppler-qt5 qtbase-5))
(home-page "https://pypi.org/project/python-poppler-qt5/")
(synopsis "Python bindings for Poppler-Qt5")
`(;; The sipbuild.api backend builder expects a Python dictionary as per
;; https://peps.python.org/pep-0517/#config-settings, but we
;; give it lists and it fails. The next line is a workaround.
#:configure-flags '#nil
#:tests? #f))
(native-inputs (list pkg-config))
(inputs (list python-sip python-pyqt-builder python-pyqt poppler-qt5
qtbase-5))
(home-page "https://github.com/frescobaldi/python-poppler-qt5")
(synopsis "Python binding to Poppler-Qt5")
(description
"This package provides Python bindings for the Qt5 interface of the
Poppler PDF rendering library.")
@ -843,14 +830,14 @@ (define-public python-pydyf
(define-public mupdf
(package
(name "mupdf")
(version "1.23.10")
(version "1.23.11")
(source
(origin
(method url-fetch)
(uri (string-append "https://mupdf.com/downloads/archive/"
"mupdf-" version "-source.tar.lz"))
(sha256
(base32 "0p0smyfcziqrnp391l0pmpjca07075km0xlw20kd3hqa919lhq0i"))
(base32 "1kv44zqijkvljc9fcqmgb8zqkj7hmasga70fsz98aimmrfc2rmyv"))
(modules '((guix build utils)
(ice-9 ftw)
(srfi srfi-1)))
@ -1050,7 +1037,7 @@ (define-public xournal
(define-public xournalpp
(package
(name "xournalpp")
(version "1.2.2")
(version "1.2.3")
(source
(origin
(method git-fetch)
@ -1059,7 +1046,7 @@ (define-public xournalpp
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1svmdj43z1shm3wnkrdrq1h6rba843mp4x4d8jmxsx7kwiiz9l78"))))
(base32 "1rj9kz21r59cswfpczp5dcmvchbbmybv661iyycaiii2z5gh0h7i"))))
(build-system cmake-build-system)
(arguments
(list
@ -1223,13 +1210,13 @@ (define-public impressive
(define-public img2pdf
(package
(name "img2pdf")
(version "0.4.4")
(version "0.5.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "img2pdf" version))
(sha256
(base32 "0g3rpq68y5phnlgxrqn39k10j9nmgksg6m5ic8wgs8v5cjlrij4f"))))
(base32 "158bgnk2jhjnpyld4z3jq8v2j8837vh4j0672g8mnjrg4i3px13k"))))
(build-system python-build-system)
(propagated-inputs
(list python-pikepdf python-pillow
@ -1527,7 +1514,7 @@ (define-public pdfgrep
(define-public pdfpc
(package
(name "pdfpc")
(version "4.5.0")
(version "4.6.0")
(source
(origin
(method git-fetch)
@ -1536,22 +1523,13 @@ (define-public pdfpc
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0bmy51w6ypz927hxwp5g7wapqvzqmsi3w32rch6i3f94kg1152ck"))))
(base32 "0kj84sf5hgr2v2ra6dxmxqcr173h17cpnhg9lcq36shdbdnncwg4"))))
(build-system cmake-build-system)
(arguments
'(#:tests? #f ; no test target
#:phases
(modify-phases %standard-phases
;; This is really a bug in Vala.
;; https://github.com/pdfpc/pdfpc/issues/594
(add-after 'unpack 'fix-vala-API-conflict
(lambda _
(substitute* "src/classes/action/movie.vala"
(("info.from_caps\\(caps\\)")
"Gst.Video.info_from_caps(out info, caps)")))))))
(arguments '(#:tests? #f)) ; no test target
(inputs
`(("cairo" ,cairo)
("discount" ,discount) ; libmarkdown
("qrencode" ,qrencode)
("gtk+" ,gtk+)
("gstreamer" ,gstreamer)
("gst-plugins-base" ,gst-plugins-base)

View file

@ -1,7 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2016-2023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2016-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2023 gemmaro <gemmaro.dev@gmail.com>
@ -276,14 +276,14 @@ (define-public ploticus
(define-public asymptote
(package
(name "asymptote")
(version "2.86")
(version "2.88")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/asymptote/"
version "/asymptote-" version ".src.tgz"))
(sha256
(base32 "07y9yg7kdkgmz024qzny8xhjw3c367kxfpwzv19cxcy7qcgsvsy4"))
(base32 "1fzm58md2kc32sj19bksnd8yzkg47z5pblkxp28r7vm67xs1mrqd"))
(modules '((guix build utils)))
(snippet
;; Remove bundled RapidJSON.

View file

@ -171,3 +171,48 @@ (define bin `(,(string-append #$output "/bin")))
small environment which enables substantial applications to be developed with
it.")
(license license:bsd-2)))
(define-public logtalk
(package
(name "logtalk")
(version "3.75.0")
(source
(origin
(method url-fetch)
(uri (string-append "https://logtalk.org/files/logtalk-"
version ".tar.bz2"))
(sha256 (base32 "0w35br03l307wk2fwh67rybqjgvjlwpy9j5r4c3pkrywd7lhrc54"))))
(build-system gnu-build-system)
(arguments
(list #:tests? #f ;no tests
#:phases
#~(modify-phases %standard-phases
(delete 'configure) ;no configure script and Makefile
(delete 'build)
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(mkdir #$output)
(invoke "./scripts/install.sh" "-p" #$output))))))
(native-search-paths
(list (search-path-specification
(variable "LOGTALKHOME")
(separator #f) ;single valued
(files '("share/logtalk")))))
(home-page "https://logtalk.org/")
(synopsis "Object-oriented logic programming language")
(description "Logtalk is a declarative object-oriented logic programming language
that extends and leverages the Prolog language with a feature set suitable for
programming in the large. As a multi-paradigm language, Logtalk includes support for
both prototypes and classes, protocols (interfaces), categories (components and
hot-patching), event-driven programming, coinduction, lambda expressions, and
high-level multi-threading programming.")
;; Most are under Apache License 2.0, some contributed libraries and ports are
;; under other licenses.
(license (list license:asl2.0
license:artistic2.0
license:bsd-2
license:bsd-3
license:cc0
license:expat
license:gpl2+
license:osl2.1))))

View file

@ -44,7 +44,7 @@
;;; Copyright © 2021 Greg Hogan <code@greghogan.com>
;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be>
;;; Copyright © 2021 Pradana Aumars <paumars@courrier.dev>
;;; Copyright © 2021, 2022 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2021, 2022, 2024 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2021, 2022 jgart <jgart@dismail.de>
;;; Copyright © 2021 Alice Brenon <alice.brenon@ens-lyon.fr>
;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com>
@ -58,9 +58,12 @@
;;; Copyright © 2022 msimonin <matthieu.simonin@inria.fr>
;;; Copyright © 2022 Michael Rohleder <mike@rohleder.de>
;;; Copyright © 2022 Baptiste Strazzulla <bstrazzull@hotmail.fr>
;;; Copyright © 2023 dan <i@dan.games>
;;; Copyright © 2023 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2023 Ivan Vilata-i-Balaguer <ivan@selidor.net>
;;; Copyright © 2024 Troy Figiel <troy@troyfigiel.com>
;;; Copyright © 2024 Sharlatan Hellseher <sharlatanus@gmail.com>
;;; Copyright © 2024 normally_js <normally_js@posteo.net>
;;;
;;; This file is part of GNU Guix.
;;;
@ -78,15 +81,15 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages python-web)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system copy)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system python)
#: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 admin)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
@ -106,8 +109,8 @@ (define-module (gnu packages python-web)
#:use-module (gnu packages node)
#:use-module (gnu packages openstack)
#:use-module (gnu packages pcre)
#:use-module (gnu packages protobuf)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages protobuf)
#:use-module (gnu packages python)
#:use-module (gnu packages python-build)
#:use-module (gnu packages python-check)
@ -121,12 +124,12 @@ (define-module (gnu packages python-web)
#:use-module (gnu packages serialization)
#:use-module (gnu packages sphinx)
#:use-module (gnu packages texinfo)
#:use-module (gnu packages tls)
#:use-module (gnu packages time)
#:use-module (gnu packages tls)
#:use-module (gnu packages version-control)
#:use-module (gnu packages web)
#:use-module (gnu packages xml)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages)
#:use-module (srfi srfi-1))
(define-public python-huggingface-hub
@ -1278,6 +1281,62 @@ (define-public python-httplib2
other HTTP libraries.")
(license license:expat)))
(define-public python-cheroot
(package
(name "python-cheroot")
(version "10.0.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "cheroot" version))
(sha256
(base32
"1w0ind0dza9j1py56y23344piqkpyfmcm060qfrnk6gggy3s3i2r"))))
(build-system pyproject-build-system)
(arguments
(list
#:test-flags
#~(list "--cov=cheroot"
;; Tests are flaky in parallel invocation.
;; "--numprocesses=auto"
"--doctest-modules"
"--showlocals"
;; Disable test requiring networking.
"-k" "not test_tls_client_auth")
#:phases
#~(modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? test-flags #:allow-other-keys)
(when tests?
(with-directory-excursion "/tmp"
(apply invoke "pytest" "-v"
(append test-flags (list #$output))))))))))
(propagated-inputs
(list python-jaraco-functools
python-more-itertools
python-six))
(native-inputs
(list python-cryptography
python-jaraco-text
python-portend
python-pyopenssl
python-pypytools
python-pytest
python-pytest-cov
python-pytest-mock
python-pytest-xdist
python-requests
python-requests-toolbelt
python-requests-unixsocket
python-setuptools-scm
python-setuptools-scm-git-archive
python-trustme))
(home-page "https://cheroot.cherrypy.dev")
(synopsis "Highly-optimized, pure-python HTTP server")
(description
"Cheroot is a high-performance, pure-Python HTTP server.")
(license license:bsd-3)))
(define-public httpie
(package
(name "httpie")
@ -1917,21 +1976,47 @@ (define-public python-pycurl
(uri (pypi-uri "pycurl" version))
(sha256
(base32 "1ji46b924caa4saxvjxs9h673yy0kif297nxpnjn84r7w05mjc2p"))))
(build-system python-build-system)
(build-system pyproject-build-system)
(arguments
;; The tests attempt to access external web servers, so we cannot run
;; them. Furthermore, they are skipped altogether when using Python 2.
'(#:tests? #f
'(#:test-flags
(list "-n" "auto"
"-k" (string-append
;; Disable hanginging tests
"not test_multi_socket_select"
;; E assert None is not None
;; E+ where None =
;; <tests.multi_callback_test.MultiCallbackTest
;; testMethod=test_easy_pause_unpause>.socket_result
" and not test_easy_pause_unpause"
" and not test_multi_socket_action"
;; E pycurl.error: (1, '')
" and not test_http_version_3"
;; OSError: tests/fake-curl/libcurl/with_gnutls.so: cannot
;; open shared object file: No such file or directory
" and not test_libcurl_ssl_gnutls"
;; OSError: tests/fake-curl/libcurl/with_nss.so: cannot
;; open shared object file: No such file or directory
" and not test_libcurl_ssl_nss"
;; OSError: tests/fake-curl/libcurl/with_openssl.so: cannot
;; open shared object file: No such file or directory
" and not test_libcurl_ssl_openssl"
;; pycurl.error: (56, 'Recv failure: Connection reset by
;; peer')
" and not test_post_with_read_callback"))
#:phases (modify-phases %standard-phases
(add-before 'build 'configure-tls-backend
(lambda _
;; XXX: PycURL fails to automatically determine which TLS
;; backend to use when cURL is built with --disable-static.
;; See setup.py and <https://github.com/pycurl/pycurl/pull/147>.
(setenv "PYCURL_SSL_LIBRARY" "gnutls")
#t)))))
(add-before 'build 'configure-tls-backend
(lambda _
;; XXX: PycURL fails to automatically determine which
;; TLS backend to use when cURL is built with
;; --disable-static. See setup.py and
;; <https://github.com/pycurl/pycurl/pull/147>.
(setenv "PYCURL_SSL_LIBRARY" "gnutls"))))))
(native-inputs
(list python-nose python-bottle))
(list python-bottle
python-flaky
python-nose
python-pytest
python-pytest-xdist))
(inputs
(list curl gnutls))
(home-page "http://pycurl.io/")
@ -2722,6 +2807,123 @@ (define-public python-zc-lockfile
files. These locks can also be used to mediate access to other files.")
(license license:zpl2.1)))
(define-public python-zconfig
(package
(name "python-zconfig")
(version "4.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "ZConfig" version))
(sha256
(base32 "0mh13p38vq7ip4zkvaplzr8w0mqrmmqiyb5y663d165slvxl5mpq"))))
(build-system python-build-system)
(arguments
'(#:phases (modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(if tests?
(begin
;; This test assumes we still have setup.py in the
;; directory from which we import zconfig, which
;; does not work after installing the package.
(delete-file-recursively
"src/ZConfig/tests/test_readme.py")
(invoke "zope-testrunner" "-vv" "--test-path=src"
"--all"))
(format #t "test suite not run~%")))))))
(native-inputs (list python-docutils python-manuel python-zope-exceptions
python-zope-testrunner))
(home-page "https://github.com/zopefoundation/ZConfig/")
(synopsis "Structured configuration library intended for general use")
(description
"@code{zconfig} is a configuration library intended for general
use. It supports a hierarchical schema-driven configuration model that allows
a schema to specify data conversion routines written in Python. Its model is
very different from the model supported by the @code{configparser} module
found in Python's standard library, and is more suitable to
configuration-intensive applications.")
(license license:zpl2.1)))
(define-public python-zodb
(package
(name "python-zodb")
(version "5.8.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "ZODB" version))
(sha256
(base32 "1pv4w8mnx6j4xvkcjbkh99pv8ljby7g9f7zjq7zhdmk06sykmiy6"))))
(build-system pyproject-build-system)
(arguments
'(#:phases (modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(if tests?
(begin
;; This test does not work after installing the
;; package, since it expects the ZODB source code
;; to reside in the src/ directory.
(delete-file-recursively
"src/ZODB/tests/testdocumentation.py")
(invoke "zope-testrunner" "-vv" "--test-path=src"
"--all"))
(format #t "test suite not run~%")))))))
(propagated-inputs (list python-btrees
python-persistent
python-zconfig
python-six
python-transaction
python-zc-lockfile
python-zodbpickle
python-zope-interface))
(native-inputs (list python-manuel python-zope-testing
python-zope-testrunner))
(home-page "http://zodb-docs.readthedocs.io")
(synopsis "Object-oriented database for Python")
(description
"@code{ZODB} provides an object-oriented and @acronym{ACID,
Atomicity Consistency Isolation Durability} compliant database for Python with
a high degree of transparency. @code{ZODB} is an object-oriented database,
not an object-relational mapping. This comes with several advantaged:
@itemize
@item no separate language for database operations
@item very little impact on your code to make objects persistent
@item no database mapper that partially hides the database.
@item almost no seam between code and database.
@end itemize")
(license license:zpl2.1)))
(define-public python-zodbpickle
(package
(name "python-zodbpickle")
(version "3.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "zodbpickle" version))
(sha256
(base32 "035bjrksl4h92mvjkx6id4gjcpc1k4mbci8ryjl6l9mki7ihx77b"))))
(build-system pyproject-build-system)
(arguments
'(#:phases (modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(if tests?
(invoke "zope-testrunner" "-vv" "--test-path=src"
"--all")
(format #t "test suite not run~%")))))))
(native-inputs (list python-zope-testrunner))
(home-page "https://github.com/zopefoundation/zodbpickle")
(synopsis "Uniform pickling interface for @code{zodb}")
(description
"This package is a fork of the @code{pickle} module (and the
supporting C extension) from both Python 3.2 and Python 3.3. The fork adds
support for the @code{noload} operations used by @code{zodb}.")
(license (list license:psfl license:zpl2.1))))
(define-public python-zope-event
(package
(name "python-zope-event")
@ -3221,6 +3423,24 @@ (define-public python-ndg-httpsclient
(home-page "https://github.com/cedadev/ndg_httpsclient/")
(license license:bsd-3)))
(define-public python-noiseprotocol
(package
(name "python-noiseprotocol")
(version "0.3.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "noiseprotocol" version))
(sha256
(base32 "0ifnj0mpbqsfqba9n12vf5yzxj4qf2gxql3ry43qyshgnrqsi4mh"))))
(build-system pyproject-build-system)
(propagated-inputs (list python-cryptography))
(home-page "https://github.com/plizonczyk/noiseprotocol")
(synopsis "Implementation of Noise Protocol Framework")
(description
"This package provides an implementation of Noise Protocol Framework.")
(license license:expat)))
(define-public python-websocket-client
(package
(name "python-websocket-client")
@ -8277,13 +8497,13 @@ (define-public python-parsel
(define-public python-scrapy
(package
(name "python-scrapy")
(version "2.11.0")
(version "2.11.1")
(source
(origin
(method url-fetch)
(uri (pypi-uri "Scrapy" version))
(sha256
(base32 "199nbc7vipdsvxmfxc0lrzbprgl3hr2xgqhvss1083iz1k7fvg9w"))))
(base32 "1giyyzwcybmh0yf3aq44hhmf9m4k40rva418pxljpr93fjf06fkk"))))
(build-system pyproject-build-system)
(arguments
(list #:test-flags
@ -8319,7 +8539,8 @@ (define-public python-scrapy
python-w3lib
python-zope-interface))
(native-inputs
(list python-pytest
(list python-pexpect
python-pytest
python-pytest-xdist
python-pyftpdlib
python-sybil
@ -8409,7 +8630,7 @@ (define-public python-mf2py
(define-public python-extruct
(package
(name "python-extruct")
(version "0.13.0")
(version "0.16.0")
(source (origin
(method git-fetch) ;for tests
(uri (git-reference
@ -8418,7 +8639,7 @@ (define-public python-extruct
(file-name (git-file-name name version))
(sha256
(base32
"075zldf3dqcc429z1vk2ngbmv034bnlyk6arh3rh30jbsvz9pzl5"))))
"1s05sz6nghrap1gjkg3vsqz6djld6lczd6w3r1542ir8n7binl7a"))))
(build-system python-build-system)
(arguments
(list
@ -8436,7 +8657,6 @@ (define-public python-extruct
python-mf2py
python-pyrdfa3
python-rdflib
python-rdflib-jsonld
python-w3lib))
(home-page "https://github.com/scrapinghub/extruct")
(synopsis "Extract embedded metadata from HTML markup")

View file

@ -49,7 +49,7 @@
;;; Copyright © 2018 Mathieu Lirzin <mthl@gnu.org>
;;; Copyright © 2018 Adam Massmann <massmannak@gmail.com>
;;; Copyright © 2016, 2018 Tomáš Čech <sleep_walker@gnu.org>
;;; Copyright © 2018-2023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2018-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
;;; Copyright © 2018, 2019, 2021, 2023 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2018, 2019, 2020, 2021, 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
@ -108,7 +108,7 @@
;;; Copyright © 2021 Simon Streit <simon@netpanic.org>
;;; Copyright © 2021, 2022, 2023 Daniel Meißner <daniel.meissner-i4k@ruhr-uni-bochum.de>
;;; Copyright © 2021, 2022 Pradana Aumars <paumars@courrier.dev>
;;; Copyright © 2021, 2022, 2023 Felix Gruber <felgru@posteo.net>
;;; Copyright © 20212024 Felix Gruber <felgru@posteo.net>
;;; Copyright © 2021 Sébastien Lerique <sl@eauchat.org>
;;; Copyright © 2021 Raphaël Mélotte <raphael.melotte@mind.be>
;;; Copyright © 2021 ZmnSCPxj <ZmnSCPxj@protonmail.com>
@ -136,6 +136,7 @@
;;; Copyright © 2023 Amade Nemes <nemesamade@gmail.com>
;;; Copyright © 2023 Bruno Victal <mirai@makinata.eu>
;;; Copyright © 2023 Kaelyn Takata <kaelyn.alexi@protonmail.com>
;;; Copyright © 2023 dan <i@dan.games>
;;; Copyright © 2023 Dominik Delgado Steuter <d@delgado.nrw>
;;; Copyright © 2023 Ivan Vilata-i-Balaguer <ivan@selidor.net>
;;; Copyright © 2023 Ontje Lünsdorf <ontje.luensdorf@dlr.de>
@ -148,6 +149,7 @@
;;; Copyright © 2023, 2024 Troy Figiel <troy@troyfigiel.com>
;;; Copyright © 2024 Timothee Mathieu <timothee.mathieu@inria.fr>
;;; Copyright © 2024 Ian Eure <ian@retrospec.tv>
;;; Copyright © 2024 Adriel Dumas--Jondeau <leirda@disroot.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -6055,6 +6057,54 @@ (define-public python-jinja2-time
templates. A format string can be provided to control the output.")
(license license:expat)))
(define-public python-pypugjs
(package
(name "python-pypugjs")
(version "5.9.12")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/kakulukia/pypugjs")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0zj7a560h973cl7brfw1nmyhgm8rp8j80wnih0shvhmw4ql23lpa"))))
(build-system pyproject-build-system)
(arguments
(list
#:phases #~(modify-phases %standard-phases
;; Our pyramid is outdated and pyramid-mako is not packaged.
(add-after 'unpack 'disable-pyramid
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "setup.py"
(("'pyramid")
"#'pyramid"))))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "python" "-m" "pytest" "-v"
"pypugjs/testsuite/")))))))
(native-inputs (list python-coverage
python-django
python-jinja2
python-flake8
python-flask
python-mako
python-nose
python-poetry-core
python-pytest
python-tornado-6
python-wheel))
(propagated-inputs (list python-charset-normalizer python-six))
(home-page "https://github.com/kakulukia/pypugjs")
(synopsis "Convert Pug source files into different template languages")
(description
"PyPugJS is a high-performance port of PugJS for Python, that converts
any @file{.pug} source into different template languages: Django, Jinja2,
Mako, and Tornado.")
(license license:expat))) ;; MIT
(define-public python-pysdl2
(package
(name "python-pysdl2")
@ -6170,26 +6220,20 @@ (define-public python-pystitcher
(define-public python-joblib
(package
(name "python-joblib")
(version "1.1.1")
(version "1.3.2")
(source (origin
(method url-fetch)
(uri (pypi-uri "joblib" version))
(sha256
(base32
"0019p280s2k941mihl67l7y6amwx86639xp3zvpsg1lmyish67rh"))))
(build-system python-build-system)
"1cbjjzsh9hzaqr2cqja95673p7j88b8bd02hjpkq8xz147k6by4j"))))
(build-system pyproject-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(setenv "JOBLIB_MULTIPROCESSING" "0")
(invoke "pytest" "-v" "joblib"
;; We disable this test to avoid having to depend on ipython/jupyter
"-k" "not test_parallel_call_cached_function_defined_in_jupyter")))))))
(native-inputs
(list python-pytest))
(list
#:test-flags ; disabled to avoid having to depend on ipython/jupyter
#~(list "-k" "not test_parallel_call_cached_function_defined_in_jupyter")))
(native-inputs (list python-pytest))
(propagated-inputs (list python-psutil))
(home-page "https://joblib.readthedocs.io/")
(synopsis "Using Python functions as pipeline jobs")
(description
@ -6376,6 +6420,46 @@ (define-public autokey
flexibility and power of the Python language.")
(license license:gpl3+)))
(define-public kalamine
(package
(name "kalamine")
(version "0.36")
(source
(origin
(method url-fetch)
(uri (pypi-uri "kalamine" version))
(sha256
(base32 "1xxncavq5a0dydhzpfjdxmqsddl77275d9k9giw1032bdyb9d5is"))))
(build-system pyproject-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'make-test-layouts
(lambda _
(apply invoke
(cons* "python" "-m" "kalamine.cli" "build"
(find-files "layouts" "\\.toml")))
(invoke "python" "-m" "kalamine.cli" "new" "test.toml"))))))
(propagated-inputs
(list python-click
python-livereload
python-lxml
python-progress
python-pyyaml
python-tomli))
;; TODO: Add python-pytest-ruff to native-inputs once it has been
;; packaged.
(native-inputs
(list python-hatchling python-mypy python-pytest))
(home-page "https://github.com/OneDeadKey/kalamine")
(synopsis "Keyboard layout maker")
(description
"Kalamine provides a CLI to create advanced keyboard layout from a
textual portable description. It also supports layout emulation via web
browser.")
(license license:expat)))
(define-public python-dm-tree
(package
(name "python-dm-tree")
@ -11391,6 +11475,27 @@ (define-public python-jaraco-text
processing, values parsing, case insensitive comparison, and more.")
(license license:expat)))
(define-public python-pypytools
(package
(name "python-pypytools")
(version "0.6.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pypytools" version))
(sha256
(base32 "0ag5xyzagprji0m2pkqsfy8539s003mn41pl6plbmh6iwi9w0h51"))))
(build-system python-build-system)
(arguments (list #:tests? #f)) ; no tests
(propagated-inputs (list python-py))
(home-page "https://github.com/antocuni/pypytools/")
(synopsis
"Tools to use PyPy-specific features, with CPython fallbacks")
(description
"This package provides a collection of useful tools to use PyPy-specific
features, with CPython fallbacks.")
(license license:x11)))
(define-public python-simplegeneric
(package
(name "python-simplegeneric")
@ -12261,6 +12366,24 @@ (define-public python-urwid-readline
supports @code{readline} shortcuts.")
(license license:expat)))
(define-public python-urwidgets
(package
(name "python-urwidgets")
(version "0.2.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "urwidgets" version))
(sha256
(base32 "123n9qfg6qwwh1911y71c3msxi89n8cjj15wh2snqmwdkyfwy6nl"))))
(build-system pyproject-build-system)
(propagated-inputs (list python-urwid))
(home-page "https://github.com/AnonymouX47/urwidgets")
(synopsis "Collection of widgets for urwid")
(description
"This package provides a collection of widgets for urwid.")
(license license:expat)))
(define-public python-textdistance
(package
(name "python-textdistance")
@ -12758,19 +12881,18 @@ (define-public snakemake
(build-system python-build-system)
(arguments
;; TODO: Package missing test dependencies.
'(#:tests? #f
#:phases
(modify-phases %standard-phases
;; For cluster execution Snakemake will call Python. Since there is
;; no suitable PYTHONPATH set, cluster execution will fail. We fix
;; this by calling the snakemake wrapper instead.
(add-after 'unpack 'call-wrapper-not-wrapped-snakemake
(lambda* (#:key outputs #:allow-other-keys)
(substitute* "snakemake/executors/__init__.py"
(("\\{sys.executable\\} -m snakemake")
(string-append (assoc-ref outputs "out")
"/bin/snakemake")))
#t)))))
(list
#:tests? #f
#:phases
#~(modify-phases %standard-phases
;; For cluster execution Snakemake will call Python. Since there is
;; no suitable PYTHONPATH set, cluster execution will fail. We fix
;; this by calling the snakemake wrapper instead.
(add-after 'unpack 'call-wrapper-not-wrapped-snakemake
(lambda _
(substitute* "snakemake/executors/__init__.py"
(("\\{sys.executable\\} -m snakemake")
(string-append #$output "/bin/snakemake"))))))))
(propagated-inputs
(list python-appdirs
python-configargparse
@ -12901,7 +13023,22 @@ (define-public snakemake-7
"")
(("\"-m snakemake\"")
(string-append "\"" #$output
"/bin/snakemake" "\"")))))
"/bin/snakemake" "\""))
;; The snakemake command produced by format_job_exec contains
;; references to /gnu/store. Prior to patching above that's
;; just a reference to Python; after patching it's a reference
;; to the snakemake executable.
;;
;; In Tibanna execution mode Snakemake arranges for a certain
;; Docker image to be deployed to AWS. It then passes its own
;; command line to Tibanna. This is misguided because it only
;; ever works if the local Snakemake command was run inside
;; the same Docker image. In the case of using Guix this is
;; never correct, so we need to replace the store reference.
(("tibanna_args.command = command")
(string-append
"tibanna_args.command = command.replace('"
#$output "/bin/snakemake', 'python3 -m snakemake')")))))
(add-after 'unpack 'patch-version
(lambda _
(substitute* "setup.py"
@ -14204,6 +14341,41 @@ (define-public python-markdown
markdown_py is also provided to convert Markdown files to HTML.")
(license license:bsd-3)))
(define-public python-markdown2
(package
(name "python-markdown2")
(version "2.4.13")
(source
(origin
(method git-fetch) ; no tests data in PyPi package
(uri (git-reference
(url "https://github.com/trentm/python-markdown2")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0m1wy8i4xmna5b97dvks8cfjmc1wid8pxmd2h82869d0ajva3r6a"))))
(build-system pyproject-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? test-flags #:allow-other-keys)
(when tests?
(with-directory-excursion "test"
(invoke "python" "testall.py"))))))))
(native-inputs
(list python-pygments))
(home-page "https://github.com/trentm/python-markdown2")
(synopsis "Fast and complete Python implementation of Markdown")
(description
"This package provides a fast and complete Python implementation of
Markdown. It was written to closely match the behaviour of the original
Perl-implemented Markdown.pl. It also comes with a number of
extensions (called @code{extras}) for things like syntax coloring, tables,
header-ids.")
(license license:expat)))
(define-public python-mdx-include
(package
(name "python-mdx-include")
@ -17249,16 +17421,18 @@ (define-public python-omegaconf
(define-public python-configargparse
(package
(name "python-configargparse")
(version "1.5.3")
(version "1.7")
(source (origin
(method url-fetch)
(uri (pypi-uri "ConfigArgParse" version))
(sha256
(base32
"17vky4ihicbf7nggg30xs7h3g5rxzwgch8vilnnrvdaacszkq2qv"))))
"1l866g1dcf2ljf8fl7ggpxk1rggry0lya4d5b264gradi1qp81p7"))))
(build-system pyproject-build-system)
(native-inputs
(list python-mock python-pytest))
(propagated-inputs
(list python-pyyaml))
(synopsis "Replacement for argparse")
(description "A drop-in replacement for argparse that allows options to also
be set via config files and/or environment variables.")
@ -23984,8 +24158,18 @@ (define-public python-prov
(base32
"1vi2fj31vygfcqrkimdmk52q2ldw08g9fn4v4zlgdfgcjlhqyhxn"))))
(build-system python-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-rdflib-6-compatibility
(lambda _
;; See https://github.com/trungdong/prov/issues/151
(substitute* "src/prov/tests/test_rdf.py"
(("\\.serialize\\(format=\"nt\"\\)")
".serialize(format=\"nt\", encoding=\"utf-8\")")))))))
(propagated-inputs
(list python-dateutil python-lxml python-networkx python-rdflib-5))
(list python-dateutil python-lxml python-networkx python-rdflib))
(native-inputs
(list graphviz python-pydot))
(home-page "https://github.com/trungdong/prov")
@ -30443,7 +30627,7 @@ (define-public python-dictpath
(define-public pyzo
(package
(name "pyzo")
(version "4.13.3")
(version "4.15.0")
(source
(origin
(method git-fetch)
@ -30453,7 +30637,7 @@ (define-public pyzo
(file-name (git-file-name name version))
(sha256
(base32
"1m0mrp20wjvy804214f4zzlbaqrakam0g3qr562yn2mjcgfba554"))))
"0m2sp65q21hhlfkvyby4sjc8cmwv3l0avw42xsna8za8ax9xadxr"))))
(build-system python-build-system)
(arguments
`(#:phases
@ -33360,17 +33544,24 @@ (define-public python-glom
(define-public python-box
(package
(name "python-box")
(version "5.3.0")
(version "7.1.1")
(source
;; The PyPI tarball does not contain all test files.
(origin
(method url-fetch)
(uri (pypi-uri "python-box" version))
(method git-fetch)
(uri
(git-reference
(url "https://github.com/cdgriffith/Box")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"0jhrdif57khx2hsw1q6a9x42knwcvq8ijgqyq1jmll6y6ifyzm2f"))))
(build-system python-build-system)
"1v8s6wji17fh87nvamzysvxi8f51h6szh6h6dxvids56gg5zc553"))))
(build-system pyproject-build-system)
(propagated-inputs
(list python-msgpack python-ruamel.yaml python-toml))
(list python-msgpack python-ruamel.yaml python-tomli python-tomli-w))
(native-inputs
(list python-cython python-pytest python-wheel))
(home-page "https://github.com/cdgriffith/Box")
(synopsis "Advanced Python dictionaries with dot notation access")
(description

View file

@ -55,7 +55,7 @@
;;; Copyright © 2018, 2019, 2020, 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2018 Luther Thompson <lutheroto@gmail.com>
;;; Copyright © 2018 Vagrant Cascadian <vagrant@debian.org>
;;; Copyright © 2019 Tanguy Le Carrour <tanguy@bioneland.org>
;;; Copyright © 2019, 2024 Tanguy Le Carrour <tanguy@bioneland.org>
;;; Copyright © 2020, 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2020, 2021 Greg Hogan <code@greghogan.com>
;;; Copyright © 2022 Philip McGrath <philip@philipmcgrath.com>
@ -596,6 +596,396 @@ (define-public python-3.10
(variable "PYTHONTZPATH")
(files (list "share/zoneinfo")))))))
(define-public python-3.12
(package
(name "python-next")
(version "3.12.2")
(source
(origin
(method url-fetch)
(uri (string-append "https://www.python.org/ftp/python/" version
"/Python-" version ".tar.xz"))
(sha256
(base32 "0w6qyfhc912xxav9x9pifwca40b4l49vy52wai9j0gc1mhni2a5y"))
(patches (search-patches "python-3-deterministic-build-info.patch"
"python-3.12-fix-tests.patch"
"python-3-hurd-configure.patch"))
(modules '((guix build utils)))
(snippet '(begin
;; Delete the bundled copy of libexpat.
(delete-file-recursively "Modules/expat")
(substitute* "Modules/Setup"
;; Link Expat instead of embedding the bundled one.
(("^#pyexpat.*")
"pyexpat pyexpat.c -lexpat\n"))
;; Delete windows binaries
(for-each delete-file
(find-files "Lib/distutils/command" "\\.exe$"))))))
(outputs '("out" "tk" ;tkinter; adds 50 MiB to the closure
"idle")) ;programming environment; weighs 5MB
(build-system gnu-build-system)
(arguments
`(#:test-target "test"
#:configure-flags (list "--enable-shared" ;allow embedding
"--with-system-expat" ;for XML support
"--with-system-ffi" ;build ctypes
"--with-ensurepip=install" ;install pip and setuptools
"--with-computed-gotos" ;main interpreter loop optimization
"--enable-unicode=ucs4"
"--without-static-libpython"
;; FIXME: These flags makes Python significantly faster,
;; but leads to non-reproducible binaries.
;; "--with-lto" ;increase size by 20MB, but 15% speedup
;; "--enable-optimizations"
;; Prevent the installed _sysconfigdata.py from retaining
;; a reference to coreutils.
"INSTALL=install -c"
"MKDIR_P=mkdir -p"
;; Disable runtime check failing if cross-compiling, see:
;; https://lists.yoctoproject.org/pipermail/poky/2013-June/008997.html
,@(if (%current-target-system)
'("ac_cv_buggy_getaddrinfo=no"
"ac_cv_file__dev_ptmx=no"
"ac_cv_file__dev_ptc=no")
'())
;; -fno-semantic-interposition reinstates some
;; optimizations by gcc leading to around 15% speedup.
;; This is the default starting from python 3.10.
"CFLAGS=-fno-semantic-interposition"
(string-append "LDFLAGS=-Wl,-rpath="
(assoc-ref %outputs "out")
"/lib"
" -fno-semantic-interposition"))
;; With no -j argument tests use all available cpus, so provide one.
#:make-flags (list (string-append (format #f "TESTOPTS=-j~d"
(parallel-job-count))
;; those tests fail on low-memory systems
" --exclude"
" test_mmap"
" test_socket"
" test_threading"
" test_asyncio"
" test_shutdown"
,@(if (system-hurd?)
'(" test_posix" ;multiple errors
" test_time"
" test_pty"
" test_shutil"
" test_tempfile" ;chflags: invalid argument:
;; tbv14c9t/dir0/dir0/dir0/test0.txt
" test_os" ;stty: 'standard input':
;; Inappropriate ioctl for device
" test_openpty" ;No such file or directory
" test_selectors" ;assertEqual(NUM_FDS // 2, len(fds))
;; 32752 != 4
" test_compileall" ;multiple errors
" test_poll" ;list index out of range
" test_subprocess" ;runs over 10min
" test_asyncore" ;multiple errors
" test_threadsignals"
" test_eintr" ;Process return code is -14
" test_io" ;multiple errors
" test_logging"
" test_signal"
" test_flags" ;ERROR
" test_bidirectional_pty"
" test_create_unix_connection"
" test_unix_sock_client_ops"
" test_open_unix_connection"
" test_open_unix_connection_error"
" test_read_pty_output"
" test_write_pty"
" test_concurrent_futures" ;freeze
" test_venv" ;freeze
" test_multiprocessing_forkserver" ;runs over 10min
" test_multiprocessing_spawn" ;runs over 10min
" test_builtin"
" test_capi"
" test_dbm_ndbm"
" test_exceptions"
" test_faulthandler"
" test_getopt"
" test_importlib"
" test_json"
" test_multiprocessing_fork"
" test_multiprocessing_main_handling"
" test_pdb "
" test_regrtest"
" test_sqlite")
'())))
#:modules ((ice-9 ftw)
(ice-9 match)
(guix build utils)
(guix build gnu-build-system))
#:phases (modify-phases %standard-phases
,@(if (system-hurd?)
`((add-after 'unpack
'disable-multi-processing
(lambda _
(substitute* "Makefile.pre.in"
(("-j0")
"-j1")))))
'())
(add-before 'configure 'patch-lib-shells
(lambda _
;; This variable is used in setup.py to enable cross compilation
;; specific switches. As it is not set properly by configure
;; script, set it manually.
,@(if (%current-target-system)
'((setenv "_PYTHON_HOST_PLATFORM" ""))
'())
;; Filter for existing files, since some may not exist in all
;; versions of python that are built with this recipe.
(substitute* (filter file-exists?
'("Lib/subprocess.py"
"Lib/popen2.py"
"Lib/distutils/tests/test_spawn.py"
"Lib/test/support/__init__.py"
"Lib/test/test_subprocess.py"))
(("/bin/sh")
(which "sh")))))
(add-before 'configure 'do-not-record-configure-flags
(lambda* (#:key configure-flags #:allow-other-keys)
;; Remove configure flags from the installed '_sysconfigdata.py'
;; and 'Makefile' so we don't end up keeping references to the
;; build tools.
;;
;; Preserve at least '--with-system-ffi' since otherwise the
;; thing tries to build libffi, fails, and we end up with a
;; Python that lacks ctypes.
(substitute* "configure"
(("^CONFIG_ARGS=.*$")
(format #f "CONFIG_ARGS='~a'\n"
(if (member "--with-system-ffi"
configure-flags)
"--with-system-ffi" ""))))))
(add-before 'check 'pre-check
(lambda _
;; 'Lib/test/test_site.py' needs a valid $HOME
(setenv "HOME"
(getcwd))))
(add-after 'unpack 'set-source-file-times-to-1980
;; XXX One of the tests uses a ZIP library to pack up some of the
;; source tree, and fails with "ZIP does not support timestamps
;; before 1980". Work around this by setting the file times in the
;; source tree to sometime in early 1980.
(lambda _
(let ((circa-1980 (* 10 366 24 60 60)))
(ftw "."
(lambda (file stat flag)
(utime file circa-1980 circa-1980) #t)))))
(add-after 'unpack 'remove-windows-binaries
(lambda _
;; Delete .exe from embedded .whl (zip) files
(for-each (lambda (whl)
(let ((dir "whl-content")
(circa-1980 (* 10 366 24 60 60)))
(mkdir-p dir)
(with-directory-excursion dir
(let ((whl (string-append "../" whl)))
(invoke "unzip" whl)
(for-each delete-file
(find-files "." "\\.exe$"))
(delete-file whl)
;; Reset timestamps to prevent them from ending
;; up in the Zip archive.
(ftw "."
(lambda (file stat flag)
(utime file circa-1980
circa-1980) #t))
(apply invoke "zip" "-X" whl
(find-files "."
#:directories? #t))))
(delete-file-recursively dir)))
(find-files "Lib/ensurepip" "\\.whl$"))))
(add-after 'install 'remove-tests
;; Remove 25 MiB of unneeded unit tests. Keep test_support.*
;; because these files are used by some libraries out there.
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
(match (scandir (string-append out "/lib")
(lambda (name)
(string-prefix? "python" name)))
((pythonX.Y)
(let ((testdir (string-append out "/lib/" pythonX.Y
"/test")))
(with-directory-excursion testdir
(for-each delete-file-recursively
(scandir testdir
(match-lambda
((or "." "..")
#f)
("support" #f)
(file (not (string-prefix?
"test_support."
file))))))
(call-with-output-file "__init__.py"
(const #t))))
(let ((libdir (string-append out "/lib/" pythonX.Y)))
(for-each (lambda (directory)
(let ((dir (string-append libdir "/"
directory)))
(when (file-exists? dir)
(delete-file-recursively dir))))
'("email/test" "ctypes/test"
"unittest/test"
"tkinter/test"
"sqlite3/test"
"bsddb/test"
"lib-tk/test"
"json/tests"
"distutils/tests"))))))))
(add-after 'remove-tests 'move-tk-inter
(lambda* (#:key outputs inputs #:allow-other-keys)
;; When Tkinter support is built move it to a separate output so
;; that the main output doesn't contain a reference to Tcl/Tk.
(let ((out (assoc-ref outputs "out"))
(tk (assoc-ref outputs "tk")))
(when tk
(match (find-files out "tkinter.*\\.so")
((tkinter.so)
;; The .so is in OUT/lib/pythonX.Y/lib-dynload, but we
;; want it under TK/lib/pythonX.Y/site-packages.
(let* ((len (string-length out))
(target (string-append tk "/"
(string-drop (dirname
(dirname
tkinter.so))
len)
"/site-packages")))
(install-file tkinter.so target)
(delete-file tkinter.so))))
;; Remove explicit store path references.
(let ((tcl (assoc-ref inputs "tcl"))
(tk (assoc-ref inputs "tk")))
(substitute* (find-files (string-append out "/lib")
"^(_sysconfigdata_.*\\.py|Makefile)$")
(((string-append "-L" tk "/lib"))
"")
(((string-append "-L" tcl "/lib"))
"")))))))
(add-after 'move-tk-inter 'move-idle
(lambda* (#:key outputs #:allow-other-keys)
;; when idle is built, move it to a separate output to save some
;; space (5MB)
(let ((out (assoc-ref outputs "out"))
(idle (assoc-ref outputs "idle")))
(when idle
(for-each (lambda (file)
(let ((target (string-append idle
"/bin/"
(basename
file))))
(install-file file
(dirname target))
(delete-file file)))
(find-files (string-append out "/bin")
"^idle"))
(match (find-files out "^idlelib$"
#:directories? #t)
((idlelib)
(let* ((len (string-length out))
(target (string-append idle "/"
(string-drop
idlelib len)
"/site-packages")))
(mkdir-p (dirname target))
(rename-file idlelib target))))))))
(add-after 'move-idle 'rebuild-bytecode
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
;; Disable hash randomization to ensure the generated .pycs
;; are reproducible.
(setenv "PYTHONHASHSEED" "0")
(for-each (lambda (output)
;; XXX: Delete existing pycs generated by the build
;; system beforehand because the -f argument does
;; not necessarily overwrite all files, leading to
;; indeterministic results.
(for-each (lambda (pyc)
(delete-file pyc))
(find-files output "\\.pyc$"))
(apply invoke
`(,,(if (%current-target-system)
"python3"
'(string-append out
"/bin/python3")) "-m"
"compileall"
"-o"
"0"
"-o"
"1"
"-o"
"2"
"-f" ;force rebuild
"--invalidation-mode=unchecked-hash"
;; Don't build lib2to3, because it's
;; Python 2 code.
"-x"
"lib2to3/.*"
,output)))
(map cdr outputs)))))
(add-before 'check 'set-TZDIR
(lambda* (#:key inputs native-inputs #:allow-other-keys)
;; test_email requires the Olson time zone database.
(setenv "TZDIR"
(string-append (assoc-ref (or native-inputs
inputs) "tzdata")
"/share/zoneinfo"))))
(add-after 'install 'install-sitecustomize.py
,(customize-site version)))))
(inputs (list bzip2
expat
gdbm
libffi ;for ctypes
sqlite ;for sqlite extension
openssl
readline
zlib
tcl
tk)) ;for tkinter
(native-inputs `(("tzdata" ,tzdata-for-tests)
("unzip" ,unzip)
("zip" ,(@ (gnu packages compression) zip))
("pkg-config" ,pkg-config)
("sitecustomize.py" ,(local-file (search-auxiliary-file
"python/sitecustomize.py")))
;; When cross-compiling, a native version of Python itself is needed.
,@(if (%current-target-system)
`(("python" ,this-package)
("which" ,which))
'())))
(native-search-paths
(list (guix-pythonpath-search-path version)
;; Used to locate tzdata by the zoneinfo module introduced in
;; Python 3.9.
(search-path-specification
(variable "PYTHONTZPATH")
(files (list "share/zoneinfo")))))
(home-page "https://www.python.org")
(synopsis "High-level, dynamically-typed programming language")
(description
"Python is a remarkably powerful dynamic programming language that
is used in a wide variety of application domains. Some of its key
distinguishing features include: clear, readable syntax; strong
introspection capabilities; intuitive object orientation; natural
expression of procedural code; full modularity, supporting hierarchical
packages; exception-based error handling; and very high level dynamic
data types.")
(properties '((cpe-name . "python")))
(license license:psfl)))
;; Next 3.x version.
(define-public python-next python-3.12)
;; Current 3.x version.
(define-public python-3 python-3.10)

View file

@ -218,14 +218,14 @@ (define-public qite
(define-public qt5ct
(package
(name "qt5ct")
(version "1.5")
(version "1.8")
(source
(origin
(method url-fetch)
(uri
(string-append "mirror://sourceforge/qt5ct/qt5ct-" version ".tar.bz2"))
(sha256
(base32 "14742vs32m98nbfb5mad0i8ciff5f45gfcb5v03p4hh2dvhhqgfn"))))
(base32 "1s88v3x5vxrz981jiqb9cnwak0shz6kgjbkp511i592y85a41dr3"))))
(build-system qt-build-system)
(arguments
(list
@ -2171,7 +2171,18 @@ (define-public qttools-5
"1bkx2sc5hyldarc7w76ymv7dlcna3ib9r2kp67jdqcf856bnrx36"))))
(arguments
(substitute-keyword-arguments (package-arguments qtsvg-5)
((#:tests? _ #f) #f))) ; TODO: Enable the tests
((#:tests? _ #f) #f) ; TODO: Enable the tests
((#:phases phases '%standard-phases)
#~(modify-phases #$phases
(add-after 'unpack 'patch-qmake
(lambda* (#:key inputs #:allow-other-keys)
;; Adjust the default location of the 'qmake' command known to
;; the 'lprodump' command, which would otherwise look for it
;; in its own bindir.
(substitute* "src/linguist/lprodump/main.cpp"
(("app.applicationDirPath\\() \\+ QLatin1String\\(\"/qmake\")")
(format #f "QLatin1String(~s)"
(search-input-file inputs "bin/qmake"))))))))))
(native-inputs (list perl qtdeclarative-5 vulkan-headers))
(inputs (list mesa qtbase-5))
(synopsis "Qt Tools and Designer modules")
@ -2349,7 +2360,7 @@ (define-public qtgamepad
primary target audience are embedded devices with fullscreen user interfaces,
and mobile applications targeting TV-like form factors.")))
(define-public qtscxml
(define-public qtscxml-5
(package
(inherit qtsvg-5)
(name "qtscxml")
@ -2377,6 +2388,45 @@ (define-public qtscxml
generating a C++ file that has a class implementing the state machine. It
also contains functionality to support data models and executable content.")))
(define-public qtscxml
(package
(name "qtscxml")
(version "6.5.2")
(source (origin
(method url-fetch)
(uri (qt-url name version))
(sha256
(base32
"1jxx9p7zi40r990ky991xd43mv6i8hdpnj2fhl7sf4q9fpng4c58"))
(modules '((guix build utils)))
(snippet
'(begin
(delete-file-recursively "tests/3rdparty")))))
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(delete 'check) ;move after the install phase
(add-after 'install 'check
(assoc-ref %standard-phases 'check))
(add-before 'check 'check-setup
(lambda _
(setenv "ARGS" "-E tst_scion")
(setenv "QT_QPA_PLATFORM" "offscreen")
(setenv "QML2_IMPORT_PATH"
(string-append #$output "/lib/qt6/qml:"
(getenv "QML2_IMPORT_PATH"))))))))
(build-system cmake-build-system)
(inputs (list qtbase qtdeclarative libxkbcommon))
(synopsis "Qt SCXML module")
(description "The Qt SCXML module provides functionality to create state
machines from SCXML files. This includes both dynamically creating state
machines (loading the SCXML file and instantiating states and transitions) and
generating a C++ file that has a class implementing the state machine. It
also contains functionality to support data models and executable content.")
(home-page (package-home-page qtbase))
(license (package-license qtbase))))
(define-public qtpositioning
(package
(name "qtpositioning")
@ -4486,7 +4536,7 @@ (define-public python-pyside-2
qtquickcontrols-5
qtquickcontrols2-5
qtscript
qtscxml
qtscxml-5
qtsensors
qtspeech
qtsvg-5

View file

@ -85,7 +85,7 @@ (define-public bcm2835
(supported-systems '("armhf-linux" "aarch64-linux"))
(license license:gpl3)))
(define raspi-gpio
(define-public raspi-gpio
(let ((commit "6d0769ac04760b6e9f33b4aa1f11c682237bf368")
(revision "1"))
(package
@ -466,7 +466,7 @@ (define-public rpi-fbcp
(define-public rpi-imager
(package
(name "rpi-imager")
(version "1.7.5")
(version "1.8.5")
(source (origin
(method git-fetch)
(uri (git-reference
@ -489,7 +489,7 @@ (define keep '("." ".."
(cut member <> keep)))))))
(sha256
(base32
"0c5qsqh7drvf76hc75m2cp7bf44w7gwbmhgaqjrl5qwb6pbqf7y8"))))
"1jr4w9h0bvqpy4r1g22n7b07zpplmc318v4lcfvh70c0rhl2vfi6"))))
(build-system qt-build-system)
(arguments
(list

View file

@ -367,45 +367,6 @@ (define-public python-rdflib
(license (license:non-copyleft "file://LICENSE"
"See LICENSE in the distribution."))))
(define-public python-rdflib-5
(package
(inherit python-rdflib)
(version "5.0.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "rdflib" version))
(sha256
(base32
"0mdi7xh4zcr3ngqwlgqdqf0i5bxghwfddyxdng1zwpiqkpa9s53q"))))
;; XXX: Lazily disable tests because they require a lot of work
;; and this package is only transitional.
(arguments '(#:tests? #f))))
;; Note: This package is only needed for rdflib < 6.0; supersede when
;; the above are removed.
(define-public python-rdflib-jsonld
(package
(name "python-rdflib-jsonld")
(version "0.6.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "rdflib-jsonld" version))
(sha256
(base32
"0qrshlqzv5g5bign7kjja3xf7hyk7xgayr3yd0qlqda1kl0x6z0h"))))
(build-system python-build-system)
(native-inputs
(list python-nose))
(propagated-inputs
(list python-rdflib))
(home-page "https://github.com/RDFLib/rdflib-jsonld")
(synopsis "rdflib extension adding JSON-LD parser and serializer")
(description "This package provides an rdflib extension adding JSON-LD
parser and serializer.")
(license license:bsd-3)))
(define-public python-cfgraph
(package
(name "python-cfgraph")

View file

@ -7,7 +7,7 @@
;;; Copyright © 2015, 2016, 2017 Ben Woodcroft <donttrustben@gmail.com>
;;; Copyright © 2017 Nikita <nikita@n0.is>
;;; Copyright © 2017, 2019-2022 Marius Bakke <marius@gnu.org>
;;; Copyright © 2017-2023 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017-2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017, 2018, 2020, 2021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2017, 2018, 2019 Christopher Baines <mail@cbaines.net>
@ -34,7 +34,7 @@
;;; Copyright © 2023 Yovan Naumovski <yovan@gorski.stream>
;;; Copyright © 2023 gemmaro <gemmaro.dev@gmail.com>
;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2023, 2024 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2023, 2024 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;;
;;; This file is part of GNU Guix.
@ -3258,7 +3258,10 @@ (define-public ruby-x25519
(file-name (git-file-name name version))
(sha256
(base32
"1g0311ly32f6hfn4q5fvkbjbl2bhv1l9fx6s0kglxfsrwq51926y"))))
"1g0311ly32f6hfn4q5fvkbjbl2bhv1l9fx6s0kglxfsrwq51926y"))
(patches
(search-patches
"ruby-x25519-automatic-fallback-non-x86_64.patch"))))
(build-system ruby-build-system)
(arguments
(list #:test-target "spec"
@ -9846,13 +9849,13 @@ (define-public ruby-pry-byebug
(define-public ruby-stackprof
(package
(name "ruby-stackprof")
(version "0.2.25")
(version "0.2.26")
(source
(origin
(method url-fetch)
(uri (rubygems-uri "stackprof" version))
(sha256
(base32 "0bhdgfb0pmw9mav1kw9fn0ka012sa0i3h5ppvqssw5xq48nhxnr8"))))
(base32 "1gdqqwnampxmc54nf6zfy9apkmkpdavzipvfssmjlhnrrjy8qh7f"))))
(build-system ruby-build-system)
(arguments
(list
@ -9872,7 +9875,10 @@ (define-public ruby-stackprof
(("def test_(cputime)" _ name)
(string-append "def skip_" name))
;; This test often fails
(("def test_gc") "def skip_test_gc"))))
(("def test_gc") "def skip_test_gc")
;; This test is known to fail on 32-bit systems.
;; /gnu/store/w8y8wm82by1cnp33n5vy976wbrns9jys-stackprof-0.2.26.gem
(("def test_raw") "def skip_test_raw"))))
(add-before 'check 'build-tests
(lambda _
(invoke "rake" "compile")))

View file

@ -84,6 +84,7 @@ (define-module (gnu packages rust-apps)
#:use-module (gnu packages jemalloc)
#:use-module (gnu packages kde)
#:use-module (gnu packages linux)
#:use-module (gnu packages llvm)
#:use-module (gnu packages networking)
#:use-module (gnu packages shells)
#:use-module (gnu packages ssh)
@ -1782,39 +1783,8 @@ (define-public git-interactive-rebase-tool
rebase.")
(license license:gpl3+)))
(define-public rust-cbindgen
(package
(name "rust-cbindgen")
(version "0.13.2")
(source
(origin
(method url-fetch)
(uri (crate-uri "cbindgen" version))
(file-name (string-append name "-" version ".tar.xz"))
(sha256
(base32
"0673pq96hs7waavkv58v2pakpxpsfyjvbraa5kyl2b44phgdzcid"))))
(build-system cargo-build-system)
(arguments
`(#:cargo-inputs
(("clap" ,rust-clap-2)
("log" ,rust-log-0.4)
("proc-macro2" ,rust-proc-macro2-1)
("quote" ,rust-quote-1)
("serde" ,rust-serde-1)
("serde-json" ,rust-serde-json-1)
("syn" ,rust-syn-1)
("tempfile" ,rust-tempfile-3)
("toml" ,rust-toml-0.5))))
(home-page "https://github.com/eqrion/cbindgen/")
(synopsis "Tool for generating C bindings to Rust code")
(description
"This package provides a tool for generating C/C++ bindings to Rust code.")
(license license:mpl2.0)))
(define-public rust-cbindgen-0.26
(package
(inherit rust-cbindgen)
(name "rust-cbindgen")
(version "0.26.0")
(source
@ -1824,6 +1794,7 @@ (define-public rust-cbindgen-0.26
(file-name (string-append name "-" version ".tar.gz"))
(sha256
(base32 "0jdbxmn5h5nlr4bifx85gny309djv5djs9q78fa1d7sj0wdw2sys"))))
(build-system cargo-build-system)
(arguments
`(#:cargo-inputs (("rust-clap" ,rust-clap-3)
("rust-heck" ,rust-heck-0.4)
@ -1837,7 +1808,12 @@ (define-public rust-cbindgen-0.26
("rust-tempfile" ,rust-tempfile-3)
("rust-toml" ,rust-toml-0.5))
#:cargo-development-inputs (("rust-serial-test" ,rust-serial-test-0.5))))
(native-inputs (list python-cython))))
(native-inputs (list python-cython))
(home-page "https://github.com/eqrion/cbindgen/")
(synopsis "Tool for generating C bindings to Rust code")
(description
"This package provides a tool for generating C/C++ bindings to Rust code.")
(license license:mpl2.0)))
(define-public rust-cbindgen-0.24
(package
@ -1865,6 +1841,69 @@ (define-public rust-cbindgen-0.23
(base32
"006rn3fn4njayjxr2vd24g1awssr9i3894nbmfzkybx07j728vav"))))))
(define-public rust-cbindgen rust-cbindgen-0.26)
(define-public rust-bindgen-cli
(package
(name "rust-bindgen-cli")
(version "0.69.4")
(source
(origin
(method url-fetch)
(uri (crate-uri "bindgen-cli" version))
(file-name (string-append name "-" version ".tar.gz"))
(sha256
(base32 "00dfny07m4xfnqbfn7yr7cqwilj6935lbyg5d39yxjfj8jglfcax"))))
(build-system cargo-build-system)
(arguments
`(#:install-source? #f
#:cargo-inputs (("rust-bindgen" ,rust-bindgen-0.69)
("rust-clap" ,rust-clap-4)
("rust-clap-complete" ,rust-clap-complete-4)
("rust-env-logger" ,rust-env-logger-0.10)
("rust-log" ,rust-log-0.4)
("rust-shlex" ,rust-shlex-1))
#:phases
(modify-phases %standard-phases
(replace 'install
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((bin (string-append (assoc-ref outputs "out") "/bin"))
(bindgen (string-append bin "/bindgen"))
(llvm-dir (string-append
(assoc-ref inputs "clang") "/lib")))
(install-file "target/release/bindgen" bin)
(wrap-program bindgen
`("LIBCLANG_PATH" = (,llvm-dir))))))
(add-after 'install 'install-completions
(lambda* (#:key native-inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(share (string-append out "/share"))
(bindgen (string-append out "/bin/bindgen")))
(mkdir-p (string-append share "/bash-completion/completions"))
(with-output-to-file
(string-append share "/bash-completion/completions/bindgen")
(lambda _ (invoke bindgen "--generate-shell-completions" "bash")))
(mkdir-p (string-append share "/fish/vendor_completions.d"))
(with-output-to-file
(string-append share "/fish/vendor_completions.d/bindgen.fish")
(lambda _ (invoke bindgen "--generate-shell-completions" "fish")))
(mkdir-p (string-append share "/zsh/site-functions"))
(with-output-to-file
(string-append share "/zsh/site-functions/_bindgen")
(lambda _ (invoke bindgen "--generate-shell-completions" "zsh")))
(mkdir-p (string-append share "/elvish/lib"))
(with-output-to-file
(string-append share "/elvish/lib/bindgen")
(lambda _
(invoke bindgen "--generate-shell-completions" "elvish")))))))))
(inputs (list bash-minimal clang))
(home-page "https://rust-lang.github.io/rust-bindgen/")
(synopsis "Generate Rust FFI bindings to C and C++ libraries")
(description "This package can be used to automatically generate Rust FFI
bindings to C and C++ libraries. This package provides the @command{bindgen}
command.")
(license license:bsd-3)))
(define-public sniffglue
(package
(name "sniffglue")
@ -2361,7 +2400,105 @@ (define-public rbw
background agent taking care of maintaining the necessary state.")
(license license:expat)))
;;; Note: keep in sync with our current Rust/Cargo version.
;; Note: Keep rust-cargo and rust-cargo-c in sync with our current
;; rust:cargo version.
(define-public rust-cargo
(package
(name "rust-cargo")
(version "0.76.0")
(source
(origin
(method url-fetch)
(uri (crate-uri "cargo" version))
(file-name (string-append name "-" version ".tar.gz"))
(sha256
(base32 "14yjyvj9bl6mlzx6bbi3igflgdrx1hil9ifnf1dl9xnm4mb2gjw6"))))
(build-system cargo-build-system)
(arguments
`(#:tests? #f ; unresolved import `cargo_test_support`
#:cargo-inputs
(("rust-anstream" ,rust-anstream-0.6)
("rust-anstyle" ,rust-anstyle-1)
("rust-anyhow" ,rust-anyhow-1)
("rust-base64" ,rust-base64-0.21)
("rust-bytesize" ,rust-bytesize-1)
("rust-cargo-credential" ,rust-cargo-credential-0.4)
("rust-cargo-credential-libsecret" ,rust-cargo-credential-libsecret-0.4)
("rust-cargo-credential-macos-keychain" ,rust-cargo-credential-macos-keychain-0.4)
("rust-cargo-credential-wincred" ,rust-cargo-credential-wincred-0.4)
("rust-cargo-platform" ,rust-cargo-platform-0.1)
("rust-cargo-util" ,rust-cargo-util-0.2)
("rust-clap" ,rust-clap-4)
("rust-color-print" ,rust-color-print-0.3)
("rust-crates-io" ,rust-crates-io-0.39)
("rust-curl" ,rust-curl-0.4)
("rust-curl-sys" ,rust-curl-sys-0.4)
("rust-filetime" ,rust-filetime-0.2)
("rust-flate2" ,rust-flate2-1)
("rust-flate2" ,rust-flate2-1)
("rust-git2" ,rust-git2-0.18)
("rust-git2-curl" ,rust-git2-curl-0.19)
("rust-gix" ,rust-gix-0.55)
("rust-gix-features" ,rust-gix-features-0.35)
("rust-glob" ,rust-glob-0.3)
("rust-hex" ,rust-hex-0.4)
("rust-hmac" ,rust-hmac-0.12)
("rust-home" ,rust-home-0.5)
("rust-http-auth" ,rust-http-auth-0.1)
("rust-humantime" ,rust-humantime-2)
("rust-ignore" ,rust-ignore-0.4)
("rust-im-rc" ,rust-im-rc-15)
("rust-indexmap" ,rust-indexmap-2)
("rust-itertools" ,rust-itertools-0.11)
("rust-jobserver" ,rust-jobserver-0.1)
("rust-lazycell" ,rust-lazycell-1)
("rust-libc" ,rust-libc-0.2)
("rust-libgit2-sys" ,rust-libgit2-sys-0.16)
("rust-memchr" ,rust-memchr-2)
("rust-opener" ,rust-opener-0.6)
("rust-openssl" ,rust-openssl-0.10)
("rust-os-info" ,rust-os-info-3)
("rust-pasetors" ,rust-pasetors-0.6)
("rust-pathdiff" ,rust-pathdiff-0.2)
("rust-pulldown-cmark" ,rust-pulldown-cmark-0.9)
("rust-rand" ,rust-rand-0.8)
("rust-rustfix" ,rust-rustfix-0.6)
("rust-semver" ,rust-semver-1)
("rust-serde" ,rust-serde-1)
("rust-serde-untagged" ,rust-serde-untagged-0.1)
("rust-serde-value" ,rust-serde-value-0.7)
("rust-serde-ignored" ,rust-serde-ignored-0.1)
("rust-serde-json" ,rust-serde-json-1)
("rust-sha1" ,rust-sha1-0.10)
("rust-shell-escape" ,rust-shell-escape-0.1)
("rust-supports-hyperlinks" ,rust-supports-hyperlinks-2)
("rust-syn" ,rust-syn-2)
("rust-tar" ,rust-tar-0.4)
("rust-tar" ,rust-tar-0.4)
("rust-tempfile" ,rust-tempfile-3)
("rust-time" ,rust-time-0.3)
("rust-toml" ,rust-toml-0.8)
("rust-toml-edit" ,rust-toml-edit-0.20)
("rust-tracing" ,rust-tracing-0.1)
("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3)
("rust-unicase" ,rust-unicase-2)
("rust-unicode-width" ,rust-unicode-width-0.1)
("rust-unicode-xid" ,rust-unicode-xid-0.2)
("rust-url" ,rust-url-2)
("rust-walkdir" ,rust-walkdir-2)
("rust-windows-sys" ,rust-windows-sys-0.48))
#:cargo-development-inputs (("rust-same-file" ,rust-same-file-1)
("rust-snapbox" ,rust-snapbox-0.4))))
(native-inputs
(list pkg-config))
(inputs
(list curl libssh2 libgit2-1.7 openssl zlib))
(home-page "https://crates.io")
(synopsis "Package manager for Rust")
(description "Cargo, a package manager for Rust. This package provides
the library crate of Cargo.")
(license (list license:expat license:asl2.0))))
(define-public rust-cargo-c
(package
(name "rust-cargo-c")

View file

@ -49,6 +49,7 @@ (define-module (gnu packages rust)
#:use-module (gnu packages libffi)
#:use-module (gnu packages linux)
#:use-module (gnu packages llvm)
#:use-module (gnu packages llvm-meta)
#:use-module (gnu packages mingw)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python)
@ -905,7 +906,7 @@ (define-public rust-1.73
(("features = \\[\"fs\"" all)
(string-append all ", \"use-libc\""))))))))))
(define rust-1.74
(define-public rust-1.74
(let ((base-rust (rust-bootstrapped-package rust-1.73 "1.74.1"
"07930r17dkj3dnsrmilywb6p9i2g2jx56ndfpa2wh8crzhi3xnv7")))
(package
@ -937,7 +938,7 @@ (define rust-1.74
(delete 'revert-riscv-pause-instruction))))
(package-arguments base-rust))))))
(define rust-1.75
(define-public rust-1.75
(let ((base-rust (rust-bootstrapped-package rust-1.74 "1.75.0"
"1260mf3066ki6y55pvr35lnf54am6z96a3ap3hniwd4xpi2rywsv")))
(package
@ -964,7 +965,9 @@ (define-public rust
(let ((base-rust rust-1.75))
(package
(inherit base-rust)
(properties (alist-delete 'hidden? (package-properties base-rust)))
(properties (append
(alist-delete 'hidden? (package-properties base-rust))
(clang-compiler-cpu-architectures "15")))
(outputs (cons* "rust-src" "tools" (package-outputs base-rust)))
(source
(origin

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