diff options
author | Marius Bakke <mbakke@fastmail.com> | 2020-02-14 19:05:45 +0100 |
---|---|---|
committer | Marius Bakke <mbakke@fastmail.com> | 2020-02-14 19:05:45 +0100 |
commit | 7edafc884c2a21258541b17a231051702c458263 (patch) | |
tree | d4202c8d6516bacd32fa55ee23c54b069ef8abd6 /gnu | |
parent | 89da127035737bdf922bc566970c5506c2e01b00 (diff) | |
parent | 64fc4f3705423c83c680a95d8dea81a39fce9a70 (diff) | |
download | guix-7edafc884c2a21258541b17a231051702c458263.tar.gz |
Merge branch 'master' into core-updates
Diffstat (limited to 'gnu')
120 files changed, 6729 insertions, 1912 deletions
diff --git a/gnu/installer.scm b/gnu/installer.scm index 6766037aae..b93cebbc13 100644 --- a/gnu/installer.scm +++ b/gnu/installer.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2018 Mathieu Othacehe <m.othacehe@gmail.com> +;;; Copyright © 2018, 2020 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> ;;; @@ -389,8 +389,9 @@ selected keymap." ;; We did it! Let's reboot! (sync) (stop-service 'root)) - (_ ;installation failed - ;; TODO: Honor the result of 'run-install-failed-page'. + (_ + ;; The installation failed, exit so that it is restarted + ;; by login. #f))) (const #f) (lambda (key . args) diff --git a/gnu/installer/final.scm b/gnu/installer/final.scm index 1b85900912..8c2185e36f 100644 --- a/gnu/installer/final.scm +++ b/gnu/installer/final.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2018 Mathieu Othacehe <m.othacehe@gmail.com> +;;; Copyright © 2018, 2020 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. @@ -23,6 +23,7 @@ #:use-module (gnu installer utils) #:use-module (gnu installer user) #:use-module (gnu services herd) + #:use-module (guix build syscalls) #:use-module (guix build utils) #:use-module (gnu build accounts) #:use-module ((gnu system shadow) #:prefix sys:) @@ -96,6 +97,15 @@ USERS." (write-passwd password (string-append etc "/passwd")) (write-shadow shadow (string-append etc "/shadow"))) +(define (umount-cow-store) + "Remove the store overlay and the bind-mount on /tmp created by the +cow-store service." + (let ((tmp-dir "/remove")) + (mkdir-p tmp-dir) + (mount (%store-directory) tmp-dir "" MS_MOVE) + (umount tmp-dir) + (umount "/tmp"))) + (define* (install-system locale #:key (users '())) "Create /etc/shadow and /etc/passwd on the installation target for USERS. Start COW-STORE service on target directory and launch guix install command in @@ -114,5 +124,16 @@ or #f. Return #t on success and #f on failure." ;; passwords that we've put in there. (create-user-database users (%installer-target-dir)) - (start-service 'cow-store (list (%installer-target-dir))) - (run-shell-command install-command #:locale locale))) + (dynamic-wind + (lambda () + (start-service 'cow-store (list (%installer-target-dir)))) + (lambda () + (run-shell-command install-command #:locale locale)) + (lambda () + (stop-service 'cow-store) + ;; Remove the store overlay created at cow-store service start. + ;; Failing to do that will result in further umount calls to fail + ;; because the target device is seen as busy. See: + ;; https://lists.gnu.org/archive/html/guix-devel/2018-12/msg00161.html. + (umount-cow-store) + #f)))) diff --git a/gnu/installer/newt/final.scm b/gnu/installer/newt/final.scm index 061bcd3f78..405eee2540 100644 --- a/gnu/installer/newt/final.scm +++ b/gnu/installer/newt/final.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2018 Mathieu Othacehe <m.othacehe@gmail.com> +;;; Copyright © 2018, 2020 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2019, 2020 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. @@ -27,6 +27,7 @@ #:use-module (guix i18n) #:use-module (srfi srfi-34) #:use-module (srfi srfi-35) + #:use-module (ice-9 match) #:use-module (newt) #:export (run-final-page)) @@ -73,12 +74,18 @@ press the button to reboot.")) 'success) (define (run-install-failed-page) - (choice-window - (G_ "Installation failed") - (G_ "Restart installer") - (G_ "Retry system install") - (G_ "The final system installation step failed. You can retry the \ -last step, or restart the installer."))) + (match (choice-window + (G_ "Installation failed") + (G_ "Resume") + (G_ "Restart the installer") + (G_ "The final system installation step failed. You can resume from \ +a specific step, or restart the installer.")) + (1 (raise + (condition + (&installer-step-abort)))) + (2 + ;; Keep going, the installer will be restarted later on. + #t))) (define* (run-install-shell locale #:key (users '())) diff --git a/gnu/local.mk b/gnu/local.mk index 60b1ce9248..347713239d 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -109,6 +109,7 @@ GNU_SYSTEM_MODULES = \ %D%/packages/check.scm \ %D%/packages/chemistry.scm \ %D%/packages/chez.scm \ + %D%/packages/chicken.scm \ %D%/packages/chromium.scm \ %D%/packages/ci.scm \ %D%/packages/cinnamon.scm \ @@ -818,10 +819,7 @@ dist_patch_DATA = \ %D%/packages/patches/docbook-xsl-nonrecursive-string-subst.patch \ %D%/packages/patches/doc++-include-directives.patch \ %D%/packages/patches/doc++-segfault-fix.patch \ - %D%/packages/patches/docker-adjust-tests-for-changes-in-go.patch \ - %D%/packages/patches/docker-engine-test-noinstall.patch \ %D%/packages/patches/docker-fix-tests.patch \ - %D%/packages/patches/docker-use-fewer-modprobes.patch \ %D%/packages/patches/dovecot-trees-support-dovecot-2.3.patch \ %D%/packages/patches/doxygen-test.patch \ %D%/packages/patches/doxygen-1.8.17-runtests.patch \ @@ -1029,7 +1027,6 @@ dist_patch_DATA = \ %D%/packages/patches/inkscape-poppler-0.76.patch \ %D%/packages/patches/intltool-perl-compatibility.patch \ %D%/packages/patches/irrlicht-use-system-libs.patch \ - %D%/packages/patches/isc-dhcp-4.4.1-fixes-for-newer-bind.patch \ %D%/packages/patches/isl-0.11.1-aarch64-support.patch \ %D%/packages/patches/jacal-fix-texinfo.patch \ %D%/packages/patches/jamvm-arm.patch \ @@ -1116,8 +1113,6 @@ dist_patch_DATA = \ %D%/packages/patches/libmpeg2-global-symbol-test.patch \ %D%/packages/patches/libmygpo-qt-fix-qt-5.11.patch \ %D%/packages/patches/libmygpo-qt-missing-qt5-modules.patch \ - %D%/packages/patches/libreoffice-icu.patch \ - %D%/packages/patches/libreoffice-glm.patch \ %D%/packages/patches/libseccomp-open-aarch64.patch \ %D%/packages/patches/libsndfile-armhf-type-checks.patch \ %D%/packages/patches/libsndfile-CVE-2017-8361-8363-8365.patch \ @@ -1353,6 +1348,7 @@ dist_patch_DATA = \ %D%/packages/patches/qemu-CVE-2020-7039.patch \ %D%/packages/patches/qemu-CVE-2020-7211.patch \ %D%/packages/patches/qemu-fix-documentation-build-failure.patch \ + %D%/packages/patches/qrcodegen-cpp-make-install.patch \ %D%/packages/patches/qt4-ldflags.patch \ %D%/packages/patches/qtbase-use-TZDIR.patch \ %D%/packages/patches/qtscript-disable-tests.patch \ @@ -1370,6 +1366,7 @@ dist_patch_DATA = \ %D%/packages/patches/readline-link-ncurses.patch \ %D%/packages/patches/readline-6.2-CVE-2014-2524.patch \ %D%/packages/patches/reposurgeon-add-missing-docbook-files.patch \ + %D%/packages/patches/reprotest-support-guix.patch \ %D%/packages/patches/ri-li-modernize_cpp.patch \ %D%/packages/patches/ripperx-missing-file.patch \ %D%/packages/patches/rpcbind-CVE-2017-8779.patch \ @@ -1385,6 +1382,7 @@ dist_patch_DATA = \ %D%/packages/patches/rust-bootstrap-stage0-test.patch \ %D%/packages/patches/rust-coresimd-doctest.patch \ %D%/packages/patches/rust-reproducible-builds.patch \ + %D%/packages/patches/rust-openssl-sys-no-vendor.patch \ %D%/packages/patches/rxvt-unicode-escape-sequences.patch \ %D%/packages/patches/sbcl-graph-asdf-definitions.patch \ %D%/packages/patches/scalapack-blacs-mpi-deprecations.patch \ diff --git a/gnu/machine.scm b/gnu/machine.scm index bdd92d9592..434d78ab41 100644 --- a/gnu/machine.scm +++ b/gnu/machine.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2019 David Thompson <davet@gnu.org> -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; ;;; This file is part of GNU Guix. ;;; diff --git a/gnu/machine/digital-ocean.scm b/gnu/machine/digital-ocean.scm index 6f7cf8fb30..1a91a3a49b 100644 --- a/gnu/machine/digital-ocean.scm +++ b/gnu/machine/digital-ocean.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; ;;; This file is part of GNU Guix. ;;; diff --git a/gnu/machine/ssh.scm b/gnu/machine/ssh.scm index d6ce1253a4..6374373e22 100644 --- a/gnu/machine/ssh.scm +++ b/gnu/machine/ssh.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; ;;; This file is part of GNU Guix. ;;; diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index 878d9ad307..af39676d57 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -25,7 +25,7 @@ ;;; Copyright © 2018 Pierre Neidhardt <mail@ambrevar.xyz> ;;; Copyright © 2019 Brett Gilio <brettg@gnu.org> ;;; Copyright © 2019 Björn Höfling <bjoern.hoefling@bjoernhoefling.de> -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com> ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2019 Guillaume Le Vaillant <glv@posteo.net> @@ -451,7 +451,7 @@ hostname.") (define-public shadow (package (name "shadow") - (version "4.8") + (version "4.8.1") (source (origin (method url-fetch) (uri (string-append @@ -459,7 +459,7 @@ hostname.") "download/" version "/shadow-" version ".tar.xz")) (sha256 (base32 - "0r5c1p8mfwhw11gb6mjsx1k7d4c32dxai7yss8n5pwy1p61ndd34")))) + "0qmfq50sdhz6xilgxvinblll8j2iqfl7hwk45bq744y4plq4dbd3")))) (build-system gnu-build-system) (arguments `(;; Assume System V `setpgrp (void)', which is the default on GNU @@ -771,14 +771,14 @@ connection alive.") bind-release-version))) (package (name "isc-dhcp") - (version "4.4.1") + (version "4.4.2") (source (origin (method url-fetch) (uri (string-append "https://ftp.isc.org/isc/dhcp/" version "/dhcp-" version ".tar.gz")) (sha256 (base32 - "025nfqx4zwdgv4b3rkw26ihcj312vir08jk6yi57ndmb4a4m08ia")))) + "08a5003zdxgl41b29zjkxa92h2i40zyjgxg0npvnhpkfl5jcsz0s")))) (build-system gnu-build-system) (arguments `(#:parallel-build? #f @@ -787,17 +787,6 @@ connection alive.") (modify-phases %standard-phases (add-after 'unpack 'replace-bundled-bind (lambda* (#:key inputs native-inputs #:allow-other-keys) - ;; XXX TODO: Remove the following invocation of 'patch' when - ;; isc-dhcp is updated. It should be needed only for 4.4.1. - (let ((patch (string-append (assoc-ref (or native-inputs inputs) - "patch") - "/bin/patch")) - (the-patch (assoc-ref (or native-inputs inputs) - "fixes-for-newer-bind.patch"))) - (format #t "applying '~a'...~%" the-patch) - (invoke patch "--force" "--no-backup-if-mismatch" - "-p1" "--input" the-patch)) - (delete-file "bind/bind.tar.gz") (copy-file (assoc-ref inputs "bind-source-tarball") "bind/bind.tar.gz") @@ -885,20 +874,14 @@ connection alive.") (native-inputs `(("perl" ,perl) - ("file" ,file) - - ;; XXX TODO: Remove the following patch, and also the 'patch' - ;; program, when isc-dhcp is updated. - ("fixes-for-newer-bind.patch" - ,(search-patch "isc-dhcp-4.4.1-fixes-for-newer-bind.patch")) - ("patch" ,patch))) + ("file" ,file))) (inputs `(("inetutils" ,inetutils) ("net-tools" ,net-tools) ("iproute" ,iproute) - ;; XXX isc-dhcp bundles a copy of bind that has security - ;; flaws, so we use a newer version. + ;; isc-dhcp bundles a copy of BIND, which has proved vulnerable + ;; in the past. Use a BIND-VERSION of our choosing instead. ("bind-source-tarball" ,(origin (method url-fetch) @@ -1588,7 +1571,7 @@ module slots, and the list of I/O ports (e.g. serial, parallel, USB).") (define-public acpica (package (name "acpica") - (version "20191213") + (version "20200110") (source (origin (method url-fetch) (uri (string-append @@ -1596,7 +1579,7 @@ module slots, and the list of I/O ports (e.g. serial, parallel, USB).") version ".tar.gz")) (sha256 (base32 - "1106d5b7q8jlgc2z0gz83jdah1yml4fz5z0jjcs7a52pv00c9am8")))) + "1hb4g6r7w8s4bhlkk36fmb4qxghnrwvad7f18cpn6zz0b4sjs7za")))) (build-system gnu-build-system) (native-inputs `(("flex" ,flex) ("bison" ,bison))) @@ -1622,14 +1605,13 @@ development, not the kernel implementation of ACPI.") (define-public s-tui (package (name "s-tui") - (version "0.8.3") + (version "1.0.0") (source (origin (method url-fetch) (uri (pypi-uri "s-tui" version)) (sha256 - (base32 - "00lsh2v4i8rwfyjyxx5lijd6rnk9smcfffhzg5sv94ijpcnh216m")))) + (base32 "0r5yhlsi5xiy7ii1w4kqkaxz9069v5bbfwi3x3xnxhk51yjfgr8n")))) (build-system python-build-system) (inputs `(("python-psutil" ,python-psutil) diff --git a/gnu/packages/aidc.scm b/gnu/packages/aidc.scm index 77db0ac9fc..b68f2137be 100644 --- a/gnu/packages/aidc.scm +++ b/gnu/packages/aidc.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2017 Hartmut Goebel <h.goebel@crazy-compilers.com> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019 Guillaume Le Vaillant <glv@posteo.net> +;;; Copyright © 2020 Leo Famulari <leo@famulari.name> ;;; ;;; This file is part of GNU Guix. ;;; @@ -154,3 +155,41 @@ For application developers, language bindings are included for C, C++ and Python as well as GUI widgets for GTK and Qt.") (home-page "https://github.com/mchehab/zbar") (license license:lgpl2.1+))) + +(define-public qrcodegen-cpp + ;; Currently this project's installation mechanism only exists as a GitHub + ;; pull request, so we build from a recent commit that the proposed patch + ;; applies to. + (let ((commit "6ea933f1596d818bd21e9a6b8d2e851fb8b4bcf1") + (revision "0")) + (package + (name "qrcodegen-cpp") + (version (git-version "1.5.0" revision commit)) + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/nayuki/QR-Code-generator.git") + (commit commit))) + (file-name (git-file-name name version)) + (patches (search-patches "qrcodegen-cpp-make-install.patch")) + (sha256 + (base32 + "19fcwqmfk2n9p2n01dv2j4x2y2mqip0j1wbmfbxjp34rqkjwcwxm")))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f ; no test suite + #:make-flags + (list (string-append "PREFIX=" (assoc-ref %outputs "out"))) + #:phases + (modify-phases %standard-phases + (delete 'configure) ; No ./configure script + ;; Only build the C++ variant. + (add-after 'unpack 'chdir + (lambda _ + (chdir "cpp") + #t))))) + (synopsis "QR Code generator library") + (description "qrcodegen-cpp is a QR code generator library in C++. The +project also offers Java, Javascript, Python, C, and Rust implementations.") + (home-page "https://www.nayuki.io/page/qr-code-generator-library") + (license license:expat)))) diff --git a/gnu/packages/antivirus.scm b/gnu/packages/antivirus.scm index 397b94301d..dc4cc111e1 100644 --- a/gnu/packages/antivirus.scm +++ b/gnu/packages/antivirus.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2016, 2017, 2018, 2019 Eric Bavier <bavier@member.fsf.org> +;;; Copyright © 2016, 2017, 2018, 2019, 2020 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2018 Christopher Baines <mail@cbaines.net> ;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; @@ -44,14 +44,14 @@ (define-public clamav (package (name "clamav") - (version "0.102.1") + (version "0.102.2") (source (origin (method url-fetch) (uri (string-append "https://www.clamav.net/downloads/production/" "clamav-" version ".tar.gz")) (sha256 (base32 - "1mpdgn3isz26hd1j6p8lcb76v8hjs54k1wb655rnil4hv78aig8d")) + "1lq7r6r2yl8pp3fkn32b0bsmbbl9pg90kpvhsa2clad3xg0drz49")) (modules '((guix build utils))) (snippet '(begin diff --git a/gnu/packages/backup.scm b/gnu/packages/backup.scm index 84a65b8492..c00244c003 100644 --- a/gnu/packages/backup.scm +++ b/gnu/packages/backup.scm @@ -434,7 +434,7 @@ rdiff-backup is easy to use and settings have sensible defaults.") (define-public rsnapshot (package (name "rsnapshot") - (version "1.4.2") + (version "1.4.3") (source (origin (method url-fetch) @@ -442,8 +442,7 @@ rdiff-backup is easy to use and settings have sensible defaults.") "https://github.com/rsnapshot/rsnapshot/releases/download/" version "/rsnapshot-" version ".tar.gz")) (sha256 - (base32 - "05jfy99a0xs6lvsjfp3wz21z0myqhmwl2grn3jr9clijbg282ah4")))) + (base32 "1lavqmmsf53pim0nvming7fkng6p0nk2a51k2c2jdq0l7snpl31b")))) (build-system gnu-build-system) (arguments `(#:phases @@ -455,6 +454,10 @@ rdiff-backup is easy to use and settings have sensible defaults.") "t/backup_exec/conf/backup_exec.conf") (("/bin/true") (which "true")) (("/bin/false") (which "false"))) + + ;; Disable a test that tries to connect to localhost on port 22. + (delete-file "t/ssh_args/ssh_args.t.in") + (invoke "make" "test")))))) (inputs `(("perl" ,perl) diff --git a/gnu/packages/bioconductor.scm b/gnu/packages/bioconductor.scm index c1da8ac106..a6e0c5a1e6 100644 --- a/gnu/packages/bioconductor.scm +++ b/gnu/packages/bioconductor.scm @@ -1543,7 +1543,7 @@ expressed genes in DNA microarray experiments.") `(("r-codetools" ,r-codetools) ("r-graph" ,r-graph) ("r-xml" ,r-xml))) - (home-page "http://cran.r-project.org/web/packages/CodeDepends") + (home-page "https://cran.r-project.org/web/packages/CodeDepends") (synopsis "Analysis of R code for reproducible research and code comprehension") (description "This package provides tools for analyzing R expressions or blocks of @@ -2455,7 +2455,7 @@ gene and isoform level using RNA-seq data") ("zlib" ,zlib))) (native-inputs `(("pkg-config" ,pkg-config))) - (home-page "http://r-forge.r-project.org/projects/rsymphony") + (home-page "https://r-forge.r-project.org/projects/rsymphony") (synopsis "Symphony integer linear programming solver in R") (description "This package was derived from Rsymphony. The package provides an R @@ -7224,7 +7224,7 @@ access.") ("r-s4vectors" ,r-s4vectors) ("r-summarizedexperiment" ,r-summarizedexperiment) ("r-tidyr" ,r-tidyr))) - (home-page "http://waldronlab.io/MultiAssayExperiment/") + (home-page "https://waldronlab.io/MultiAssayExperiment/") (synopsis "Integration of multi-omics experiments in Bioconductor") (description "MultiAssayExperiment harmonizes data management of multiple assays diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm index b7b80cec02..065555b37b 100644 --- a/gnu/packages/bioinformatics.scm +++ b/gnu/packages/bioinformatics.scm @@ -5,7 +5,7 @@ ;;; Copyright © 2015 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2016 Roel Janssen <roel@gnu.org> ;;; Copyright © 2016, 2017, 2018, 2019, 2020 Efraim Flashner <efraim@flashner.co.il> -;;; Copyright © 2016 Marius Bakke <mbakke@fastmail.com> +;;; Copyright © 2016, 2020 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2016, 2018 Raoul Bonnal <ilpuccio.febo@gmail.com> ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net> @@ -4733,7 +4733,17 @@ interrupted by stop codons. OrfM finds and prints these ORFs.") (base32 "1kjmv891d6qbpp4shhhvkl02ff4q5xlpnls2513sm2cjcrs52f1i")))) (build-system python-build-system) - (arguments `(#:python ,python-2)) ; pbcore requires Python 2.7 + (arguments + `(#:python ,python-2 ;pbcore < 2.0 requires Python 2.7 + #:phases (modify-phases %standard-phases + (add-after 'unpack 'remove-sphinx-dependency + (lambda _ + ;; Sphinx is only required for documentation tests, which + ;; we do not run; furthermore it depends on python2-sphinx + ;; which is no longer maintained. + (substitute* "requirements-dev.txt" + (("^sphinx") "")) + #t))))) (propagated-inputs `(("python-cython" ,python2-cython) ("python-numpy" ,python2-numpy) @@ -4741,7 +4751,6 @@ interrupted by stop codons. OrfM finds and prints these ORFs.") ("python-h5py" ,python2-h5py))) (native-inputs `(("python-nose" ,python2-nose) - ("python-sphinx" ,python2-sphinx) ("python-pyxb" ,python2-pyxb))) (home-page "https://pacificbiosciences.github.io/pbcore/") (synopsis "Library for reading and writing PacBio data files") diff --git a/gnu/packages/boost.scm b/gnu/packages/boost.scm index 16a08bde44..902e5ec6ff 100644 --- a/gnu/packages/boost.scm +++ b/gnu/packages/boost.scm @@ -304,14 +304,14 @@ signals and slots system.") (define-public mdds (package (name "mdds") - (version "1.4.3") + (version "1.5.0") (source (origin (method url-fetch) (uri (string-append "http://kohei.us/files/mdds/src/mdds-" version ".tar.bz2")) (sha256 (base32 - "10cw6irdm6d15nxnys2v5akp8yz52qijpcjvw0frwq7nz5d3vki5")))) + "03b8i43pw4m767mm0cnbi77x7qhpkzpi9b1f6dpp4cmyszmnsk8l")))) (build-system gnu-build-system) (propagated-inputs `(("boost" ,boost))) ; inclusion of header files diff --git a/gnu/packages/check.scm b/gnu/packages/check.scm index 749bcc7831..6c809c7d7c 100644 --- a/gnu/packages/check.scm +++ b/gnu/packages/check.scm @@ -2174,6 +2174,32 @@ JSON APIs with Behave.") (define-public python2-rednose (package-with-python2 python-rednose)) +(define-public python-nose-random + (package + (name "python-nose-random") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/fzumstein/nose-random") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1dvip61r2frjv35mv6mmfjc07402z73pjbndfp3mhxyjn2zhksw2")))) + (build-system python-build-system) + (native-inputs + `(("python-nose" ,python-nose))) + (home-page "https://github.com/fzumstein/nose-random") + (synopsis "Nose plugin to facilitate randomized unit testing with +Python") + (description "Python nose-random is designed to facilitate +Monte-Carlo style unit testing. The idea is to improve testing by +running your code against a large number of randomly generated input +scenarios.") + (license license:expat))) + (define-public python-nose-randomly (package (name "python-nose-randomly") diff --git a/gnu/packages/chicken.scm b/gnu/packages/chicken.scm new file mode 100644 index 0000000000..2034ca942a --- /dev/null +++ b/gnu/packages/chicken.scm @@ -0,0 +1,68 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2020 Ekaitz Zarraga <ekaitz@elenq.tech> +;;; +;;; 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 chicken) + #:use-module (gnu packages) + #:use-module (guix packages) + #:use-module (guix build-system gnu) + #:use-module (guix download) + #:use-module (gnu packages commencement) + #:use-module ((guix licenses) + #:select (bsd-3))) + +(define-public chicken + (package + (name "chicken") + (version "5.1.0") + (source (origin + (method url-fetch) + (uri (string-append "https://code.call-cc.org/releases/" + version "/chicken-" version ".tar.gz")) + (sha256 + (base32 + "0jsbp3kp0134f318j3wpd1n85gf8qzh034fn198gvazsv2l024aw")))) + (build-system gnu-build-system) + (arguments + `(#:modules ((guix build gnu-build-system) + (guix build utils) + (srfi srfi-1)) + + ;; No `configure' script; run "make check" after "make install" as + ;; prescribed by README. + #:phases + (modify-phases %standard-phases + (delete 'configure) + (delete 'check) + (add-after 'install 'check + (assoc-ref %standard-phases 'check))) + + #:make-flags (let ((out (assoc-ref %outputs "out"))) + (list "PLATFORM=linux" + (string-append "PREFIX=" out) + (string-append "VARDIR=" out "/var/lib"))) + + ;; Parallel builds are not supported, as noted in README. + #:parallel-build? #f)) + (propagated-inputs `(("gcc-toolchain", gcc-toolchain))) + (home-page "http://www.call-cc.org/") + (synopsis "R5RS Scheme implementation that compiles native code via C") + (description + "CHICKEN is a compiler for the Scheme programming language. CHICKEN +produces portable and efficient C, supports almost all of the R5RS Scheme +language standard, and includes many enhancements and extensions.") + (license bsd-3))) diff --git a/gnu/packages/chromium.scm b/gnu/packages/chromium.scm index ecded29abd..49ad8de84c 100644 --- a/gnu/packages/chromium.scm +++ b/gnu/packages/chromium.scm @@ -69,7 +69,8 @@ #:use-module (gnu packages xiph) #:use-module (gnu packages xml) #:use-module (gnu packages xdisorg) - #:use-module (gnu packages xorg)) + #:use-module (gnu packages xorg) + #:use-module (ice-9 match)) (define %preserved-third-party-files '("base/third_party/cityhash" ;Expat @@ -278,9 +279,9 @@ from forcing GEXP-PROMISE." (url "https://salsa.debian.org/chromium-team/chromium.git") (commit %debian-revision))) (file-name (git-file-name "debian-chromium-packaging" - (if (string-prefix? "debian/" %debian-revision) - (cadr (string-split %debian-revision #\/)) - (string-take %debian-revision 7)))) + (match (string-split %debian-revision #\/) + ((_ revision) revision) + (_ (string-take %debian-revision 7))))) (sha256 (base32 "1rbzxcwfp7v0c6rkvn9jl9by7p363cnbdyqazwiak1z03kmw3nkz")))) diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm index d5622f1216..5b3b5ae9f0 100644 --- a/gnu/packages/cran.scm +++ b/gnu/packages/cran.scm @@ -537,7 +537,7 @@ particularly easy to create complete web applications using httpuv alone.") (base32 "0lyvhnr6n57h3a89bvipii7x17nvfaycm9j5j50bfrlr48jv9ic8")))) (build-system r-build-system) - (home-page "http://arxiv.org/abs/1403.2805") + (home-page "https://arxiv.org/abs/1403.2805") (synopsis "Robust, high performance JSON parser and generator for R") (description "The jsonlite package provides a fast JSON parser and generator optimized @@ -2645,7 +2645,7 @@ contexts.") "0v4ax1v8diw2w7fdhfzz1z0bwixkmcrc39ax3y116f399rc06qbs")))) (properties `((upstream-name . "SQUAREM"))) (build-system r-build-system) - (home-page "http://www.jhsph.edu/agingandhealth/People/Faculty_personal_pages/Varadhan.html") + (home-page "https://coah.jhu.edu/people/Faculty_personal_Pages/Varadhan.html") (synopsis "Squared Extrapolation Methods for Accelerating EM-Like Monotone Algorithms") (description "This package provides algorithms for accelerating the convergence of @@ -3994,7 +3994,7 @@ Markdown documents.") ("r-registry" ,r-registry) ("r-tsp" ,r-tsp))) (native-inputs `(("gfortran" ,gfortran))) - (home-page "http://s2.smu.edu/IDA/seriation/") + (home-page "https://s2.smu.edu/IDA/seriation/") (synopsis "Infrastructure for ordering objects using seriation") (description "This package provides infrastructure for seriation with an @@ -5240,7 +5240,7 @@ regression and information measures are implemented.") (build-system r-build-system) (propagated-inputs `(("r-ttr" ,r-ttr))) - (home-page "http://cran.r-project.org/web/packages/smoother") + (home-page "https://cran.r-project.org/web/packages/smoother") (synopsis "Functions relating to the smoothing of numerical data") (description "This package provides a collection of methods for smoothing numerical @@ -6248,7 +6248,7 @@ to help insert or delete content at a specific location in the document.") ("r-rcpp" ,r-rcpp) ("r-rcpparmadillo" ,r-rcpparmadillo) ("r-rjags" ,r-rjags))) - (home-page "http://www.r-bayesian-networks.org") + (home-page "https://r-bayesian-networks.org/") (synopsis "Modelling multivariate data with additive bayesian networks") (description "Bayesian network analysis is a form of probabilistic graphical models @@ -8360,7 +8360,7 @@ correlation, censored, ordered and multivariate problems.") ("r-rlang" ,r-rlang) ("r-tibble" ,r-tibble) ("r-tidyselect" ,r-tidyselect))) - (home-page "http://mc-stan.org/bayesplot") + (home-page "https://mc-stan.org/bayesplot") (synopsis "Plotting for Bayesian models") (description "This package provides plotting functions for posterior analysis, model @@ -14559,7 +14559,7 @@ analysis.") (inputs `(("libpng" ,libpng) ("zlib" ,zlib))) - (home-page "http://www.rforge.net/png/") + (home-page "https://www.rforge.net/png/") (synopsis "Read and write PNG images") (description "This package provides an easy and simple way to read, write and display @@ -15443,7 +15443,7 @@ customize styles using a readable syntax.") (base32 "02p3612rpydk195n2qr77lp1j2w8zsw1ckkk98c8angm4r5q8dsc")))) (build-system r-build-system) (native-inputs `(("gfortran" ,gfortran))) - (home-page "http://www-stat.stanford.edu/~tibs/glasso") + (home-page "https://statweb.stanford.edu/~tibs/glasso/") (synopsis "Graphical Lasso: estimation of Gaussian graphical models") (description "This is a package for estimation of a sparse inverse covariance matrix @@ -16363,7 +16363,7 @@ long-term reliability under stochastic load profiles.") `(("r-slam" ,r-slam))) (inputs `(("glpk" ,glpk))) - (home-page "http://R-Forge.R-project.org/projects/rglp/") + (home-page "https://r-forge.r-project.org/projects/rglp/") (synopsis "R interface to the GNU Linear Programming Kit") (description "This package provides an R interface to the GNU Linear Programming Kit, diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm index a5f224f99e..f874a63f49 100644 --- a/gnu/packages/crates-io.scm +++ b/gnu/packages/crates-io.scm @@ -5,6 +5,7 @@ ;;; Copyright © 2019 Giacomo Leidi <goodoldpaul@autistici.org> ;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019, 2020 John Soo <jsoo1@asu.edu> +;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -26,13 +27,17 @@ #:use-module (guix download) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) + #:use-module (gnu packages) #:use-module (gnu packages compression) #:use-module (gnu packages jemalloc) + #:use-module (gnu packages llvm) #:use-module (gnu packages pcre) #:use-module (gnu packages pkg-config) + #:use-module (gnu packages python) #:use-module (gnu packages ssh) #:use-module (gnu packages tls) - #:use-module (gnu packages version-control)) + #:use-module (gnu packages version-control) + #:use-module (gnu packages xorg)) ;;; ;;; Please: Try to add new module packages in alphabetic order. @@ -136,7 +141,7 @@ Rust, using gimli.") (define-public rust-aho-corasick-0.7 (package (name "rust-aho-corasick") - (version "0.7.6") + (version "0.7.8") (source (origin (method url-fetch) @@ -145,11 +150,10 @@ Rust, using gimli.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "0b8dh20fhdc59dhhnfi89n2bi80a8zbagzd5c122hf1vv2amxysq")))) + "048q5vr1qac4lf90z80lw8kcya6qmlxw857xhwxsssk832jdafkl")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs (("rust-memchr" ,rust-memchr-2.2)) + `(#:cargo-inputs (("rust-memchr" ,rust-memchr-2.2)) #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3)))) (home-page "https://github.com/BurntSushi/aho-corasick") @@ -185,10 +189,29 @@ Rust, using gimli.") ("rust-serde" ,rust-serde-1.0) ("rust-serde-derive" ,rust-serde-derive-1.0)))))) -(define-public rust-ansi-term-0.11 +(define-public rust-android-glue-0.2 + (package + (name "rust-android-glue") + (version "0.2.3") + (source + (origin + (method url-fetch) + (uri (crate-uri "android-glue" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "01y495x4i9vqkwmklwn2xk7sqg666az2axjcpkr4iwngdwi48100")))) + (build-system cargo-build-system) + (home-page "https://github.com/tomaka/android-rs-glue") + (synopsis "Glue for the Android JNI") + (description "This package provides the glue for the Android JNI.") + (license license:expat))) + +(define-public rust-ansi-term-0.12 (package (name "rust-ansi-term") - (version "0.11.0") + (version "0.12.1") (source (origin (method url-fetch) @@ -196,12 +219,16 @@ Rust, using gimli.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "16wpvrghvd0353584i1idnsgm0r3vchg8fyrm0x8ayv1rgvbljgf")))) + "1ljmkbilxgmhavxvxqa7qvm6f3fjggi7q2l3a72q9x0cxjvrnanm")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs - (("rust-winapi" ,rust-winapi-0.3)))) + `(#:cargo-inputs + (("rust-serde" ,rust-serde-1.0) + ("rust-winapi" ,rust-winapi-0.3)) + #:cargo-development-inputs + (("rust-doc-comment" ,rust-doc-comment-0.3) + ("rust-regex" ,rust-regex-1.3) + ("rust-serde-json" ,rust-serde-json-1.0)))) (home-page "https://github.com/ogham/rust-ansi-term") (synopsis "Library for ANSI terminal colours and styles") (description @@ -209,6 +236,24 @@ Rust, using gimli.") text or blue underlined text, on ANSI terminals.") (license license:expat))) +(define-public rust-ansi-term-0.11 + (package + (inherit rust-ansi-term-0.12) + (name "rust-ansi-term") + (version "0.11.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "ansi_term" version)) + (file-name (string-append name "-" version ".crate")) + (sha256 + (base32 + "16wpvrghvd0353584i1idnsgm0r3vchg8fyrm0x8ayv1rgvbljgf")))) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-winapi" ,rust-winapi-0.3)))))) + (define-public rust-antidote-1.0 (package (name "rust-antidote") @@ -257,6 +302,22 @@ text or blue underlined text, on ANSI terminals.") "Approximate floating point equality comparisons and assertions.") (license license:asl2.0))) +(define-public rust-approx-0.1 + (package + (inherit rust-approx-0.3) + (name "rust-approx") + (version "0.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "approx" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "153awzwywmb61xg857b80l63b1x6hifx2pha7lxf6fck9qxwraq8")))) + (arguments '()))) + (define-public rust-arc-swap-0.3 (package (name "rust-arc-swap") @@ -277,7 +338,7 @@ text or blue underlined text, on ANSI terminals.") (("rust-crossbeam" ,rust-crossbeam-0.7) ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.6) ("rust-itertools" ,rust-itertools-0.8) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-model" ,rust-model-0.1) ("rust-num-cpus" ,rust-num-cpus-1.10) ("rust-parking-lot" ,rust-parking-lot-0.8) @@ -420,6 +481,26 @@ ArrayVec and ArrayString.") "ASCII-only equivalents to @code{char}, @code{str} and @code{String}.") (license (list license:expat license:asl2.0)))) +(define-public rust-assert-matches-1.3 + (package + (name "rust-assert-matches") + (version "1.3.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "assert_matches" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1rar61v00gz2aniid0mylxcr4q98s6l77c3hvbszmg57kj10msvx")))) + (build-system cargo-build-system) + (home-page "https://github.com/murarth/assert_matches") + (synopsis "Asserts that a value matches a pattern") + (description + "This package asserts that a value matches a pattern in Rust.") + (license (list license:expat license:asl2.0)))) + (define-public rust-atty-0.2 (package (name "rust-atty") @@ -444,8 +525,30 @@ ArrayVec and ArrayString.") "This package provides a simple interface for querying atty.") (license license:expat))) +(define-public rust-autocfg-1.0 + (package + (name "rust-autocfg") + (version "1.0.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "autocfg" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "17cv6pwb4q08s0ynpr4n8hv5299hcmhdgvdchzixfpw8y5qcgapq")))) + (build-system cargo-build-system) + (home-page "https://github.com/cuviper/autocfg") + (synopsis + "Automatic cfg for Rust compiler features") + (description + "Automatic cfg for Rust compiler features.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-autocfg-0.1 (package + (inherit rust-autocfg-1.0) (name "rust-autocfg") (version "0.1.7") (source @@ -456,16 +559,41 @@ ArrayVec and ArrayString.") (sha256 (base32 "1chwgimpx5z7xbag7krr9d8asxfqbh683qhgl9kn3hxk2l0djj8x")))) + (arguments '(#:skip-build? #t)))) + +(define-public rust-average-0.9 + (package + (name "rust-average") + (version "0.9.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "average" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1f8ya00bv6qki9m7b4lb3bn845rj473mx02qpm7wgy5qc1yp75xs")))) (build-system cargo-build-system) - (arguments '(#:skip-build? #t)) - (home-page "https://github.com/cuviper/autocfg") - (synopsis "Automatic cfg for Rust compiler features") - (description "Rust library for build scripts to automatically configure -code based on compiler support. Code snippets are dynamically tested to see -if the @code{rustc} will accept them, rather than hard-coding specific version -support.") - (license (list license:asl2.0 - license:expat)))) + (arguments + `(#:cargo-inputs + (("rust-conv" ,rust-conv-0.3) + ("rust-float-ord" ,rust-float-ord-0.2) + ("rust-num-integer" ,rust-num-integer-0.1) + ("rust-num-traits" ,rust-num-traits-0.2) + ("rust-serde" ,rust-serde-1.0) + ("rust-serde-big-array" ,rust-serde-big-array-0.1) + ("rust-serde-derive" ,rust-serde-derive-1.0)) + #:cargo-development-inputs + (("rust-bencher" ,rust-bencher-0.1) + ("rust-quantiles" ,rust-quantiles-0.7) + ("rust-rand" ,rust-rand-0.6) + ("rust-serde-json" ,rust-serde-json-1.0) + ("rust-streaming-stats" ,rust-streaming-stats-0.2)))) + (home-page "https://github.com/vks/average") + (synopsis "Calculate statistics iteratively") + (description "This crate provides for calculating statistics iteratively +in Rust.") + (license (list license:asl2.0 license:expat)))) (define-public rust-backtrace-0.3 (package @@ -639,6 +767,28 @@ and no more (caveat: black_box is still missing!).") that uses Serde for transforming structs into bytes and vice versa!") (license license:expat))) +(define-public rust-bresenham-0.1 + (package + (name "rust-bresenham") + (version "0.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "bresenham" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1mvg3zcyll0m3z79jwbg183ha4kb7bw06rd286ijwvgn4mi13hdz")))) + (build-system cargo-build-system) + (home-page "https://github.com/mbr/bresenham-rs") + (synopsis + "Iterator-based integer-only implementation of Bresenham's line algorithm") + (description + "This package provides a fast, iterator-based integer-only implementation of +Bresenham's line algorithm.") + (license license:expat))) + (define-public rust-generator-0.6 (package (name "rust-generator") @@ -691,7 +841,7 @@ that uses Serde for transforming structs into bytes and vice versa!") ("rust-clap" ,rust-clap-2) ("rust-env-logger" ,rust-env-logger-0.6) ("rust-fxhash" ,rust-fxhash-0.2) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-log" ,rust-log-0.4) ("rust-peeking-take-while" ,rust-peeking-take-while-0.1) ("rust-proc-macro2" ,rust-proc-macro2-0.4) @@ -785,6 +935,36 @@ behave like a set of bitflags.") (license (list license:asl2.0 license:expat)))) +(define-public rust-bitflags-0.8 + (package + (inherit rust-bitflags-1) + (name "rust-bitflags") + (version "0.8.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "bitflags" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1x5z8hmirpnapkx6sww8gkc6x0q8ppni0lbsigm3mrba5byfjw0k")))))) + +(define-public rust-bitflags-0.7 + (package + (inherit rust-bitflags-1) + (name "rust-bitflags") + (version "0.7.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "bitflags" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0v8hh6wdkpk9my8z8442g4hqrqf05h0qj53dsay6mv18lqvqklda")))))) + (define-public rust-blake2-rfc-0.2 (package (name "rust-blake2-rfc") @@ -984,7 +1164,7 @@ BLAKE2bp hash functions.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-memchr" ,rust-memchr-2.2) ("rust-regex-automata" ,rust-regex-automata-0.1) ("rust-serde" ,rust-serde-1.0)) @@ -1141,7 +1321,7 @@ little-endian.") `(#:skip-build? #t #:cargo-inputs (("rust-byteorder" ,rust-byteorder-1.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-ppv-lite86" ,rust-ppv-lite86-0.2) ("rust-stream-cipher" ,rust-stream-cipher-0.3)) #:cargo-development-inputs @@ -1399,27 +1579,30 @@ depending on a large number of #[cfg] parameters. Structured like an (origin (method url-fetch) (uri (crate-uri "clang-sys" version)) - (file-name (string-append name "-" version ".crate")) + (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "0ls8zcqi5bmmrvrk3b6r1ym4wlivinbv590d2dvg2xn9f44mbpl1")))) (build-system cargo-build-system) - ;(arguments - ; `(#:phases - ; (modify-phases %standard-phases - ; (add-after 'unpack 'set-environmental-variable - ; (lambda* (#:key inputs #:allow-other-keys) - ; (let ((clang (assoc-ref inputs "libclang"))) - ; (setenv "LIBCLANG_PATH" - ; (string-append clang "/lib"))) - ; #t))))) - ;(inputs - ; `(("libclang" ,clang))) + (arguments + `(#:cargo-inputs + (("rust-glob" ,rust-glob-0.3) + ("rust-libc" ,rust-libc-0.2) + ("rust-libloading" ,rust-libloading-0.5)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'set-environmental-variable + (lambda* (#:key inputs #:allow-other-keys) + (let ((clang (assoc-ref inputs "libclang"))) + (setenv "LIBCLANG_PATH" + (string-append clang "/lib"))) + #t))))) + (inputs + `(("libclang" ,clang))) (home-page "https://github.com/KyleMayes/clang-sys") (synopsis "Rust bindings for libclang") (description "This package provides Rust bindings for @code{libclang}.") - (properties '((hidden? . #t))) (license license:asl2.0))) (define-public rust-clang-sys-0.26 @@ -1434,7 +1617,20 @@ depending on a large number of #[cfg] parameters. Structured like an (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "1r50dwy5hj5gq07dn0qf8222d07qv0970ymx0j8n9779yayc3w3f")))))) + "1r50dwy5hj5gq07dn0qf8222d07qv0970ymx0j8n9779yayc3w3f")))) + (arguments + `(#:cargo-inputs + (("rust-glob" ,rust-glob-0.2) + ("rust-libc" ,rust-libc-0.2) + ("rust-libloading" ,rust-libloading-0.5)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'set-environmental-variable + (lambda* (#:key inputs #:allow-other-keys) + (let ((clang (assoc-ref inputs "libclang"))) + (setenv "LIBCLANG_PATH" + (string-append clang "/lib"))) + #t))))))) (define-public rust-clap-2 (package @@ -1450,19 +1646,19 @@ depending on a large number of #[cfg] parameters. Structured like an "1nf6ld3bims1n5vfzhkvcb55pdzh04bbhzf8nil5vvw05nxzarsh")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-ansi-term" ,rust-ansi-term-0.11) ("rust-atty" ,rust-atty-0.2) ("rust-bitflags" ,rust-bitflags-1) ("rust-clippy" ,rust-clippy-0.0) ("rust-strsim" ,rust-strsim-0.8) + ("rust-term-size" ,rust-term-size-0.3) ("rust-textwrap" ,rust-textwrap-0.11) ("rust-unicode-width" ,rust-unicode-width-0.1) ("rust-vec-map" ,rust-vec-map-0.8) - ("rust-yaml-rust" ,rust-yaml-rust-0.4)) + ("rust-yaml-rust" ,rust-yaml-rust-0.3)) #:cargo-development-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.1) ("rust-version-sync" ,rust-version-sync-0.8)))) (home-page "https://clap.rs/") @@ -1489,7 +1685,7 @@ Command Line Argument Parser.") `(#:skip-build? #t #:cargo-inputs (("rust-atty" ,rust-atty-0.2) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2) ("rust-winapi" ,rust-winapi-0.3)))) (home-page "https://github.com/mitsuhiko/clicolors-control") @@ -1499,6 +1695,29 @@ Command Line Argument Parser.") colorization.") (license license:expat))) +(define-public rust-clipboard-win-2.1 + (package + (name "rust-clipboard-win") + (version "2.1.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "clipboard-win" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0431sg4jhabrqf2dliiwhbx9hinb9z4qfcm6914lm5mb17ya5798")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f ; Tests are for Windows. + #:cargo-inputs (("rust-winapi" ,rust-winapi-0.3)))) + (home-page "https://github.com/DoumanAsh/clipboard-win") + (synopsis "Interact with Windows clipboard") + (description + "This package provides simple way to interact with Windows clipboard.") + (license license:expat))) + (define-public rust-clippy-0.0 (package (name "rust-clippy") @@ -1603,6 +1822,26 @@ need compiler-rt intrinsics.") (license (list license:asl2.0 license:expat)))) +(define-public rust-compiler-error-0.1 + (package + (name "rust-compiler-error") + (version "0.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "compiler_error" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0irh7c0gznk2k6mj3cmqw7x4pg59lppmy1y8d6k5xc926rnmz5zg")))) + (build-system cargo-build-system) + (arguments '(#:skip-build? #t)) + (home-page "https://github.com/lu-zero/compiler_error") + (synopsis "Triggerable compiler error") + (description "This package provides a triggerable compiler error for Rust.") + (license license:expat))) + (define-public rust-compiletest-rs-0.3 (package (name "rust-compiletest-rs") @@ -1641,6 +1880,27 @@ need compiler-rt intrinsics.") harness.") (license (list license:asl2.0 license:expat)))) +(define-public rust-compiletest-rs-0.2 + (package + (inherit rust-compiletest-rs-0.3) + (name "rust-compiletest-rs") + (version "0.2.10") + (source + (origin + (method url-fetch) + (uri (crate-uri "compiletest_rs" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0njz4shbhl1pvb6ngpi1wpz2gr5lf2dcha22lpdk995pzrwd6h97")))) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-log" ,rust-log-0.3) + ("rust-rustc-serialize" ,rust-rustc-serialize-0.3) + ("rust-tempdir" ,rust-tempdir-0.3)))))) + (define-public rust-console-0.7 (package (name "rust-console") @@ -1661,7 +1921,7 @@ harness.") (("rust-atty" ,rust-atty-0.2) ("rust-clicolors-control" ,rust-clicolors-control-1.0) ("rust-encode-unicode" ,rust-encode-unicode-0.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2) ("rust-parking-lot" ,rust-parking-lot-0.8) ("rust-regex" ,rust-regex-1.1) @@ -1722,6 +1982,34 @@ that logs panics to @code{console.error}.") It is inspired by the Linux kernel's @code{crypto_memneq}.") (license license:cc0))) +(define-public rust-conv-0.3 + (package + (name "rust-conv") + (version "0.3.3") + (source + (origin + (method url-fetch) + (uri (crate-uri "conv" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "168j1npqrif1yqxbgbk0pdrx9shzhs5ylc5a4xw49b6hbxi11zvq")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t ; Package needs 'unicode' crate. + #:cargo-inputs + (("rust-custom-derive" ,rust-custom-derive-0.1)) + #:cargo-development-inputs + (("rust-quickcheck" ,rust-quickcheck-0.2) + ("rust-winapi" ,rust-winapi-0.2)))) + (home-page "https://github.com/DanielKeep/rust-conv") + (synopsis "Conversion traits with more specific semantics") + (description + "This crate provides a number of conversion traits with more specific +semantics than those provided by @code{as} or @code{From}/@code{Into}.") + (license license:expat))) + (define-public rust-core-arch-0.1 (package (name "rust-core-arch") @@ -1854,7 +2142,7 @@ intrinsics.") ("rust-criterion-plot" ,rust-criterion-plot-0.3) ("rust-csv" ,rust-csv-1.1) ("rust-itertools" ,rust-itertools-0.8) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2) ("rust-num-traits" ,rust-num-traits-0.2) ("rust-rand-core" ,rust-rand-core-0.5) @@ -2032,7 +2320,13 @@ intrinsics.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "04rcpgjs6ns57vag8a3dzx26190dhbvy2l0p9n22b9p1yf64pr05")))))) + "04rcpgjs6ns57vag8a3dzx26190dhbvy2l0p9n22b9p1yf64pr05")))) + (arguments + `(#:cargo-inputs + (("rust-crossbeam-epoch" ,rust-crossbeam-epoch-0.7) + ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.6)) + #:cargo-development-inputs + (("rust-rand" ,rust-rand-0.6)))))) (define-public rust-crossbeam-epoch-0.8 (package @@ -2054,7 +2348,7 @@ intrinsics.") (("rust-autocfg" ,rust-autocfg-0.1) ("rust-cfg-if" ,rust-cfg-if-0.1) ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.7) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-memoffset" ,rust-memoffset-0.5) ("rust-scopeguard" ,rust-scopeguard-1.0)) #:cargo-development-inputs @@ -2085,7 +2379,7 @@ intrinsics.") (("rust-arrayvec" ,rust-arrayvec-0.4) ("rust-cfg-if" ,rust-cfg-if-0.1) ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.6) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-memoffset" ,rust-memoffset-0.2) ("rust-scopeguard" ,rust-scopeguard-0.3)) #:cargo-development-inputs @@ -2161,7 +2455,7 @@ intrinsics.") #:cargo-inputs (("rust-autocfg" ,rust-autocfg-0.1) ("rust-cfg-if" ,rust-cfg-if-0.1) - ("rust-lazy-static" ,rust-lazy-static-1.3)) + ("rust-lazy-static" ,rust-lazy-static-1)) #:cargo-development-inputs (("rust-rand" ,rust-rand-0.6)))) (home-page @@ -2189,7 +2483,7 @@ intrinsics.") `(#:skip-build? #t #:cargo-inputs (("rust-cfg-if" ,rust-cfg-if-0.1) - ("rust-lazy-static" ,rust-lazy-static-1.3)) + ("rust-lazy-static" ,rust-lazy-static-1)) #:cargo-development-inputs (("rust-rand" ,rust-rand-0.4)))))) @@ -2250,6 +2544,32 @@ intrinsics.") "Bare bones CSV parsing with no_std support.") (license (list license:unlicense license:expat)))) +(define-public rust-ctrlc-3.1 + (package + (name "rust-ctrlc") + (version "3.1.3") + (source + (origin + (method url-fetch) + (uri (crate-uri "ctrlc" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0zz8ad4bk28s111af5vy1c5kii4zw0cgh87ivzgj28f8nkcd5py7")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-nix" ,rust-nix-0.14) + ("rust-winapi" ,rust-winapi-0.3)) + #:cargo-development-inputs + (("rust-winapi" ,rust-winapi-0.3)))) + (home-page "https://github.com/Detegr/rust-ctrlc") + (synopsis "Easy Ctrl-C handler for Rust projects") + (description + "This package provides an easy Ctrl-C handler for Rust projects.") + (license (list license:expat license:asl2.0)))) + (define-public rust-curl-sys-0.4 (package (name "rust-curl-sys") @@ -2285,6 +2605,31 @@ intrinsics.") (properties '((hidden? . #t))) (license license:expat))) +(define-public rust-custom-derive-0.1 + (package + (name "rust-custom-derive") + (version "0.1.7") + (source + (origin + (method url-fetch) + (uri (crate-uri "custom_derive" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1f81bavw1wnykwh21hh4yyzigs6zl6f6pkk9p3car8kq95yfb2pg")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t + #:cargo-development-inputs + (("rust-rustc-serialize" ,rust-rustc-serialize-0.3)))) + (home-page + "https://github.com/DanielKeep/rust-custom-derive/tree/custom_derive-master") + (synopsis "Custom derivation macro for Rust") + (description + "This crate provides a macro that enables the use of custom @code{derive} +attributes.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-data-encoding-2.1 (package (name "rust-data-encoding") @@ -2306,6 +2651,40 @@ intrinsics.") hexadecimal, base32, and base64.") (license license:expat))) +(define-public rust-datetime-0.4 + (package + (name "rust-datetime") + (version "0.4.7") + (source + (origin + (method url-fetch) + (uri (crate-uri "datetime" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1fd74bq48xg8ki5yw1mr1pa5hd3j5lbk4iqc5r0kh3l62b0vci2w")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-iso8601" ,rust-iso8601-0.1) + ("rust-kernel32-sys" ,rust-kernel32-sys-0.2) + ("rust-libc" ,rust-libc-0.2) + ("rust-locale" ,rust-locale-0.2) + ("rust-num-traits" ,rust-num-traits-0.1) + ("rust-pad" ,rust-pad-0.1) + ("rust-redox-syscall" ,rust-redox-syscall-0.1) + ("rust-winapi" ,rust-winapi-0.2)) + #:cargo-development-inputs + (;("rust-regex" ,rust-regex-0.1) + ("rust-rustc-serialize" ,rust-rustc-serialize-0.3)))) + (home-page "https://github.com/rust-datetime/datetime") + (synopsis "Library for date and time formatting and arithmetic") + (description "This package provides a library for date and time formatting +and arithmetic.") + (license license:expat))) + (define-public rust-defmac-0.2 (package (name "rust-defmac") @@ -2594,6 +2973,27 @@ memory but not other memory. This package provides a discard trait which allows for intentionally leaking memory") (license license:expat))) +(define-public rust-dispatch-0.1 + (package + (name "rust-dispatch") + (version "0.1.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "dispatch" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "019nzy993hxaiazcdnayx3csv2iki34i535asw11ki96hakkrs84")))) + (build-system cargo-build-system) + (arguments '(#:tests? #f)) ; Tests only run on Mac. + (home-page "http://github.com/SSheldon/rust-dispatch") + (synopsis "Rust wrapper for Apple's Grand Central Dispatch") + (description "This package provides a Rust wrapper for Apple's Grand +Central Dispatch.") + (license license:expat))) + (define-public rust-doc-comment-0.3 (package (name "rust-doc-comment") @@ -2631,7 +3031,7 @@ from macros.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.1) ("rust-serde" ,rust-serde-1.0) ("rust-strsim" ,rust-strsim-0.9)))) @@ -2640,6 +3040,27 @@ from macros.") (description "Command line argument parsing.") (license (list license:expat license:unlicense)))) +(define-public rust-downcast-rs-1.1 + (package + (name "rust-downcast-rs") + (version "1.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "downcast-rs" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1xhs2qj02k9m4mm5fgh19y88850y9jsnwwlblf2ffc91gjs6xfjj")))) + (build-system cargo-build-system) + (home-page "https://github.com/marcianx/downcast-rs") + (synopsis "Trait object downcasting support using only safe Rust") + (description + "Trait object downcasting support using only safe Rust. It supports type +parameters, associated types, and type constraints.") + (license (list license:expat license:asl2.0)))) + (define-public rust-dtoa-0.4 (package (name "rust-dtoa") @@ -2706,6 +3127,35 @@ floating-point primitives to an @code{io::Write}.") "A library for running child processes.") (license license:expat))) +(define-public rust-dwrote-0.9 + (package + (name "rust-dwrote") + (version "0.9.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "dwrote" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "03gzl5pd90nlkmwqmbmjmyz47h7wlblbqrwv5a29npnv0ag3dl8b")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-lazy-static" ,rust-lazy-static-1) + ("rust-libc" ,rust-libc-0.2) + ("rust-serde" ,rust-serde-1.0) + ("rust-serde-derive" ,rust-serde-derive-1.0) + ;("rust-wio" ,rust-wio-0.2) + ("rust-winapi" ,rust-winapi-0.3)))) + (home-page "https://github.com/servo/dwrote-rs") + (synopsis "Lightweight binding to DirectWrite") + (description + "This package provides lightweight binding to DirectWrite.") + (license license:mpl2.0))) + (define-public rust-either-1.5 (package (name "rust-either") @@ -2751,7 +3201,7 @@ floating-point primitives to an @code{io::Write}.") (("rust-ascii" ,rust-ascii-0.9) ("rust-clippy" ,rust-clippy-0.0)) #:cargo-development-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3)))) + (("rust-lazy-static" ,rust-lazy-static-1)))) (home-page "https://github.com/tormol/encode_unicode") (synopsis "UTF-8 and UTF-16 support for char, u8 and u16") @@ -3090,6 +3540,25 @@ is configured via an environment variable.") (("rust-log" ,rust-log-0.3) ("rust-regex" ,rust-regex-0.2)))))) +(define-public rust-env-logger-0.3 + (package + (inherit rust-env-logger-0.7) + (name "rust-env-logger") + (version "0.3.5") + (source + (origin + (method url-fetch) + (uri (crate-uri "env_logger" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0bvcjgkw4s3k1rd7glpflgc8s9a393zjd6jfdgvs8gjvwj0dgaqm")))) + (arguments + `(#:skip-build? #t ; Cannot find dependent crates. + #:cargo-inputs + (;("rust-regex" ,rust-regex-0.1) + ("rust-log" ,rust-log-0.3)))))) + (define-public rust-envmnt-0.6 (package (name "rust-envmnt") @@ -3210,9 +3679,8 @@ is configured via an environment variable.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-backtrace" ,rust-backtrace-0.3)) - #:cargo-development-inputs - (("rust-version-check" ,rust-version-check-0.9)))) + (("rust-backtrace" ,rust-backtrace-0.3) + ("rust-version-check" ,rust-version-check-0.1)))) (home-page "https://github.com/rust-lang-nursery/error-chain") (synopsis "Yet another error boilerplate library") (description @@ -3365,7 +3833,7 @@ representation.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2)))) (home-page "https://github.com/gimli-rs/findshlibs") (synopsis "Find the set of shared libraries loaded in the current process") @@ -3412,7 +3880,7 @@ cross platform API.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-serde" ,rust-serde-1.0) ("rust-serde-derive" ,rust-serde-derive-1.0) ("rust-serde-json" ,rust-serde-json-1.0) @@ -3488,6 +3956,29 @@ Reader/Writer streams. Contains bindings for zlib, deflate, and gzip-based streams.") (license (list license:expat license:asl2.0)))) +(define-public rust-float-ord-0.2 + (package + (name "rust-float-ord") + (version "0.2.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "float-ord" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0kin50365sr3spnbscq43lksymybi99ai9rkqdw90m6vixhlibbv")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-development-inputs + (("rust-rand" ,rust-rand-0.3)))) + (home-page "https://github.com/notriddle/rust-float-ord") + (synopsis "Total ordering for floating-point numbers") + (description + "This package provides a total ordering for floating-point numbers.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-fnv-1.0 (package (name "rust-fnv") @@ -3726,6 +4217,31 @@ featuring zero allocations, composability, and iterator-like interfaces.") (license (list license:asl2.0 license:expat)))) +(define-public rust-futures-channel-0.3 + (package + (name "rust-futures-channel") + (version "0.3.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "futures-channel" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "11lvk749n61654ad40xn751gmxzwb697nwh36s5gs0ni2z59ibpw")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f + #:cargo-inputs + (("rust-futures-core" ,rust-futures-core-0.3) + ("rust-futures-sink" ,rust-futures-sink-0.3)))) + (home-page "https://rust-lang-nursery.github.io/futures-rs") + (synopsis "Channels for asynchronous communication using futures-rs") + (description + "Channels for asynchronous communication using futures-rs.") + (license (list license:expat license:asl2.0)))) + (define-public rust-futures-channel-preview-0.3 (package (name "rust-futures-channel-preview") @@ -3751,6 +4267,27 @@ featuring zero allocations, composability, and iterator-like interfaces.") "Channels for asynchronous communication using futures-rs.") (license (list license:expat license:asl2.0)))) +(define-public rust-futures-core-0.3 + (package + (name "rust-futures-core") + (version "0.3.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "futures-core" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0rh8q6pg08dizk5hwksvjgvkw26s3sr3b199nggv3ypyg914qmkr")))) + (build-system cargo-build-system) + (arguments '(#:tests? #f)) + (home-page "https://rust-lang-nursery.github.io/futures-rs") + (synopsis "Core traits and types in for the `futures` library") + (description "This package provides the core traits and types in for the +@code{futures} library.") + (license (list license:expat license:asl2.0)))) + (define-public rust-futures-core-preview-0.3 (package (name "rust-futures-core-preview") @@ -3785,12 +4322,15 @@ featuring zero allocations, composability, and iterator-like interfaces.") (base32 "1r32456gpblzfvnkf60545v8acqk7gh5zhyhi1jn669k9gicv45b")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-futures" ,rust-futures-0.1) + ("rust-num-cpus" ,rust-num-cpus-1.11)))) (home-page "https://github.com/rust-lang-nursery/futures-rs") (synopsis "Implementation of thread pools which hand out futures") (description "An implementation of thread pools which hand out futures to the results of the computation on the threads themselves.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -3824,6 +4364,28 @@ the computation on the threads themselves.") library.") (license (list license:expat license:asl2.0)))) +(define-public rust-futures-io-0.3 + (package + (name "rust-futures-io") + (version "0.3.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "futures-io" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1zxm41fmkrb0r39ajk3rr9invcd5bdwlafazn8m9aw4y49ymfxp6")))) + (build-system cargo-build-system) + (home-page "https://rust-lang-nursery.github.io/futures-rs") + (synopsis + "`AsyncRead` and `AsyncWrite` traits for the futures-rs library") + (description + "This package provides the @code{AsyncRead} and @code{AsyncWrite} traits +for the futures-rs library.") + (license (list license:expat license:asl2.0)))) + (define-public rust-futures-io-preview-0.3 (package (name "rust-futures-io-preview") @@ -3874,6 +4436,26 @@ library.") @code{Future}s at once and handling the first one to complete.") (license (list license:expat license:asl2.0)))) +(define-public rust-futures-sink-0.3 + (package + (name "rust-futures-sink") + (version "0.3.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "futures-sink" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "05iwskzxq3yqvxv9l1kqnd7kkmp0dwc39fnvwrcjsg76z8zf66qp")))) + (build-system cargo-build-system) + (home-page "https://rust-lang-nursery.github.io/futures-rs") + (synopsis "Asynchronous `Sink` trait for the futures-rs library") + (description "This package provides the asynchronous @code{Sink} trait for +the futures-rs library.") + (license (list license:expat license:asl2.0)))) + (define-public rust-futures-sink-preview-0.3 (package (name "rust-futures-sink-preview") @@ -3896,6 +4478,26 @@ futures-rs library.") (license (list license:asl2.0 license:expat)))) +(define-public rust-futures-task-0.3 + (package + (name "rust-futures-task") + (version "0.3.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "futures-task" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1yg5d7b3z58mhqbrax5a0qdsfvzfclwyqvw5k3i41x4wnbb55bhb")))) + (build-system cargo-build-system) + (arguments '(#:tests? #f)) + (home-page "https://rust-lang-nursery.github.io/futures-rs") + (synopsis "Tools for working with tasks") + (description "Tools for working with tasks.") + (license (list license:expat license:asl2.0)))) + (define-public rust-futures-util-preview-0.3 (package (name "rust-futures-util-preview") @@ -4077,7 +4679,7 @@ archive to be linked into Rustcode.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2) ("rust-log" ,rust-log-0.4) ("rust-stdweb" ,rust-stdweb-0.4) @@ -4143,8 +4745,7 @@ DWARF debugging format.") "1i0fgsr91r97hsjbgqnymkcyiyg0057m7m04116k3vmyqpvrwlbp")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-bitflags" ,rust-bitflags-1) ("rust-libc" ,rust-libc-0.2) ("rust-libgit2-sys" ,rust-libgit2-sys-0.10) @@ -4159,6 +4760,12 @@ DWARF debugging format.") ("rust-tempfile" ,rust-tempfile-3.1) ("rust-thread-id" ,rust-thread-id-3.3) ("rust-time" ,rust-time-0.1)))) + (native-inputs + `(("libgit2" ,libgit2) + ("libssh2" ,libssh2) + ("openssl" ,openssl) + ("pkg-config" ,pkg-config) + ("zlib" ,zlib))) (home-page "https://github.com/rust-lang/git2-rs") (synopsis "Rust bindings to libgit2") (description @@ -4182,8 +4789,7 @@ reading and writing git repositories.") (base32 "0cayf5w7wkvclvs8brbi7lyfxbdklwls9s49mpf2brl655yjwjwj")))) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-bitflags" ,rust-bitflags-1) ("rust-libc" ,rust-libc-0.2) ("rust-libgit2-sys" ,rust-libgit2-sys-0.8) @@ -4272,6 +4878,25 @@ the process of matching one or more glob patterns against a single candidate path simultaneously, and returning all of the globs that matched.") (license (list license:expat license:unlicense)))) +(define-public rust-glutin-emscripten-sys-0.1 + (package + (name "rust-glutin-emscripten-sys") + (version "0.1.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "glutin_emscripten_sys" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1ix0jmm8p5if4qarzdfl5mz9rbq4hhgqarakb3bzwvyz13dkynr4")))) + (build-system cargo-build-system) + (home-page "https://github.com/tomaka/glutin") + (synopsis "Emscripten bindings for glutin") + (description "The emscripten bindings for glutin.") + (license license:asl2.0))) + (define-public rust-goblin-0.0 (package (name "rust-goblin") @@ -4351,7 +4976,7 @@ loading crate.") (("rust-atty" ,rust-atty-0.2) ("rust-bstr" ,rust-bstr-0.2) ("rust-globset" ,rust-globset-0.4) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-log" ,rust-log-0.4) ("rust-regex" ,rust-regex-1.1) ("rust-same-file" ,rust-same-file-1.0) @@ -4368,7 +4993,7 @@ loading crate.") (define-public rust-grep-matcher-0.1 (package (name "rust-grep-matcher") - (version "0.1.2") + (version "0.1.3") (source (origin (method url-fetch) @@ -4377,11 +5002,10 @@ loading crate.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "03j26zygfgwyam66bl5g922gimrvp4yyzl8qvaykyklnf247bl3r")))) + "113lafx3abrr96ahpz6yn905ian1w3qsr5hijbb909p2j0xgmhkm")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-memchr" ,rust-memchr-2.2)) #:cargo-development-inputs (("rust-regex" ,rust-regex-1.1)))) @@ -4457,7 +5081,7 @@ standard printing of search results, similar to grep itself.") (define-public rust-grep-regex-0.1 (package (name "rust-grep-regex") - (version "0.1.3") + (version "0.1.4") (source (origin (method url-fetch) @@ -4466,11 +5090,10 @@ standard printing of search results, similar to grep itself.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "1lbb8837gzy25n706mnidaps4jl63ym679zraj8nfy5g02zbz549")))) + "090k1sbn4jq680dmgp1jyqs7f9dzn198k0806kc8f40jcjazd88n")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-aho-corasick" ,rust-aho-corasick-0.7) ("rust-grep-matcher" ,rust-grep-matcher-0.1) ("rust-log" ,rust-log-0.4) @@ -4602,7 +5225,7 @@ the template engine that renders the official Rust website") ("rust-rustc-std-workspace-core" ,rust-rustc-std-workspace-core-1.0) ("rust-serde" ,rust-serde-1.0)) #:cargo-development-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.5) ("rust-rayon" ,rust-rayon-1.1) ("rust-rustc-hash" ,rust-rustc-hash-1.0) @@ -4704,6 +5327,33 @@ consistent, and reasonably well performing.") (license (list license:asl2.0 license:expat)))) +(define-public rust-hermit-abi-0.1 + (package + (name "rust-hermit-abi") + (version "0.1.6") + (source + (origin + (method url-fetch) + (uri (crate-uri "hermit-abi" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0wippj5nkw9q5yyyaqpdrgdhag3l3nbrwja7149cwn7ii1nnbwpg")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-compiler-builtins" ,rust-compiler-builtins-0.1) + ("rust-libc" ,rust-libc-0.2) + ("rust-rustc-std-workspace-core" ,rust-rustc-std-workspace-core-1.0)))) + (home-page "https://github.com/hermitcore/rusty-hermit") + (synopsis "Small interface to call functions from RustyHermit") + (description + "Hermit-abi is small interface to call functions from the unikernel RustyHermit. +It is used to build the target x86_64-unknown-hermit.") + (license (list license:expat license:asl2.0)))) + (define-public rust-hex-0.4 (package (name "rust-hex") @@ -5008,7 +5658,7 @@ SystemTime}}.") (define-public rust-ignore-0.4 (package (name "rust-ignore") - (version "0.4.7") + (version "0.4.11") (source (origin (method url-fetch) @@ -5017,23 +5667,19 @@ SystemTime}}.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "00mhksl41dnlsjqmka8c5a0m4spwm70ilm1qd9rngwq552hpzicd")))) + "07js5k91v870b2i5rl5shg37214yzwl0p6fjqy06y0v97gyawbaj")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs - (("rust-crossbeam-channel" ,rust-crossbeam-channel-0.3) + `(#:cargo-inputs + (("rust-crossbeam-channel" ,rust-crossbeam-channel-0.4) ("rust-globset" ,rust-globset-0.4) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-log" ,rust-log-0.4) ("rust-memchr" ,rust-memchr-2.2) ("rust-regex" ,rust-regex-1.1) ("rust-same-file" ,rust-same-file-1.0) - ("rust-thread-local" ,rust-thread-local-0.3) - ("rust-walkdir" ,rust-walkdir-2.2) - ("rust-winapi-util" ,rust-winapi-util-0.1)) - #:cargo-development-inputs - (("rust-tempfile" ,rust-tempfile-3.0)))) + ("rust-thread-local" ,rust-thread-local-1.0) + ("rust-walkdir" ,rust-walkdir-2.2)))) (home-page "https://github.com/BurntSushi/ripgrep/tree/master/ignore") (synopsis "Efficiently match ignore files such as .gitignore") (description @@ -5062,7 +5708,7 @@ ignore files such as .gitignore against file paths.") #:cargo-development-inputs (("rust-fnv" ,rust-fnv-1.0) ("rust-itertools" ,rust-itertools-0.8) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-quickcheck" ,rust-quickcheck-0.8) ("rust-rand" ,rust-rand-0.4) ("rust-serde-test" ,rust-serde-test-1.0)))) @@ -5105,7 +5751,7 @@ renamed to indexmap.") ("rust-console" ,rust-console-0.7) ("rust-difference" ,rust-difference-2.0) ("rust-failure" ,rust-failure-0.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-pest" ,rust-pest-2.1) ("rust-pest-derive" ,rust-pest-derive-2.1) ("rust-ron" ,rust-ron-0.4) @@ -5167,6 +5813,29 @@ immutable interval tree.") (license (list license:asl2.0 license:expat)))) +(define-public rust-iso8601-0.1 + (package + (name "rust-iso8601") + (version "0.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "iso8601" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0xy48qyfmirslaj4dy6n4g8b564jap3cjiql35fmj5vgii7ldp0i")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-clippy" ,rust-clippy-0.0) + ("rust-nom" ,rust-nom-1.2)))) + (home-page "https://github.com/badboy/iso8601") + (synopsis "Parsing ISO8601 dates using nom") + (description "Parsing ISO8601 dates using nom.") + (license license:expat))) + (define-public rust-itertools-0.8 (package (name "rust-itertools") @@ -5197,6 +5866,26 @@ immutable interval tree.") "Extra iterator adaptors, iterator methods, free functions, and macros.") (license (list license:expat license:asl2.0)))) +(define-public rust-itertools-0.7 + (package + (inherit rust-itertools-0.8) + (name "rust-itertools") + (version "0.7.11") + (source + (origin + (method url-fetch) + (uri (crate-uri "itertools" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "03cpsj26xmyamcalclqzr1i700vwx8hnbgxbpjvs354f8mnr8iqd")))) + (arguments + `(#:cargo-inputs + (("rust-either" ,rust-either-1.5)) + #:cargo-development-inputs + (("rust-permutohedron" ,rust-permutohedron-0.2) + ("rust-quickcheck" ,rust-quickcheck-0.5)))))) + (define-public rust-itertools-num-0.1 (package (name "rust-itertools-num") @@ -5240,7 +5929,6 @@ and functions.") (base32 "0zvg2d9qv3avhf3d8ggglh6fdyw8kkwqg3r4622ly5yhxnvnc4jh")))) (build-system cargo-build-system) - (arguments '(#:skip-build? #t)) (home-page "https://github.com/dtolnay/itoa") (synopsis "Fast functions for printing integer primitives") (description "This crate provides fast functions for printing integer @@ -5248,6 +5936,21 @@ primitives to an @code{io::Write}.") (license (list license:asl2.0 license:expat)))) +(define-public rust-itoa-0.3 + (package + (inherit rust-itoa-0.4) + (name "rust-itoa") + (version "0.3.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "itoa" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "136vwi6l2k1vrlvfx49lhficj813pk88xrcx1q3axqh1mwms6943")))))) + (define-public rust-itoa-0.1 (package (inherit rust-itoa-0.4) @@ -5277,8 +5980,7 @@ primitives to an @code{io::Write}.") "1q2w80v8p2pbfm8ayhjs6zi11a1hp4535z4ck8kg872z8ldnrc37")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2)) #:cargo-development-inputs (("rust-futures" ,rust-futures-0.1) @@ -5432,6 +6134,26 @@ friction with idiomatic Rust structs to ease interopability.") kernel32.") (license license:expat))) +(define-public rust-khronos-api-3 + (package + (name "rust-khronos-api") + (version "3.1.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "khronos-api" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1p0xj5mlbagqyvvnv8wmv3cr7l9y1m153888pxqwg3vk3mg5inz2")))) + (build-system cargo-build-system) + (home-page "https://github.com/brendanzab/gl-rs/") + (synopsis "Khronos XML API Registry") + (description + "The Khronos XML API Registry, exposed as byte string constants.") + (license license:asl2.0))) + (define-public rust-language-tags-0.2 (package (name "rust-language-tags") @@ -5474,8 +6196,7 @@ language tags.") "0in6ikhw8mgl33wjv6q6xfrb5b9jr16q8ygjy803fay4zcisvaz2")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs (("rust-spin" ,rust-spin-0.5)) + `(#:cargo-inputs (("rust-spin" ,rust-spin-0.5)) #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3)))) (home-page "https://github.com/rust-lang-nursery/lazy-static.rs") @@ -5489,6 +6210,8 @@ requires non-const function calls to be computed.") (license (list license:asl2.0 license:expat)))) +(define-public rust-lazy-static-1 rust-lazy-static-1.4) + (define-public rust-lazy-static-1.3 (package (inherit rust-lazy-static-1.4) @@ -5503,8 +6226,7 @@ requires non-const function calls to be computed.") (base32 "052ac27w189hrf1j3hz7sga46rp84zl2hqnzyihxv78mgzr2jmxw")))) (arguments - `(#:skip-build? #t - #:cargo-inputs (("rust-spin" ,rust-spin-0.5)))))) + `(#:cargo-inputs (("rust-spin" ,rust-spin-0.5)))))) (define-public rust-lazycell-1.2 (package @@ -5648,12 +6370,13 @@ values of all the exported APIs match the platform that libc is compiled for.") (origin (method url-fetch) (uri (crate-uri "libgit2-sys" version)) - (file-name (string-append name "-" version ".crate")) + (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 - "0y2mibmx7wy91s2kmb2gfb29mrqlqaxpy5wcwr8s1lwws7b9w5sc")))) - (arguments '()) - (properties '((hidden? . #t))))) + "0y2mibmx7wy91s2kmb2gfb29mrqlqaxpy5wcwr8s1lwws7b9w5sc")) + (modules '((guix build utils))) + (snippet + '(begin (delete-file-recursively "libgit2") #t)))))) (define-public rust-libgit2-sys-0.7 (package @@ -5685,11 +6408,9 @@ values of all the exported APIs match the platform that libc is compiled for.") "0lyply8rcqc8agajzxs7bq6ivba9dnn1i68kgb9z2flnfjh13cgj")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs - (("rust-winapi" ,rust-winapi-0.3)) - #:cargo-development-inputs - (("rust-cc" ,rust-cc-1.0)))) + `(#:cargo-inputs + (("rust-winapi" ,rust-winapi-0.3) + ("rust-cc" ,rust-cc-1.0)))) (home-page "https://github.com/nagisa/rust_libloading/") (synopsis "Rust library for loading dynamic libraries") (description @@ -5700,6 +6421,45 @@ allows loading dynamic libraries (also known as shared libraries) as well as use functions and static variables these libraries contain.") (license license:isc))) +(define-public rust-libm-0.2 + (package + (name "rust-libm") + (version "0.2.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "libm" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0akh56sh51adhagmk9l84dyrlz60gv8ri05xhr13i1b18czkpmy7")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-rand" ,rust-rand-0.6)) + #:cargo-development-inputs + (("rust-no-panic" ,rust-no-panic-0.1)))) + (home-page "https://github.com/rust-lang/libm") + (synopsis "Libm in pure Rust") + (description "This package provides an implementation of libm in pure Rust.") + (license (list license:expat license:asl2.0)))) + +(define-public rust-libm-0.1 + (package + (inherit rust-libm-0.2) + (name "rust-libm") + (version "0.1.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "libm" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "16pc0gx4gkg0q2s1ssq8268brn14j8344623vwhadmivc4lsmivz")))))) + (define-public rust-libssh2-sys-0.2 (package (name "rust-libssh2-sys") @@ -5717,8 +6477,7 @@ functions and static variables these libraries contain.") '(begin (delete-file-recursively "libssh2") #t)))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t ; it wants rust-openssl-src - #:cargo-inputs + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2) ("rust-libz-sys" ,rust-libz-sys-1.0) ("rust-openssl-sys" ,rust-openssl-sys-0.9) @@ -5745,6 +6504,28 @@ functions and static variables these libraries contain.") (license (list license:asl2.0 license:expat)))) +(define-public rust-locale-0.2 + (package + (name "rust-locale") + (version "0.2.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "locale" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1z87wc7z6889x1pqlrwjw8f1crshzi15q5m102lqs8y0m69f9nsz")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2)))) + (home-page "https://github.com/rust-locale/rust-locale") + (synopsis "Library for basic localisation") + (description + "This package provides a library for basic localisation.") + (license license:expat))) + (define-public rust-lock-api-0.3 (package (name "rust-lock-api") @@ -5908,6 +6689,26 @@ implementation of LZMA and xz stream encoding/decoding.") (license (list license:asl2.0 license:expat)))) +(define-public rust-lzw-0.10 + (package + (name "rust-lzw") + (version "0.10.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "lzw" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1170dfskhzlh8h2bm333811hykjvpypgnvxyhhm1rllyi2xpr53x")))) + (build-system cargo-build-system) + (home-page "https://github.com/nwin/lzw.git") + (synopsis "LZW compression and decompression") + (description + "This package provides LZW compression and decompression.") + (license (list license:expat license:asl2.0)))) + (define-public rust-mac-0.1 (package (name "rust-mac") @@ -5929,6 +6730,48 @@ implementation of LZMA and xz stream encoding/decoding.") "This package provides a collection of great and ubiqutitous macros.") (license (list license:asl2.0 license:expat)))) +(define-public rust-make-cmd-0.1 + (package + (name "rust-make-cmd") + (version "0.1.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "make-cmd" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1ly0lc5p1a0qdiqnh19ly3snb9q83sjbbb1njvh8a5xgx3xqmjm8")))) + (build-system cargo-build-system) + (home-page "https://github.com/mneumann/make-cmd-rs") + (synopsis "Enable build.rs scripts to invoke gnu_make") + (description "This package enables build.rs scripts to invoke gnu_make +platform-independently.") + (license license:expat))) + +(define-public rust-malloc-buf-0.0 + (package + (name "rust-malloc-buf") + (version "0.0.6") + (source + (origin + (method url-fetch) + (uri (crate-uri "malloc-buf" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1jqr77j89pwszv51fmnknzvd53i1nkmcr8rjrvcxhm4dx1zr1fv2")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2)))) + (home-page "https://github.com/SSheldon/malloc_buf") + (synopsis "Structs for handling malloc'd memory passed to Rust") + (description + "This package provides structs for handling malloc'd memory passed to Rust.") + (license license:expat))) + (define-public rust-maplit-1.0 (package (name "rust-maplit") @@ -6031,6 +6874,26 @@ parallelize and optimize.") (license (list license:asl2.0 license:expat)))) +(define-public rust-maybe-uninit-2.0 + (package + (name "rust-maybe-uninit") + (version "2.0.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "maybe-uninit" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "004y0nzmpfdrhz251278341z6ql34iv1k6dp1h6af7d6nd6jwc30")))) + (build-system cargo-build-system) + (home-page "https://github.com/est31/maybe-uninit") + (synopsis "MaybeUninit for friends of backwards compatibility") + (description + "This package provides MaybeUninit for friends of backwards compatibility.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-md5-0.6 (package (name "rust-md5") @@ -6044,13 +6907,27 @@ parallelize and optimize.") (base32 "17b2xm4h4cvxsdjsf3kdrzqv2za60kak961xzi5kmw6g6djcssvy")))) (build-system cargo-build-system) - (arguments '(#:skip-build? #t)) (home-page "https://github.com/stainless-steel/md5") (synopsis "MD5 hash function in Rust") (description "The package provides the MD5 hash function.") (license (list license:asl2.0 license:expat)))) +(define-public rust-md5-0.3 + (package + (inherit rust-md5-0.6) + (name "rust-md5") + (version "0.3.8") + (source + (origin + (method url-fetch) + (uri (crate-uri "md5" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0j2s8aqdkhwhy7awga2bmv5n8qq8bgy8672iha9f3y871dm6vibr")))))) + (define-public rust-memchr-2.2 (package (name "rust-memchr") @@ -6291,6 +7168,26 @@ drop-in replacement for miniz.") (license (list license:asl2.0 license:expat)))) +(define-public rust-mint-0.5 + (package + (name "rust-mint") + (version "0.5.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "mint" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0c4190gr348fkfijij7vm19iagwl36mssj1irc9f6m448hbhgn68")))) + (build-system cargo-build-system) + (home-page "https://github.com/kvark/mint") + (synopsis "Math interoperability standard types") + (description + "This package provides math interoperability standard types.") + (license license:expat))) + (define-public rust-mio-0.6 (package (name "rust-mio") @@ -6480,7 +7377,26 @@ checking.") "Chaining APIs for both self -> Self and &mut self methods.") (description "Chaining APIs for both self -> Self and &mut self methods.") - (properties '((hidden? . #t))) + (license license:expat))) + +(define-public rust-natord-1.0 + (package + (name "rust-natord") + (version "1.0.9") + (source + (origin + (method url-fetch) + (uri (crate-uri "natord" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0z75spwag3ch20841pvfwhh3892i2z2sli4pzp1jgizbipdrd39h")))) + (build-system cargo-build-system) + (home-page "https://github.com/lifthrasiir/rust-natord") + (synopsis "Natural ordering for Rust") + (description + "This package provides a crate to perform natural ordering for Rust.") (license license:expat))) (define-public rust-net2-0.2 @@ -6622,6 +7538,50 @@ pairs in insertion order.") (license (list license:asl2.0 license:expat)))) +(define-public rust-linked-hash-map-0.3 + (package + (inherit rust-linked-hash-map-0.5) + (name "rust-linked-hash-map") + (version "0.3.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "linked-hash-map" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1kaf95grvfqchxn8pl0854g8ab0fzl56217hndhhhz5qqm2j09kd")))) + (arguments + `(#:cargo-inputs + (("rust-clippy" ,rust-clippy-0.0) + ("rust-serde" ,rust-serde-0.8) + ("rust-serde-test" ,rust-serde-test-0.8)))))) + +(define-public rust-lscolors-0.6 + (package + (name "rust-lscolors") + (version "0.6.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "lscolors" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0jxsgkn378kxkiqdshdjdclw5wwp2xaz45cqd3yw85fhn8a38fza")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-ansi-term" ,rust-ansi-term-0.12)) + #:cargo-development-inputs + (("rust-tempfile" ,rust-tempfile-3.1)))) + (home-page "https://github.com/sharkdp/lscolors") + (synopsis "Colorize paths using the LS_COLORS environment variable") + (description + "Colorize paths using the LS_COLORS environment variable.") + (license (list license:expat license:asl2.0)))) + (define-public rust-new-debug-unreachable-1.0 (package (name "rust-new-debug-unreachable") @@ -6671,7 +7631,7 @@ release (fork of debug_unreachable)") (("rust-bytes" ,rust-bytes-0.4) ("rust-caps" ,rust-caps-0.3) ("rust-cc" ,rust-cc-1.0) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.4) ("rust-sysctl" ,rust-sysctl-0.4) ("rust-tempfile" ,rust-tempfile-3.0)))) @@ -6681,10 +7641,68 @@ release (fork of debug_unreachable)") "Rust friendly bindings to *nix APIs.") (license license:expat))) +(define-public rust-no-panic-0.1 + (package + (name "rust-no-panic") + (version "0.1.12") + (source + (origin + (method url-fetch) + (uri (crate-uri "no-panic" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0xan5v9ac1aklinc8aw16raq36pb4idjrl502np8gy32gfs6s751")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-proc-macro2" ,rust-proc-macro2-1.0) + ("rust-quote" ,rust-quote-1.0) + ("rust-syn" ,rust-syn-1.0)) + #:cargo-development-inputs + (("rust-tempfile" ,rust-tempfile-3.1)))) + (home-page "https://github.com/dtolnay/no-panic") + (synopsis "Prove a function can't ever panic") + (description + "This package provides a rust attribute macro to require that the compiler +prove a function can't ever panic.") + (license (list license:expat license:asl2.0)))) + +(define-public rust-nix-0.14 + (package + (inherit rust-nix-0.15) + (name "rust-nix") + (version "0.14.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "nix" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1kmxdlmvnmq8cfpmr3g6wk37rwi2ybdvp1z6z3831m1p23p2nwkc")))) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-bitflags" ,rust-bitflags-1) + ("rust-cc" ,rust-cc-1.0) + ("rust-cfg-if" ,rust-cfg-if-0.1) + ("rust-libc" ,rust-libc-0.2) + ("rust-void" ,rust-void-1.0)) + #:cargo-development-inputs + (("rust-bytes" ,rust-bytes-0.4) + ("rust-caps" ,rust-caps-0.3) + ("rust-lazy-static" ,rust-lazy-static-1) + ("rust-rand" ,rust-rand-0.6) + ("rust-sysctl" ,rust-sysctl-0.1) + ("rust-tempfile" ,rust-tempfile-3.0)))))) + (define-public rust-nodrop-0.1 (package (name "rust-nodrop") - (version "0.1.13") + (version "0.1.14") (source (origin (method url-fetch) @@ -6692,13 +7710,15 @@ release (fork of debug_unreachable)") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "0if9ifn6rvar5jirx4b3qh4sl5kjkmcifycvzhxa9j3crkfng5ig")))) + "1fz1v9r8ijacf0hlq0pdv5l9mz8vgqg1snmhvpjmi9aci1b4mvvj")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-nodrop-union" ,rust-nodrop-union-0.1)))) (home-page "https://github.com/bluss/arrayvec") (synopsis "Wrapper type to inhibit drop (destructor)") (description "This package provides a wrapper type to inhibit drop (destructor). Use @code{std::mem::ManuallyDrop} instead!") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -6743,7 +7763,7 @@ implementation (which is unstable / requires nightly).") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-lexical-core" ,rust-lexical-core-0.4) ("rust-memchr" ,rust-memchr-2.2) ("rust-regex" ,rust-regex-1.1)) @@ -6760,6 +7780,24 @@ implementation (which is unstable / requires nightly).") combinators library.") (license license:expat))) +(define-public rust-nom-1.2 + (package + (inherit rust-nom-4.2) + (name "rust-nom") + (version "1.2.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "nom" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1kjh42w67z1hh1dw3jrilgqrf54jk2xcvhw4rcdm4wclzmbc5f55")))) + (arguments + ;; This is an ancient version and all inputs are optional. + `(#:skip-build? #t)))) + (define-public rust-num-complex-0.2 (package (name "rust-num-complex") @@ -6790,25 +7828,26 @@ combinators library.") "Complex numbers implementation for Rust.") (license (list license:expat license:asl2.0)))) -(define-public rust-num-cpus-1.10 +(define-public rust-num-cpus-1.11 (package (name "rust-num-cpus") - (version "1.10.1") + (version "1.11.1") (source (origin (method url-fetch) (uri (crate-uri "num_cpus" version)) - (file-name (string-append name "-" version ".crate")) + (file-name + (string-append name "-" version ".tar.gz")) (sha256 (base32 - "0wrj3zvj6h3q26sqj9zxpd59frjb54n7jhjwf307clq31ic47vxw")))) + "0wlxs00cpg16z09fwchj1gdz1jxnf5dgg1cbidvq0sc75bnwbnkn")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs - (("rust-libc" ,rust-libc-0.2)) - #:cargo-development-inputs - (("rust-doc-comment" ,rust-doc-comment-0.3)))) + `(#:cargo-inputs + (("rust-hermit-abi" ,rust-hermit-abi-0.1) + ("rust-libc" ,rust-libc-0.2)) + #:cargo-development-inputs + (("rust-doc-comment" ,rust-doc-comment-0.3)))) (home-page "https://github.com/seanmonstar/num_cpus") (synopsis "Get the number of CPUs on a machine") (description @@ -6816,10 +7855,29 @@ combinators library.") (license (list license:asl2.0 license:expat)))) +(define-public rust-num-cpus-1.10 + (package + (inherit rust-num-cpus-1.11) + (name "rust-num-cpus") + (version "1.10.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "num_cpus" version)) + (file-name (string-append name "-" version ".crate")) + (sha256 + (base32 + "0wrj3zvj6h3q26sqj9zxpd59frjb54n7jhjwf307clq31ic47vxw")))) + (arguments + `(#:cargo-inputs + (("rust-libc" ,rust-libc-0.2)) + #:cargo-development-inputs + (("rust-doc-comment" ,rust-doc-comment-0.3)))))) + (define-public rust-num-integer-0.1 (package (name "rust-num-integer") - (version "0.1.41") + (version "0.1.42") (source (origin (method url-fetch) @@ -6828,12 +7886,15 @@ combinators library.") (string-append name "-" version ".crate")) (sha256 (base32 - "02dwjjpfbi16c71fq689s4sw3ih52cvfzr5z5gs6qpr5z0g58pmq")))) + "1fpw8yr9xwsf3qrh91rm7mzqaiwlc2dmnalsxv9pr9w1klpacviz")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-num-traits" ,rust-num-traits-0.2) + ("rust-autocfg" ,rust-autocfg-1.0)))) (home-page "https://github.com/rust-num/num-integer") (synopsis "Integer traits and functions") (description "Integer traits and functions.") - (properties '((hidden? . #t))) ;; Dual licensed. (license (list license:asl2.0 license:expat)))) @@ -6841,7 +7902,7 @@ combinators library.") (define-public rust-num-iter-0.1 (package (name "rust-num-iter") - (version "0.1.39") + (version "0.1.40") (source (origin (method url-fetch) @@ -6849,20 +7910,24 @@ combinators library.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "0bhk2qbr3261r6zvfc58lz4spfqjhvdripxgz5mks5rd85r55gbn")))) + "005wif3bk23b5jdg7l0cprzqzyc4jg0xjyzyykciv2ci08581c6z")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-num-integer" ,rust-num-integer-0.1) + ("rust-num-traits" ,rust-num-traits-0.2) + ("rust-autocfg" ,rust-autocfg-1.0)))) (home-page "https://github.com/rust-num/num-iter") (synopsis "External iterators for generic mathematics") (description "This crate provides external iterators for generic mathematics.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) (define-public rust-num-traits-0.2 (package (name "rust-num-traits") - (version "0.2.8") + (version "0.2.11") (source (origin (method url-fetch) @@ -6871,13 +7936,15 @@ combinators library.") (string-append name "-" version ".crate")) (sha256 (base32 - "0clvrm34rrqc8p6gq5ps5fcgws3kgq5knh7nlqxf2ayarwks9abb")))) + "15khrlm1bra50nd48ijl1vln13m9xg4fxzghf28jp16ic5zf8ay6")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-autocfg" ,rust-autocfg-1.0) + ("rust-libm" ,rust-libm-0.2)))) (home-page "https://github.com/rust-num/num-traits") (synopsis "Numeric traits for generic mathematics") (description "Numeric traits for generic mathematics.") - (properties '((hidden? . #t))) - ;; Dual licensed. (license (list license:asl2.0 license:expat)))) @@ -6894,7 +7961,30 @@ combinators library.") (sha256 (base32 "0c9whknf2dm74a3cqirafy6gj83a76gl56g4v3g19k6lkwz13rcj")))) - (build-system cargo-build-system))) + (arguments + `(#:cargo-inputs + (("rust-num-traits" , rust-num-traits-0.2)))))) + +(define-public rust-number-prefix-0.3 + (package + (name "rust-number-prefix") + (version "0.3.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "number_prefix" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0slm4mqmpgs6hvz22ycny9lvyvl9ivs80a1lncslp7lszz02zc0p")))) + (build-system cargo-build-system) + (home-page "https://github.com/ogham/rust-number-prefix") + (synopsis "Format numeric prefixes: kilo, giga, kibi") + (description + "This package provides a library for formatting numeric prefixes: kilo, +giga, kibi.") + (license license:expat))) (define-public rust-numtoa-0.1 (package @@ -6909,13 +7999,110 @@ combinators library.") (base32 "1vs9rhggqbql1p26x8nkha1j06wawwgb2jp5fs88b5gi7prvvy5q")))) (build-system cargo-build-system) + (arguments '(#:tests? #f)) (home-page "https://gitlab.com/mmstick/numtoa") (synopsis "Convert numbers into stack-allocated byte arrays") (description "This package can convert numbers into stack-allocated byte arrays.") - (properties '((hidden? . #t))) (license (list license:expat license:asl2.0)))) +(define-public rust-objc-0.2 + (package + (name "rust-objc") + (version "0.2.7") + (source + (origin + (method url-fetch) + (uri (crate-uri "objc" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1cbpf6kz8a244nn1qzl3xyhmp05gsg4n313c9m3567625d3innwi")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f ; Tests require gcc-objc. + #:cargo-inputs + (("rust-malloc-buf" ,rust-malloc-buf-0.0) + ("rust-objc-exception" ,rust-objc-exception-0.1)))) + (home-page "http://github.com/SSheldon/rust-objc") + (synopsis "Objective-C Runtime bindings and wrapper for Rust") + (description "This package provides an Objective-C Runtime bindings and +wrapper for Rust.") + (license license:expat))) + +(define-public rust-objc-exception-0.1 + (package + (name "rust-objc-exception") + (version "0.1.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "objc-exception" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "191cmdmlypp6piw67y4m8y5swlxf5w0ss8n1lk5xd2l1ans0z5xd")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-cc" ,rust-cc-1.0)))) + (home-page "http://github.com/SSheldon/rust-objc-exception") + (synopsis "Rust interface for Objective-C's throw and try/catch statements") + (description + "This package provides a Rust interface for Objective-C's throw and +try/catch statements.") + (license license:expat))) + +(define-public rust-objc-id-0.1 + (package + (name "rust-objc-id") + (version "0.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "objc_id" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0fq71hnp2sdblaighjc82yrac3adfmqzhpr11irhvdfp9gdlsbf9")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f ; Tests require gcc-objc. + #:cargo-inputs (("rust-objc" ,rust-objc-0.2)))) + (home-page "http://github.com/SSheldon/rust-objc-id") + (synopsis "Rust smart pointers for Objective-C reference counting") + (description + "This package provides Rust smart pointers for Objective-C reference counting.") + (license license:expat))) + +(define-public rust-objc-test-utils-0.0 + (package + (name "rust-objc-test-utils") + (version "0.0.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "objc_test_utils" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "09rckmp5h9bbns08xzicdlk7y5lxj2ygbg3yqk1cszfnzd5n8kzx")))) + (build-system cargo-build-system) + (arguments + `(#:skip-build? #t + #:cargo-inputs + (("rust-gcc" ,rust-gcc-0.3)))) + (home-page "http://github.com/SSheldon/rust-objc") + (synopsis "Utilities for testing Objective-C interop") + (description + "This package provides utilities for testing Objective-C interop.") + (license license:expat))) + (define-public rust-object-0.12 (package (name "rust-object") @@ -6969,7 +8156,7 @@ formats.") ("rust-unchecked-index" ,rust-unchecked-index-0.2)) #:cargo-development-inputs (("rust-itertools" ,rust-itertools-0.8) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-memchr" ,rust-memchr-2.2) ("rust-quickcheck" ,rust-quickcheck-0.8)))) (home-page "https://github.com/bluss/odds") @@ -7000,7 +8187,7 @@ Things in odds may move to more appropriate crates if we find them.") (("rust-parking-lot" ,rust-parking-lot-0.9)) #:cargo-development-inputs (("rust-crossbeam-utils" ,rust-crossbeam-utils-0.6) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.1)))) (home-page "https://github.com/matklad/once_cell") (synopsis "Single assignment cells and lazy values") @@ -7049,7 +8236,7 @@ Things in odds may move to more appropriate crates if we find them.") (("rust-bitflags" ,rust-bitflags-1) ("rust-cfg-if" ,rust-cfg-if-0.1) ("rust-foreign-types" ,rust-foreign-types-0.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2) ("rust-openssl-sys" ,rust-openssl-sys-0.9)) #:cargo-development-inputs @@ -7078,28 +8265,6 @@ Things in odds may move to more appropriate crates if we find them.") (description "This package provides a tool to find SSL certificate locations on the system for OpenSSL.") - (properties '((hidden? . #t))) - (license (list license:asl2.0 - license:expat)))) - -(define-public rust-openssl-src-111 - (package - (name "rust-openssl-src") - (version "111.6.0+1.1.1d") - (source - (origin - (method url-fetch) - (uri (crate-uri "openssl-src" version)) - (file-name (string-append name "-" version ".crate")) - (sha256 - (base32 - "172xh95hp7aygahah1940kg1dnx60c5m80cwj5hgi8x7x0fxmhmr")))) - (build-system cargo-build-system) - (home-page "https://github.com/alexcrichton/openssl-src-rs") - (synopsis "Source of OpenSSL for rust crates") - (description - "This package contains the source of OpenSSL and logic to build it.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -7111,19 +8276,18 @@ system for OpenSSL.") (origin (method url-fetch) (uri (crate-uri "openssl-sys" version)) - (file-name (string-append name "-" version ".crate")) + (file-name (string-append name "-" version ".tar.gz")) (sha256 - (base32 "0vvk8vzrc73y8n5rf4yj3x8ygyxjaz7wxrbxiwqi7qy0gyp1cpa6")))) + (base32 "0vvk8vzrc73y8n5rf4yj3x8ygyxjaz7wxrbxiwqi7qy0gyp1cpa6")) + (patches (search-patches "rust-openssl-sys-no-vendor.patch")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t ; it wants rust-openssl-src - #:cargo-inputs + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2) ;; Build dependencies: ("rust-autocfg" ,rust-autocfg-0.1) ("rust-cc" ,rust-cc-1.0) ("rust-pkg-config" ,rust-pkg-config-0.3) - ;("rust-openssl-src" ,rust-openssl-src-111) ("rust-vcpkg" ,rust-vcpkg-0.2)) #:phases (modify-phases %standard-phases @@ -7162,7 +8326,7 @@ system for OpenSSL.") #:cargo-development-inputs (("rust-fnv" ,rust-fnv-1.0) ("rust-itertools" ,rust-itertools-0.8) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-quickcheck" ,rust-quickcheck-0.8) ("rust-rand" ,rust-rand-0.4) ("rust-serde-test" ,rust-serde-test-1.0)))) @@ -7253,6 +8417,29 @@ normally prevent moving a type that has been borrowed from.") (description "Portable Packed SIMD vectors.") (license (list license:asl2.0 license:expat)))) +(define-public rust-pad-0.1 + (package + (name "rust-pad") + (version "0.1.6") + (source + (origin + (method url-fetch) + (uri (crate-uri "pad" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1qy0r26r52gp034fv252mmg0s599a55h9nr4xswy04hvky49pbfj")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-unicode-width" ,rust-unicode-width-0.1)))) + (home-page "https://github.com/ogham/rust-pad") + (synopsis "Library for padding strings at runtime") + (description + "This package provides a library for padding strings at runtime.") + (license license:expat))) + (define-public rust-parking-lot-0.9 (package (name "rust-parking-lot") @@ -7274,7 +8461,7 @@ normally prevent moving a type that has been borrowed from.") ("rust-parking-lot-core" ,rust-parking-lot-core-0.6)) #:cargo-development-inputs (("rust-bincode" ,rust-bincode-1.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.4) ("rust-rustc-version" ,rust-rustc-version-0.2)))) (home-page "https://github.com/Amanieu/parking_lot") @@ -7305,7 +8492,7 @@ synchronization primitives.") ("rust-parking-lot-core" ,rust-parking-lot-core-0.5)) #:cargo-development-inputs (("rust-bincode" ,rust-bincode-1.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.4) ("rust-rustc-version" ,rust-rustc-version-0.2)))))) @@ -7330,7 +8517,7 @@ synchronization primitives.") ("rust-parking-lot-core" ,rust-parking-lot-core-0.4)) #:cargo-development-inputs (("rust-bincode" ,rust-bincode-1.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.4) ("rust-rustc-version" ,rust-rustc-version-0.2)))))) @@ -7403,7 +8590,7 @@ synchronization primitives.") (define-public rust-parity-wasm-0.40 (package (name "rust-parity-wasm") - (version "0.40.1") + (version "0.40.3") (source (origin (method url-fetch) @@ -7411,14 +8598,17 @@ synchronization primitives.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "1p84f0k36q05j18jy66n122lyali794cj78hbxgy9wj6si84plqd")))) + "03qycy21avz4970zc7aj8rj5h4wvi4qsrc90a6hpws1a56mglf8y")))) (build-system cargo-build-system) + (arguments + `(#:tests? #f + #:cargo-development-inputs + (("rust-time" ,rust-time-0.1)))) (home-page "https://github.com/paritytech/parity-wasm") (synopsis "Low-level WebAssembly format library") (description "This package provides a WebAssembly binary format serialization, deserialization, and interpreter in Rust.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -7554,7 +8744,6 @@ deserialization, and interpreter in Rust.") value. This allows you to use @code{Iterator::by_ref} and @code{Iterator::take_while} together, and still get the first value for which the @code{take_while} predicate returned false after dropping the @code{by_ref}.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -7574,7 +8763,6 @@ the @code{take_while} predicate returned false after dropping the @code{by_ref}. (home-page "https://github.com/servo/rust-url/") (synopsis "Percent encoding and decoding") (description "This crate provides percent encoding and decoding.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -7918,14 +9106,13 @@ algorithms.") (home-page "https://github.com/rust-lang-nursery/pin-utils") (synopsis "Utilities for pinning") (description "This crate provides utilities for pinning values on the stack.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) (define-public rust-pkg-config-0.3 (package (name "rust-pkg-config") - (version "0.3.14") + (version "0.3.17") (source (origin (method url-fetch) @@ -7933,16 +9120,18 @@ algorithms.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "135ia995lqzr0gxpk85h0bjxf82kj6hbxdx924sh9jdln6r8wvk7")))) + "0xynnaxdv0gzadlw4h79j855k0q7rj4zb9xb1vk00nc6ss559nh5")))) (build-system cargo-build-system) - ;(inputs - ; `(("pkg-config" ,pkg-config))) + (arguments + `(#:cargo-development-inputs + (("rust-lazy-static" ,rust-lazy-static-1)))) + (native-inputs + `(("pkg-config" ,pkg-config))) (home-page "https://github.com/rust-lang/pkg-config-rs") (synopsis "Library to run the pkg-config system tool") (description "A library to run the pkg-config system tool at build time in order to be used in Cargo build scripts.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -7963,7 +9152,6 @@ used in Cargo build scripts.") (synopsis "Rust library that allows reinterpreting data safely") (description "This package provides a small Rust library that allows users to reinterpret data of certain types safely.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -7980,11 +9168,15 @@ used in Cargo build scripts.") (base32 "1q7nghkpvxxr168y2jnzh3w7qc9vfrby9n7ygy3xpj0bj71hsshs")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-typemap" ,rust-typemap-0.3)) + #:cargo-development-inputs + (("rust-void" ,rust-void-1.0)))) (home-page "https://github.com/reem/rust-plugin") (synopsis "Lazily evaluated, order-independent plugins for extensible types") (description "Lazily evaluated, order-independent plugins for extensible types.") - (properties '((hidden? . #t))) (license license:expat))) (define-public rust-pocket-resources-0.3 @@ -8004,13 +9196,33 @@ used in Cargo build scripts.") (synopsis "Include resources in your applications") (description "This crate allows you to include resources in your applications.") - (properties '((hidden? . #t))) (license license:expat))) +(define-public rust-podio-0.1 + (package + (name "rust-podio") + (version "0.1.6") + (source + (origin + (method url-fetch) + (uri (crate-uri "podio" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1ga5arhwakj5rwrqzf9410zrbwnf24jd59af8kr9rgwbd6vb83vq")))) + (build-system cargo-build-system) + ;(arguments '(#:skip-build? #t)) + (home-page "https://github.com/mvdnes/podio.git") + (synopsis "Additional trait to read and write Plain Old Data") + (description + "Additional trait for Read and Write to read and write Plain Old Data.") + (license (list license:expat license:asl2.0)))) + (define-public rust-ppv-lite86-0.2 (package (name "rust-ppv-lite86") - (version "0.2.5") + (version "0.2.6") (source (origin (method url-fetch) @@ -8018,13 +9230,12 @@ applications.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "06snnv338w341nicfqba2jgln5dsla72ndkgrw7h1dfdb3vgkjz3")))) + "06zs492wbms7j5qhy58cs3976c7kyc47rx0d6fn63rgvp580njbl")))) (build-system cargo-build-system) (home-page "https://github.com/cryptocorrosion/cryptocorrosion") (synopsis "Implementation of the crypto-simd API for x86") (description "This crate provides an implementation of the crypto-simd API for x86.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -8083,6 +9294,26 @@ dependency to expose a precomputed hash.") "Procedural macros in expression position.") (license (list license:expat license:asl2.0)))) +(define-public rust-proc-macro-hack-impl-0.4 + (package + (name "rust-proc-macro-hack-impl") + (version "0.4.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "proc-macro-hack-impl" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0hk8g6s0zsi1ps0w48la2s8q5iqq42g8jfrgq3l2v04l2p5pvi1q")))) + (build-system cargo-build-system) + (home-page "https://github.com/dtolnay/proc-macro-hack") + (synopsis "Procedural functionlike!() macros using only Macros 1.1") + (description + "Procedural functionlike!() macros using only Macros 1.1.") + (license (list license:expat license:asl2.0)))) + (define-public rust-proc-macro-nested-0.1 (package (name "rust-proc-macro-nested") @@ -8145,8 +9376,7 @@ in terms of the upstream unstable API.") (base32 "0nd71fl24sys066jrha6j7i34nfkjv44yzw8yww9742wmc8j0gfg")))) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-unicode-xid" ,rust-unicode-xid-0.1)) #:cargo-development-inputs (("rust-quote" ,rust-quote-0.6)))))) @@ -8171,7 +9401,7 @@ in terms of the upstream unstable API.") (("rust-bit-set" ,rust-bit-set-0.5) ("rust-bitflags" ,rust-bitflags-1) ("rust-byteorder" ,rust-byteorder-1.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-num-traits" ,rust-num-traits-0.2) ("rust-quick-error" ,rust-quick-error-1.2) ("rust-rand" ,rust-rand-0.4) @@ -8190,6 +9420,29 @@ in terms of the upstream unstable API.") "Hypothesis-like property-based testing and shrinking.") (license (list license:asl2.0 license:expat)))) +(define-public rust-psm-0.1 + (package + (name "rust-psm") + (version "0.1.6") + (source + (origin + (method url-fetch) + (uri (crate-uri "psm" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1q1hdbnp2j3zz1vhzp1xhds6ynan3mg5bhjlhfy5m1sg8n5wckxi")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-development-inputs + (("rust-cc" ,rust-cc-1.0)))) + (home-page "https://github.com/rust-lang/stacker/") + (synopsis "Stack manipulation and introspection routines") + (description "This crate provides very portable functions to control the +stack pointer and inspect the properties of the stack.") + (license (list license:isc license:asl2.0)))) + (define-public rust-pulldown-cmark-0.4 (package (name "rust-pulldown-cmark") @@ -8214,7 +9467,7 @@ in terms of the upstream unstable API.") #:cargo-development-inputs (("rust-criterion" ,rust-criterion-0.2) ("rust-html5ever" ,rust-html5ever-0.23) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.1) ("rust-tendril" ,rust-tendril-0.4)))) (home-page "https://github.com/raphlinus/pulldown-cmark") @@ -8223,6 +9476,32 @@ in terms of the upstream unstable API.") "This package provides a pull parser for CommonMark.") (license license:expat))) +(define-public rust-quantiles-0.7 + (package + (name "rust-quantiles") + (version "0.7.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "quantiles" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1wjp16a3d4bmldq9w2wds0q4gjz4mnsqac3g38r6ryr6zc9sh3y1")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-serde" ,rust-serde-1.0) + ("rust-serde-derive" ,rust-serde-derive-1.0)) + #:cargo-development-inputs + (("rust-quickcheck" ,rust-quickcheck-0.5)))) + (home-page "https://github.com/postmates/quantiles") + (synopsis "Collection of approximate quantile algorithms") + (description + "This package provides a collection of approximate quantile algorithms.") + (license license:expat))) + (define-public rust-quick-error-1.2 (package (name "rust-quick-error") @@ -8261,12 +9540,11 @@ to write.") "0mkl4wnvvjk4m32aq3an4ayfyvnmbxnzcybfm7n3fbsndb1xjdcw")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-env-logger" ,rust-env-logger-0.6) ("rust-log" ,rust-log-0.4) - ("rust-rand" ,rust-rand-0.4) - ("rust-rand-core" ,rust-rand-core-0.5)))) + ("rust-rand" ,rust-rand-0.6) + ("rust-rand-core" ,rust-rand-core-0.4)))) (home-page "https://github.com/BurntSushi/quickcheck") (synopsis @@ -8338,6 +9616,26 @@ to write.") ("rust-log" ,rust-log-0.3) ("rust-rand" ,rust-rand-0.3)))))) +(define-public rust-quickcheck-0.2 + (package + (inherit rust-quickcheck-0.8) + (name "rust-quickcheck") + (version "0.2.27") + (source + (origin + (method url-fetch) + (uri (crate-uri "quickcheck" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1vb4acppaavlnchzc1jmn5wlkgir9x9gmhgp97bavyxxqxgsg1nh")))) + (arguments + `(#:cargo-inputs + (("rust-env-logger" ,rust-env-logger-0.3) + ("rust-log" ,rust-log-0.3) + ("rust-rand" ,rust-rand-0.3)) + #:skip-build? #t)))) ; Package needs 'unicode' crate. + (define-public rust-quote-1.0 (package (name "rust-quote") @@ -8351,17 +9649,22 @@ to write.") (base32 "1zkc46ryacf2jdkc6krsy2z615xbk1x8kp1830rcxz3irj5qqfh5")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-proc-macro2" ,rust-proc-macro2-1.0)) + #:cargo-development-inputs + (("rust-rustversion" ,rust-rustversion-0.1) + ("rust-trybuild" ,rust-trybuild-1.0)))) (home-page "https://github.com/dtolnay/quote") (synopsis "Quasi-quoting macro quote!(...)") (description "Quasi-quoting macro quote!(...)") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) (define-public rust-quote-0.6 (package (inherit rust-quote-1.0) (name "rust-quote") - (version "0.6.12") + (version "0.6.13") (source (origin (method url-fetch) @@ -8369,7 +9672,25 @@ to write.") (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 - "1nw0klza45hf127kfyrpxsxd5jw2l6h21qxalil3hkr7bnf7kx7s")))))) + "1qgqq48jymp5h4y082aanf25hrw6bpb678xh3zw993qfhxmkpqkc")))) + (arguments + `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-0.4)))))) + +(define-public rust-quote-0.3 + (package + (inherit rust-quote-0.6) + (name "rust-quote") + (version "0.3.15") + (source + (origin + (method url-fetch) + (uri (crate-uri "quote" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0yhnnix4dzsv8y4wwz4csbnqjfh73al33j35msr10py6cl5r4vks")))) + (arguments '()))) (define-public rust-rand-0.7 (package @@ -8420,8 +9741,7 @@ useful types and distributions, and some randomness-related algorithms.") (base32 "1jl4449jcl4wgmzld6ffwqj5gwxrp8zvx8w573g1z368qg6xlwbd")))) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2) ("rust-log" ,rust-log-0.4) ("rust-packed-simd" ,rust-packed-simd-0.3) @@ -8436,7 +9756,8 @@ useful types and distributions, and some randomness-related algorithms.") ("rust-winapi" ,rust-winapi-0.3) ("rust-autocfg" ,rust-autocfg-0.1)) ; build-dependency #:cargo-development-inputs - (("rust-rand-xoshiro" ,rust-rand-xoshiro-0.1)))))) + (("rust-average" ,rust-average-0.9) + ("rust-rand-xoshiro" ,rust-rand-xoshiro-0.1)))))) (define-public rust-rand-0.5 (package @@ -8688,10 +10009,18 @@ generator that uses the HC-128 algorithm.") (base32 "027flpjr4znx2csxk7gxb7vrf9c7y5mydmvg5az2afgisp4rgnfy")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-rand-core" ,rust-rand-core-0.3) + ("rust-serde" ,rust-serde-1.0) + ("rust-serde-derive" ,rust-serde-derive-1.0)) + #:cargo-development-inputs + (("rust-bincode" ,rust-bincode-1.1)))) (home-page "https://crates.io/crates/rand_isaac") (synopsis "ISAAC random number generator") - (description "ISAAC random number generator") - (properties '((hidden? . #t))) + (description "This package implements the @code{ISAAC} and @code{ISAAC-64} +random number generators. ISAAC stands for \"Indirection, Shift, Accumulate, +Add, and Count\" which are the principal bitwise operations employed.") (license (list license:asl2.0 license:expat)))) @@ -8708,12 +10037,16 @@ generator that uses the HC-128 algorithm.") (base32 "16z387y46bfz3csc42zxbjq89vcr1axqacncvv8qhyy93p4xarhi")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-libc" ,rust-libc-0.2) + ("rust-rand-core" ,rust-rand-core-0.4) + ("rust-winapi" ,rust-winapi-0.3) + ("rust-log" ,rust-log-0.4)))) (home-page "https://github.com/rust-random/rand") - (synopsis - "Random number generator based on timing jitter") - (description - "Random number generator based on timing jitter") - (properties '((hidden? . #t))) + (synopsis "Random number generator based on timing jitter") + (description "This package provides a non-physical true random number +generator based on timing jitter.") (license (list license:asl2.0 license:expat)))) @@ -8859,11 +10192,17 @@ generator that uses the HC-128 algorithm.") (base32 "0p2x8nr00hricpi2m6ca5vysiha7ybnghz79yqhhx6sl4gkfkxyb")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-rand-core" ,rust-rand-core-0.3) + ("rust-serde" ,rust-serde-1.0) + ("rust-serde-derive" ,rust-serde-derive-1.0)) + #:cargo-development-inputs + (("rust-bincode" ,rust-bincode-1.1)))) (home-page "https://crates.io/crates/rand-xorshift") (synopsis "Xorshift random number generator") (description "Xorshift random number generator") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -8992,7 +10331,7 @@ accessors.") #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3) ("rust-docopt" ,rust-docopt-1.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.7) ("rust-rand-xorshift" ,rust-rand-xorshift-0.2) ("rust-serde" ,rust-serde-1.0)))) @@ -9025,7 +10364,7 @@ accessors.") #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3) ("rust-docopt" ,rust-docopt-1.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-rand" ,rust-rand-0.4) ("rust-rand-xorshift" ,rust-rand-xorshift-0.2) ("rust-serde" ,rust-serde-1.0) @@ -9051,7 +10390,7 @@ accessors.") (("rust-crossbeam-deque" ,rust-crossbeam-deque-0.7) ("rust-crossbeam-queue" ,rust-crossbeam-queue-0.2) ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.7) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-num-cpus" ,rust-num-cpus-1.10)) #:cargo-development-inputs (("rust-libc" ,rust-libc-0.2) @@ -9083,7 +10422,7 @@ accessors.") (("rust-crossbeam-deque" ,rust-crossbeam-deque-0.7) ("rust-crossbeam-queue" ,rust-crossbeam-queue-0.1) ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.6) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-num-cpus" ,rust-num-cpus-1.10)) #:cargo-development-inputs (("rust-libc" ,rust-libc-0.2) @@ -9241,7 +10580,7 @@ functionality.") (define-public rust-regex-1.3 (package (name "rust-regex") - (version "1.3.3") + (version "1.3.4") (source (origin (method url-fetch) @@ -9250,18 +10589,17 @@ functionality.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "11syqmfvbsah805z6ih8vxf8p6jssdsz1gjsjqcwprz484cqql5m")))) + "1a1mh9mgr8jipnxdaykla6xlw4a6kjn2bzkq3cifx8xy4ivzjb1j")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-aho-corasick" ,rust-aho-corasick-0.7) ("rust-memchr" ,rust-memchr-2.2) ("rust-regex-syntax" ,rust-regex-syntax-0.6) ("rust-thread-local" ,rust-thread-local-1.0)) #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-quickcheck" ,rust-quickcheck-0.8) ("rust-rand" ,rust-rand-0.6)))) (home-page "https://github.com/rust-lang/regex") @@ -9275,7 +10613,7 @@ uses finite automata and guarantees linear time matching on all inputs.") (package (inherit rust-regex-1.3) (name "rust-regex") - (version "1.1.7") + (version "1.1.9") (source (origin (method url-fetch) @@ -9284,10 +10622,9 @@ uses finite automata and guarantees linear time matching on all inputs.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "1pabajpp0wzb7dm2x32gy8w7k0mwykr6zsvzn0fgpr6pww40hbqb")))) + "1ba47ivq8l1yikiwikjnq5barag6iqfgcpxlz2263fqbq9y2kn6r")))) (arguments - `(#:skip-build? #t - #:cargo-inputs + `(#:cargo-inputs (("rust-aho-corasick" ,rust-aho-corasick-0.7) ("rust-memchr" ,rust-memchr-2.2) ("rust-regex-syntax" ,rust-regex-syntax-0.6) @@ -9295,9 +10632,9 @@ uses finite automata and guarantees linear time matching on all inputs.") ("rust-utf8-ranges" ,rust-utf8-ranges-1.0)) #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-quickcheck" ,rust-quickcheck-0.8) - ("rust-rand" ,rust-rand-0.4)))))) + ("rust-rand" ,rust-rand-0.6)))))) (define-public rust-regex-0.2 (package @@ -9323,7 +10660,7 @@ uses finite automata and guarantees linear time matching on all inputs.") ("rust-thread-local" ,rust-thread-local-0.3) ("rust-utf8-ranges" ,rust-utf8-ranges-1.0)) #:cargo-development-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-quickcheck" ,rust-quickcheck-0.6) ("rust-rand" ,rust-rand-0.4)))))) @@ -9348,7 +10685,7 @@ uses finite automata and guarantees linear time matching on all inputs.") ("rust-regex-syntax" ,rust-regex-syntax-0.6) ("rust-utf8-ranges" ,rust-utf8-ranges-1.0)) #:cargo-development-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.1) ("rust-serde" ,rust-serde-1.0) ("rust-serde-bytes" ,rust-serde-bytes-0.11) @@ -9364,7 +10701,7 @@ uses finite automata and guarantees linear time matching on all inputs.") (define-public rust-regex-syntax-0.6 (package (name "rust-regex-syntax") - (version "0.6.13") + (version "0.6.14") (source (origin (method url-fetch) @@ -9372,9 +10709,8 @@ uses finite automata and guarantees linear time matching on all inputs.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "141xi6yiji0bc04c4skamd4ny9vnd1jrwc7qzfga425lyn8yhd77")))) + "01myl8xqpbnird23xnsb92sjmz1cmp69r6m7y3dwbpmsx4zzx3dj")))) (build-system cargo-build-system) - (arguments '(#:skip-build? #t)) (home-page "https://github.com/rust-lang/regex") (synopsis "Regular expression parser") (description @@ -9401,6 +10737,25 @@ uses finite automata and guarantees linear time matching on all inputs.") #:cargo-inputs (("rust-ucd-util" ,rust-ucd-util-0.1)))))) +(define-public rust-regex-syntax-0.3 + (package + (inherit rust-regex-syntax-0.6) + (name "rust-regex-syntax") + (version "0.3.9") + (source + (origin + (method url-fetch) + (uri (crate-uri "regex-syntax" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0ms9hgdhhsxw9w920i7gipydvagf100bb56jbs192rz86ln01v7r")))) + (arguments + `(#:skip-build? #t + #:cargo-development-inputs + (("rust-quickcheck" ,rust-quickcheck-0.2) + ("rust-rand" ,rust-rand-0.3)))))) + (define-public rust-remove-dir-all-0.5 (package (name "rust-remove-dir-all") @@ -9677,6 +11032,29 @@ rust-lang/rust integration.") require unstable language features.") (license (list license:asl2.0 license:expat)))) +(define-public rust-rustc-tools-util-0.2 + (package + (name "rust-rustc-tools-util") + (version "0.2.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "rustc_tools_util" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1vj4ymv29igs7n52m12k138zbsn5k5d7ya4sys6lig7sx7ddl9dp")))) + (build-system cargo-build-system) + (arguments '(#:skip-build? #t)) + (home-page + "https://github.com/rust-lang/rust-clippy") + (synopsis + "small helper to generate version information for git packages") + (description + "small helper to generate version information for git packages") + (license (list license:expat license:asl2.0)))) + (define-public rust-rustc-version-0.2 (package (name "rust-rustc-version") @@ -9736,6 +11114,31 @@ rustc compiler.") "Automatically apply the suggestions made by rustc.") (license (list license:expat license:asl2.0)))) +(define-public rust-rustversion-0.1 + (package + (name "rust-rustversion") + (version "0.1.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "rustversion" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1s3ib2paa5gq17x4qsmjmnsw68z7b5d5av1wsiqcrihmqb7kk0dl")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-proc-macro2" ,rust-proc-macro2-1.0) + ("rust-quote" ,rust-quote-1.0) + ("rust-syn" ,rust-syn-1.0)))) + (home-page "https://github.com/dtolnay/rustversion") + (synopsis "Conditional compilation according to rustc compiler version") + (description "This package provides conditional compilation according to +rustc compiler version.") + (license (list license:expat license:asl2.0)))) + (define-public rust-rusty-fork-0.2 (package (name "rust-rusty-fork") @@ -9777,12 +11180,17 @@ using a fork-like interface.") (base32 "1j0h74f1xqf9hjkhanp8i20mqc1aw35kr1iq9i79q7713mn51a5z")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-no-panic" ,rust-no-panic-0.1)) + #:cargo-development-inputs + (("rust-num-cpus" ,rust-num-cpus-1.11) + ("rust-rand" ,rust-rand-0.5)))) (home-page "https://github.com/dtolnay/ryu") - (synopsis - "Fast floating point to string conversion") + (synopsis "Fast floating point to string conversion") (description - "Fast floating point to string conversion") - (properties '((hidden? . #t))) + "This package provides a pure Rust implementation of Ryū, an algorithm to +quickly convert floating point numbers to decimal strings.") (license (list license:asl2.0 license:boost1.0)))) (define-public rust-safemem-0.3 @@ -9849,7 +11257,7 @@ paths point to the same file.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-winapi" ,rust-winapi-0.3)))) (home-page "https://github.com/steffengy/schannel-rs") (synopsis "Rust bindings to the Windows SChannel APIs") @@ -9874,7 +11282,7 @@ server functionality.") (arguments `(#:skip-build? #t #:cargo-development-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3)))) + (("rust-lazy-static" ,rust-lazy-static-1)))) (home-page "https://github.com/Kimundi/scoped-threadpool-rs") (synopsis "Library for scoped and cached threadpools") (description @@ -10112,7 +11520,6 @@ proven statistical guarantees.") (home-page "https://github.com/steveklabnik/semver-parser") (synopsis "Parsing of the semver spec") (description "This package provides for parsing of the semver spec.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -10155,8 +11562,49 @@ proven statistical guarantees.") "This package provides a generic serialization/deserialization framework.") (license (list license:expat license:asl2.0)))) -;; Circular dev dependency on bincode. -;; Probably not going away: https://github.com/rust-lang/cargo/issues/4242 +(define-public rust-serde-0.8 + (package + (inherit rust-serde-1.0) + (name "rust-serde") + (version "0.8.23") + (source + (origin + (method url-fetch) + (uri (crate-uri "serde" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1j4ajipn0sf4ya0crgcb94s848qp7mfc35n6d0q2rf8rk5skzbcx")))) + (arguments + `(#:cargo-development-inputs + (("rust-clippy" ,rust-clippy-0.0)) + #:tests? #f)))) + +(define-public rust-serde-big-array-0.1 + (package + (name "rust-serde-big-array") + (version "0.1.5") + (source + (origin + (method url-fetch) + (uri (crate-uri "serde-big-array" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0gkyqxk760mp1lfcg6lhjk95ajc89nr0qdd0vl4ic0g8pyxcy9mr")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-serde" ,rust-serde-1.0) + ("rust-serde-derive" ,rust-serde-derive-1.0)) + #:cargo-development-inputs + (("rust-serde-json" ,rust-serde-json-1.0)))) + (home-page "https://github.com/est31/serde-big-array") + (synopsis "Big array helper for serde") + (description "This package provides a big array helper for serde.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-serde-bytes-0.11 (package (name "rust-serde-bytes") @@ -10299,6 +11747,29 @@ proven statistical guarantees.") "Token De/Serializer for testing De/Serialize implementations.") (license (list license:expat license:asl2.0)))) +(define-public rust-serde-test-0.8 + (package + (inherit rust-serde-test-1.0) + (name "rust-serde-test") + (version "0.8.23") + (source + (origin + (method url-fetch) + (uri (crate-uri "serde-test" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1m939j7cgs7i58r6vxf0ffp3nbr8advr8p9dqa9w8zk0z2yks2qi")))) + (arguments + `(#:cargo-inputs (("rust-serde" ,rust-serde-0.8)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-Cargo-toml + (lambda _ + (substitute* "Cargo.toml" + ((", path = \"../serde\"") "")) + #t))))))) + (define-public rust-serde-yaml-0.8 (package (name "rust-serde-yaml") @@ -10453,7 +11924,6 @@ proven statistical guarantees.") (synopsis "Split a string into shell words, like Python's shlex") (description "This crate provides a method to split a string into shell words, like Python's shlex.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -10553,7 +12023,6 @@ words, like Python's shlex.") (synopsis "Pre-allocated storage for a uniform data type") (description "This create provides a pre-allocated storage for a uniform data type.") - (properties '((hidden? . #t))) (license license:expat))) (define-public rust-sleef-sys-0.1 @@ -10652,12 +12121,20 @@ stack.") (base32 "11bdcz04i106g4q7swkll0qxrb4287srqd2k3aq2q6i22zjlvdz8")))) (build-system cargo-build-system) + (arguments + `(#:tests? #f ; tests require network access + #:cargo-inputs + (("rust-cfg-if" ,rust-cfg-if-0.1) + ("rust-libc" ,rust-libc-0.2) + ("rust-redox-syscall" ,rust-redox-syscall-0.1) + ("rust-winapi" ,rust-winapi-0.3)) + #:cargo-development-inputs + (("rust-tempdir" ,rust-tempdir-0.3)))) (home-page "https://github.com/alexcrichton/socket2-rs") (synopsis "Networking sockets in Rust") (description "This package provides utilities for handling networking sockets with a maximal amount of configuration possible intended.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -10674,12 +12151,14 @@ maximal amount of configuration possible intended.") (base32 "1lwa6973zs4bgj29my7agfjgk4nw9hp6j7dfnr13nid85fw7rxsb")))) (build-system cargo-build-system) + (arguments + `(#:cargo-development-inputs + (("rust-tempfile" ,rust-tempfile-3.1)))) (home-page "https://github.com/derekdreery/sourcefile-rs") (synopsis "Concatenate source from multiple files") (description "A library for concatenating source from multiple files, whilst keeping track of where each new file and line starts.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -10713,7 +12192,7 @@ track of where each new file and line starts.") (define-public rust-spin-0.5 (package (name "rust-spin") - (version "0.5.0") + (version "0.5.2") (source (origin (method url-fetch) @@ -10721,16 +12200,31 @@ track of where each new file and line starts.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "0m9clchsj0rf13bggsgvbv9haiy0f6rhvnvkpvkk8720a5pkydj4")))) + "0b84m6dbzrwf2kxylnw82d3dr8w06av7rfkr8s85fb5f43rwyqvf")))) (build-system cargo-build-system) (home-page "https://github.com/mvdnes/spin-rs") (synopsis "Synchronization primitives based on spinning") (description "This crate provides synchronization primitives based on spinning. They may contain data, are usable without @code{std},and static initializers are available.") - (properties '((hidden? . #t))) (license license:expat))) +(define-public rust-spin-0.4 + (package + (inherit rust-spin-0.5) + (name "rust-spin") + (version "0.4.10") + (source + (origin + (method url-fetch) + (uri (crate-uri "spin" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "07ywqn1vrpi3c43fmvsx7pawk9h3rb77yyqbnhap2micl454kb6f")))) + (arguments '(#:skip-build? #t)))) + (define-public rust-stable-deref-trait-1.1 (package (name "rust-stable-deref-trait") @@ -10752,14 +12246,13 @@ types which deref to a fixed address which is valid even when the containing type is moved. For example, Box, Vec, Rc, Arc and String implement this trait. Additionally, it defines CloneStableDeref for types like Rc where clones deref to the same address.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) (define-public rust-stacker-0.1 (package (name "rust-stacker") - (version "0.1.5") + (version "0.1.6") (source (origin (method url-fetch) @@ -10767,14 +12260,21 @@ to the same address.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "0js0axz5nla1mkr2dm2vrv9rj964ng1lrv4l43sqlnfgawplhygv")))) + "12igajfgqz96c7vcwi91xdfsphawik6g36ndlglqih0a7bqw8vyr")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-cfg-if" ,rust-cfg-if-0.1) + ("rust-libc" ,rust-libc-0.2) + ("rust-psm" ,rust-psm-0.1) + ("rust-winapi" ,rust-winapi-0.3)) + #:cargo-development-inputs + (("rust-cc" ,rust-cc-1.0)))) (home-page "https://github.com/rust-lang/stacker") (synopsis "Manual segmented stacks for Rust") (description "This package provides a stack growth library useful when implementing deeply recursive algorithms that may accidentally blow the stack.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -10822,7 +12322,6 @@ deeply recursive algorithms that may accidentally blow the stack.") (description "This package provides compile-time assertions to ensure that invariants are met.") - (properties '((hidden? . #t))) (license (list license:expat license:asl2.0)))) (define-public rust-stdweb-0.4 @@ -10852,10 +12351,10 @@ are met.") ("rust-stdweb-derive" ,rust-stdweb-derive-0.5) ("rust-stdweb-internal-macros" ,rust-stdweb-internal-macros-0.2) ("rust-stdweb-internal-runtime" ,rust-stdweb-internal-runtime-0.1) - ("rust-wasm-bindgen" ,rust-wasm-bindgen-0.2)) + ("rust-wasm-bindgen" ,rust-wasm-bindgen-0.2) + ("rust-rustc-version" ,rust-rustc-version-0.2)) #:cargo-development-inputs - (("rust-rustc-version" ,rust-rustc-version-0.2) - ("rust-serde-derive" ,rust-serde-derive-1.0) + (("rust-serde-derive" ,rust-serde-derive-1.0) ("rust-serde-json" ,rust-serde-json-1.0) ("rust-stdweb-internal-test-macro" ,rust-stdweb-internal-test-macro-0.1) ("rust-wasm-bindgen-test" ,rust-wasm-bindgen-test-0.2)))) @@ -10928,7 +12427,7 @@ Web.") (define-public rust-stdweb-internal-runtime-0.1 (package (name "rust-stdweb-internal-runtime") - (version "0.1.4") + (version "0.1.5") (source (origin (method url-fetch) @@ -10936,20 +12435,19 @@ Web.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "1nhpyra7glbwcpakhpj5a3d7h7kx1ynif473nzshmk226m91f8ym")))) + "1h0nkppb4r8dbrbms2hw9n5xdcs392m0r5hj3b6lsx3h6fx02dr1")))) (build-system cargo-build-system) (home-page "https://github.com/koute/stdweb") (synopsis "Internal runtime for the @code{stdweb} crate") (description "This crate provides internal runtime for the @code{stdweb} crate.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) (define-public rust-stdweb-internal-test-macro-0.1 (package (name "rust-stdweb-internal-test-macro") - (version "0.1.0") + (version "0.1.1") (source (origin (method url-fetch) @@ -10957,13 +12455,16 @@ crate.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "12rrm7p77xnm3xacgn3rgniiyyjb4gq7902wpbljsvbx045z69l2")))) + "0wx3jlm98qrg1pdw149fprzs9x3x3igqkm5ll23jv2v62yddfrjf")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-proc-macro2" ,rust-proc-macro2-1.0) + ("rust-quote" ,rust-quote-1.0)))) (home-page "https://github.com/koute/stdweb") (synopsis "Internal crate of the `stdweb` crate") (description "Internal crate of the @code{stdweb} crate.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -10994,7 +12495,7 @@ crate.") (define-public rust-streaming-stats-0.2 (package (name "rust-streaming-stats") - (version "0.2.2") + (version "0.2.3") (source (origin (method url-fetch) @@ -11002,13 +12503,15 @@ crate.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "0l7xz4g6709s80zqpvlhrg0qhgz64r94cwhmfsg8xhabgznbp2px")))) + "0iz5dlq51w5hxjrv6a4hpf8rrj91kgvy0s9mhj0j12il9v771mmh")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-num-traits" ,rust-num-traits-0.2)))) (home-page "https://github.com/BurntSushi/rust-stats") (synopsis "Compute basic statistics on streams") (description "Experimental crate for computing basic statistics on streams.") - (properties '((hidden? . #t))) (license (list license:unlicense license:expat)))) @@ -11029,7 +12532,7 @@ crate.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-new-debug-unreachable" ,rust-new-debug-unreachable-1.0) ("rust-phf-shared" ,rust-phf-shared-0.7) @@ -11100,7 +12603,7 @@ developed as part of the Servo project.") (define-public rust-strsim-0.9 (package (name "rust-strsim") - (version "0.9.2") + (version "0.9.3") (source (origin (method url-fetch) @@ -11108,14 +12611,13 @@ developed as part of the Servo project.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "1xphwhf86yxxmcpvm4mikj8ls41f6nf7gqyjm98b74mfk81h6b03")))) + "0k497pv882qn3q977ckznm13vxx927g8s1swvcv68j3c1pccwik4")))) (build-system cargo-build-system) (home-page "https://github.com/dguo/strsim-rs") (synopsis "Rust implementations of string similarity metrics") (description "This crate includes implementations of string similarity metrics. It includes Hamming, Levenshtein, OSA, Damerau-Levenshtein, Jaro, and Jaro-Winkler.") - (properties '((hidden? . #t))) (license license:expat))) (define-public rust-strsim-0.8 @@ -11132,6 +12634,108 @@ and Jaro-Winkler.") (base32 "0sjsm7hrvjdifz661pjxq5w4hf190hx53fra8dfvamacvff139cf")))))) +(define-public rust-strsim-0.6 + (package + (inherit rust-strsim-0.9) + (name "rust-strsim") + (version "0.6.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "strsim" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "151ngha649cyybr3j50qg331b206zrinxqz7fzw1ra8r0n0mrldl")))))) + +(define-public rust-strsim-0.5 + (package + (inherit rust-strsim-0.9) + (name "rust-strsim") + (version "0.5.2") + (source + (origin + (method url-fetch) + (uri (crate-uri "strsim" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0z3zzvmilfldp4xw42qbkjf901dcnbk58igrzsvivydjzd24ry37")))))) + +(define-public rust-structopt-0.2 + (package + (name "rust-structopt") + (version "0.2.18") + (source + (origin + (method url-fetch) + (uri (crate-uri "structopt" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1mvfv1l8vp3y402fkl2wcl34hi7gmr4bqha13dfz2xf3kjzwvhhn")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f + #:cargo-inputs + (("rust-clap" ,rust-clap-2) + ("rust-structopt-derive" ,rust-structopt-derive-0.2)))) + (home-page "https://github.com/TeXitoi/structopt") + (synopsis "Parse command line arguments by defining a struct") + (description + "Parse command line arguments by defining a struct.") + (license (list license:asl2.0 license:expat)))) + +(define-public rust-structopt-derive-0.2 + (package + (name "rust-structopt-derive") + (version "0.2.18") + (source + (origin + (method url-fetch) + (uri (crate-uri "structopt-derive" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "01sis9z5kqmyhvzbnmlzpdxcry99a0b9blypksgnhdsbm1hh40ak")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-heck" ,rust-heck-0.3) + ("rust-proc-macro2" ,rust-proc-macro2-0.4) + ("rust-quote" ,rust-quote-0.6) + ("rust-syn" ,rust-syn-0.15)))) + (home-page "https://github.com/TeXitoi/structopt") + (synopsis + "Parse command line argument by defining a struct, derive crate") + (description + "Parse command line argument by defining a struct, derive crate.") + (license (list license:asl2.0 license:expat)))) + +(define-public rust-subtle-1.0 + (package + (name "rust-subtle") + (version "1.0.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "subtle" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1vm80mxbwfj334izwm8x8l65v1xl9hr0kwrg36r1rq565fkaarrd")))) + (build-system cargo-build-system) + (home-page "https://dalek.rs/") + (synopsis + "Pure-Rust traits and utilities for cryptographic implementations") + (description + "This package provides Pure-Rust traits and utilities for constant-time +cryptographic implementations.") + (license license:bsd-3))) + (define-public rust-syn-1.0 (package (name "rust-syn") @@ -11166,11 +12770,11 @@ and Jaro-Winkler.") (base32 "1id5g6x6zihv3j7hwrw3m1jp636bg8dpi671r7zy3jvpkavb794w")))) (arguments - `(#:skip-build? #t + `(#:cargo-test-flags '("--release" "--all-features") #:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-0.4) - ("rust-quote" ,rust-quote-1.0) - ("rust-unicode-xid" ,rust-unicode-xid-0.2)) + ("rust-quote" ,rust-quote-0.6) + ("rust-unicode-xid" ,rust-unicode-xid-0.1)) #:cargo-development-inputs (("rust-insta" ,rust-insta-0.8) ("rust-rayon" ,rust-rayon-1.1) @@ -11257,6 +12861,27 @@ and Jaro-Winkler.") "Simplified interface to libc::sysctl.") (license license:expat))) +(define-public rust-sysctl-0.1 + (package + (inherit rust-sysctl-0.4) + (name "rust-sysctl") + (version "0.1.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "sysctl" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "10wxlk4nkzlxp4fg435jmdmfwl4hy0y4w2rcsgs634lvbp8pgksb")))) + (arguments + `(#:skip-build? #t ; Unsupported on Linux. + #:cargo-inputs + (("rust-byteorder" ,rust-byteorder-1.3) + ("rust-errno" ,rust-errno-0.2) + ("rust-libc" ,rust-libc-0.2)))))) + (define-public rust-tar-0.4 (package (name "rust-tar") @@ -11282,6 +12907,26 @@ memory all at once.") (license (list license:asl2.0 license:expat)))) +(define-public rust-takeable-option-0.4 + (package + (name "rust-takeable-option") + (version "0.4.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "takeable-option" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0hvd6vk4ksgg2y99498jw52ric4lxm0i6ygpzqm95gdrhvsxyynp")))) + (build-system cargo-build-system) + (home-page "https://docs.rs/takeable-option/") + (synopsis "A small wrapper around option.") + (description + "This package provides a small wrapper around option.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-tempdir-0.3 (package (name "rust-tempdir") @@ -11295,12 +12940,15 @@ memory all at once.") (base32 "1n5n86zxpgd85y0mswrp5cfdisizq2rv3la906g6ipyc03xvbwhm")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-rand" ,rust-rand-0.4) + ("rust-remove-dir-all" ,rust-remove-dir-all-0.5)))) (home-page "https://github.com/rust-lang-deprecated/tempdir") (synopsis "Temporary directory management for Rust") (description "This package provides a library for managing a temporary directory and deleting all contents when it's dropped.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -11433,6 +13081,29 @@ directories.") (("rust-kernel32-sys" ,rust-kernel32-sys-0.2) ("rust-winapi" ,rust-winapi-0.2)))))) +(define-public rust-term-grid-0.1 + (package + (name "rust-term-grid") + (version "0.1.7") + (source + (origin + (method url-fetch) + (uri (crate-uri "term_grid" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1kq2sy3b8329jrsrpcvijvyz4gbqjyvyy6c3n0wmmvda9y03w393")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-unicode-width" ,rust-unicode-width-0.1)))) + (home-page "https://github.com/ogham/rust-term-grid") + (synopsis "Library for formatting strings into a grid layout") + (description "This package provides a library for formatting strings into a +grid layout.") + (license license:expat))) + (define-public rust-term-size-1.0 (package (name "rust-term-size") @@ -11663,7 +13334,7 @@ different for every thread.") (build-system cargo-build-system) (arguments `(#:skip-build? #t - #:cargo-inputs (("rust-lazy-static" ,rust-lazy-static-1.4)))) + #:cargo-inputs (("rust-lazy-static" ,rust-lazy-static-1)))) (home-page "https://github.com/Amanieu/thread_local-rs") (synopsis "Per-object thread-local storage") (description "Per-object thread-local storage.") @@ -11685,7 +13356,7 @@ different for every thread.") "06rzik99p8c5js8238yhc8rk6np543ylb1dy9nrw5v80j0r3xdf6")))) (arguments `(#:skip-build? #t - #:cargo-inputs (("rust-lazy-static" ,rust-lazy-static-1.4)))))) + #:cargo-inputs (("rust-lazy-static" ,rust-lazy-static-1)))))) (define-public rust-threadpool-1.7 (package @@ -12082,7 +13753,7 @@ futures efficiently") #:cargo-inputs (("rust-crossbeam-queue" ,rust-crossbeam-queue-0.1) ("rust-futures" ,rust-futures-0.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-libc" ,rust-libc-0.2) ("rust-log" ,rust-log-0.4) ("rust-mio" ,rust-mio-0.6) @@ -12122,7 +13793,7 @@ futures.") #:cargo-inputs (("rust-crossbeam-utils" ,rust-crossbeam-utils-0.6) ("rust-futures" ,rust-futures-0.1) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-log" ,rust-log-0.4) ("rust-mio" ,rust-mio-0.6) ("rust-num-cpus" ,rust-num-cpus-1.10) @@ -12323,7 +13994,7 @@ pool.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3)))) + (("rust-lazy-static" ,rust-lazy-static-1)))) (home-page "https://tokio.rs") (synopsis "Core primitives for tokio-trace") (description "Core primitives for tokio-trace.") @@ -12463,7 +14134,6 @@ serializing Rust structures.") (home-page "https://github.com/reem/rust-traitobject") (synopsis "Unsafe helpers for dealing with raw trait objects") (description "Unsafe helpers for dealing with raw trait objects.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -12525,7 +14195,7 @@ serializing Rust structures.") `(#:skip-build? #t #:cargo-inputs (("rust-glob" ,rust-glob-0.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-serde" ,rust-serde-1.0) ("rust-serde-json" ,rust-serde-json-1.0) ("rust-termcolor" ,rust-termcolor-1.0) @@ -12589,11 +14259,13 @@ serializing Rust structures.") (base32 "1xm1gbvz9qisj1l6d36hrl9pw8imr8ngs6qyanjnsad3h0yfcfv5")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-unsafe-any" ,rust-unsafe-any-0.4)))) (home-page "https://github.com/reem/rust-typemap") (synopsis "Typesafe store for many value types") (description "A typesafe store for many value types.") - (properties '((hidden? . #t))) (license license:expat))) (define-public rust-typenum-1.10 @@ -12636,7 +14308,7 @@ implementation is incomplete.") (arguments `(#:skip-build? #t #:cargo-inputs - (("rust-lazy-static" ,rust-lazy-static-1.3) + (("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.1)))) (home-page "https://github.com/BurntSushi/ucd-generate") (synopsis "Parse data files in the Unicode character database") @@ -12721,11 +14393,12 @@ with the Unicode character database.") (base32 "1xmpmkakhhblq7dzab1kwyv925kv7fqjkjsxjspg6ix9n88makm8")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs (("rust-version-check" ,rust-version-check-0.1)))) (home-page "https://github.com/seanmonstar/unicase") (synopsis "Case-insensitive wrapper around strings") (description "A case-insensitive wrapper around strings.") - (properties '((hidden? . #t))) (license (list license:asl2.0 license:expat)))) @@ -12785,10 +14458,10 @@ including Canonical and Compatible Decomposition and Recomposition, as described in Unicode Standard Annex #15.") (license (list license:expat license:asl2.0)))) -(define-public rust-unicode-segmentation-1.3 +(define-public rust-unicode-segmentation-1.6 (package (name "rust-unicode-segmentation") - (version "1.3.0") + (version "1.6.0") (source (origin (method url-fetch) @@ -12797,11 +14470,10 @@ described in Unicode Standard Annex #15.") (string-append name "-" version ".tar.gz")) (sha256 (base32 - "1a9jqg7rb1yq6w2xc9jgxcs111yk5vxm9afjfvykfnrmzk6z8rqr")))) + "1h7d48mzpi8hwf5cvnq07warkv86pvapzzzf32hvbjsk20yiagp8")))) (build-system cargo-build-system) (arguments - `(#:skip-build? #t - #:cargo-development-inputs + `(#:cargo-development-inputs (("rust-quickcheck" ,rust-quickcheck-0.7)))) (home-page "https://github.com/unicode-rs/unicode-segmentation") (synopsis "Grapheme Cluster, Word and Sentence boundaries") @@ -12810,6 +14482,21 @@ described in Unicode Standard Annex #15.") boundaries according to Unicode Standard Annex #29 rules.") (license (list license:expat license:asl2.0)))) +(define-public rust-unicode-segmentation-1.3 + (package + (inherit rust-unicode-segmentation-1.6) + (name "rust-unicode-segmentation") + (version "1.3.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "unicode-segmentation" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1a9jqg7rb1yq6w2xc9jgxcs111yk5vxm9afjfvykfnrmzk6z8rqr")))))) + (define-public rust-unicode-width-0.1 (package (name "rust-unicode-width") @@ -12845,13 +14532,10 @@ boundaries according to Unicode Standard Annex #29 rules.") (base32 "0z09fn515xm7zyr0mmdyxa9mx2f7azcpv74pqmg611iralwpcvl2")))) (build-system cargo-build-system) - (home-page - "https://github.com/unicode-rs/unicode-xid") + (home-page "https://github.com/unicode-rs/unicode-xid") (synopsis "Determine Unicode XID related properties") (description "Determine whether characters have the XID_Start or XID_Continue properties according to Unicode Standard Annex #31.") - (properties '((hidden? . #t))) - ;; Dual licensed. (license (list license:asl2.0 license:expat)))) (define-public rust-unicode-xid-0.1 @@ -12868,6 +14552,21 @@ or XID_Continue properties according to Unicode Standard Annex #31.") (base32 "1z57lqh4s18rr4x0j4fw4fmp9hf9346h0kmdgqsqx0fhjr3k0wpw")))))) +(define-public rust-unicode-xid-0.0 + (package + (inherit rust-unicode-xid-0.2) + (name "rust-unicode-xid") + (version "0.0.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "unicode-xid" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1p5l9h3n3i53cp95fb65p8q3vbwib79ryd9z5z5h5kr9gl6qc7wc")))))) + (define-public rust-unindent-0.1 (package (name "rust-unindent") @@ -12922,11 +14621,13 @@ whitespace from a string.") (base32 "0zwwphsqkw5qaiqmjwngnfpv9ym85qcsyj7adip9qplzjzbn00zk")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-traitobject" ,rust-traitobject-0.1)))) (home-page "https://tokio.rs") (synopsis "Traits and implementations for unchecked downcasting") (description "Traits and implementations for unchecked downcasting.") - (properties '((hidden? . #t))) (license license:expat))) (define-public rust-untrusted-0.7 @@ -13011,6 +14712,28 @@ untrusted inputs in Rust.") ("rust-rustc-test" ,rust-rustc-test-0.3) ("rust-serde-json" ,rust-serde-json-1.0)))))) +(define-public rust-users-0.9 + (package + (name "rust-users") + (version "0.9.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "users" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1kxl3y2hcrqqip7jpqn5mz7xlpbwmmpfmaza0xnyrhx0mrkl4by7")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2)))) + (home-page "https://github.com/ogham/rust-users") + (synopsis "Library for getting information on Unix users and groups") + (description "This package provides a library for getting information on +Unix users and groups.") + (license license:expat))) + (define-public rust-utf-8-0.7 (package (name "rust-utf-8") @@ -13059,6 +14782,25 @@ untrusted inputs in Rust.") "Convert ranges of Unicode codepoints to UTF-8 byte ranges.") (license (list license:expat license:unlicense)))) +(define-public rust-utf8parse-0.1 + (package + (name "rust-utf8parse") + (version "0.1.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "utf8parse" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0zamsj2986shm4x9zncjf2m5qy9scaw7qnxw4f89b2afpg6a8wl7")))) + (build-system cargo-build-system) + (home-page "https://github.com/jwilm/vte") + (synopsis "Table-driven UTF-8 parser") + (description "This package provides a table-driven UTF-8 parser.") + (license (list license:asl2.0 license:expat)))) + (define-public rust-uuid-0.7 (package (name "rust-uuid") @@ -13266,10 +15008,16 @@ specified across Unix and Windows platforms.") (base32 "07ppalpvxkf8cnqr64np422792y4z5bs9m8b4nrflh5rm17wjn4n")))) (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-same-file" ,rust-same-file-1.0) + ("rust-winapi" ,rust-winapi-0.3) + ("rust-winapi-util" ,rust-winapi-util-0.1)) + #:cargo-development-inputs + (("rust-doc-comment" ,rust-doc-comment-0.3)))) (home-page "https://github.com/BurntSushi/walkdir") (synopsis "Recursively walk a directory") (description "Recursively walk a directory.") - (properties '((hidden? . #t))) (license (list license:unlicense license:expat)))) @@ -13339,7 +15087,7 @@ in Rust.") `(#:skip-build? #t #:cargo-inputs (("rust-bumpalo" ,rust-bumpalo-2.5) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-log" ,rust-log-0.4) ("rust-proc-macro2" ,rust-proc-macro2-0.4) ("rust-quote" ,rust-quote-1.0) @@ -13373,7 +15121,7 @@ in Rust.") ,rust-futures-channel-preview-0.3) ("rust-futures-util-preview" ,rust-futures-util-preview-0.3) ("rust-js-sys" ,rust-js-sys-0.3) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-wasm-bindgen" ,rust-wasm-bindgen-0.2)) #:cargo-development-inputs (("rust-wasm-bindgen-test" ,rust-wasm-bindgen-test-0.2)))) @@ -13776,6 +15524,78 @@ color in a Windows console.") "Contains function definitions for the Windows API library ws2_32.") (license license:expat))) +(define-public rust-x11-2 + (package + (name "rust-x11") + (version "2.18.1") + (source + (origin + (method url-fetch) + (uri (crate-uri "x11" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0dg2d0yrqmwg6prpxkw3vpmwzwxnaki2cn0v64ylh5gp4cqpws9r")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-libc" ,rust-libc-0.2) + ("rust-pkg-config" ,rust-pkg-config-0.3)))) + (home-page "https://github.com/erlepereira/x11-rs.git") + (synopsis "X11 library bindings for Rust") + (description "X11 library bindings for Rust.") + (license license:cc0))) + +(define-public rust-x11-clipboard-0.4 + (package + (name "rust-x11-clipboard") + (version "0.4.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "x11-clipboard" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0nqdnswiyj28b1izjp5rzbc67cxpb5c8p4vh1xyndkirzs84vqqk")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f ; Tests require display server. + #:cargo-inputs (("rust-xcb" ,rust-xcb-0.9)))) + (native-inputs + `(("python" ,python))) + (home-page "https://github.com/quininer/x11-clipboard") + (synopsis "x11 clipboard support for Rust") + (description "This package provides x11 clipboard support for Rust.") + (license license:expat))) + +(define-public rust-x11-dl-2 + (package + (name "rust-x11-dl") + (version "2.18.4") + (source + (origin + (method url-fetch) + (uri (crate-uri "x11-dl" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0n1w837xagxqgwx2880d7c9ks6l3g1kk00yd75afdaiv58sf2rdy")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-lazy-static" ,rust-lazy-static-1) + ("rust-libc" ,rust-libc-0.2) + ("rust-maybe-uninit" ,rust-maybe-uninit-2.0) + ("rust-pkg-config" ,rust-pkg-config-0.3)))) + (home-page "https://github.com/erlepereira/x11-rs.git") + (synopsis "X11 library bindings for Rust") + (description "This package provides X11 library bindings for Rust.") + (license license:cc0))) + (define-public rust-xattr-0.2 (package (name "rust-xattr") @@ -13803,6 +15623,40 @@ extended attributes.") (license (list license:asl2.0 license:expat)))) +(define-public rust-xcb-0.9 + (package + (name "rust-xcb") + (version "0.9.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "xcb" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "19i2pm8alpn2f0m4jg8bsw6ckw8irj1wjh55h9pi2fcb2diny1b2")))) + (build-system cargo-build-system) + (arguments + `(#:tests? #f ; Building all the features tests the code. + #:cargo-build-flags '("--features" "debug_all") + #:cargo-inputs + (("rust-libc" ,rust-libc-0.2) + ("rust-log" ,rust-log-0.4) + ("rust-x11" ,rust-x11-2)))) + (inputs + `(("libx11" ,libx11) + ("libxcb" ,libxcb) + ("xcb-proto" ,xcb-proto))) + (native-inputs + `(("pkg-config" ,pkg-config) + ("python" ,python))) + (home-page "https://github.com/rtbo/rust-xcb") + (synopsis "Rust bindings and wrappers for XCB") + (description + "This package provides Rust bindings and wrappers for XCB.") + (license license:expat))) + (define-public rust-xdg-2.2 (package (name "rust-xdg") @@ -13825,6 +15679,26 @@ to XDG Base Directory specification") (license (list license:asl2.0 license:expat)))) +(define-public rust-xml-rs-0.8 + (package + (name "rust-xml-rs") + (version "0.8.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "xml-rs" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1db4v716rbpgjiasaim2s17rmvsfcq1qzwg6nji6mdf5k34i46sl")))) + (build-system cargo-build-system) + (arguments `(#:skip-build? #t)) + (home-page "https://github.com/netvl/xml-rs") + (synopsis "XML library in pure Rust") + (description "An XML library in pure Rust.") + (license license:expat))) + (define-public rust-yaml-rust-0.4 (package (name "rust-yaml-rust") @@ -13850,3 +15724,45 @@ to XDG Base Directory specification") (description "The missing YAML 1.2 parser for rust.") (license (list license:asl2.0 license:expat)))) + +(define-public rust-yaml-rust-0.3 + (package + (inherit rust-yaml-rust-0.4) + (name "rust-yaml-rust") + (version "0.3.5") + (source + (origin + (method url-fetch) + (uri (crate-uri "yaml-rust" version)) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "14m9dzwb8fb05f4jjb4nqp49rxd9c5vcmwpv3a04d2y5iphncqz6")))) + (arguments + `(#:cargo-inputs + (("rust-clippy" ,rust-clippy-0.0) + ("rust-linked-hash-map" ,rust-linked-hash-map-0.3)))))) + +(define-public rust-zoneinfo-compiled-0.4 + (package + (name "rust-zoneinfo-compiled") + (version "0.4.8") + (source + (origin + (method url-fetch) + (uri (crate-uri "zoneinfo_compiled" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0bnm19w791q6kp79s0zl1cj9w51bw5xrifrxfy3g1p05i676y4vf")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-byteorder" ,rust-byteorder-1.3) + ("rust-datetime" ,rust-datetime-0.4)))) + (home-page "https://github.com/rust-datetime/zoneinfo-compiled/") + (synopsis "Library for parsing compiled zoneinfo files") + (description + "This package provides a library for parsing compiled zoneinfo files.") + (license license:expat))) diff --git a/gnu/packages/crypto.scm b/gnu/packages/crypto.scm index 852a262a7c..f2d0e9377d 100644 --- a/gnu/packages/crypto.scm +++ b/gnu/packages/crypto.scm @@ -133,7 +133,7 @@ communication, encryption, decryption, signatures, etc.") (define-public signify (package (name "signify") - (version "27") + (version "28") (home-page "https://github.com/aperezdc/signify") (source (origin (method url-fetch) @@ -141,13 +141,12 @@ communication, encryption, decryption, signatures, etc.") "/download/v" version "/signify-" version ".tar.xz")) (sha256 (base32 - "0ngjsqz95yb0knlw9zs02fnclif40s63r1mydgiv17ii3mds82df")))) + "05v970glhpaxv0m4cnidfxsdnsjp12nf2crzrdq4ml7g5a3g6hdq")))) (build-system gnu-build-system) ;; TODO Build with libwaive (described in README.md), to implement something ;; like OpenBSD's pledge(). (arguments - `(#:tests? #f ; no test suite - #:make-flags + `(#:make-flags (list "CC=gcc" (string-append "PREFIX=" (assoc-ref %outputs "out"))) #:phases diff --git a/gnu/packages/cups.scm b/gnu/packages/cups.scm index d8c1d11944..b7213f73b3 100644 --- a/gnu/packages/cups.scm +++ b/gnu/packages/cups.scm @@ -673,14 +673,14 @@ printer/driver specific, but spooler-independent PPD file.") (define-public foo2zjs (package (name "foo2zjs") - (version "20190909") + (version "20200207") (source (origin (method url-fetch) ;; XXX: This is an unversioned URL! (uri "http://foo2zjs.rkkda.com/foo2zjs.tar.gz") (sha256 (base32 - "1nn84c045mbv6yzpjfggc6152bvgrmcxiyvgz9v2w3sws7ihshrm")))) + "0pf1sm29gnrhhpyvq95jskvr874h5r4kls9w10gc24z23fjmr5zx")))) (build-system gnu-build-system) (arguments '(#:phases (modify-phases %standard-phases diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm index 8ba37eeafa..9f72060385 100644 --- a/gnu/packages/databases.scm +++ b/gnu/packages/databases.scm @@ -1133,7 +1133,7 @@ including field and record folding."))) (define-public rocksdb (package (name "rocksdb") - (version "6.5.2") + (version "6.6.4") (source (origin (method git-fetch) (uri (git-reference @@ -1142,7 +1142,7 @@ including field and record folding."))) (file-name (git-file-name name version)) (sha256 (base32 - "01f5lcrcr809jhkkvxhv743hwpcxszj4r30hy9qy1i0mvjky02vf")) + "1h7y31b05w4vv4v509l368j9qlbv5assmdq9hp2788zipqbpywc0")) (modules '((guix build utils))) (snippet '(begin diff --git a/gnu/packages/dictionaries.scm b/gnu/packages/dictionaries.scm index af6cef71d3..cd0a5db93c 100644 --- a/gnu/packages/dictionaries.scm +++ b/gnu/packages/dictionaries.scm @@ -219,15 +219,14 @@ It comes with a German-English dictionary with approximately 270,000 entries.") (define-public grammalecte (package (name "grammalecte") - (version "1.6.0") + (version "1.7.0") (source (origin (method url-fetch/zipbomb) (uri (string-append "https://grammalecte.net/grammalecte/zip/" "Grammalecte-fr-v" version ".zip")) (sha256 - (base32 - "0kz13gx2hd23xd6bfr4z73lh18slj3vbvs2xcb7qvhramxjqzqcn")))) + (base32 "0wb126mqnq9ns6gzmhzljc6iqywdkpzvr8xny5s3khd10ki4lxl3")))) (build-system python-build-system) (home-page "https://grammalecte.net") (synopsis "French spelling and grammar checker") diff --git a/gnu/packages/diffoscope.scm b/gnu/packages/diffoscope.scm index 998a71aeab..3b3540b5b0 100644 --- a/gnu/packages/diffoscope.scm +++ b/gnu/packages/diffoscope.scm @@ -44,6 +44,7 @@ #:use-module (gnu packages java) #:use-module (gnu packages linux) #:use-module (gnu packages llvm) + #:use-module (gnu packages man) #:use-module (gnu packages mono) #:use-module (gnu packages ocaml) #:use-module (gnu packages package-management) @@ -217,9 +218,80 @@ "Diffoscope tries to get to the bottom of what makes files or directories different. It recursively unpacks archives of many kinds and transforms various binary formats into more human readable forms to compare them. It can -compare two tarballs, ISO images, or PDFs just as easily.") +compare two tarballs, ISO images, or PDFs just as easily. + +Diffoscope has many optional dependencies; @code{diffoscope +--list-missing-tools guix} will display optional packages to +install.") (license license:gpl3+)))) +(define-public reprotest + (package + (name "reprotest") + (version "0.7.13") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://salsa.debian.org/reproducible-builds/reprotest.git") + (commit version))) + (file-name (git-file-name name version)) + (patches (search-patches "reprotest-support-guix.patch")) + (sha256 + (base32 + "0jj9sqxbdpypnc0y8md352wwzh1by6nyhmx5fwqnvrbznrng332f")))) + (inputs + `(("python-debian" ,python-debian) + ("python-distro" ,python-distro) + ("python-libarchive-c", python-libarchive-c) + ("python-rstr" ,python-rstr))) + (native-inputs + `(("diffoscope" ,diffoscope) + ("help2man" ,help2man) + ("libfaketime" ,libfaketime) + ("python-coverage" ,python-coverage) + ("python-docutils" ,python-docutils) + ("python-pytest " ,python-pytest) + ("python-tlsh" ,python-tlsh) + ("python-tox" ,python-tox) + ("unzip" ,unzip) + ("xxd" ,xxd))) + (build-system python-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + ;; Neither glibc-locales nor glibc-utf8-locales have the C.UTF-8 + ;; locale or several other locales used in reprotest. + (add-after 'unpack 'adjust-locales + (lambda _ + (substitute* "reprotest/build.py" + (("'C.UTF-8'") "'en_US.UTF-8'") + (("'ru_RU.CP1251'") "'ru_RU.KOI8-R'") + (("'kk_KZ.RK1048'") "'kk_KZ'")) + (substitute* "reprotest/lib/adt_testbed.py" + (("export LANG=C.UTF-8") "export LANG=en_US.UTF-8")) + #t)) + (add-after 'install 'install-doc + (lambda* (#:key outputs #:allow-other-keys) + (let* ((mandir1 (string-append + (assoc-ref outputs "out") "/share/man/man1")) + (docdir (string-append + (assoc-ref outputs "out") "/share/doc/" ,name "-" ,version))) + (invoke "make" "-C" "doc") + (mkdir-p mandir1) + (install-file "doc/reprotest.1" mandir1) + (mkdir-p docdir) + (install-file "./README.rst" docdir) + (install-file "./README-dev.rst" docdir)) + #t))))) + (home-page "https://salsa.debian.org/reproducible-builds/reprotest") + (synopsis "Build software and check it for reproducibility") + (description "Reprotest builds the same source code twice in different +environments, and then checks the binaries produced by each build for +differences. If any are found, then diffoscope or diff is used to display +them in detail for later analysis.") + (license (list license:gpl3+ license:gpl2+)))) + (define-public trydiffoscope (package (name "trydiffoscope") diff --git a/gnu/packages/djvu.scm b/gnu/packages/djvu.scm index 10cdbf31a8..1fb5b5267e 100644 --- a/gnu/packages/djvu.scm +++ b/gnu/packages/djvu.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org> +;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -18,9 +19,15 @@ (define-module (gnu packages djvu) #:use-module ((guix licenses) #:prefix license:) + #:use-module (guix utils) #:use-module (guix packages) #:use-module (guix download) - #:use-module (guix build-system gnu)) + #:use-module (guix build-system gnu) + #:use-module (gnu packages glib) + #:use-module (gnu packages image) + #:use-module (gnu packages pkg-config) + #:use-module (gnu packages qt) + #:use-module (gnu packages xorg)) (define-public djvulibre (package @@ -48,3 +55,48 @@ including viewers, browser plugins, decoders, simple encoders, and utilities.") (license license:gpl2+))) + +(define-public djview + (package + (name "djview") + (version "4.10.6") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://sourceforge/djvu/DjView/" + (version-major+minor version) "/" + "djview-" version ".tar.gz")) + (sha256 + (base32 "08bwv8ppdzhryfcnifgzgdilb12jcnivl4ig6hd44f12d76z6il4")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config) + ("qttools" ,qttools))) + (inputs + `(("djvulibre" ,djvulibre) + ("glib" ,glib) + ("libxt" ,libxt) + ("libtiff" ,libtiff) + ("qtbase" ,qtbase))) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-desktop-file + ;; Executable is "djview", not "djview4". + (lambda _ + (substitute* "desktopfiles/djvulibre-djview4.desktop" + (("Exec=djview4 %f") "Exec=djview %f")) + #t))))) + (home-page "http://djvu.sourceforge.net/djview4.html") + (synopsis "Viewer for the DjVu image format") + (description "DjView is a standalone viewer for DjVu files. + +Its features include navigating documents, zooming and panning page images, +producing and displaying thumbnails, displaying document outlines, searching +documents for particular words in the hidden text layer, copying hidden text +to the clipboard, saving pages and documents as bundled or indirect multi-page +files, and printing page and documents. + +The viewer can simultaneously display several pages using a side-by-side or +a continuous layout.") + (license license:gpl2+))) diff --git a/gnu/packages/dns.scm b/gnu/packages/dns.scm index 7c52722cb6..3a42a98bc4 100644 --- a/gnu/packages/dns.scm +++ b/gnu/packages/dns.scm @@ -407,7 +407,6 @@ to result in system-wide compromise.") `(("expat" ,expat) ("libevent" ,libevent) ("protobuf" ,protobuf) - ("python" ,python-3) ("python-wrapper" ,python-wrapper) ("openssl" ,openssl))) (arguments diff --git a/gnu/packages/docker.scm b/gnu/packages/docker.scm index 948cc30cf6..1f832a25e5 100644 --- a/gnu/packages/docker.scm +++ b/gnu/packages/docker.scm @@ -46,7 +46,7 @@ #:use-module (gnu packages version-control) #:use-module (gnu packages virtualization)) -(define %docker-version "18.09.5") +(define %docker-version "19.03.5") (define-public python-docker-py (package @@ -313,12 +313,9 @@ built-in registry server of Docker.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "0cirpd9l2qazp2jyanwzvrkx2m98nksjdvn43ff38p89w6133ipb")) + (base32 "1dlknwn0fh82nbzdzxdk6pfhqwph9vcw3vs3111wfr19y5hwncq9")) (patches - (search-patches "docker-engine-test-noinstall.patch" - "docker-fix-tests.patch" - "docker-use-fewer-modprobes.patch" - "docker-adjust-tests-for-changes-in-go.patch")))) + (search-patches "docker-fix-tests.patch")))) (build-system gnu-build-system) (arguments `(#:modules @@ -419,6 +416,7 @@ built-in registry server of Docker.") "/" relative-path "\"")) ...))))) (substitute-LookPath* + ("containerd" "containerd" "bin/containerd") ("ps" "procps" "bin/ps") ("mkfs.xfs" "xfsprogs" "bin/mkfs.xfs") ("lvmdiskscan" "lvm2" "sbin/lvmdiskscan") @@ -492,6 +490,14 @@ built-in registry server of Docker.") (delete-file "daemon/graphdriver/btrfs/btrfs_test.go") (delete-file "daemon/graphdriver/overlay/overlay_test.go") (delete-file "daemon/graphdriver/overlay2/overlay_test.go") + (delete-file "pkg/chrootarchive/archive_unix_test.go") + (delete-file "daemon/container_unix_test.go") + ;; This file uses cgroups and /proc. + (delete-file "pkg/sysinfo/sysinfo_linux_test.go") + ;; This file uses cgroups. + (delete-file "runconfig/config_test.go") + ;; This file uses /var. + (delete-file "daemon/oci_linux_test.go") #t)) (replace 'configure (lambda _ @@ -558,6 +564,7 @@ built-in registry server of Docker.") (native-inputs `(("eudev" ,eudev) ; TODO: Should be propagated by lvm2 (.pc -> .pc) ("go" ,go) + ("gotestsum" ,gotestsum) ("pkg-config" ,pkg-config))) (synopsis "Docker container component library, and daemon") (description "This package provides a framework to assemble specialized @@ -579,7 +586,7 @@ provisioning etc.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "0mxxjzkwdny8p2dmyjich7x1gn7hdlfppzjy2skk2k5bwv7nxpmi")))) + (base32 "07ldz46y74b3la4ah65v5bzbfx09yy6kncvxrr0zfx0s1214ar3m")))) (build-system go-build-system) (arguments `(#:import-path "github.com/docker/cli" diff --git a/gnu/packages/dunst.scm b/gnu/packages/dunst.scm index 75f2b80e5f..5b20d6d013 100644 --- a/gnu/packages/dunst.scm +++ b/gnu/packages/dunst.scm @@ -2,6 +2,7 @@ ;;; Copyright © 2015, 2017, 2018 Alex Kost <alezost@gmail.com> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -26,6 +27,7 @@ #:use-module (gnu packages base) #:use-module (gnu packages freedesktop) #:use-module (gnu packages glib) + #:use-module (gnu packages gnome) #:use-module (gnu packages gtk) #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) @@ -52,9 +54,16 @@ ;; Otherwise it tries to install service file ;; to "dbus" store directory. (string-append "SERVICEDIR_DBUS=" %output - "/share/dbus-1/services")) + "/share/dbus-1/services") + "dunstify") #:phases (modify-phases %standard-phases - (delete 'configure)))) + (delete 'configure) + (add-after 'install 'install-dunstify + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (install-file "dunstify" + (string-append out "/bin"))) + #t))))) (native-inputs `(("pkg-config" ,pkg-config) ("perl" ,perl) ; for pod2man @@ -65,6 +74,7 @@ ("glib" ,glib) ("cairo" ,cairo) ("pango" ,pango) + ("libnotify" ,libnotify) ; for dunstify ("libx11" ,libx11) ("libxscrnsaver" ,libxscrnsaver) ("libxinerama" ,libxinerama) diff --git a/gnu/packages/education.scm b/gnu/packages/education.scm index b0297e9075..3ae1ec2192 100644 --- a/gnu/packages/education.scm +++ b/gnu/packages/education.scm @@ -5,6 +5,7 @@ ;;; Copyright © 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018, 2019, 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr> +;;; Copyright © 2020 Robert Smith <robertsmith@posteo.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -24,6 +25,7 @@ (define-module (gnu packages education) #:use-module (ice-9 regex) #:use-module (gnu packages) + #:use-module (gnu packages audio) #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages compression) @@ -40,14 +42,18 @@ #:use-module (gnu packages javascript) #:use-module (gnu packages kde) #:use-module (gnu packages kde-frameworks) ; extra-cmake-modules + #:use-module (gnu packages mp3) #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) #:use-module (gnu packages python) + #:use-module (gnu packages python-web) + #:use-module (gnu packages python-xyz) #:use-module (gnu packages qt) #:use-module (gnu packages sdl) #:use-module (gnu packages sqlite) #:use-module (gnu packages texinfo) #:use-module (gnu packages tls) + #:use-module (gnu packages video) #:use-module (gnu packages xorg) #:use-module (gnu packages xml) #:use-module ((guix licenses) #:prefix license:) @@ -126,7 +132,7 @@ of categories with some of the activities available in that category. (define-public gcompris-qt (package (name "gcompris-qt") - (version "0.96") + (version "0.97") (source (origin (method url-fetch) @@ -134,11 +140,16 @@ of categories with some of the activities available in that category. "https://gcompris.net/download/qt/src/gcompris-qt-" version ".tar.xz")) (sha256 - (base32 "06483il59l46ny2w771sg45dgzjwv1ph7vidzzbj0wb8wbk2rg52")))) + (base32 "0hl3a1jjnrpnbqkpx3rl3fl86yfv503lh48djb888hplvr4nf747")))) (build-system cmake-build-system) (arguments `(#:phases (modify-phases %standard-phases + (add-after 'unpack 'disable-failing-test + (lambda _ + (substitute* "tests/core/CMakeLists.txt" + (("DownloadManagerTest\\.cpp") "#")) + #t)) (add-before 'check 'start-xorg-server (lambda* (#:key inputs #:allow-other-keys) ;; The test suite requires a running X server. @@ -167,6 +178,7 @@ of categories with some of the activities available in that category. (native-inputs `(("extra-cmake-modules" ,extra-cmake-modules) ("gettext" ,gettext-minimal) + ("kdoctools" ,kdoctools) ("perl" ,perl) ("qttools" ,qttools) ("xorg-server" ,xorg-server-for-tests))) @@ -715,6 +727,103 @@ languages and keyboard layouts, and typing statistics are used to dynamically adjust the level of difficulty.") (license license:gpl2))) +(define-public anki + (package + (name "anki") + ;; Later versions have dependencies on npm packages not yet in Guix. + (version "2.1.16") + (source + (origin + (method url-fetch) + (uri (string-append "https://apps.ankiweb.net/downloads/archive/anki-" + version "-source.tgz")) + (sha256 + (base32 "1gfr51rnllkyzli73p4r51h5ypzfa3m7lic3m3rzpywmqwrxs07k")))) + (build-system gnu-build-system) + (arguments + `(#:make-flags (list (string-append "PREFIX=" %output)) + #:tests? #f ;no check target + #:modules ((guix build gnu-build-system) + (guix build utils) + (ice-9 match)) + #:phases + (modify-phases %standard-phases + (delete 'configure) ;no configure script + (add-after 'install 'wrap + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((bin (string-append (assoc-ref outputs "out") "/bin")) + ;; List of paths to the site-packages directories of Python + ;; library inputs. + (site-packages + (map (lambda (pyinput) + (string-append + (cdr pyinput) + "/lib/python" + ;; Calculate the python version to avoid breaking + ;; with future 3.X releases. + ,(version-major+minor + (package-version python-wrapper)) + "/site-packages")) + (filter (match-lambda + ((label . _) + (string-prefix? "python-" label))) + inputs))) + (qtwebengineprocess + (string-append (assoc-ref inputs "qtwebengine") + "/lib/qt5/libexec/QtWebEngineProcess"))) + ;; The program fails to find the QtWebEngineProcess program, so + ;; we set QTWEBENGINEPROCESS_PATH to help it. PYTHONPATH is + ;; wrapped to avoid declaring Python libraries as propagated + ;; inputs. + (for-each (lambda (program) + (wrap-program program + `("QTWEBENGINEPROCESS_PATH" = + (,qtwebengineprocess)) + `("PYTHONPATH" = ,site-packages))) + (find-files bin "."))) + #t))))) + (native-inputs + `(("xdg-utils" ,xdg-utils))) + (inputs + `(("lame" ,lame) + ("mpv" ,mpv) + ("python" ,python-wrapper) + ("python-beautifulsoup4" ,python-beautifulsoup4) + ("python-decorator" ,python-decorator) + ("python-distro" ,python-distro) + ("python-jsonschema" ,python-jsonschema) + ("python-markdown" ,python-markdown) + ("python-pyaudio" ,python-pyaudio) + ;; `python-pyqtwebengine' must precede `python-pyqt' in PYTHONPATH. + ("python-pyqtwebengine" ,python-pyqtwebengine) + ("python-pyqt" ,python-pyqt) + ("python-requests" ,python-requests) + ("python-send2trash" ,python-send2trash) + ("python-sip" ,python-sip) + ;; `qtwebengine' is included in `pyqtwebengine', included here for easy + ;; wrapping. + ("qtwebengine" ,qtwebengine))) + (home-page "https://apps.ankiweb.net/") + (synopsis "Powerful, intelligent flash cards") + (description "Anki is a program which makes remembering things +easy. Because it's a lot more efficient than traditional study +methods, you can either greatly decrease your time spent studying, or +greatly increase the amount you learn. + +Anyone who needs to remember things in their daily life can benefit +from Anki. Since it is content-agnostic and supports images, audio, +videos and scientific markup (via LaTeX), the possibilities are +endless. For example: +@itemize +@item Learning a language +@item Studying for medical and law exams +@item Memorizing people's names and faces +@item Brushing up on geography +@item Mastering long poems +@item Even practicing guitar chords! +@end itemize") + (license license:agpl3+))) + (define-public t4k-common (package (name "t4k-common") diff --git a/gnu/packages/elf.scm b/gnu/packages/elf.scm index 75caa54296..5fa66210db 100644 --- a/gnu/packages/elf.scm +++ b/gnu/packages/elf.scm @@ -6,6 +6,7 @@ ;;; Copyright © 2017 Leo Famulari <leo@famulari.name> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com> +;;; Copyright © 2020 Mark Wielaard <mark@klomp.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -54,9 +55,10 @@ (build-system gnu-build-system) ;; Separate programs because that's usually not what elfutils users want, - ;; and because they duplicate what Binutils provides. + ;; and because they duplicate what Binutils provides (but are named + ;; differently, using the eu- prefix and can be installed in parallel). (outputs '("out" ; libelf.so, elfutils/*.h, etc. - "bin")) ; ld, nm, objdump, etc. + "bin")) ; eu-nm, eu-objdump, etc. (arguments ;; Programs don't have libelf.so in their RUNPATH and libraries don't @@ -84,11 +86,21 @@ (native-inputs `(("m4" ,m4))) (inputs `(("zlib" ,zlib))) (home-page "https://sourceware.org/elfutils/") - (synopsis "Linker and ELF manipulation tools") + (synopsis "Collection of utilities and libraries to handle ELF files and +DWARF data") (description - "This package provides command-line tools to manipulate binaries in the -Executable and Linkable Format (@dfn{ELF}). This includes @command{ld}, -@command{ar}, @command{objdump}, @command{addr2line}, and more.") + "Elfutils is a collection of utilities and libraries to read, create and +modify Executable and Linkable Format (@dfn{ELF}) binary files, find and +handle Debugging With Arbitrary Record Formats (@dfn{DWARF}) debug data, +symbols, thread state and stacktraces for processes and core files on +GNU/Linux. Elfutils includes @file{libelf} for manipulating ELF files, +@file{libdw} for inspecting DWARF data and process state and utilities like +@command{eu-stack} (to show backtraces), @command{eu-nm} (for listing symbols +from object files), @command{eu-size} (for listing the section sizes of an +object or archive file), @command{eu-strip} (for discarding symbols), +@command{eu-readelf} (to see the raw ELF file structures), +@command{eu-elflint} (to check for well-formed ELF files), +@command{eu-elfcompress} (to compress or decompress ELF sections), and more.") ;; Libraries are dual-licensed LGPLv3.0+ | GPLv2, and programs are GPLv3+. (license lgpl3+))) diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index e3100cc62f..50cb6b4632 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -18,7 +18,7 @@ ;;; Copyright © 2016, 2017, 2018 Alex Vong <alexvong1995@gmail.com> ;;; Copyright © 2016, 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2017 Christopher Baines <mail@cbaines.net> -;;; Copyright © 2017, 2018, 2019 Mathieu Othacehe <m.othacehe@gmail.com> +;;; Copyright © 2017, 2018, 2019, 2020 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2017, 2018, 2019 Clément Lassieur <clement@lassieur.org> ;;; Copyright © 2017 Vasile Dumitrascu <va511e@yahoo.com> ;;; Copyright © 2017, 2018 Kyle Meyer <kyle@kyleam.com> @@ -163,14 +163,16 @@ (define-public emacs-geiser (package (name "emacs-geiser") - (version "0.10") + (version "0.11") (source (origin - (method url-fetch) - (uri (string-append "mirror://savannah/geiser/" version - "/geiser-" version ".tar.gz")) + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/jaor/geiser/") + (commit version))) + (file-name (git-file-name name version)) (sha256 (base32 - "0pj3l7p8d60c9b4vfprnv6g5l61d74pls4b5dvd84cn4ky9mzwjv")))) + "0fb2h984hn7bnyiziplp7kgk29zdzc9yainsv0k1li436irlp9dd")))) (build-system gnu-build-system) (arguments '(#:phases @@ -183,7 +185,11 @@ "geiser-autoloads.el")) #t))))) (inputs `(("guile" ,guile-2.2))) - (native-inputs `(("emacs" ,emacs-minimal))) + (native-inputs + `(("emacs" ,emacs-minimal) + ("autoconf" ,autoconf) + ("automake" ,automake) + ("texinfo" ,texinfo))) (home-page "https://nongnu.org/geiser/") (synopsis "Collection of Emacs modes for Guile and Racket hacking") (description @@ -1982,6 +1988,27 @@ filters, new key bindings and faces. It can be enabled by @code{tablist-mode} or @code{tablist-minor-mode} commands.") (license license:gpl3+))) +(define-public emacs-djvu + (package + (name "emacs-djvu") + (version "1.1") + (source + (origin + (method url-fetch) + (uri (string-append "https://elpa.gnu.org/packages/" + "djvu-" version ".el")) + (sha256 + (base32 "0njgyx09q225hliacsnjk8wallg5i6xkz6bj501pb05nwqfbvfk7")))) + (build-system emacs-build-system) + (home-page "http://elpa.gnu.org/packages/djvu.html") + (synopsis "Edit and view Djvu files via djvused") + (description + "This package is a front end for the command-line program djvused from +DjVuLibre, see @url{http://djvu.sourceforge.net/}. It assumes you have the +programs @command{djvused}, @command{djview}, @command{ddjvu}, and +@command{djvm} installed.") + (license license:gpl3+))) + (define-public emacs-pdf-tools (package (name "emacs-pdf-tools") @@ -7353,8 +7380,8 @@ sly-quickload command that prompts the user for a package to install. ") (license license:gpl3+)))) (define-public emacs-sly-asdf - (let ((commit "4e323bc28da2f07fd799b6a31b94fd93848b5f3c") - (revision "2")) + (let ((commit "ad248056ded3099b0528b6111ba335e835d9e5a7") + (revision "3")) (package (name "emacs-sly-asdf") (version (git-version "0.1.0" revision commit)) @@ -7368,10 +7395,11 @@ sly-quickload command that prompts the user for a package to install. ") (file-name (git-file-name name version)) (sha256 (base32 - "16sc33jhc6ik4ilsyqc3cjpi6v0wdmwjlwrzjwd6yym11bscsmad")))) + "0lip0spmglny3y612pxn3rfnpdaj12c9f7ya7bprryg2gvcdippa")))) (build-system emacs-build-system) (propagated-inputs - `(("emacs-sly" ,emacs-sly))) + `(("emacs-sly" ,emacs-sly) + ("emacs-popup" ,emacs-popup))) (arguments '(#:include (cons* "\\.lisp$" "\\.asd$" %default-include))) (synopsis "ASDF contrib for SLY") @@ -8050,13 +8078,13 @@ passive voice.") (name "emacs-org") ;; emacs-org-contrib inherits from this package. Please update it as ;; well. - (version "9.3.2") + (version "9.3.3") (source (origin (method url-fetch) (uri (string-append "https://elpa.gnu.org/packages/org-" version ".tar")) (sha256 - (base32 "1275s3hzyka2wwxl6nc2sndnwyl7kbc1nnl0hrznxb3wpy2abfd6")))) + (base32 "0yafckcx5ka2rpmv24x7ns6f3s1h216x2lbgaxsf1dmklbjcfvwv")))) (build-system emacs-build-system) (home-page "https://orgmode.org/") (synopsis "Outline-based notes management and organizer") @@ -8070,14 +8098,14 @@ programming and reproducible research.") (package (inherit emacs-org) (name "emacs-org-contrib") - (version "20200126") + (version "20200206") (source (origin (method url-fetch) (uri (string-append "https://orgmode.org/elpa/" "org-plus-contrib-" version ".tar")) (sha256 - (base32 "08yik0i8ya2x5j4vsnwxdcdlcxbiq58lvy30vcbdbf0hqrd40kjv")))) + (base32 "1fdxh8zgjnb500wkcl0bc0fdzbsln6p044b4s4nz85wkfw0jkfs5")))) (arguments `(#:modules ((guix build emacs-build-system) (guix build utils) @@ -8094,11 +8122,11 @@ programming and reproducible research.") (map basename (find-files out))) (org+contrib-files (map basename (find-files org))) - (duplicates (lset-intersection - string=? contrib-files org+contrib-files))) + (duplicates (lset-intersection string=? + contrib-files + org+contrib-files))) (with-directory-excursion - (string-append - out "/share/emacs/site-lisp") + (string-append out "/share/emacs/site-lisp") (for-each delete-file duplicates)) #t)))))) (propagated-inputs @@ -8574,35 +8602,35 @@ been adapted to work with mu4e.") (define-public emacs-yasnippet (package (name "emacs-yasnippet") - (version "0.13.0") - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/joaotavora/yasnippet.git") - (commit version))) - (file-name (string-append name "-" version ".tar.gz")) - (sha256 - (base32 - "0fkkplycrw8f8r30hjjxl1wm7p2irq2ipzzc1g7cc52abaal796p")) - (modules '((guix build utils))) - (snippet - '(begin - ;; YASnippet expects a "snippets" subdirectory in the same - ;; directory as yasnippet.el, but we don't install it - ;; because it's a git submodule pointing to an external - ;; repository. Adjust `yas-snippet-dirs' to prevent - ;; warnings about a missing directory. - (substitute* "yasnippet.el" - (("^ +'yas-installed-snippets-dir\\)\\)\n") - "))\n")) - #t)))) + (version "0.14.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/joaotavora/yasnippet.git") + (commit version))) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 "0via9dzw8m5lzymg1h78xkwjssh39zr3g6ccyamlf1rjzjsyxknv")) + (modules '((guix build utils))) + (snippet + '(begin + ;; YASnippet expects a "snippets" subdirectory in the same + ;; directory as yasnippet.el, but we don't install it because it's + ;; a git submodule pointing to an external repository. Adjust + ;; `yas-snippet-dirs' to prevent warnings about a missing + ;; directory. + (substitute* "yasnippet.el" + (("^ +'yas-installed-snippets-dir\\)\\)\n") + "))\n")) + #t)))) (build-system emacs-build-system) (arguments `(#:tests? #t #:test-command '("emacs" "--batch" "-l" "yasnippet-tests.el" "-f" "ert-run-tests-batch-and-exit") - ;; FIXME: one failing test + ;; FIXME: one failing test. #:phases (modify-phases %standard-phases (add-before 'check 'make-tests-writable @@ -8612,11 +8640,10 @@ been adapted to work with mu4e.") (add-before 'check 'delete-rebinding-test (lambda _ (emacs-batch-edit-file "yasnippet-tests.el" - `(progn (progn (goto-char (point-min)) - (re-search-forward - "ert-deftest test-rebindings") - (beginning-of-line) - (kill-sexp)) + `(progn (goto-char (point-min)) + (re-search-forward "ert-deftest test-rebindings") + (beginning-of-line) + (kill-sexp) (basic-save-buffer))) #t))))) (home-page "https://github.com/joaotavora/yasnippet") @@ -8627,50 +8654,40 @@ abbreviation and automatically expand it into function templates.") (license license:gpl3+))) (define-public emacs-yasnippet-snippets - (let ((commit "885050d34737e2fb36a3e7759d60c09347bd4ce0") - (revision "1")) - (package - (name "emacs-yasnippet-snippets") - (version (string-append "1-" revision "." (string-take commit 8))) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/AndreaCrotti/yasnippet-snippets") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "1m935zgglw0iakzrixld5rcjz3wnj84f8wy2mvc3pggjri9l0qr9")))) - (build-system trivial-build-system) - (arguments - `(#:modules ((ice-9 ftw) - (ice-9 regex) - (guix build utils)) - #:builder - (begin - (use-modules (ice-9 ftw) - (ice-9 regex) - (guix build utils)) - (with-directory-excursion (assoc-ref %build-inputs "source") - (for-each (lambda (dir) - (copy-recursively - dir - (string-append %output - "/share/emacs/yasnippet-snippets/" - dir))) - (scandir "." (lambda (fname) - (and (string-match "-mode$" fname) - (directory-exists? fname)))))) - #t))) - (home-page "https://github.com/AndreaCrotti/yasnippet-snippets") - (synopsis "Collection of YASnippet snippets for many languages") - (description - "Provides Andrea Crotti's collection of YASnippet snippets. After installation, + (package + (name "emacs-yasnippet-snippets") + (version "0.20") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/AndreaCrotti/yasnippet-snippets") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "095w7cdmfwmmr6426mbq15n0a5izgbmv9408m9yh1pqz5x3v3vsx")))) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((source (assoc-ref %build-inputs "source")) + (out (assoc-ref %outputs "out")) + (snippet-dir + (string-append out "/share/emacs/yasnippet-snippets/"))) + (with-directory-excursion source + (mkdir-p snippet-dir) + (copy-recursively "snippets" snippet-dir))) + #t))) + (home-page "https://github.com/AndreaCrotti/yasnippet-snippets") + (synopsis "Collection of YASnippet snippets for many languages") + (description + "Provides Andrea Crotti's collection of YASnippet snippets. After installation, the snippets will be in \"~/.guix-profile/share/emacs/yasnippet-snippets/\". To make YASnippet aware of these snippets, add the above directory to @code{yas-snippet-dirs}.") - (license license:expat)))) + (license license:gpl3+))) (define-public emacs-helm-c-yasnippet (let ((commit "65ca732b510bfc31636708aebcfe4d2d845b59b0") @@ -12604,8 +12621,8 @@ automatically fetched from well-curated sources, and formatted as BibTeX.") (license license:gpl3+))) (define-public emacs-helm-bibtex - (let ((commit "8ed898fb5a68f18e9bb9973832a5c1f8abcfc463") - (revision "1")) + (let ((commit "d4471232be26793fbf56c0ac3690b5f537c378b9") + (revision "2")) (package (name "emacs-helm-bibtex") (version (string-append "2.0.0" "-" revision "." @@ -12619,7 +12636,7 @@ automatically fetched from well-curated sources, and formatted as BibTeX.") (file-name (git-file-name name version)) (sha256 (base32 - "14lyx0vbqr97p3anzrsp7m3q0kqclyjcdwplpraim403fcklzbnz")))) + "1bkzhic6qckb267025il1r3xcpz99kisphxiafni1pxvf9jafr0j")))) (build-system emacs-build-system) (propagated-inputs `(("emacs-helm" ,emacs-helm) @@ -21374,3 +21391,64 @@ sense on the @samp{Newsgroups} header, whereas mail alias expansion makes sense in the @samp{To} and @samp{Cc} headers). When in the message body, this executes a different function (default: @code{indent-relative}).") (license license:gpl2+)))) + +(define-public emacs-gnus-harvest + (let ((commit "feda071a87b799bd5d23cacde3ee71f0b166e75d") + (revision "0")) + (package + (name "emacs-gnus-harvest") + (version (git-version "1.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/jwiegley/gnus-harvest.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "08zb7vc3v3wdxkzgi902vlc5ybfvm8fxrvm5drnwfsjj9873pbcb")))) + (build-system emacs-build-system) + (inputs + `(("sqlite" ,sqlite))) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-before 'build 'patch-exec-paths + (lambda* (#:key inputs #:allow-other-keys) + (let ((sqlite (assoc-ref inputs "sqlite")) + (file "gnus-harvest.el")) + (make-file-writable file) + (emacs-substitute-variables file + ("gnus-harvest-sqlite-program" + (string-append sqlite "/bin/sqlite3")))) + #t))))) + (home-page "https://github.com/jwiegley/gnus-harvest") + (synopsis + "Harvest email addresses from read/written Gnus articles") + (description "@code{gnus-harvest} notices email address in every message +or post you read or write, and collects them in a SQLite database, which can +be easily and quickly queried to determine the completion list. It optionally +uses BBDB and Message-X.") + (license license:gpl3+)))) + +(define-public emacs-auto-dictionary-mode + (package + (name "emacs-auto-dictionary-mode") + (version "1.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/nschum/auto-dictionary-mode") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "191294k92qp8gmfypf0q8j8qrym96aqikzvyb9p03wqvbr3r1dsk")))) + (build-system emacs-build-system) + (home-page "http://nschum.de/src/emacs/auto-dictionary/") + (synopsis "Automatic dictionary switcher for Emacs spell checking") + (description "@code{auto-dictionary} is a minor mode that hooks into +Flyspell's on-the-fly spell checking and extends these checks to also detect +language. Auto-dictionary then sets @code{ispell-dictionary} to use the +detected language.") + (license license:gpl2+))) diff --git a/gnu/packages/file-systems.scm b/gnu/packages/file-systems.scm index a86ae0efde..e2c67e9126 100644 --- a/gnu/packages/file-systems.scm +++ b/gnu/packages/file-systems.scm @@ -249,7 +249,7 @@ from the jfsutils package. It is meant to be used in initrds.") (define-public disorderfs (package (name "disorderfs") - (version "0.5.6") + (version "0.5.8") (source (origin (method git-fetch) @@ -259,7 +259,7 @@ from the jfsutils package. It is meant to be used in initrds.") (file-name (git-file-name name version)) (sha256 (base32 - "1zn2ydap8k9fwjl3ivgrg6l32s5p4ik6ca6j1idp7c77znlv6cpp")))) + "0pk9i0dycjq0wl6dp37r2hbadgpgmzbmjk2xpbjl36x4yrm4jns8")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) @@ -274,7 +274,7 @@ from the jfsutils package. It is meant to be used in initrds.") #:test-target "test" ;; FIXME: Tests require 'run-parts' which is not in Guix yet. #:tests? #f)) - (home-page "https://github.com/ReproducibleBuilds/disorderfs") + (home-page "https://salsa.debian.org/reproducible-builds/disorderfs") (synopsis "FUSE file system that introduces non-determinism") (description "An overlay FUSE file system that introduces non-determinism diff --git a/gnu/packages/finance.scm b/gnu/packages/finance.scm index 190e5cbbdc..990298ce3f 100644 --- a/gnu/packages/finance.scm +++ b/gnu/packages/finance.scm @@ -97,7 +97,7 @@ (define-public bitcoin-core (package (name "bitcoin-core") - (version "0.18.1") + (version "0.19.0.1") (source (origin (method url-fetch) (uri @@ -105,7 +105,7 @@ version "/bitcoin-" version ".tar.gz")) (sha256 (base32 - "15mz0gmm058gmq2gdpffbw25jpv7mksyhyfws6i7mqvrapqr6zaw")))) + "1172dl4b8h2a80ilk9sfgbl8yi55k6hs4b1m07nic2ls4irgkjbs")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config) diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm index 358c72f07a..7297c277f1 100644 --- a/gnu/packages/fonts.scm +++ b/gnu/packages/fonts.scm @@ -28,6 +28,7 @@ ;;; Copyright © 2019 Baptiste Strazzulla <bstrazzull@hotmail.fr> ;;; Copyright © 2019 Alva <alva@skogen.is> ;;; Copyright © 2019 Alexandros Theodotou <alex@zrythm.org> +;;; Copyright © 2020 Damien Cassou <damien@cassou.me> ;;; ;;; This file is part of GNU Guix. ;;; @@ -1563,3 +1564,24 @@ have been designed to be very distinguishable from each other.") displays (7SEG, 14SEG). DSEG includes the roman alphabet and symbol glyphs. This package provides the TrueType fonts.") (license license:silofl1.1))) + +(define-public font-jetbrains-mono + (package + (name "font-jetbrains-mono") + (version "1.0.2") + (source + (origin + (method url-fetch) + (uri + (string-append "https://download.jetbrains.com/fonts/" + "JetBrainsMono-" version ".zip")) + (sha256 + (base32 "0qlp4902i1v6ni04b6gdip8rxw6wpkdk9w7dir1yn9an5mvbkyar")))) + (build-system font-build-system) + (home-page "https://www.jetbrains.com/lp/mono/") + (synopsis "Mono typeface for developers") + (description + "JetBrains Mono is a font family dedicated to developers. JetBrains +Mono’s typeface forms are simple and free from unnecessary details. Rendered +in small sizes, the text looks crisper.") + (license license:asl2.0))) diff --git a/gnu/packages/fontutils.scm b/gnu/packages/fontutils.scm index 1e5ebea868..1d81938dec 100644 --- a/gnu/packages/fontutils.scm +++ b/gnu/packages/fontutils.scm @@ -120,7 +120,7 @@ anti-aliased glyph bitmap generation with 256 gray levels.") finely hand-hinting the last 1%. It is ideal for web fonts and supports many scripts.") (license (list license:gpl2+ license:freetype)) ;choose one or the other - (home-page "http://www.freetype.org/ttfautohint/"))) + (home-page "https://www.freetype.org/ttfautohint/"))) (define-public woff-tools (package diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm index 07ec16e287..e71065e270 100644 --- a/gnu/packages/freedesktop.scm +++ b/gnu/packages/freedesktop.scm @@ -266,7 +266,7 @@ the freedesktop.org XDG Base Directory specification.") (define-public elogind (package (name "elogind") - (version "241.4") + (version "243.4") (source (origin (method git-fetch) (uri (git-reference @@ -275,7 +275,7 @@ the freedesktop.org XDG Base Directory specification.") (file-name (git-file-name name version)) (sha256 (base32 - "13nd0chackqclgvw43910k4pkw2q773dh6wq9s5f3d97ibnik48k")))) + "141frvgyk4fafcxsix94qc0d9ffrwksld8lqq4hq6xsgjlvv0mrs")))) (build-system meson-build-system) (arguments `(#:configure-flags @@ -283,9 +283,11 @@ the freedesktop.org XDG Base Directory specification.") (sysconf (string-append out "/etc")) (libexec (string-append out "/libexec/elogind")) (dbuspolicy (string-append out "/etc/dbus-1/system.d")) + (shadow (assoc-ref %build-inputs "shadow")) (shepherd (assoc-ref %build-inputs "shepherd")) (halt-path (string-append shepherd "/sbin/halt")) (kexec-path "") ;not available in Guix yet + (nologin-path (string-append shadow "/sbin/nologin")) (poweroff-path (string-append shepherd "/sbin/shutdown")) (reboot-path (string-append shepherd "/sbin/reboot"))) (list @@ -299,7 +301,9 @@ the freedesktop.org XDG Base Directory specification.") (string-append "-Dkexec-path=" kexec-path) (string-append "-Dpoweroff-path=" poweroff-path) (string-append "-Dreboot-path=" reboot-path) + (string-append "-Dnologin-path=" nologin-path) "-Dcgroup-controller=elogind" + "-Dman=true" ;; Disable some tests. "-Dtests=false" "-Dslow-tests=false")) @@ -311,6 +315,14 @@ the freedesktop.org XDG Base Directory specification.") (("join_paths\\(bindir, 'pkttyagent'\\)") "'\"/run/current-system/profile/bin/pkttyagent\"'")) #t)) + (add-after 'unpack 'adjust-dbus-socket-address + (lambda _ + ;; Look for the D-Bus socket in /var/run instead of /run. Remove + ;; this for versions > 243.4. + (substitute* "src/libelogind/sd-bus/bus-internal.h" + (("=/run/dbus/system_bus_socket") + "=/var/run/dbus/system_bus_socket")) + #t)) (add-after 'unpack 'change-pid-file-path (lambda _ (substitute* "src/login/elogind.c" @@ -330,6 +342,7 @@ the freedesktop.org XDG Base Directory specification.") (inputs `(("linux-pam" ,linux-pam) ("libcap" ,libcap) + ("shadow" ,shadow) ;for 'nologin' ("shepherd" ,shepherd) ;for 'halt' and 'reboot', invoked ;when pressing the power button ("dbus" ,dbus) diff --git a/gnu/packages/ftp.scm b/gnu/packages/ftp.scm index b2ab13d951..58d817853b 100644 --- a/gnu/packages/ftp.scm +++ b/gnu/packages/ftp.scm @@ -46,7 +46,7 @@ (define-public lftp (package (name "lftp") - (version "4.8.4") + (version "4.9.1") (source (origin (method url-fetch) ;; See https://lftp.tech/get.html for mirrors. @@ -58,7 +58,7 @@ "ftp/lftp/lftp-" version ".tar.xz"))) (sha256 (base32 - "0qks22357xv9y6ripmf5j2n5svh8j5z0yniphfk89sjwkqg2gg2f")))) + "0jq2g8h1bx06ya9fsja748vwb2qrca4wsfrgi3fmaa8hznpgqsar")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm index b89df02b19..5427cd1fc7 100644 --- a/gnu/packages/games.scm +++ b/gnu/packages/games.scm @@ -2,7 +2,7 @@ ;;; Copyright © 2013 John Darrington <jmd@gnu.org> ;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org> ;;; Copyright © 2014, 2016 David Thompson <dthompson2@worcester.edu> -;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019 Eric Bavier <bavier@member.fsf.org> +;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2014 Cyrill Schenkel <cyrill.schenkel@gmail.com> ;;; Copyright © 2014 Sylvain Beucler <beuc@beuc.net> ;;; Copyright © 2014, 2015, 2018, 2019 Ludovic Courtès <ludo@gnu.org> @@ -446,7 +446,7 @@ canyons and wait for the long I-shaped block to clear four rows at a time.") ("sdl2-image" ,sdl2-image) ("sdl2-ttf" ,sdl2-ttf) ("sdl2-mixer" ,sdl2-mixer))) - (home-page "http://en.cataclysmdda.com/") + (home-page "https://cataclysmdda.org/") (synopsis "Survival horror roguelike video game") (description "Cataclysm: Dark Days Ahead (or \"DDA\" for short) is a roguelike set @@ -4033,7 +4033,7 @@ throwing people around in pseudo-randomly generated buildings.") (define-public hyperrogue (package (name "hyperrogue") - (version "11.2d") + (version "11.2q") ;; When updating this package, be sure to update the "hyperrogue-data" ;; origin in native-inputs. (source (origin @@ -4044,7 +4044,7 @@ throwing people around in pseudo-randomly generated buildings.") "-src.tgz")) (sha256 (base32 - "1b532s94zv1jsni7bvh848m42arxcclsr0x3n7c689iamwqzrxmn")))) + "1w4khi2limxhgiq7xnz0rc9nzbk86bhbyzrcd5hdghnhsviaiggq")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; no check target @@ -4122,7 +4122,7 @@ throwing people around in pseudo-randomly generated buildings.") "-win.zip")) (sha256 (base32 - "0vq4l1xaqpjj3hmxn1vn2b3bbkn1hrag42ck9f30blinv347bwhf")))) + "1k81zrbq5gmrccjac1i5c6v8j2iilfg2vwrnm8snjmmcnh5z1fgj")))) ("unzip" ,unzip))) (inputs `(("font-dejavu" ,font-dejavu) @@ -5556,7 +5556,7 @@ elements to achieve a simple goal in the most complex way possible.") (define-public pioneer (package (name "pioneer") - (version "20190203") + (version "20200203") (source (origin (method git-fetch) (uri (git-reference @@ -5565,7 +5565,7 @@ elements to achieve a simple goal in the most complex way possible.") (file-name (git-file-name name version)) (sha256 (base32 - "1g34wvgyvz793dhm1k64kl82ib0cavkbg0f2p3fp05b457ycljff")))) + "1011xsi94jhw98mhm8kryq8ajig0qfbrdx5xdasi92bd4nk7lcp8")))) (build-system cmake-build-system) (native-inputs `(("pkg-config" ,pkg-config))) @@ -7720,6 +7720,301 @@ the World and demonstrating that he is even more evil than his brother Vlad.") ;; Drascula uses a BSD-like license. (license (license:non-copyleft "file:///readme.txt")))) +(define (make-lure-package name language hash) + (package + (name name) + (version "1.1") + (source + (origin + (method url-fetch) + (uri (string-append + "mirror://sourceforge/scummvm/extras/" + "Lure%20of%20the%20Temptress/" + name "-" version ".zip")) + (sha256 + (base32 hash)))) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((out (assoc-ref %outputs "out")) + (share (string-append out "/share")) + (data (string-append share "/" ,name "/" ,language)) + (apps (string-append share "/applications")) + (bin (string-append out "/bin")) + (executable (string-append bin "/" ,name)) + (scummvm (assoc-ref %build-inputs "scummvm"))) + (let ((unzip (string-append (assoc-ref %build-inputs "unzip") + "/bin/unzip"))) + (invoke unzip "-j" (assoc-ref %build-inputs "source"))) + (let ((doc (string-append share "/doc/" ,name "-" ,version))) + (for-each (lambda (f) (install-file f doc)) + (find-files "." "\\.(txt|PDF|pdf)$"))) + (for-each (lambda (f) (install-file f data)) + (find-files "." "\\.(vga|VGA)$")) + ;; Build the executable. + (mkdir-p bin) + (let ((bash (assoc-ref %build-inputs "bash"))) + (with-output-to-file executable + (lambda () + (format #t "#!~a/bin/bash~%" bash) + (format #t "exec ~a/bin/scummvm -q ~a -p ~a lure~%" + scummvm ,language data)))) + (chmod executable #o755) + ;; Create desktop file. There is no dedicated + ;; icon for the game, so we borrow SCUMMVM's. + (mkdir-p apps) + (with-output-to-file (string-append apps "/" ,name ".desktop") + (lambda _ + (format #t + "[Desktop Entry]~@ + Name=Lure of the Temptress~@ + GenericName=Lure~@ + Exec=~a~@ + Icon=~a/share/icons/hicolor/scalable/apps/scummvm.svg~@ + Categories=AdventureGame;Game;RolePlaying;~@ + Keywords=game;adventure;roleplaying;2D,fantasy;~@ + Comment=Classic 2D point and click adventure game~@ + Comment[de]=klassisches 2D-Abenteuerspiel in Zeigen-und-Klicken-Manier~@ + Comment[fr]=Jeu classique d'aventure pointer-et-cliquer en 2D~@ + Comment[it]=Gioco classico di avventura punta e clicca 2D~@ + Type=Application~%" + executable scummvm))) + #t)))) + (native-inputs + `(("unzip" ,unzip))) + (inputs + `(("bash" ,bash) + ("scummvm" ,scummvm))) + (home-page "https://www.scummvm.org") + (synopsis "2D point and click fantasy adventure game") + (description + "Lure of the Temptress is a classic 2D point and click adventure game. + +You are Diermot, an unwilling hero who'd prefer a quiet life, and are, to all +intents and purposes, a good man. After decades of unrest the King has united +the warring factions in his kingdom and all his lands are at peace, except +a remote region around a town called Turnvale. A revolt has recently taken +place in Turnvale, a revolt orchestrated by an apprentice sorceress called +Selena, the titular temptress. The king calls together his finest horsemen +and heads off (with you in tow) to Turnvale just to witness how hellish +mercenary monsters called Skorl are invading the town. + +The king's men are defeated, the king is killed and you fall of your horse and +bang your head heavily on the ground. You have been *unconscious for a while +when you realize that you are in a dingy cell guarded by a not so friendly +Skorl. Maybe it would be an idea to try and escape...") + (license (license:non-copyleft "file:///README")))) + +(define-public lure + (make-lure-package + "lure" "en" "0201i70qcs1m797kvxjx3ygkhg6kcl5yf49sihba2ga8l52q45zk")) + +(define-public lure-de + (make-lure-package + "lure-de" "de" "0sqq7h5llml6rv85x0bfv4bgzwhs4c82p4w4zmfcaab6cjlad0sy")) + +(define-public lure-es + (make-lure-package + "lure-es" "es" "1dvv5znvlsakw6w5r16calv9jkgw27aymgybsf4q22lcmpxbj1lk")) + +(define-public lure-fr + (make-lure-package + "lure-fr" "fr" "1y51jjb7f8023832g44vd1jsb6ni85586pi2n5hjg9qjk6gi90r9")) + +(define-public lure-it + (make-lure-package + "lure-it" "it" "1ks6n39r1cllisrrh6pcr39swsdv7ng3gx5c47vaw71zzfr70hjj")) + +(define (make-queen-package name file-prefix release language hash) + (package + (name name) + (version release) + (source + (origin + (method url-fetch) + (uri (string-append "mirror://sourceforge/scummvm/extras/" + "Flight%20of%20the%20Amazon%20Queen/" + file-prefix release ".zip")) + (sha256 + (base32 hash)))) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((out (assoc-ref %outputs "out")) + (share (string-append out "/share")) + (data (string-append share "/" ,name)) + (apps (string-append share "/applications")) + (bin (string-append out "/bin")) + (executable (string-append bin "/" ,name)) + (scummvm (assoc-ref %build-inputs "scummvm"))) + (let ((unzip (string-append (assoc-ref %build-inputs "unzip") + "/bin/unzip"))) + (invoke unzip "-j" (assoc-ref %build-inputs "source"))) + (let ((doc (string-append share "/doc/" ,name "-" ,version))) + (install-file "readme.txt" doc)) + (install-file "queen.1c" data) + (mkdir-p bin) + (let ((bash (assoc-ref %build-inputs "bash"))) + (with-output-to-file executable + (lambda () + (format #t "#!~a/bin/bash~%" bash) + (format #t "exec ~a/bin/scummvm -q fr -p ~a queen~%" + scummvm data)))) + (chmod executable #o755) + ;; Create desktop file. There is no dedicated + ;; icon for the game, so we borrow SCUMMVM's. + (mkdir-p apps) + (with-output-to-file (string-append apps "/" ,name ".desktop") + (lambda _ + (format #t + "[Desktop Entry]~@ + Name=Flight of the Amazon Queen~@ + GenericName=Queen~@ + Comment=Embark on a quest to rescue a kidnapped princess and in the process, discover the true sinister intentions of a suspiciously located Lederhosen company~@ + Comment[de]=Begib dich auf ein Abenteuer, um eine entführte Prinzessin zu retten und entdecke die wahren, finsteren Absichten eines verdächtig erscheinenden Lederhosen-Unternehmens~@ + Type=Application~@ + Exec=~a~@ + Icon=~a/share/icons/hicolor/scalable/apps/scummvm.svg~@ + Categories=AdventureGame;Game;RolePlaying;~@ + Keywords=adventure;game;roleplaying;fantasy;~%" + executable scummvm)))) + #t))) + (native-inputs + `(("unzip" ,unzip))) + (inputs + `(("bash" ,bash) + ("scummvm" ,scummvm))) + (home-page "https://www.scummvm.org/") + (synopsis "Classic 2D point and click adventure game") + (description "Flight of the Amazon Queen is a 2D point-and-click +adventure game set in the 1940s. + +You assume the role of Joe King, a pilot for hire who is given the job +of flying Faye Russell (a famous movie star) into the Amazon jungle +for a photo shoot. Of course, things never go according to plans. +After an unfortunate turn of events they find themselves stranded in +the heart of the Amazon jungle, where Joe will embark on a quest to +rescue a kidnapped princess and in the process, discover the true +sinister intentions of a suspiciously located Lederhosen company. In +a rich 2D environment, Joe will cross paths with a variety of unlikely +jungle inhabitants including, but not limited to, a tribe of Amazon +women and 6-foot-tall pygmies.") + (license (license:non-copyleft "file:///readme.txt")))) + +(define-public queen + (make-queen-package + "queen" "FOTAQ_Talkie-" "1.1" "en" + "1a6q71q1dl9vvw2qqsxk5h1sv0gaqy6236zr5905w2is01gdsp52")) + +(define-public queen-de + (make-queen-package + "queen-de" "FOTAQ_Ger_talkie-" "1.0" "de" + "13vn43x7214vyprlpqabvv71k890nff3d6fjscflr1ll7acjca3f")) + +(define-public queen-fr + (make-queen-package + "queen-fr" "FOTAQ_Fr_Talkie_" "1.0" "fr" + "0hq5g4qrkcwm2kn5i4kv4hijs9hi7bw9xl1vrwd1l69qqn30crwy")) + +(define-public queen-it + (make-queen-package + "queen-it" "FOTAQ_It_Talkie_" "1.0" "it" + "1h76y70lrpzfjkm53n4nr364nhyka54vbz9r7sadzyzl7c7ilv4d")) + +(define-public sky + (package + (name "sky") + (version "1.2") ;1.3 is floppy version + (source + (origin + (method url-fetch) + (uri (string-append "mirror://sourceforge/scummvm/extras/" + "Beneath%20a%20Steel%20Sky/" + "bass-cd-" version ".zip")) + (sha256 + (base32 "14s5jz67kavm8l15gfm5xb7pbpn8azrv460mlxzzvdpa02a9n82k")))) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((out (assoc-ref %outputs "out")) + (share (string-append out "/share")) + (data (string-append share "/" ,name)) + (apps (string-append share "/applications")) + (bin (string-append out "/bin")) + (executable (string-append bin "/" ,name)) + (scummvm (assoc-ref %build-inputs "scummvm"))) + (let ((unzip (string-append (assoc-ref %build-inputs "unzip") + "/bin/unzip"))) + (invoke unzip "-j" (assoc-ref %build-inputs "source"))) + (let ((doc (string-append share "/doc/bass-" ,version))) + (install-file "readme.txt" doc)) + (for-each (lambda (f) (install-file f data)) + (find-files "." "^sky\\.")) + ;; Build the executable. + (mkdir-p bin) + (let ((bash (assoc-ref %build-inputs "bash"))) + (with-output-to-file executable + (lambda () + (format #t "#!~a/bin/bash~%" bash) + (format #t "exec ~a/bin/scummvm -p ~a sky~%" scummvm data)))) + (chmod executable #o755) + ;; Create desktop file. There is no dedicated + ;; icon for the game, so we borrow SCUMMVM's. + (mkdir-p apps) + (with-output-to-file (string-append apps "/" ,name ".desktop") + (lambda _ + (format #t + "[Desktop Entry]~@ + Name=Beneath a Steel Sky~@ + GenericName=Bass~@ + Exec=~a~@ + Icon=~a/share/icons/hicolor/scalable/apps/scummvm.svg~@ + Categories=AdventureGame;Game;RolePlaying;~@ + Keywords=adventure;game;roleplaying;cyberpunk;~@ + Comment=A science-fiction adventure game set in a bleak post-apocalyptic vision of the future~@ + Comment[de]=Ein Science-Fiction-Abenteuerspiel \ +angesiedelt in einer düsteren, postapokalyptischen Vision der Zukunft~@ + Type=Application~%" + executable scummvm))) + #t)))) + (native-inputs + `(("unzip" ,unzip))) + (inputs + `(("bash" ,bash) + ("scummvm" ,scummvm))) + (home-page "https://www.scummvm.org/") + (synopsis "Classic 2D point an click science-fiction adventure game") + (description + "Beneath a Steel Sky is a science-fiction thriller set in a bleak +post-apocalyptic vision of the future. It revolves around Union City, +where selfishness, rivalry, and corruption by its citizens seems to be +all too common, those who can afford it live underground, away from +the pollution and social problems which are plaguing the city. + +You take on the role of Robert Foster, an outcast of sorts from the +city since a boy who was raised in a remote environment outside of +Union City simply termed ``the gap''. Robert's mother took him away +from Union City as a child on their way to ``Hobart'' but the +helicopter crashed on its way. Unfortunately, Robert's mother died, +but he survived and was left to be raised by a local tribe from the +gap. + +Years later, Union City security drops by and abducts Robert, killing +his tribe in the process; upon reaching the city the helicopter taking +him there crashes with him escaping, high upon a tower block in the +middle of the city. He sets out to discover the truth about his past, +and to seek vengeance for the killing of his tribe.") + (license (license:non-copyleft "file:///readme.txt")))) + (define-public gnurobots (package (name "gnurobots") @@ -9656,3 +9951,137 @@ challenges.") license:bsd-3 ;src/md5sum license:lgpl2.1+ ;src/iqsort.h license:expat)))) + +(define-public eboard + (package + (name "eboard") + (version "1.1.3") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/fbergo/eboard.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1z4pwpqyvxhlda99h6arh2rjk90fbms9q29fqizjblrdn01dlxn1")))) + (build-system gnu-build-system) + (native-inputs + `(("perl" ,perl) + ("pkg-config" ,pkg-config))) + (inputs + `(("gtk+" ,gtk+-2) + ("libpng" ,libpng) + ("gstreamer" ,gstreamer))) + (arguments + `(#:tests? #f + #:phases + (modify-phases %standard-phases + (replace 'configure + (lambda* (#:key outputs #:allow-other-keys) + (make-file-writable "eboard-config") + (setenv "CC" "gcc") + (invoke "./configure" + (string-append "--prefix=" (assoc-ref outputs "out"))) + #t)) + (add-before 'install 'make-required-directories + (lambda* (#:key outputs #:allow-other-keys) + (mkdir-p (string-append (assoc-ref outputs "out") + "/share/eboard")) + #t))))) + (synopsis "Graphical user interface to play chess") + (description + "Eboard is a chess board interface for ICS (Internet Chess Servers) +and chess engines.") + (home-page "https://www.bergo.eng.br/eboard/") + (license license:gpl2+))) + +(define-public chessx + (package + (name "chessx") + (version "1.5.0") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://sourceforge/chessx/chessx/" + version "/chessx-" version ".tgz")) + (sha256 + (base32 "09rqyra28w3z9ldw8sx07k5ap3sjlli848p737maj7c240rasc6i")))) + (build-system qt-build-system) + (native-inputs + `(("qttools" ,qttools))) + (inputs + `(("qtbase" ,qtbase) + ("qtmultimedia" ,qtmultimedia) + ("qtsvg" ,qtsvg) + ("zlib" ,zlib))) + (arguments + `(#:tests? #f + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "chessx.pro" + (("\\$\\$\\[QT_INSTALL_BINS\\]/lrelease") + (string-append (assoc-ref inputs "qttools") "/bin/lrelease"))) + #t)) + (add-after 'fix-paths 'make-qt-deterministic + (lambda _ + (setenv "QT_RCC_SOURCE_DATE_OVERRIDE" "1") + #t)) + (replace 'configure + (lambda _ + (invoke "qmake") + #t)) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (install-file "release/chessx" (string-append out "/bin")) + (install-file "unix/chessx.desktop" + (string-append out "/share/applications"))) + #t))))) + (synopsis "Chess game database") + (description + "ChessX is a chess database. With ChessX you can operate on your +collection of chess games in many ways: browse, edit, add, organize, analyze, +etc. You can also play games on FICS or against an engine.") + (home-page "http://chessx.sourceforge.net/") + (license license:gpl2+))) + +(define-public stockfish + (package + (name "stockfish") + (version "11") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/official-stockfish/Stockfish.git") + (commit (string-append "sf_" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "12mppipinymj8s1ipq9a7is453vncly49c32ym9wvyklsgyxfzlk")))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f + #:make-flags (list "-C" "src" + "build" + (string-append "PREFIX=" + (assoc-ref %outputs "out")) + (string-append "ARCH=" + ,(match (%current-system) + ("x86_64-linux" "x86-64") + ("i686-linux" "x86-32") + ("aarch64-linux" "general-64") + ("armhf-linux" "armv7") + ("mips64el-linux" "general-64") + (_ "general-32")))) + #:phases (modify-phases %standard-phases + (delete 'configure)))) + (synopsis "Strong chess engine") + (description + "Stockfish is a very strong chess engines. It is much stronger than the +best human chess grandmasters. It can be used with UCI-compatible GUIs like +ChessX.") + (home-page "https://stockfishchess.org/") + (license license:gpl3+))) diff --git a/gnu/packages/gdb.scm b/gnu/packages/gdb.scm index 1aa8d49036..310bb6c320 100644 --- a/gnu/packages/gdb.scm +++ b/gnu/packages/gdb.scm @@ -131,6 +131,16 @@ written in C, C++, Ada, Objective-C, Pascal and more.") (define-public gdb/next (package/inherit gdb-8.3 + (version "9.1") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnu/gdb/gdb-" version ".tar.xz")) + (sha256 + (base32 + "0dqp1p7w836iwijg1zb4a784n0j4pyjiw5v6h8fg5lpx6b40x7k9")))) + (arguments + `(#:out-of-source? #t + ,@(package-arguments gdb-8.3))) (inputs `(("source-highlight" ,source-highlight) ,@(package-inputs gdb-8.3))) diff --git a/gnu/packages/gimp.scm b/gnu/packages/gimp.scm index af2b06ab27..8aa69da7c3 100644 --- a/gnu/packages/gimp.scm +++ b/gnu/packages/gimp.scm @@ -2,7 +2,7 @@ ;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2016, 2018 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il> -;;; Copyright © 2018, 2019, 202 Tobias Geerinckx-Rice <me@tobias.gr> +;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Leo Famulari <leo@famulari.name> ;;; Copyright © 2018 Thorsten Wilms <t_w_@freenet.de> ;;; @@ -255,7 +255,7 @@ that is extensible via a plugin system.") ("gtk+" ,gtk+-2))) (native-inputs `(("pkg-config" ,pkg-config))) - (home-page "http://registry.gimp.org/node/19596") + (home-page "https://www.lprp.fr/gimp_plugin_en/#fourier") (synopsis "GIMP plug-in to edit image in fourier space") (description "This package provides a simple plug-in to apply the fourier transform on diff --git a/gnu/packages/gl.scm b/gnu/packages/gl.scm index d0718d5d45..e610fe1dd7 100644 --- a/gnu/packages/gl.scm +++ b/gnu/packages/gl.scm @@ -11,6 +11,7 @@ ;;; Copyright © 2017, 2018, 2019 Rutger Helling <rhelling@mykolab.com> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz> +;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -422,6 +423,24 @@ device drivers allows Mesa to be used in many different environments ranging from software emulation to complete hardware acceleration for modern GPUs.") (license license:x11))) +;; Mesa 19.3.2 causes a test failure in some packages, so add this newer +;; version separately until the next rebuild cycle. +(define-public mesa-19.3.3 + (package/inherit + mesa + (version "19.3.3") + (source (origin + (inherit (package-source mesa)) + (uri (list (string-append "https://mesa.freedesktop.org/archive/" + "mesa-" version ".tar.xz") + (string-append "ftp://ftp.freedesktop.org/pub/mesa/" + "mesa-" version ".tar.xz") + (string-append "ftp://ftp.freedesktop.org/pub/mesa/" + version "/mesa-" version ".tar.xz"))) + (sha256 + (base32 + "02czqdqf64i3az5p1allnxycyjad3x35cj0hz0017mi5pc84ikl1")))))) + (define-public mesa-opencl (package (inherit mesa) diff --git a/gnu/packages/gnome-xyz.scm b/gnu/packages/gnome-xyz.scm index 0fc721b7d3..7f375fefc5 100644 --- a/gnu/packages/gnome-xyz.scm +++ b/gnu/packages/gnome-xyz.scm @@ -114,6 +114,40 @@ which haven't been updated for some years. The new app icons are ported from the Obsidian icon theme.") (license license:gpl3))) +(define-public gnome-shell-extension-appindicator + (package + (name "gnome-shell-extension-appindicator") + (version "30") + (source (origin + (method git-fetch) + (uri (git-reference + (url + "https://github.com/ubuntu/gnome-shell-extension-appindicator.git") + (commit (string-append "v" version)))) + (sha256 + (base32 + "1fjhx23jqwv3d0smwhnjvc35gqhwk9p5f96ic22pfax653cn5vh8")) + (file-name (git-file-name name version)))) + (build-system trivial-build-system) + (arguments + '(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((source (assoc-ref %build-inputs "source")) + (install-dir (string-append (assoc-ref %outputs "out") + "/share/gnome-shell/extensions" + "/appindicatorsupport@rgcjonas.gmail.com"))) + (mkdir-p install-dir) + (copy-recursively source install-dir) + #t)))) + (synopsis "Adds KStatusNotifierItem support to GNOME Shell") + (description "This extension integrates Ubuntu AppIndicators +and KStatusNotifierItems (KDE's successor of the systray) into +GNOME Shell.") + (home-page "https://github.com/ubuntu/gnome-shell-extension-appindicator/") + (license license:gpl2+))) + (define-public gnome-shell-extension-dash-to-dock (package (name "gnome-shell-extension-dash-to-dock") diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm index 8094dae477..cc00b69cf3 100644 --- a/gnu/packages/gnome.scm +++ b/gnu/packages/gnome.scm @@ -40,7 +40,7 @@ ;;; Copyright © 2019 Jelle Licht <jlicht@fsfe.org> ;;; Copyright © 2019 Jonathan Frederickson <jonathan@terracrypt.net> ;;; Copyright © 2019, 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com> -;;; Copyright © 2019 Martin Becze <mjbecze@riseup.net> +;;; Copyright © 2019, 2020 Martin Becze <mjbecze@riseup.net> ;;; Copyright © 2019 David Wilson <david@daviwil.com> ;;; Copyright © 2019, 2020 Raghav Gururajan <raghavgururajan@disroot.org> ;;; Copyright © 2019 Jonathan Brielmaier <jonathan.brielmaier@web.de> @@ -2170,6 +2170,10 @@ from forcing GEXP-PROMISE." #+(canonical-package tar))) (invoke "tar" "xvf" #+upstream-source) (with-directory-excursion (string-append "librsvg-" #$version) + ;; The following crate(s) are needed in addition to the ones replaced: + (begin + (invoke + "tar" "xvf" #+(package-source rust-autocfg-0.1) "-C" "vendor")) (for-each (lambda (crate) (delete-file-recursively (string-append "vendor/" (car crate))) @@ -2179,7 +2183,7 @@ from forcing GEXP-PROMISE." ("approx" . #+(package-source rust-approx-0.3)) ("arrayvec" . #+(package-source rust-arrayvec-0.4)) ("atty" . #+(package-source rust-atty-0.2)) - ("autocfg" . #+(package-source rust-autocfg-0.1)) + ("autocfg" . #+(package-source rust-autocfg-1.0)) ("bitflags" . #+(package-source rust-bitflags-1)) ;; block 0.1 ("bstr" . #+(package-source rust-bstr-0.2)) @@ -2228,9 +2232,9 @@ from forcing GEXP-PROMISE." ("itertools" . #+(package-source rust-itertools-0.8)) ("itoa" . #+(package-source rust-itoa-0.4)) ("language-tags" . #+(package-source rust-language-tags-0.2)) - ("lazy_static" . #+(package-source rust-lazy-static-1.3)) + ("lazy_static" . #+(package-source rust-lazy-static-1)) ("libc" . #+(package-source rust-libc-0.2)) -;; libm 0.1 + ("libm" . #+(package-source rust-libm-0.1)) ;; locale_config 0.3 ("log" . #+(package-source rust-log-0.4)) ("mac" . #+(package-source rust-mac-0.1)) @@ -3761,7 +3765,7 @@ and the GLib main loop, to integrate well with GNOME applications.") (define-public libsecret (package (name "libsecret") - (version "0.19.1") + (version "0.20.1") (source (origin (method url-fetch) (uri (string-append @@ -3770,7 +3774,7 @@ and the GLib main loop, to integrate well with GNOME applications.") "libsecret-" version ".tar.xz")) (sha256 (base32 - "0fhflcsr70b1pps2pcvqcbdhip2ny5am9nbm634f4sj5g40y30w5")))) + "0ir4ynpf8b64xss1azvsi5x6697lik7hkf3z0xxa2qv2xja3xxsp")))) (build-system gnu-build-system) (outputs '("out" "doc")) (arguments @@ -4069,43 +4073,34 @@ output devices.") (define-public geoclue (package (name "geoclue") - (version "2.4.8") + (version "2.5.5") (source (origin (method url-fetch) - (uri (string-append "https://www.freedesktop.org/software/" name - "/releases/" (version-major+minor version) "/" - name "-" version ".tar.xz")) + (uri + (string-append "https://gitlab.freedesktop.org/geoclue/geoclue/-/archive/" + version "/geoclue-" version ".tar.bz2")) (sha256 (base32 - "08yg1r7m0n9hwyvcy769qkmkf8lslqwv69cjfffwnc3zm5km25qj")) + "1b7jqrsn4x7mxjxj8hvb2dl2cmhrpb9vibs4rvkkanky5nsx3sai")) (patches (search-patches "geoclue-config.patch")))) - (build-system glib-or-gtk-build-system) + (build-system meson-build-system) (arguments - '(;; The tests want to run the system bus. - #:tests? #f - #:configure-flags (list ;; Disable bits requiring ModemManager. - "--disable-3g-source" - "--disable-cdma-source" - "--disable-modem-gps-source" - "--with-dbus-service-user=geoclue") - #:phases - (modify-phases %standard-phases - (add-before 'configure 'patch-/bin/true - (lambda _ - (substitute* "configure" - (("/bin/true") (which "true"))) - #t))))) + '(#:configure-flags (list "-Dbus-srv-user=geoclue"))) (native-inputs `(("pkg-config" ,pkg-config) ("gobject-introspection" ,gobject-introspection) + ("modem-manager" ,modem-manager) + ("libnotify" ,libnotify) + ("gtk-doc", gtk-doc) ("intltool" ,intltool))) (inputs `(("avahi" ,avahi) - ("glib" ,glib) + ("glib:bin" ,glib "bin") + ("glib-networking" ,glib-networking) ("json-glib" ,json-glib) ("libsoup" ,libsoup))) - (home-page "https://www.freedesktop.org/wiki/Software/GeoClue/") + (home-page "https://gitlab.freedesktop.org/geoclue/geoclue/-/wikis/home") (synopsis "Geolocation service") (description "Geoclue is a D-Bus service that provides location information. The primary goal of the Geoclue project is to make creating diff --git a/gnu/packages/gnunet.scm b/gnu/packages/gnunet.scm index c36210b4d5..422c9bc1d7 100644 --- a/gnu/packages/gnunet.scm +++ b/gnu/packages/gnunet.scm @@ -93,7 +93,7 @@ `(("exiv2" ,exiv2) ("bzip2" ,bzip2) ("flac" ,flac) - ("ffmpeg" ,ffmpeg-3.4) + ("ffmpeg" ,ffmpeg) ("file" ,file) ;libmagic, for the MIME plug-in ("glib" ,glib) ("gstreamer" ,gstreamer) diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm index ae0c58eedb..863edb3b4e 100644 --- a/gnu/packages/gnuzilla.scm +++ b/gnu/packages/gnuzilla.scm @@ -552,8 +552,8 @@ from forcing GEXP-PROMISE." #:system system #:guile-for-build guile))) -(define %icecat-version "68.4.1-guix0-preview1") -(define %icecat-build-id "20200108000000") ;must be of the form YYYYMMDDhhmmss +(define %icecat-version "68.5.0-guix0-preview1") +(define %icecat-build-id "20200211000000") ;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' @@ -575,11 +575,11 @@ from forcing GEXP-PROMISE." "firefox-" upstream-firefox-version ".source.tar.xz")) (sha256 (base32 - "0q7kv70w1d33m12hkzyay6nkgvz9qczrl6hqx0n1c6grs097f2m0")))) + "1ld6jinnln0si6p8qy93v5nzd21ckhl266vz425lwqipibwq9rsj")))) - (upstream-icecat-base-version "68.4.1") ; maybe older than base-version + (upstream-icecat-base-version "68.5.0") ; maybe older than base-version ;;(gnuzilla-commit (string-append "v" upstream-icecat-base-version)) - (gnuzilla-commit "2d1b1bc45fdae5a99c4e8ea25593ebb9c8d7bfdf") + (gnuzilla-commit "2dc3c0bed6f8a41a8426ae66db92729af5c27c70") (gnuzilla-source (origin (method git-fetch) @@ -591,7 +591,7 @@ from forcing GEXP-PROMISE." (string-take gnuzilla-commit 8))) (sha256 (base32 - "0hc9sx3yb71xvr9s1p0z5fx8jfqpssb8wz0h2nzhy2nyp9bb2jzl")))) + "1xwr1xjs4j2i6skm8hknh37gzsd6r396n0lchbwlahig7w6z506y")))) (makeicecat-patch (local-file (search-patch "icecat-makeicecat.patch")))) diff --git a/gnu/packages/golang.scm b/gnu/packages/golang.scm index 9102469749..d165ccf065 100644 --- a/gnu/packages/golang.scm +++ b/gnu/packages/golang.scm @@ -4,7 +4,7 @@ ;;; Copyright © 2016 Andy Wingo <wingo@igalia.com> ;;; Copyright © 2016, 2019 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2016, 2017 Petter <petter@mykolab.ch> -;;; Copyright © 2016, 2017, 2019 Leo Famulari <leo@famulari.name> +;;; Copyright © 2016, 2017, 2018, 2019, 2020 Leo Famulari <leo@famulari.name> ;;; Copyright © 2017 Sergei Trofimovich <slyfox@inbox.ru> ;;; Copyright © 2017 Alex Vong <alexvong1995@gmail.com> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> @@ -16,6 +16,7 @@ ;;; Copyright @ 2019 Giovanni Biscuolo <g@xelera.eu> ;;; Copyright @ 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2019 Arun Isaac <arunisaac@systemreboot.net> +;;; Copyright © 2020 Jack Hill <jackhill@jackhill.us> ;;; ;;; This file is part of GNU Guix. ;;; @@ -216,11 +217,11 @@ in the style of communicating sequential processes (@dfn{CSP}).") (supported-systems '("x86_64-linux" "i686-linux" "armhf-linux" "aarch64-linux")) (license license:bsd-3))) -(define-public go-1.12 +(define-public go-1.13 (package (inherit go-1.4) (name "go") - (version "1.12.16") + (version "1.13.7") (source (origin (method url-fetch) @@ -228,7 +229,7 @@ in the style of communicating sequential processes (@dfn{CSP}).") name version ".src.tar.gz")) (sha256 (base32 - "1y0x10fsvgpc1x24b9q9y6kv9b0kwf7879am3p0gym2abgc5wvnf")))) + "1x21kfpzfkvmqd42pan6nl862m7jjl4niqxxpcgm46awbz645bg4")))) (arguments (substitute-keyword-arguments (package-arguments go-1.4) ((#:phases phases) @@ -367,7 +368,6 @@ in the style of communicating sequential processes (@dfn{CSP}).") (docs (string-append doc_out "/share/doc/" ,name "-" ,version)) (src (string-append (assoc-ref outputs "tests") "/share/" ,name "-" ,version))) - (delete-file-recursively "../pkg/bootstrap") ;; Prevent installation of the build cache, which contains ;; store references to most of the tools used to build Go and ;; would unnecessarily increase the size of Go's closure if it @@ -405,7 +405,7 @@ in the style of communicating sequential processes (@dfn{CSP}).") ,@(package-native-inputs go-1.4))) (supported-systems %supported-systems))) -(define-public go go-1.12) +(define-public go go-1.13) (define-public go-github-com-alsm-ioprogress (let ((commit "063c3725f436e7fba0c8f588547bee21ffec7ac5") @@ -623,8 +623,8 @@ Go programming language.") (license license:bsd-3)))) (define-public go-golang-org-x-crypto - (let ((commit "b7391e95e576cacdcdd422573063bc057239113d") - (revision "3")) + (let ((commit "9756ffdc24725223350eb3266ffb92590d28f278") + (revision "4")) (package (name "go-golang-org-x-crypto") (version (git-version "0.0.0" revision commit)) @@ -637,7 +637,7 @@ Go programming language.") version "-checkout")) (sha256 (base32 - "1jqfh81mhgwcc6b9l0bs6rb0707s01qpvn7896i5bsmig46lc7zm")))) + "0q7hxaaq6lp0v8qqzifvysl47z5rfdlrxkh3d29vsl3wyby3dxl8")))) (build-system go-build-system) (arguments '(#:import-path "golang.org/x/crypto" @@ -665,8 +665,8 @@ for the Go language.") (license license:bsd-3)))) (define-public go-golang-org-x-net - (let ((commit "d28f0bde5980168871434b95cfc858db9f2a7a99") - (revision "3")) + (let ((commit "ba9fcec4b297b415637633c5a6e8fa592e4a16c3") + (revision "4")) (package (name "go-golang-org-x-net") (version (git-version "0.0.0" revision commit)) @@ -678,7 +678,7 @@ for the Go language.") (file-name (git-file-name name version)) (sha256 (base32 - "18xj31h70m7xxb7gc86n9i21w6d7djbjz67zfaljm4jqskz6hxkf")))) + "1hbqvy6r0s5h0dpdqw8fynl3cq0acin3iyqki9xvl5r8h33yb9bx")))) (build-system go-build-system) (arguments `(#:import-path "golang.org/x/net" @@ -693,8 +693,8 @@ for the Go language.") (license license:bsd-3)))) (define-public go-golang-org-x-sys - (let ((commit "04f50cda93cbb67f2afa353c52f342100e80e625") - (revision "4")) + (let ((commit "749cb33beabd9aa6d3178e3de05bcc914f70b2bf") + (revision "5")) (package (name "go-golang-org-x-sys") (version (git-version "0.0.0" revision commit)) @@ -706,7 +706,7 @@ for the Go language.") (file-name (git-file-name name version)) (sha256 (base32 - "0hmfsz9y1ingwsn482hlzzmzs7kr3cklm0ana0mbdk70isw2bxnw")))) + "0dm3257q3rv2kyn5lmqqim2fqg634v6rhrqq4glvbk4wx4l3v337")))) (build-system go-build-system) (arguments `(#:import-path "golang.org/x/sys" @@ -750,8 +750,8 @@ support for low-level interaction with the operating system.") (license license:bsd-3))) (define-public go-golang-org-x-time - (let ((commit "6dc17368e09b0e8634d71cac8168d853e869a0c7") - (revision "1")) + (let ((commit "9d24e82272b4f38b78bc8cff74fa936d31ccd8ef") + (revision "2")) (package (name "go-golang-org-x-time") (version (git-version "0.0.0" revision commit)) @@ -763,7 +763,7 @@ support for low-level interaction with the operating system.") (file-name (git-file-name name version)) (sha256 (base32 - "1fx4cf5fpdz00g3c7vxzy92hdcg0vh4yqw00qp5s52j72qixynbk")))) + "1f5nkr4vys2vbd8wrwyiq2f5wcaahhpxmia85d1gshcbqjqf8dkb")))) (build-system go-build-system) (arguments `(#:import-path "golang.org/x/time" @@ -1423,7 +1423,7 @@ values.") (define-public go-github-com-mattn-go-isatty (package (name "go-github-com-mattn-go-isatty") - (version "0.0.7") + (version "0.0.11") (source (origin (method git-fetch) @@ -1433,7 +1433,7 @@ values.") (file-name (git-file-name name version)) (sha256 (base32 - "1i77aq4gf9as03m8fpfh8fq49n4z9j7548blrcsidm1xhslzk5xd")))) + "0h671sv7hfprja495kavazkalkx7xzaqksjh13brcnwq67ijrali")))) (build-system go-build-system) (propagated-inputs `(("go-golang-org-x-sys" ,go-golang-org-x-sys))) @@ -1792,7 +1792,7 @@ and lookup requests. Browse requests are not supported yet.") (define-public go-github-com-gogo-protobuf (package (name "go-github-com-gogo-protobuf") - (version "1.2.1") + (version "1.3.1") (source (origin (method git-fetch) (uri (git-reference @@ -1801,7 +1801,7 @@ and lookup requests. Browse requests are not supported yet.") (file-name (git-file-name name version)) (sha256 (base32 - "06yqa6h0kw3gr5pc3qmas7f7435a96zf7iw7p0l00r2hqf6fqq6m")))) + "0x77x64sxjgfhmbijqfzmj8h4ar25l2w97h01q3cqs1wk7zfnkhp")))) (build-system go-build-system) (arguments `(#:import-path "github.com/gogo/protobuf" @@ -1957,27 +1957,25 @@ needing to use secp256k1 elliptic curve cryptography.") (license license:isc)))) (define-public go-github-com-minio-sha256-simd - (let ((commit "cc1980cb03383b1d46f518232672584432d7532d") - (revision "3")) - (package - (name "go-github-com-minio-sha256-simd") - (version (git-version "0.0.0" revision commit)) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/minio/sha256-simd.git") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "04fp98nal0wsb26zwhw82spn5camxslc68g3xp8g4af9w6k9g31j")))) - (build-system go-build-system) - (arguments - '(#:import-path "github.com/minio/sha256-simd")) - (home-page "https://github.com/minio/sha256-simd") - (synopsis "Accelerate SHA256 computations in pure Go") - (description "Accelerate SHA256 computations in pure Go using AVX512 and + (package + (name "go-github-com-minio-sha256-simd") + (version "0.1.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/minio/sha256-simd.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1j0iqsckm97g4l79vd4mc7apbmkdar23jpzqpnpdhwpfd834j8lp")))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/minio/sha256-simd")) + (home-page "https://github.com/minio/sha256-simd") + (synopsis "Accelerate SHA256 computations in pure Go") + (description "Accelerate SHA256 computations in pure Go using AVX512 and AVX2 for Intel and ARM64 for ARM. On AVX512 it provides an up to 8x improvement (over 3 GB/s per core) in comparison to AVX2. @@ -1990,7 +1988,7 @@ This package uses Golang assembly. The AVX512 version is based on the Intel's \"multi-buffer crypto library for IPSec\" whereas the other Intel implementations are described in \"Fast SHA-256 Implementations on Intel Architecture Processors\" by J. Guilford et al.") - (license license:asl2.0)))) + (license license:asl2.0))) (define-public go-github-com-libp2p-go-libp2p-crypto (let ((commit "7240b40a3ddc47c4d17c15baabcbe45e5219171b") @@ -2471,7 +2469,7 @@ as conversion to and from @command{net.Addr}.") (define-public go-github-com-urfave-cli (package (name "go-github-com-urfave-cli") - (version "1.21.0") + (version "1.22.2") (source (origin (method git-fetch) @@ -2481,10 +2479,12 @@ as conversion to and from @command{net.Addr}.") (file-name (git-file-name name version)) (sha256 (base32 - "104jldhxn6d97l5vsbsl0q8hgy1bxrahbr6dbfqrlppva51jmydd")))) + "10mcnvi5qmn00vpyk6si8gjka7p654wr9hac4zc9w5h3ickhvbdc")))) (build-system go-build-system) (arguments '(#:import-path "github.com/urfave/cli")) + (propagated-inputs + `(("go-github-com-go-md2man" ,go-github-com-go-md2man))) (home-page "https://github.com/urfave/cli") (synopsis "Simple, fast, and fun package for building command line apps in Go") (description "@command{cli} is a simple, fast, and fun package for @@ -2492,6 +2492,107 @@ building command line apps in Go. The goal is to enable developers to write fast and distributable command line applications in an expressive way.") (license license:expat))) +(define-public go-github-com-go-md2man + (package + (name "go-github-com-go-md2man") + (version "2.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/cpuguy83/go-md2man") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0r1f7v475dxxgzqci1mxfliwadcrk86ippflx9n411325l4g3ghv")) + (modules '((guix build utils))) + (snippet '(begin + (delete-file-recursively "vendor") + #t)))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/cpuguy83/go-md2man")) + (propagated-inputs + `(("go-github-com-russross-blackfriday" ,go-github-com-russross-blackfriday))) + (home-page "https://github.com/cpuguy83/go-md2man") + (synopsis "Convert markdown into roff") + (description "Go-md2man is a Go program that converts markdown to roff for +the purpose of building man pages.") + (license license:expat))) + +(define-public go-github-com-russross-blackfriday + (package + (name "go-github-com-russross-blackfriday") + (version "2.0.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/russross/blackfriday") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0nlz7isdd4rgnwzs68499hlwicxz34j2k2a0b8jy0y7ycd2bcr5j")))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/russross/blackfriday")) + (propagated-inputs + `(("go-github-com-shurcool-sanitized-anchor-name" + ,go-github-com-shurcool-sanitized-anchor-name))) + (native-inputs + `(("go-github-com-pmezard-go-difflib" ,go-github-com-pmezard-go-difflib))) + (home-page "https://github.com/russross/blackfriday") + (synopsis "Markdown processor in Go") + (description "Blackfriday is a Markdown processor in Go.") + (license license:bsd-2))) + +(define-public go-github-com-shurcool-sanitized-anchor-name + (package + (name "go-github-com-shurcool-sanitized-anchor-name") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/shurcooL/sanitized_anchor_name") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1gv9p2nr46z80dnfjsklc6zxbgk96349sdsxjz05f3z6wb6m5l8f")))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/shurcooL/sanitized_anchor_name")) + (home-page "https://github.com/shurcooL/sanitized_anchor_name") + (synopsis "Create sanitized anchor names") + (description "This package provides a Go program for creating sanitized +anchor names.") + (license license:expat))) + +(define-public go-github-com-pmezard-go-difflib + (package + (name "go-github-com-pmezard-go-difflib") + (version "1.0.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/pmezard/go-difflib") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0c1cn55m4rypmscgf0rrb88pn58j3ysvc2d0432dp3c6fqg6cnzw")))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/pmezard/go-difflib/difflib" + #:unpack-path "github.com/pmezard/go-difflib/")) + (home-page "https://github.com/pmezard/go-difflib") + (synopsis "Go diff implementation") + (description "This package provides unified and context-aware diffs in Go.") + (license license:bsd-3))) + (define-public go-github-com-whyrusleeping-json-filter (let ((commit "ff25329a9528f01c5175414f16cc0a6a162a5b8b") (revision "0")) @@ -2862,7 +2963,7 @@ mutex, simply ignore the RLock/RUnlock functions.") (define-public go-github-com-marten-seemann-qtls (package (name "go-github-com-marten-seemann-qtls") - (version "0.2.3") + (version "0.3.2") (source (origin (method git-fetch) (uri (git-reference @@ -2871,7 +2972,7 @@ mutex, simply ignore the RLock/RUnlock functions.") (file-name (git-file-name name version)) (sha256 (base32 - "0b9p7bwkm9hfg1mb565q4nw5k7xyks0z2xagz5fp95azy2psbnfg")))) + "1mdymj66qrqy80pfkwy9s9z9ifkg251whngw5lim09zm90wv2q7a")))) (build-system go-build-system) (arguments '(#:import-path "github.com/marten-seemann/qtls" @@ -2912,7 +3013,7 @@ implementation of generics.") (define-public go-github-com-lucas-clemente-quic-go (package (name "go-github-com-lucas-clemente-quic-go") - (version "0.11.2") + (version "0.12.1") (source (origin (method git-fetch) (uri (git-reference @@ -2921,7 +3022,7 @@ implementation of generics.") (file-name (git-file-name name version)) (sha256 (base32 - "0gqm5mc8alg84ra7yxach34il1jvcij8f76qdqcahnd3d2nhjbia")))) + "156nhq4dvw7mr08j952248v81q7702phbn4mp228319sahnbv65h")))) (build-system go-build-system) (arguments '(#:import-path "github.com/lucas-clemente/quic-go" @@ -2930,7 +3031,8 @@ implementation of generics.") (propagated-inputs `(("go-golang-org-x-crypto" ,go-golang-org-x-crypto) ("go-github-com-cheekybits-genny" ,go-github-com-cheekybits-genny) - ("go-github-com-marten-seemann-qtls" ,go-github-com-marten-seemann-qtls))) + ("go-github-com-marten-seemann-qtls" ,go-github-com-marten-seemann-qtls) + ("go-github-com-golang-protobuf-proto" ,go-github-com-golang-protobuf-proto))) (synopsis "QUIC in Go") (description "This package provides a Go language implementation of the QUIC network protocol.") @@ -2938,28 +3040,26 @@ network protocol.") (license license:expat))) (define-public go-github-com-pkg-errors - (let ((commit "27936f6d90f9c8e1145f11ed52ffffbfdb9e0af7") - (revision "0")) - (package - (name "go-github-com-pkg-errors") - (version (git-version "0.8.1" revision commit)) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/pkg/errors.git") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "0yzmgi6g4ak4q8y7w6x0n5cbinlcn8yc3gwgzy4yck00qdn25d6y")))) - (build-system go-build-system) - (arguments - `(#:import-path "github.com/pkg/errors")) - (synopsis "Go error handling primitives") - (description "This package provides @code{error}, which offers simple + (package + (name "go-github-com-pkg-errors") + (version "0.9.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/pkg/errors.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1hlivqlcnm9wrj0v7h43gamw7mvg6svz9sm31fx28zn4ll25ablh")))) + (build-system go-build-system) + (arguments + `(#:import-path "github.com/pkg/errors")) + (synopsis "Go error handling primitives") + (description "This package provides @code{error}, which offers simple error handling primitives in Go.") - (home-page "https://github.com/pkg/errors") - (license license:bsd-2)))) + (home-page "https://github.com/pkg/errors") + (license license:bsd-2))) (define-public go-github-com-maruel-panicparse (package @@ -3077,3 +3177,175 @@ alternative to @code{reflect.DeepEqual} for comparing whether two values are semantically equal in Go (for writing tests).") (home-page "https://godoc.org/github.com/google/go-cmp/cmp") (license license:asl2.0))) + +(define-public go-golang.org-x-sync-errgroup + (let ((commit "cd5d95a43a6e21273425c7ae415d3df9ea832eeb") + (revision "0")) + (package + (name "go-golang.org-x-sync-errgroup") + (version (git-version "0.0.0" revision commit)) + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://go.googlesource.com/sync") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1nqkyz2y1qvqcma52ijh02s8aiqmkfb95j08f6zcjhbga3ds6hds")))) + (build-system go-build-system) + (arguments + '(#:import-path "golang.org/x/sync/errgroup" + #:unpack-path "golang.org/x/sync")) + (synopsis "Synchronization, error propagation, and Context cancelation +for groups of goroutines working on subtasks of a common task.") + (description "This package provides synchronization, error propagation, +and Context cancelation for groups of goroutines working on subtasks of a +common task.") + (home-page "https://godoc.org/golang.org/x/sync/errgroup") + (license license:bsd-3)))) + +(define (go-gotest-tools-source version sha256-base32-hash) + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/gotestyourself/gotest.tools.git") + (commit (string-append "v" version)))) + (file-name (git-file-name "go-gotest-tools" version)) + (sha256 + (base32 sha256-base32-hash)))) + +;; Note that version 3.0.0 is incompatible to 2.3.0. +;; See also <https://github.com/gotestyourself/gotest.tools/issues/166>. +(define (go-gotest-tools-package suffix) + (package + (name (string-append "go-gotest-tools-" + (string-replace-substring suffix "/" "-"))) + (version "2.3.0") + (source + (go-gotest-tools-source version + "0071rjxp4xzcr3vprkaj1hdk35a3v45bx8v0ipk16wwc5hx84i2i")) + (build-system go-build-system) + (arguments + `(#:import-path ,(string-append "gotest.tools/" suffix) + #:unpack-path "gotest.tools")) + (synopsis "@code{gotest-tools} part") + (description "This package provides a part of @code{gotest-tools}.") + (home-page "https://github.com/gotestyourself/gotest.tools") + (license license:asl2.0))) + +(define-public go-gotest-tools-internal-format + (package (inherit (go-gotest-tools-package "internal/format")) + (native-inputs + `(("go-github-com-pkg-errors" ,go-github-com-pkg-errors) + ("go-github-com-google-go-cmp-cmp" + ,go-github-com-google-go-cmp-cmp))) + (synopsis "Formats messages for use with gotest-tools") + (description "This package provides a way to format messages for use +with gotest-tools."))) + +(define-public go-gotest-tools-internal-difflib + (package (inherit (go-gotest-tools-package "internal/difflib")) + (synopsis "Differences for use with gotest-tools") + (description "This package computes differences for use +with gotest-tools."))) + +(define-public go-gotest-tools-internal-source + (package (inherit (go-gotest-tools-package "internal/source")) + (native-inputs + `(("go-github-com-pkg-errors" ,go-github-com-pkg-errors) + ("go-github-com-google-go-cmp-cmp" ,go-github-com-google-go-cmp-cmp))) + (synopsis "Source code AST formatters for gotest-tools") + (description "This package provides source code AST formatters for +gotest-tools."))) + +(define-public go-gotest-tools-assert + (package (inherit (go-gotest-tools-package "assert")) + (name "go-gotest-tools-assert") + (arguments + `(#:tests? #f ; Test failure concerning message formatting (FIXME) + #:import-path "gotest.tools/assert" + #:unpack-path "gotest.tools")) + ;(propagated-inputs + ; `(("go-gotest-tools-internal-format" ,go-gotest-tools-internal-format))) + (native-inputs + `(("go-github-com-pkg-errors" ,go-github-com-pkg-errors) + ("go-github-com-google-go-cmp-cmp" + ,go-github-com-google-go-cmp-cmp))) + (synopsis "Compare values and fail a test when a comparison fails") + (description "This package provides a way to compare values and fail a +test when a comparison fails.") + (home-page "https://github.com/gotestyourself/gotest.tools") + (license license:asl2.0))) + +(define-public gotestsum + (package + (name "gotestsum") + (version "0.4.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/gotestyourself/gotestsum.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0y71qr3ss3hgc8c7nmvpwk946xy1jc5d8whsv6y77wb24ncla7n0")))) + (build-system go-build-system) + (arguments + '(#:import-path "gotest.tools/gotestsum")) + (native-inputs + `(("go-github-com-fatih-color" ,go-github-com-fatih-color) + ("go-golang.org-x-sync-errgroup" ,go-golang.org-x-sync-errgroup) + ("go-github-com-pkg-errors" ,go-github-com-pkg-errors) + ("go-github-com-sirupsen-logrus" + ,go-github-com-sirupsen-logrus) + ("go-github-com-spf13-pflag" ,go-github-com-spf13-pflag) + ("go-github-com-jonboulle-clockwork" + ,go-github-com-jonboulle-clockwork) + ("go-golang-org-x-crypto" ,go-golang-org-x-crypto) + ("go-gotest-tools-assert" ,go-gotest-tools-assert) + ("go-github-com-google-go-cmp-cmp" + ,go-github-com-google-go-cmp-cmp) + ;; TODO: This would be better as a propagated-input of + ;; go-gotest-tools-assert, but that does not work for + ;; some reason. + ("go-gotest-tools-internal-format" + ,go-gotest-tools-internal-format) + ("go-gotest-tools-internal-difflib" + ,go-gotest-tools-internal-difflib) + ("go-gotest-tools-internal-source" + ,go-gotest-tools-internal-source) + ("go-github-com-google-go-cmp-cmp" + ,go-github-com-google-go-cmp-cmp))) + (synopsis "Go test runner with output optimized for humans") + (description "This package provides a @code{go test} runner with output +optimized for humans, JUnit XML for CI integration, and a summary of the +test results.") + (home-page "https://github.com/gotestyourself/gotestsum") + (license license:asl2.0))) + +(define-public go-github-com-golang-protobuf-proto + (package + (name "go-github-com-golang-protobuf-proto") + (version "1.3.1") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/golang/protobuf.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "15am4s4646qy6iv0g3kkqq52rzykqjhm4bf08dk0fy2r58knpsyl")))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/golang/protobuf/proto" + #:unpack-path "github.com/golang/protobuf" + ;; Requires unpackaged golang.org/x/sync/errgroup + #:tests? #f)) + (synopsis "Go support for Protocol Buffers") + (description "This package provides Go support for the Protocol Buffers +data serialization format.") + (home-page "https://github.com/golang/protobuf") + (license license:bsd-3))) diff --git a/gnu/packages/gpodder.scm b/gnu/packages/gpodder.scm index 040793b4f6..8e7c961929 100644 --- a/gnu/packages/gpodder.scm +++ b/gnu/packages/gpodder.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2019 Pierre Langlois <pierre.langlois@gmx.com> +;;; Copyright © 2019, 2020 Pierre Langlois <pierre.langlois@gmx.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -37,7 +37,7 @@ (define-public gpodder (package (name "gpodder") - (version "3.10.11") + (version "3.10.13") (source (origin (method git-fetch) @@ -46,7 +46,7 @@ (commit version))) (sha256 (base32 - "15f5z3cnch9lpzbz73l4wjykv9n74y8djz5db53la2ql4ihaxfz9")) + "1h542syaxsx1hslfzlk3fx1nbp190zjw35kigw7a1kx1jwvfwapg")) (file-name (git-file-name name version)))) (build-system python-build-system) (native-inputs diff --git a/gnu/packages/graph.scm b/gnu/packages/graph.scm index 982def62c6..7b51a4fd90 100644 --- a/gnu/packages/graph.scm +++ b/gnu/packages/graph.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2019 Andreas Enge <andreas@enge.fr> +;;; Copyright © 2020 Alexander Krotov <krotov@iitp.ru> ;;; ;;; This file is part of GNU Guix. ;;; @@ -38,6 +39,7 @@ #:use-module (gnu packages check) #:use-module (gnu packages compression) #:use-module (gnu packages cran) + #:use-module (gnu packages gd) #:use-module (gnu packages graphviz) #:use-module (gnu packages maths) #:use-module (gnu packages multiprecision) @@ -501,3 +503,30 @@ isolating planarity obstructions.") (description "rw computes rank-width and rank-decompositions of graphs.") (license license:gpl2+))) + +(define-public mscgen + (package + (name "mscgen") + (version "0.20") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.mcternan.me.uk/mscgen/software/mscgen-src-" + version ".tar.gz")) + (sha256 + (base32 + "08yw3maxhn5fl1lff81gmcrpa4j9aas4mmby1g9w5qcr0np82d1w")))) + (build-system gnu-build-system) + (inputs + `(("gd" ,gd))) + (home-page "http://www.mcternan.me.uk/mscgen/") + (synopsis "Message Sequence Chart Generator") + (description "Mscgen is a small program that parses Message Sequence Chart +descriptions and produces PNG, SVG, EPS or server side image maps (ismaps) as +the output. Message Sequence Charts (MSCs) are a way of representing entities +and interactions over some time period and are often used in combination with +SDL. MSCs are popular in Telecoms to specify how protocols operate although +MSCs need not be complicated to create or use. Mscgen aims to provide a simple +text language that is clear to create, edit and understand, which can also be +transformed into common image formats for display or printing.") + (license license:gpl2+))) diff --git a/gnu/packages/graphics.scm b/gnu/packages/graphics.scm index 8091afaf0a..e09981dda0 100644 --- a/gnu/packages/graphics.scm +++ b/gnu/packages/graphics.scm @@ -16,7 +16,7 @@ ;;; Copyright © 2019 Steve Sprang <scs@stevesprang.com> ;;; Copyright © 2019 John Soo <jsoo1@asu.edu> ;;; Copyright © 2019 Pierre Neidhardt <mail@ambrevar.xyz> -;;; Copyright © 2019 Marius Bakke <mbakke@fastmail.com> +;;; Copyright © 2019, 2020 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2019 Tanguy Le Carrour <tanguy@bioneland.org> ;;; ;;; This file is part of GNU Guix. @@ -330,7 +330,7 @@ many more.") (define-public ilmbase (package (name "ilmbase") - (version "2.4.0") + (version "2.4.1") (source (origin (method git-fetch) (uri (git-reference @@ -339,7 +339,7 @@ many more.") (file-name (git-file-name "ilmbase" version)) (sha256 (base32 - "0g3rz11cvb7gnphp2np9z7bfl7v4dprq4w5hnsvx7yrasgsdyn8s")) + "020gyl8zv83ag6gbcchmqiyx9rh2jca7j8n52zx1gk4rck7kwc01")) (patches (search-patches "ilmbase-fix-tests.patch" "ilmbase-openexr-pkg-config.patch")))) (build-system cmake-build-system) @@ -854,7 +854,7 @@ exec -a \"$0\" ~a/.brdf-real~%" ("glew" ,glew) ("freeglut" ,freeglut) ("zlib" ,zlib))) - (home-page "http://www.disneyanimation.com/technology/brdf.html") + (home-page "https://www.disneyanimation.com/technology/brdf.html") (synopsis "Analyze bidirectional reflectance distribution functions (BRDFs)") (description @@ -1061,7 +1061,10 @@ requirements.") (native-inputs `(("xorg-server" ,xorg-server-for-tests))) (inputs - `(("glew" ,glew) + `(;; The test suite fails when using Mesa 19.3.2, so we provide this newer + ;; version. Remove this input when the 'mesa' package is updated. + ("mesa" ,mesa-19.3.3) + ("glew" ,glew) ("libxrandr" ,libxrandr) ("libxcursor" ,libxcursor) ("libxinerama" ,libxinerama) diff --git a/gnu/packages/gstreamer.scm b/gnu/packages/gstreamer.scm index 2854945d78..93149e370e 100644 --- a/gnu/packages/gstreamer.scm +++ b/gnu/packages/gstreamer.scm @@ -8,6 +8,7 @@ ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019, 2020 Marius Bakke <mbakke@fastmail.com> +;;; Copyright © 2020 Leo Prikler <leo.prikler@student.tugraz.at> ;;; ;;; This file is part of GNU Guix. ;;; @@ -476,6 +477,39 @@ distribution problems in some jurisdictions, e.g. due to patent threats.") compression formats through the use of the libav library.") (license license:gpl2+))) +(define-public gst-editing-services + (package + (name "gst-editing-services") + (version "1.16.2") + (source (origin + (method url-fetch) + (uri (string-append + "https://gstreamer.freedesktop.org/src/" name "/" + "gstreamer-editing-services-" version ".tar.xz")) + (sha256 + (base32 + "05hcf3prna8ajjnqd53221gj9syarrrjbgvjcbhicv0c38csc1hf")))) + (build-system meson-build-system) + (arguments + ;; FIXME: 16/22 failing tests. + `(#:tests? #f)) + (inputs + `(("gst-plugins-base" ,gst-plugins-base) + ("libxml2" ,libxml2))) + (native-inputs + `(("flex" ,flex) + ("gst-plugins-bad" ,gst-plugins-bad) + ("gst-plugins-good" ,gst-plugins-good) + ("perl" ,perl) + ("pkg-config" ,pkg-config) + ("python" ,python))) + (home-page "https://gstreamer.freedesktop.org/") + (synopsis "GStreamer library for non-linear editors") + (description + "This is a high-level library for facilitating the creation of audio/video +non-linear editors.") + (license license:gpl2+))) + (define-public python-gst (package (name "python-gst") diff --git a/gnu/packages/ham-radio.scm b/gnu/packages/ham-radio.scm index 6b3f68cd7d..376191af54 100644 --- a/gnu/packages/ham-radio.scm +++ b/gnu/packages/ham-radio.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net> -;;; Copyright © 2019 Evan Straw <evan.straw99@gmail.com> +;;; Copyright © 2019, 2020 Evan Straw <evan.straw99@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -22,6 +22,8 @@ #:use-module (guix packages) #:use-module (guix download) #:use-module (guix git-download) + #:use-module (gnu packages autotools) + #:use-module (gnu packages base) #:use-module (gnu packages gtk) #:use-module (gnu packages image) #:use-module (gnu packages libusb) @@ -29,6 +31,7 @@ #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) #:use-module (gnu packages python-xyz) + #:use-module (gnu packages sdr) #:use-module (gnu packages xml) #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) @@ -127,3 +130,49 @@ satellites, the POES NOAA weather satellite series. These transmissions are on a frequency of 137 MHz. They can be received using an inexpensive antenna and a dedicated receiver.") (license license:gpl2+))) + +(define-public redsea + (package + (name "redsea") + (version "0.18") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/windytan/redsea") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1y96g0ra2krjb2kypm8s5gdfia45yci4f36klsvyzg8d53v5cwhn")))) + (build-system gnu-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + ;; The configure.ac file does not explicitly link against libiconv + ;; except on Mac OS, causing the build to fail. This phase comments + ;; out the original AC_SUBST macro (located inside a conditional) and + ;; adds an explicit use of it underneath, so that libiconv is always + ;; linked against. + (add-after 'unpack 'patch-libiconv + (lambda _ + (substitute* "configure.ac" + (("^ +AC_SUBST") + "# AC_SUBST") + (("esac") + "esac\nAC_SUBST([ICONV], [\"-liconv\"])")) + #t))))) + (inputs + `(("libiconv" ,libiconv) + ("libsndfile" ,libsndfile) + ("liquid-dsp" ,liquid-dsp))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake))) + (home-page "https://github.com/windytan/redsea") + (synopsis "Lightweight RDS to JSON decoder") + (description "redsea is a lightweight command-line @dfn{FM Radio Data +System} (FM-RDS) decoder. Redsea can be used with any RTL-SDR USB radio stick +with the rtl_fm tool, or any other @dfn{software-defined radio} (SDR) via +csdr, for example. It can also decode raw ASCII bitstream, the hex format +used by RDS Spy, and audio files containing @dfn{multiplex} signals (MPX).") + (license license:expat))) diff --git a/gnu/packages/haskell-xyz.scm b/gnu/packages/haskell-xyz.scm index af940f02fc..7825963523 100644 --- a/gnu/packages/haskell-xyz.scm +++ b/gnu/packages/haskell-xyz.scm @@ -24,6 +24,7 @@ ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2020 Brett Gilio <brettg@gnu.org> ;;; Copyright © 2020 JoJo <jo@jo.zone> +;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -8165,6 +8166,114 @@ easily work with command-line options.") command line options in Haskell.") (license license:bsd-3))) +(define-public ghc-jira-wiki-markup + (package + (name "ghc-jira-wiki-markup") + (version "1.0.0") + (source + (origin + (method url-fetch) + (uri (string-append + "https://hackage.haskell.org/package/jira-wiki-markup/" + "jira-wiki-markup-" version ".tar.gz")) + (sha256 + (base32 "1sl2jjcsqg61si33mxjwpf8zdn56kbbgcwqqqzbgifx2qbv4wmf8")))) + (build-system haskell-build-system) + (native-inputs + `(("ghc-tasty" ,ghc-tasty) + ("ghc-tasty-hunit" ,ghc-tasty-hunit))) + (home-page "https://github.com/tarleb/jira-wiki-markup") + (synopsis "Handle Jira wiki markup") + (description + "Parse jira wiki text into an abstract syntax tree for easy transformation +to other formats.") + (license license:expat))) + +(define-public ghc-emojis + (package + (name "ghc-emojis") + (version "0.1") + (source + (origin + (method url-fetch) + (uri (string-append + "https://hackage.haskell.org/package/emojis/" + "emojis-" version ".tar.gz")) + (sha256 + (base32 "1c6zkj9gmk1y90gbdrn50hyp7mw1mggzhnr2khqd728ryipw60ss")))) + (build-system haskell-build-system) + (native-inputs + `(("ghc-hunit" ,ghc-hunit))) + (home-page "https://github.com/jgm/emojis#readme") + (synopsis "Conversion between emoji characters and their names.") + (description + "This package provides functions for converting emoji names to emoji +characters and vice versa. + +How does it differ from the @code{emoji} package? +@itemize +@item It supports a fuller range of emojis, including all those supported by +GitHub +@item It supports lookup of emoji aliases from emoji +@item It uses Text rather than String +@item It has a lighter dependency footprint: in particular, it does not +require aeson +@item It does not require TemplateHaskell +@end itemize") + (license license:bsd-3))) + +(define-public ghc-text-conversions + (package + (name "ghc-text-conversions") + (version "0.3.0") + (source + (origin + (method url-fetch) + (uri (string-append + "https://hackage.haskell.org/package/text-conversions/" + "text-conversions-" version ".tar.gz")) + (sha256 + (base32 "089c56vdj9xysqfr1hnvbnrghlg83q6w10xk02gflpsidcpvwmhp")))) + (build-system haskell-build-system) + (inputs + `(("ghc-base16-bytestring" ,ghc-base16-bytestring) + ("ghc-base64-bytestring" ,ghc-base64-bytestring) + ("ghc-errors" ,ghc-errors))) + (native-inputs + `(("ghc-hspec" ,ghc-hspec) + ("hspec-discover" ,hspec-discover))) + (home-page "https://github.com/cjdev/text-conversions#readme") + (synopsis "Safe conversions between textual types") + (description "Safe conversions between textual types") + (license license:isc))) + +(define-public ghc-doclayout + (package + (name "ghc-doclayout") + (version "0.3") + (source + (origin + (method url-fetch) + (uri (string-append + "https://hackage.haskell.org/package/doclayout/" + "doclayout-" version ".tar.gz")) + (sha256 + (base32 "1wmnwq28jcyd6c80srivsnd5znmyl9sgmwwnlk2crwiiwqadbal7")))) + (build-system haskell-build-system) + (inputs + `(("ghc-safe" ,ghc-safe))) + (native-inputs + `(("ghc-tasty" ,ghc-tasty) + ("ghc-tasty-golden" ,ghc-tasty-golden) + ("ghc-tasty-hunit" ,ghc-tasty-hunit))) + (home-page "https://github.com/jgm/doclayout") + (synopsis "Pretty-printing library for laying out text documents") + (description + "doclayout is a pretty-printing library for laying out text documents, +with several features not present in pretty-printing libraries designed for +code. It was designed for use in @code{Pandoc}.") + (license license:bsd-3))) + (define-public ghc-pandoc (package (name "ghc-pandoc") diff --git a/gnu/packages/i2p.scm b/gnu/packages/i2p.scm index f8c3f3bb5c..a317cd590c 100644 --- a/gnu/packages/i2p.scm +++ b/gnu/packages/i2p.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; ;;; This file is part of GNU Guix. ;;; diff --git a/gnu/packages/kde-internet.scm b/gnu/packages/kde-internet.scm index 4b0504ca5c..0d5b9788b8 100644 --- a/gnu/packages/kde-internet.scm +++ b/gnu/packages/kde-internet.scm @@ -100,7 +100,7 @@ microblogging services. Other notable features include: @itemize @item Support for user + friends time-lines. -@item Support for @Reply time-lines. +@item Support for @@Reply time-lines. @item Support for sending and receiving direct messages. @item Twitpic.com integration. @item The ability to use multiple accounts simultaneously. diff --git a/gnu/packages/libreoffice.scm b/gnu/packages/libreoffice.scm index fe0f3e6382..c91d5fe031 100644 --- a/gnu/packages/libreoffice.scm +++ b/gnu/packages/libreoffice.scm @@ -41,6 +41,7 @@ #:use-module (guix utils) #:use-module (ice-9 match) #:use-module (gnu packages) + #:use-module (gnu packages aidc) #:use-module (gnu packages autotools) #:use-module (gnu packages base) #:use-module (gnu packages bison) @@ -67,6 +68,7 @@ #:use-module (gnu packages image) #:use-module (gnu packages java) #:use-module (gnu packages linux) + #:use-module (gnu packages logging) #:use-module (gnu packages maths) #:use-module (gnu packages nss) #:use-module (gnu packages openldap) @@ -85,7 +87,7 @@ (define-public ixion (package (name "ixion") - (version "0.14.1") + (version "0.15.0") (source (origin (method url-fetch) @@ -93,13 +95,14 @@ version ".tar.xz")) (sha256 (base32 - "14gdd6div4l22vnz3jn2qjxgjly98ck6p8c1v7386c41rx7kilba")))) + "1rmrl2zjzi4z0abf2cd54acypkccdhx2065dlyzy6xg83gv0mxmi")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) (inputs `(("mdds" ,mdds) - ("python" ,python))) + ("python" ,python) + ("spdlog" ,spdlog))) (home-page "https://gitlab.com/ixion/ixion") (synopsis "General purpose formula parser and interpreter") (description "Ixion is a library for calculating the results of formula @@ -111,7 +114,7 @@ their dependencies automatically upon calculation.") (define-public orcus (package (name "orcus") - (version "0.14.1") + (version "0.15.3") (source (origin (method url-fetch) @@ -119,7 +122,7 @@ their dependencies automatically upon calculation.") name "-" version ".tar.xz")) (sha256 (base32 - "1ays13a1x15j81dsrq0d3697v1bbqd3bfz3ajn6kb9d61y2drlgj")))) + "14gbnqsv5n2fm4sxa17014f440clrzls6p2w2ixk9wipg4950v9s")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) @@ -362,14 +365,14 @@ AbiWord documents.") (define-public libcdr (package (name "libcdr") - (version "0.1.5") + (version "0.1.6") (source (origin (method url-fetch) (uri (string-append "https://dev-www.libreoffice.org/src/" name "/" name "-" version ".tar.xz")) (sha256 (base32 - "0j1skr11jwvafn0l6p37v3i4lqc8wcn489g8f7c4mqwbk94mrkka")))) + "0qgqlw6i25zfq1gf7f6r5hrhawlrgh92sg238kjpf2839aq01k81")))) (build-system gnu-build-system) (native-inputs `(("cppunit" ,cppunit) @@ -401,7 +404,7 @@ CorelDRAW documents of all versions.") "0jhsbdimiyijdqriy0zzkjjgc4wi6fjimhdg4mdybrlwg7l7f5p6")))) (build-system gnu-build-system) (arguments - `(#:configure-flags '("--with-mdds=1.4"))) + `(#:configure-flags '("--with-mdds=1.5"))) (native-inputs `(("cppunit" ,cppunit) ("doxygen" ,doxygen) @@ -939,7 +942,7 @@ converting QuarkXPress file format. It supports versions 3.1 to 4.1.") (define-public libreoffice (package (name "libreoffice") - (version "6.3.4.2") + (version "6.4.0.3") (source (origin (method url-fetch) @@ -949,17 +952,7 @@ converting QuarkXPress file format. It supports versions 3.1 to 4.1.") (version-prefix version 3) "/libreoffice-" version ".tar.xz")) (sha256 (base32 - "1774vmf3lr5x24ikpn1z5vqcdwrhiwfkjy7sx09jqkvpm6d5awnb")) - (patches (search-patches "libreoffice-icu.patch" - "libreoffice-glm.patch")) - (modules '((guix build utils))) - (snippet - '(begin - (for-each (lambda (file) - ;; Adjust to renamed function in Poppler 0.72. - (substitute* file (("getCString") "c_str"))) - (find-files "sdext/source/pdfimport/xpdfwrapper")) - #t)))) + "09ra8a3ylb08xhy8wy233fs0f87klkpsbi9n3zss0c688afxjcf5")))) (build-system glib-or-gtk-build-system) (native-inputs `(("bison" ,bison) @@ -1032,6 +1025,7 @@ converting QuarkXPress file format. It supports versions 3.1 to 4.1.") ("postgresql" ,postgresql) ("python" ,python) ("python-lxml" ,python-lxml) + ("qrcodegen-cpp" ,qrcodegen-cpp) ("redland" ,redland) ("sane-backends" ,sane-backends) ("unixodbc" ,unixodbc) diff --git a/gnu/packages/libusb.scm b/gnu/packages/libusb.scm index 1a677a0fb9..5e468a4316 100644 --- a/gnu/packages/libusb.scm +++ b/gnu/packages/libusb.scm @@ -481,24 +481,26 @@ over USB.") (define-public libmtp (package (name "libmtp") - (version "1.1.16") + (version "1.1.17") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/libmtp/libmtp/" version "/libmtp-" version ".tar.gz")) (sha256 (base32 - "185vh9bds6dcy00ycggg69g4v7m3api40zv8vrcfb3fk3vfzjs2v")))) + "1p3r38nvdip40ab1h4scj3mzfjkx6kd14szjqyw9r6wz5pslr8zq")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config))) + (inputs + `(("libgcrypt" ,libgcrypt))) (propagated-inputs ;; libmtp.pc refers to all these. - `(("libgcrypt" ,libgcrypt) - ("libusb" ,libusb))) + `(("libusb" ,libusb))) (arguments `(#:configure-flags - (list (string-append "--with-udev=" + (list "--disable-static" + (string-append "--with-udev=" (assoc-ref %outputs "out") "/lib/udev")))) (home-page "http://libmtp.sourceforge.net/") diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index b3f46c0305..06ef1fa220 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -358,42 +358,42 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS." "linux-" version ".tar.xz")) (sha256 hash))) -(define-public linux-libre-5.4-version "5.4.17") +(define-public linux-libre-5.4-version "5.4.19") (define-public linux-libre-5.4-pristine-source (let ((version linux-libre-5.4-version) - (hash (base32 "1fbl5knf6pini9lsx8mqkdmf3qbsydqvaxggh6nd1vk9mzv2npwl"))) + (hash (base32 "1f3pzg8vai5qz19gy9gf3rxs2z4dsw78zjkkfnha8iiy2mqvk14m"))) (make-linux-libre-source version (%upstream-linux-source version hash) deblob-scripts-5.4))) -(define-public linux-libre-4.19-version "4.19.101") +(define-public linux-libre-4.19-version "4.19.103") (define-public linux-libre-4.19-pristine-source (let ((version linux-libre-4.19-version) - (hash (base32 "1i4bkwankl5q95kgqmmyzdkwmf3b8ppkb8ild9bw12mkpmm1a9my"))) + (hash (base32 "0hxvqkjy63370sr9j4j0a1kzqwxxdn3i8i6wwc5c2gbzpmqlay5l"))) (make-linux-libre-source version (%upstream-linux-source version hash) deblob-scripts-4.19))) -(define-public linux-libre-4.14-version "4.14.169") +(define-public linux-libre-4.14-version "4.14.170") (define-public linux-libre-4.14-pristine-source (let ((version linux-libre-4.14-version) - (hash (base32 "0jc24zvqz3vsv65xxcivzkj6nv27vsy62l50n2h1ysy5jdwsk3nq"))) + (hash (base32 "1hqp3spi4cqgkqkzx5g2nbp6isz0kdcsj56ilsp6siqiglj662ll"))) (make-linux-libre-source version (%upstream-linux-source version hash) deblob-scripts-4.14))) -(define-public linux-libre-4.9-version "4.9.212") +(define-public linux-libre-4.9-version "4.9.213") (define-public linux-libre-4.9-pristine-source (let ((version linux-libre-4.9-version) - (hash (base32 "0c5yjilaq86j6i2hzlxbp2ia7jhnf7kv952ffv7jxdf90sk3irxd"))) + (hash (base32 "0r7bqpvbpiiniwsm338b38mv6flfgm1r09avxqsakhkh8rvgz1dg"))) (make-linux-libre-source version (%upstream-linux-source version hash) deblob-scripts-4.9))) -(define-public linux-libre-4.4-version "4.4.212") +(define-public linux-libre-4.4-version "4.4.213") (define-public linux-libre-4.4-pristine-source (let ((version linux-libre-4.4-version) - (hash (base32 "0mx3qyj6w6h7gw7drsfsgl4iyz1695sjnf9hqh4kczci48kw5rj7"))) + (hash (base32 "1cmwn9zvz14jqjy6qkszglhs2p5h6yh82b2269cbzvibg8y3rxq0"))) (make-linux-libre-source version (%upstream-linux-source version hash) deblob-scripts-4.4))) @@ -1538,7 +1538,7 @@ Zerofree requires the file system to be unmounted or mounted read-only.") (define-public strace (package (name "strace") - (version "5.4") + (version "5.5") (home-page "https://strace.io") (source (origin (method url-fetch) @@ -1546,7 +1546,7 @@ Zerofree requires the file system to be unmounted or mounted read-only.") "/strace-" version ".tar.xz")) (sha256 (base32 - "0hd7sb7l99y9rcj8jjc1b6m3ryds17krsymdg3dvd40jsla0bl7p")))) + "1zrhpzjlgfwfl8dd53llswmmharm5rbi0zch7lln5sjris69an4z")))) (build-system gnu-build-system) (arguments '(#:phases @@ -2840,14 +2840,16 @@ time.") (define-public lvm2 (package (name "lvm2") - (version "2.02.177") + (version "2.03.08") (source (origin (method url-fetch) - (uri (string-append "ftp://sources.redhat.com/pub/lvm2/releases/LVM2." - version ".tgz")) + (uri (list (string-append "ftp://sourceware.org/pub/lvm2/LVM2." + version ".tgz") + (string-append "ftp://sources.redhat.com/pub/lvm2/releases/LVM2." + version ".tgz"))) (sha256 (base32 - "1wl0isn0yz5wvglwylnlqkppafwmvhliq5bd92vjqp5ir4za49a0")) + "1j0yis658564rk1ddabkl8vbavp0fdd10gd6qhgyzc3akzf620kf")) (modules '((guix build utils))) (snippet '(begin @@ -2855,7 +2857,7 @@ time.") ;; Honor sysconfdir. (substitute* "make.tmpl.in" - (("confdir = .*$") + (("^confdir = .*$") "confdir = @sysconfdir@\n") (("DEFAULT_SYS_DIR = @DEFAULT_SYS_DIR@") "DEFAULT_SYS_DIR = @sysconfdir@")) @@ -2866,7 +2868,8 @@ time.") `(("pkg-config" ,pkg-config) ("procps" ,procps))) ;tests use 'pgrep' (inputs - `(("udev" ,eudev))) + `(("libaio" ,libaio) + ("udev" ,eudev))) (arguments `(#:phases (modify-phases %standard-phases @@ -2896,14 +2899,6 @@ time.") "/lib,-rpath=" (assoc-ref %outputs "out") "/lib/device-mapper") - ;; TODO: Patch make.tmpl.in to take LDFLAGS - ;; into account so that we don't need to also - ;; set CLDFLAGS. - (string-append "CLDFLAGS=-Wl,-rpath=" - (assoc-ref %outputs "out") - "/lib,-rpath=" - (assoc-ref %outputs "out") - "/lib/device-mapper") ;; This is needed when cross-compiling. ,@(if (%current-target-system) '("ac_cv_func_malloc_0_nonnull=yes" @@ -2936,7 +2931,26 @@ mapper. Kernel components are part of Linux-libre.") (substitute-keyword-arguments (package-arguments lvm2) ((#:configure-flags flags '()) ;; LVM2 doesn't use Libtool, hence the custom option. - `(cons "--enable-static_link" ,flags)))) + `(append '("--enable-static_link") + ;; Building dmeventd statically is complicated due to a + ;; requirement on libdevmapper.a, which is being phased out + ;; in favor of libdevice-mapper.a, which in turn is is not + ;; easily made available at dmeventd build time. Just ignore + ;; it until the situation improves. + (delete "--enable-dmeventd" ,flags))) + ((#:phases phases) + `(modify-phases ,phases + (add-before 'configure 'adjust-Makefile + (lambda _ + ;; These fixes are related to the upstream libdm->device_mapper + ;; migration and will hopefully be fixed upstream in due time. + (substitute* "tools/Makefile.in" + ;; This variable is empty in a static configuration and causes + ;; an erroneous GCC command line. + (("-L\\$\\(interfacebuilddir\\)") "") + ;; Remove obsolete reference to libdevmapper.a. + (("-ldevmapper") "")) + #t)))))) (synopsis "Logical volume management for Linux (statically linked)"))) (define-public wireless-tools @@ -5258,15 +5272,16 @@ interface in sysfs, which can be accomplished with the included udev rules.") (define-public tlp (package (name "tlp") - (version "1.3.0") + (version "1.3.1") (source (origin - (method url-fetch) - (uri (string-append "https://github.com/linrunner/TLP/archive/" - version ".tar.gz")) - (file-name (string-append name "-" version ".tar.gz")) + (method git-fetch) + (uri (git-reference + (url "https://github.com/linrunner/TLP.git") + (commit version))) + (file-name (git-file-name name version)) (sha256 - (base32 "169k3xypq5rq0xiggrlpr73yr2r2x7b2d9vcr9ac96qrgph7sk7r")))) + (base32 "14fcnaz9pw534v4d8dddqq4wcvpf1kghr8zlrk62r5lrl46sp1p5")))) (native-inputs `(("shellcheck" ,shellcheck))) (inputs diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 737ab6cae9..dbb95ce387 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -16,6 +16,7 @@ ;;; Copyright © 2019 Jesse Gildersleve <jessejohngildersleve@protonmail.com> ;;; Copyright © 2019, 2020 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2019 Brett Gilio <brettg@gnu.org> +;;; Copyright © 2020 Konrad Hinsen <konrad.hinsen@fastmail.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -166,29 +167,27 @@ interactive development model in mind.") (sbcl-package->ecl-package sbcl-fiveam)) (define-public sbcl-bordeaux-threads - (let ((commit "5dce49fbc829f4d136a734f5ef4f5d599660984f") - (revision "1")) - (package - (name "sbcl-bordeaux-threads") - (version (git-version "0.8.6" revision commit)) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/sionescu/bordeaux-threads.git") - (commit commit))) - (sha256 - (base32 "1gkh9rz7zw57n3110ikcf4835950wr4hgp8l79id5ai6nd86x7wv")) - (file-name - (git-file-name "bordeaux-threads" version)))) - (inputs `(("alexandria" ,sbcl-alexandria))) - (native-inputs `(("fiveam" ,sbcl-fiveam))) - (build-system asdf-build-system/sbcl) - (synopsis "Portable shared-state concurrency library for Common Lisp") - (description "BORDEAUX-THREADS is a proposed standard for a minimal + (package + (name "sbcl-bordeaux-threads") + (version "0.8.7") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/sionescu/bordeaux-threads.git") + (commit (string-append "v" version)))) + (sha256 + (base32 "1whpfmyxp2fsw6viqj45fqgsifgr534c575bfh5vaqw5m84b6alp")) + (file-name + (git-file-name "bordeaux-threads" version)))) + (inputs `(("alexandria" ,sbcl-alexandria))) + (native-inputs `(("fiveam" ,sbcl-fiveam))) + (build-system asdf-build-system/sbcl) + (synopsis "Portable shared-state concurrency library for Common Lisp") + (description "BORDEAUX-THREADS is a proposed standard for a minimal MP/Threading interface. It is similar to the CLIM-SYS threading and lock support.") - (home-page "https://common-lisp.net/project/bordeaux-threads/") - (license license:x11)))) + (home-page "https://common-lisp.net/project/bordeaux-threads/") + (license license:x11))) (define-public cl-bordeaux-threads (sbcl-package->cl-source-package sbcl-bordeaux-threads)) @@ -267,7 +266,7 @@ logical continuation of Stefil. It focuses on interactive debugging.") (define-public sbcl-flexi-streams (package (name "sbcl-flexi-streams") - (version "1.0.16") + (version "1.0.18") (source (origin (method git-fetch) @@ -276,7 +275,7 @@ logical continuation of Stefil. It focuses on interactive debugging.") (commit (string-append "v" version)))) (file-name (git-file-name "flexi-streams" version)) (sha256 - (base32 "0gvykjlmja060zqq6nn6aqxlshh6r6ijahmmgf20q0d839rwpgxc")))) + (base32 "0bjv7fd2acknidc5dyi3h85pn10krxv5jyxs1xg8jya2rlfv7f1j")))) (build-system asdf-build-system/sbcl) (arguments `(#:phases @@ -304,7 +303,7 @@ streams which are similar to string streams.") (define-public sbcl-cl-ppcre (package (name "sbcl-cl-ppcre") - (version "2.0.11") + (version "2.1.1") (source (origin (method git-fetch) @@ -313,7 +312,7 @@ streams which are similar to string streams.") (commit (string-append "v" version)))) (file-name (git-file-name "cl-ppcre" version)) (sha256 - (base32 "0q3iany07vgqm144lw6pj0af2d3vsikpbkwcxr30fci3kzsq4f49")))) + (base32 "0dwvr29diqzcg5n6jvbk2rnd90i05l7n828hhw99khmqd0kz7xsi")))) (build-system asdf-build-system/sbcl) (native-inputs `(("flexi-streams" ,sbcl-flexi-streams))) (synopsis "Portable regular expression library for Common Lisp") @@ -330,32 +329,30 @@ compatible with ANSI-compliant Common Lisp implementations.") (sbcl-package->ecl-package sbcl-cl-ppcre)) (define sbcl-cl-unicode-base - (let ((revision "1") - (commit "9fcd06fba1ddc9e66aed2f2d6c32dc9b764f03ea")) - (package - (name "sbcl-cl-unicode-base") - (version (string-append "0.1.5-" revision "." (string-take commit 7))) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/edicl/cl-unicode.git") - (commit commit))) - (file-name (string-append "cl-unicode-" version "-checkout")) - (sha256 - (base32 - "1jicprb5b3bv57dy1kg03572gxkcaqdjhak00426s76g0plmx5ki")))) - (build-system asdf-build-system/sbcl) - (arguments - '(#:asd-file "cl-unicode.asd" - #:asd-system-name "cl-unicode/base")) - (inputs - `(("cl-ppcre" ,sbcl-cl-ppcre))) - (home-page "http://weitz.de/cl-unicode/") - (synopsis "Portable Unicode library for Common Lisp") - (description "CL-UNICODE is a portable Unicode library Common Lisp, which + (package + (name "sbcl-cl-unicode-base") + (version "0.1.6") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/edicl/cl-unicode.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0ykx2s9lqfl74p1px0ik3l2izd1fc9jd1b4ra68s5x34rvjy0hza")))) + (build-system asdf-build-system/sbcl) + (arguments + '(#:asd-file "cl-unicode.asd" + #:asd-system-name "cl-unicode/base")) + (inputs + `(("cl-ppcre" ,sbcl-cl-ppcre))) + (home-page "http://weitz.de/cl-unicode/") + (synopsis "Portable Unicode library for Common Lisp") + (description "CL-UNICODE is a portable Unicode library Common Lisp, which is compatible with perl. It is pretty fast, thread-safe, and compatible with ANSI-compliant Common Lisp implementations.") - (license license:bsd-2)))) + (license license:bsd-2))) (define-public sbcl-cl-unicode (package @@ -629,6 +626,9 @@ from other CLXes around the net.") `(("sbcl-cl-ppcre" ,sbcl-cl-ppcre) ("sbcl-cl-unicode" ,sbcl-cl-unicode))))) +(define-public ecl-cl-ppcre-unicode + (sbcl-package->ecl-package sbcl-cl-ppcre-unicode)) + ;; The slynk that users expect to install includes all of slynk's contrib ;; modules. Therefore, we build the base module and all contribs first; then ;; we expose the union of these as `sbcl-slynk'. The following variable @@ -1417,7 +1417,7 @@ In addition to regular Packrat / Parsing Grammar / TDPL features ESRAP supports: (define-public sbcl-split-sequence (package (name "sbcl-split-sequence") - (version "1.4.1") + (version "2.0.0") (source (origin (method git-fetch) @@ -1426,13 +1426,11 @@ In addition to regular Packrat / Parsing Grammar / TDPL features ESRAP supports: (commit (string-append "v" version)))) (sha256 (base32 - "0c3zp6b7fmmp93sfhq112ind4zkld49ycw68z409xpnz3gc0wpf0")) + "0jcpnx21hkfwqj5fvp7kc6pn1qcz9hk7g2s5x8h0349x1j2irln0")) (file-name (git-file-name "split-sequence" version)))) (build-system asdf-build-system/sbcl) - (arguments - ;; TODO: Tests seem to be broken. - ;; https://github.com/sharplispers/split-sequence/issues/8 - `(#:tests? #f)) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) (synopsis "Member of the Common Lisp Utilities family of programs") (description "Splits sequence into a list of subsequences delimited by objects @@ -1570,7 +1568,7 @@ with @command{colorize} support.")))) (define-public sbcl-cl-fad (package (name "sbcl-cl-fad") - (version "0.7.5") + (version "0.7.6") (source (origin (method git-fetch) @@ -1579,7 +1577,7 @@ with @command{colorize} support.")))) (commit (string-append "v" version)))) (sha256 (base32 - "1l1qmk9z57q84bz5r04sxsksggsnd7dgkxlybzh9imz6ma7sm52m")) + "1gc8i82v6gks7g0lnm54r4prk2mklidv2flm5fvbr0a7rsys0vpa")) (file-name (string-append "cl-fad" version "-checkout")))) (build-system asdf-build-system/sbcl) (inputs @@ -3180,44 +3178,43 @@ Lisp (from GBBopen project).") (define-public ecl-portable-threada (sbcl-package->ecl-package sbcl-portable-threads)) -(define-public sbcl-usocket-boot0 +(define sbcl-usocket-boot0 ;; usocket's test rely on usocket-server which depends on usocket itself. ;; We break this cyclic dependency with -boot0 that packages usocket. - (let ((commit "86e7efbfe50101931edf4b67cdcfa7e221ecfde9")) - (package - (name "sbcl-usocket-boot0") - (version (git-version "0.7.1" "1" commit)) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/usocket/usocket/") - (commit commit))) - (file-name (git-file-name "usocket" version)) - (sha256 - (base32 - "1lk6ipakrib7kdgzw44hrgmls9akp5pz4h35yynw0k5zwmmq6374")))) - (build-system asdf-build-system/sbcl) - (inputs - `(("split-sequence" ,sbcl-split-sequence))) - (arguments - `(#:tests? #f - #:asd-system-name "usocket")) - (home-page "https://common-lisp.net/project/usocket/") - (synopsis "Universal socket library for Common Lisp (server side)") - (description - "This library strives to provide a portable TCP/IP and UDP/IP socket + (package + (name "sbcl-usocket-boot0") + (version "0.8.3") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/usocket/usocket/") + (commit (string-append "v" version)))) + (file-name (git-file-name "usocket" version)) + (sha256 + (base32 + "0x746wr2324l6bn7skqzgkzcbj5kd0zp2ck0c8rldrw0rzabg826")))) + (build-system asdf-build-system/sbcl) + (inputs + `(("split-sequence" ,sbcl-split-sequence))) + (arguments + `(#:tests? #f + #:asd-system-name "usocket")) + (home-page "https://common-lisp.net/project/usocket/") + (synopsis "Universal socket library for Common Lisp (server side)") + (description + "This library strives to provide a portable TCP/IP and UDP/IP socket interface for as many Common Lisp implementations as possible, while keeping the abstraction and portability layer as thin as possible.") - (license license:expat)))) + (license license:expat))) (define-public sbcl-usocket-server (package (inherit sbcl-usocket-boot0) (name "sbcl-usocket-server") (inputs - `(("usocket" ,sbcl-usocket-boot0) - ("portable-threads" ,sbcl-portable-threads))) + `(("bordeaux-threads" ,sbcl-bordeaux-threads) + ("usocket" ,sbcl-usocket-boot0))) (arguments '(#:asd-system-name "usocket-server")) (synopsis "Universal socket library for Common Lisp (server side)"))) @@ -3243,7 +3240,7 @@ the abstraction and portability layer as thin as possible.") (define-public cl-usocket (sbcl-package->cl-source-package sbcl-usocket)) -(define-public ecl-socket +(define-public ecl-usocket (sbcl-package->ecl-package sbcl-usocket)) (define-public sbcl-s-xml @@ -3666,45 +3663,45 @@ the format used by the popular compression tool bzip2.") (sbcl-package->cl-source-package sbcl-chipz)) (define-public sbcl-drakma - (let ((version "2.0.4") - (commit "7647c0ae842ff2058624e53979c7f297760c97a7") - (revision "1")) - (package - (name "sbcl-drakma") - (version (git-version version revision commit)) - (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/edicl/drakma.git") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "1c4i9wakhj5pxfyyykxshdmv3180sbkrx6fcyynikmc0jd0rh84r")))) - (build-system asdf-build-system/sbcl) - (inputs - `(("sbcl-puri" ,sbcl-puri) - ("sbcl-cl-base64" ,sbcl-cl-base64) - ("sbcl-chunga" ,sbcl-chunga) - ("sbcl-flexi-streams" ,sbcl-flexi-streams) - ("sbcl-cl-ppcre" ,sbcl-cl-ppcre) - ("sbcl-chipz" ,sbcl-chipz) - ("sbcl-usocket" ,sbcl-usocket) - ("sbcl-cl+ssl" ,sbcl-cl+ssl))) - (native-inputs - `(("sbcl-fiveam" ,sbcl-fiveam))) - (home-page "https://edicl.github.io/drakma/") - (synopsis "HTTP client written in Common Lisp") - (description - "Drakma is a full-featured HTTP client implemented in Common Lisp. It + (package + (name "sbcl-drakma") + (version "2.0.7") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/edicl/drakma.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1441idnyif9xzx3ln1p3fg36k2v9h4wasjqrzc8y52j61420qpci")))) + (build-system asdf-build-system/sbcl) + (inputs + `(("sbcl-puri" ,sbcl-puri) + ("sbcl-cl-base64" ,sbcl-cl-base64) + ("sbcl-chunga" ,sbcl-chunga) + ("sbcl-flexi-streams" ,sbcl-flexi-streams) + ("sbcl-cl-ppcre" ,sbcl-cl-ppcre) + ("sbcl-chipz" ,sbcl-chipz) + ("sbcl-usocket" ,sbcl-usocket) + ("sbcl-cl+ssl" ,sbcl-cl+ssl))) + (native-inputs + `(("sbcl-fiveam" ,sbcl-fiveam))) + (home-page "https://edicl.github.io/drakma/") + (synopsis "HTTP client written in Common Lisp") + (description + "Drakma is a full-featured HTTP client implemented in Common Lisp. It knows how to handle HTTP/1.1 chunking, persistent connections, re-usable sockets, SSL, continuable uploads, file uploads, cookies, and more.") - (license license:bsd-2)))) + (license license:bsd-2))) (define-public cl-drakma (sbcl-package->cl-source-package sbcl-drakma)) +(define-public ecl-drakma + (sbcl-package->ecl-package sbcl-drakma)) + (define-public sbcl-hunchentoot (package (name "sbcl-hunchentoot") @@ -4105,36 +4102,37 @@ Lisp.") (sbcl-package->cl-source-package sbcl-fast-http)) (define-public sbcl-static-vectors - (let ((commit "0681eac1f49370cde03e64b077251e8abf47d702") - (revision "1")) - (package - (name "sbcl-static-vectors") - (version (git-version "1.8.3" revision commit)) - (source - (origin + (package + (name "sbcl-static-vectors") + (version "1.8.4") + (source + (origin (method git-fetch) (uri (git-reference (url "https://github.com/sionescu/static-vectors.git") - (commit commit))) + (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "138nlsq14hv8785ycjm6jw3i6ablhq8vcwys7q09y80arcgrg6r3")))) - (native-inputs - `(("sbcl-fiveam" ,sbcl-fiveam))) - (inputs - `(("sbcl-cffi-grovel" ,sbcl-cffi-grovel) - ("sbcl-cffi" ,sbcl-cffi))) - (build-system asdf-build-system/sbcl) - (home-page "http://common-lisp.net/projects/iolib/") - (synopsis "Allocate SIMPLE-ARRAYs in static memory") - (description - "With @code{static-vectors}, you can create vectors allocated in static + (base32 "0qvf9z6bhwhm8n45fjwkm7j8dcb58szfvndky65cyn4lpdval7m1")))) + (native-inputs + `(("sbcl-fiveam" ,sbcl-fiveam))) + (inputs + `(("sbcl-cffi-grovel" ,sbcl-cffi-grovel) + ("sbcl-cffi" ,sbcl-cffi))) + (build-system asdf-build-system/sbcl) + (home-page "https://github.com/sionescu/static-vectors") + (synopsis "Allocate SIMPLE-ARRAYs in static memory") + (description + "With @code{static-vectors}, you can create vectors allocated in static memory.") - (license license:expat)))) + (license license:expat))) (define-public cl-static-vectors (sbcl-package->cl-source-package sbcl-static-vectors)) +(define-public ecl-static-vectors + (sbcl-package->ecl-package sbcl-static-vectors)) + (define-public sbcl-marshal (let ((commit "eff1b15f2b0af2f26f71ad6a4dd5c4beab9299ec") (revision "1")) @@ -5225,7 +5223,7 @@ decoding routines for IDNA, the International Domain Names in Applications.") (package (name "sbcl-swap-bytes") (build-system asdf-build-system/sbcl) - (version "1.1") + (version "1.2") (home-page "https://github.com/sionescu/swap-bytes") (source (origin @@ -5236,14 +5234,11 @@ decoding routines for IDNA, the International Domain Names in Applications.") (file-name (git-file-name name version)) (sha256 (base32 - "1qysbv0jngdfkv53y874qjhcxc4qi8ixaqq6j8bzxh5z0931wv55")))) + "1hw1v1lw26rifyznpnj1csphha9jgzwpiic16ni3pvs6hcsni9rz")))) (inputs `(("trivial-features" ,sbcl-trivial-features))) (native-inputs `(("fiveam" ,sbcl-fiveam))) - (arguments - ;; TODO: Tests fail, why? - `(#:tests? #f)) (synopsis "Efficient endianness conversion for Common Lisp") (description "This Common Lisp library provides optimized byte-swapping primitives. The library can change endianness of unsigned integers of length @@ -5970,6 +5965,42 @@ This package uses fare-quasiquote with named-readtable."))) (sbcl-package->cl-source-package sbcl-fare-quasiquote-readtable)) ;; TODO: Add support for component-less system in asdf-build-system/sbcl. +(define-public sbcl-fare-quasiquote-extras + (package + (inherit sbcl-fare-quasiquote) + (name "sbcl-fare-quasiquote-extras") + (build-system asdf-build-system/sbcl) + (inputs + `(("fare-quasiquote-optima" ,sbcl-fare-quasiquote-optima) + ("fare-quasiquote-readtable" ,sbcl-fare-quasiquote-readtable))) + (arguments + `(#:phases + (modify-phases %standard-phases + (replace 'build + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (lib (string-append out "/lib/" (%lisp-type)))) + (mkdir-p lib) + (install-file "fare-quasiquote-extras.asd" lib) + #t))) + (add-after 'create-asd-file 'fix-asd-file + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (lib (string-append out "/lib/" (%lisp-type))) + (asd (string-append lib "/fare-quasiquote-extras.asd"))) + (substitute* asd + ((":class") + "") + (("asdf/bundle:prebuilt-system") + "") + ((":components") + "") + (("\\(\\(:compiled-file \"fare-quasiquote-extras--system\"\\)\\)") + ""))) + #t))))) + (description "This library combines @code{fare-quasiquote-readtable} and +@code{fare-quasiquote-optima}."))) + (define-public cl-fare-quasiquote-extras (package (inherit cl-fare-quasiquote) @@ -5983,7 +6014,7 @@ This package uses fare-quasiquote with named-readtable."))) @code{fare-quasiquote-optima}."))) (define-public sbcl-trivia.level0 - (let ((commit "902e0c65602bbfe96ae82e679330b3771ddc7603") + (let ((commit "574901ac376ae54c9d37169fd5efab9b3b8fcc63") (revision "1")) (package (name "sbcl-trivia.level0") @@ -5999,7 +6030,7 @@ This package uses fare-quasiquote with named-readtable."))) (file-name (git-file-name name version)) (sha256 (base32 - "11qbab30qqnfy9mx3x9fvgcw1jbvh1qn2cqv3p8xdn2m8981jvhr")))) + "0hf53n71xzr9sjwrxis5fivx3drclf4s39h5ck8vh21ndqj9zvdk")))) (inputs `(("alexandria" ,sbcl-alexandria))) (synopsis "Pattern matching in Common Lisp") @@ -6877,8 +6908,8 @@ compression/decompression using bindings to the lzlib C library.") (sbcl-package->ecl-package sbcl-lzlib)) (define-public sbcl-chanl - (let ((commit "2362b57550c2c9238cc882d03553aaa1040b7340") - (revision "0")) + (let ((commit "56e90a126c78b39bb621a01585e8d3b985238e8c") + (revision "1")) (package (name "sbcl-chanl") (version (git-version "0.4.1" revision commit)) @@ -6891,7 +6922,7 @@ compression/decompression using bindings to the lzlib C library.") (file-name (git-file-name name version)) (sha256 (base32 - "0ag3wz7yrqwp0s5069wwda98z3rrqd25spg8sa8rdqghj084w28w")))) + "0b1cf6c12qx5cy1fw2z42jgh566rp3l8nv5qf0qqc569s7bgmrh4")))) (build-system asdf-build-system/sbcl) (native-inputs `(("fiveam" ,sbcl-fiveam))) @@ -6909,26 +6940,7 @@ threads.") (sbcl-package->cl-source-package sbcl-chanl)) (define-public ecl-chanl - (let ((base (sbcl-package->ecl-package sbcl-chanl))) - (package - (inherit base) - (arguments - (substitute-keyword-arguments (package-arguments base) - ;; The CHANL.ACTORS package uses the :ARGUMENTS option of - ;; DEFINE-METHOD-COMBINATION, which is not implemented in ECL yet - ;; (see https://gitlab.com/embeddable-common-lisp/ecl/issues/305). - ;; So let's disable it for now, as it allows compiling the library - ;; and using the rest of it. - ((#:phases phases '%standard-phases) - `(modify-phases ,phases - (add-after 'unpack 'disable-chanl-actors - (lambda _ - (substitute* "chanl.asd" - (("\\(:file \"actors\"\\)") "")) - #t)))) - ;; Disable the tests for now, as the SEND-SEQUENCE test seems to - ;; never end. - ((#:tests? _ #f) #f)))))) + (sbcl-package->ecl-package sbcl-chanl)) (define-public sbcl-cl-store (let ((commit "c787337a16ea8cf8a06227f35933a4ec774746b3") @@ -7181,7 +7193,7 @@ implementation specific equivalent.") ("trivial-garbage" ,sbcl-trivial-garbage) ("bordeaux-threads" ,sbcl-bordeaux-threads) ("named-readtables" ,sbcl-named-readtables) - ("fare-quasiquote-extras" ,cl-fare-quasiquote-extras) + ("fare-quasiquote-extras" ,sbcl-fare-quasiquote-extras) ("parse-declarations-1.0" ,sbcl-parse-declarations) ("global-vars" ,sbcl-global-vars) ("trivial-file-size" ,sbcl-trivial-file-size) @@ -7543,6 +7555,9 @@ docstrings for your library.") (define-public cl-documentation-utils (sbcl-package->cl-source-package sbcl-documentation-utils)) +(define-public ecl-documentation-utils + (sbcl-package->ecl-package sbcl-documentation-utils)) + (define-public sbcl-form-fiddle (let ((commit "e0c23599dbb8cff3e83e012f3d86d0764188ad18") (revision "0")) @@ -10163,3 +10178,415 @@ them as PNG files.") (define-public ecl-cl-qrencode (sbcl-package->ecl-package sbcl-cl-qrencode)) + +(define-public sbcl-hdf5-cffi + (let ((commit "5b5c88f191e470e4fe96b462334e3ce0806eed5c") + (revision "1")) + (package + (name "sbcl-hdf5-cffi") + (version (git-version "1.8.18" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/hdfgroup/hdf5-cffi.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0vda3075423xz83qky998lpac5b04dwfv7bwgh9jq8cs5v0zrxjf")))) + (build-system asdf-build-system/sbcl) + (synopsis "Common Lisp bindings for the HDF5 library") + (description + "@code{hdf5-cffi} is a CFFI wrapper for the HDF5 library.") + (home-page "https://github.com/hdfgroup/hdf5-cffi") + (license (license:non-copyleft + (string-append "https://github.com/HDFGroup/hdf5-cffi/raw/" + commit + "/LICENSE"))) + (inputs + `(("cffi" ,sbcl-cffi) + ("cffi-grovel" ,sbcl-cffi-grovel) + ("hdf5" ,hdf5-1.10))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "hdf5-cffi" + #:asd-file "hdf5-cffi.asd" + #:test-asd-file "hdf5-cffi.test.asd" + ;; Tests depend on hdf5-cffi.examples.asd in addition to hdf5-cffi.asd, + ;; I don't know if there is a way to tell asdf-build-system to load + ;; an additional system first, so tests are disabled. + #:tests? #f + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-paths + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "src/library.lisp" + (("libhdf5.so") + (string-append + (assoc-ref inputs "hdf5") + "/lib/libhdf5.so"))))) + (add-after 'unpack 'fix-dependencies + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "hdf5-cffi.asd" + ((":depends-on \\(:cffi\\)") + ":depends-on (:cffi :cffi-grovel)")) + (substitute* "hdf5-cffi.test.asd" + ((":depends-on \\(:cffi :hdf5-cffi") + ":depends-on (:cffi :cffi-grovel :hdf5-cffi")))))))))) + +(define-public cl-hdf5-cffi + (sbcl-package->cl-source-package sbcl-hdf5-cffi)) + +(define-public ecl-hdf5-cffi + (sbcl-package->ecl-package sbcl-hdf5-cffi)) + +(define-public sbcl-cl-randist + (package + (name "sbcl-cl-randist") + (version "0.4.2") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/lvaruzza/cl-randist.git") + (commit "f088a54b540a7adefab7c04094a6103f9edda3d0"))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0l8hyd6nbxb7f50vyxz3rbbm7kgr1fnadc40jywy4xj5vi5kpj5g")))) + (build-system asdf-build-system/sbcl) + (synopsis "Random distributions for Common Lisp") + (description + "Manual translation from C to Common Lisp of some random number +generation functions from the GSL library.") + (home-page "https://github.com/lvaruzza/cl-randist") + (license license:bsd-2) + (arguments + `(#:asd-system-name "cl-randist" + #:asd-file "cl-randist.asd" + #:tests? #f)))) + +(define-public cl-randist + (sbcl-package->cl-source-package sbcl-cl-randist)) + +(define-public ecl-cl-randist + (sbcl-package->ecl-package sbcl-cl-randist)) + +(define-public sbcl-float-features + (package + (name "sbcl-float-features") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/Shinmera/float-features.git") + (commit "d3ef60181635b0849aa28cfc238053b7ca4644b0"))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0yj419k7n59x6rh3grwr6frgwwyria2il6f7wxpfazm8cskv4lzr")))) + (build-system asdf-build-system/sbcl) + (synopsis "Common Lisp IEEE float portability library") + (description + "Portability library for IEEE float features that are not +covered by the Common Lisp standard.") + (home-page "https://github.com/Shinmera/float-features") + (license license:zlib) + (inputs + `(("documentation-utils" ,sbcl-documentation-utils))) + (arguments + `(#:asd-system-name "float-features" + #:asd-file "float-features.asd" + #:tests? #f)))) + +(define-public cl-float-features + (sbcl-package->cl-source-package sbcl-float-features)) + +(define-public ecl-float-features + (sbcl-package->ecl-package sbcl-float-features)) + +(define-public sbcl-function-cache + (package + (name "sbcl-function-cache") + (version "1.0.3") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/AccelerationNet/function-cache.git") + (commit "6a5ada401e57da2c8abf046f582029926e61fce8"))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "000vmd3f5rx5hs9nvphfric0gkzaadns31c6mxaslpv0k7pkrmc6")))) + (build-system asdf-build-system/sbcl) + (synopsis "Function caching / memoization library for Common Lisp") + (description + "A common lisp library that provides extensible function result +caching based on arguments (an expanded form of memoization).") + (home-page "https://github.com/AccelerationNet/function-cache") + (license + (license:non-copyleft + "https://github.com/AccelerationNet/function-cache/blob/master/README.md")) + (inputs + `(("alexandria" ,sbcl-alexandria) + ("cl-interpol" ,sbcl-cl-interpol) + ("iterate" ,sbcl-iterate) + ("symbol-munger" ,sbcl-symbol-munger) + ("closer-mop" ,sbcl-closer-mop))) + (arguments + `(#:asd-system-name "function-cache" + #:asd-file "function-cache.asd" + #:tests? #f)))) + +(define-public cl-function-cache + (sbcl-package->cl-source-package sbcl-function-cache)) + +(define-public ecl-function-cache + (sbcl-package->ecl-package sbcl-function-cache)) + +(define-public sbcl-type-r + (let ((commit "83c89e38f2f7a7b16f1012777ecaf878cfa6a267") + (revision "1")) + (package + (name "sbcl-type-r") + (version (git-version "0.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/guicho271828/type-r.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1arsxc2539rg8vbrdirz4xxj1b06mc6g6rqndz7a02g127qvk2sm")))) + (build-system asdf-build-system/sbcl) + (synopsis "Parser interface for Common Lisp built-in compound types") + (description + "Collections of accessor functions and patterns to access +the elements in compound type specifier, e.g. @code{dimensions} in +@code{(array element-type dimensions)}") + (home-page "https://github.com/guicho271828/type-r") + (license license:lgpl3+) + (inputs + `(("trivia" ,sbcl-trivia) + ("alexandria" ,sbcl-alexandria))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "type-r" + #:asd-file "type-r.asd" + #:test-asd-file "type-r.test.asd"))))) + +(define-public cl-type-r + (sbcl-package->cl-source-package sbcl-type-r)) + +(define-public sbcl-trivialib-type-unify + (let ((commit "62492ebf04db567dcf435ae84c50b7b8202ecf99") + (revision "1")) + (package + (name "sbcl-trivialib-type-unify") + (version (git-version "0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/guicho271828/trivialib.type-unify.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1bkyfzbwv75p50zp8n1n9rh2r29pw3vgz91gmn2gzzkyq3khj1vh")))) + (build-system asdf-build-system/sbcl) + (synopsis "Common Lisp type unification") + (description + "Unifies a parametrized type specifier against an actual type specifier. +Importantly, it handles complicated array-subtypes and number-related types +correctly.") + (home-page "https://github.com/guicho271828/trivialib.type-unify") + (license license:lgpl3+) + (inputs + `(("alexandria" ,sbcl-alexandria) + ("trivia" ,sbcl-trivia) + ("introspect-environment" ,sbcl-introspect-environment) + ("type-r" ,sbcl-type-r))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "trivialib.type-unify" + #:asd-file "trivialib.type-unify.asd" + #:test-asd-file "trivialib.type-unify.test.asd"))))) + +(define-public cl-trivialib-type-unify + (sbcl-package->cl-source-package sbcl-trivialib-type-unify)) + +(define-public sbcl-specialized-function + (let ((commit "b96b6afaf8358bf91cc0703e62a5a4ee20d2b7bc") + (revision "1")) + (package + (name "sbcl-specialized-function") + (version (git-version "0.0.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/numcl/specialized-function.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "12j45ff0n26578vmfbhb9mfbdchw4wy023k0m2ppgl9s0z4bhjaj")))) + (build-system asdf-build-system/sbcl) + (synopsis "Julia-like dispatch for Common Lisp") + (description + "This library is part of NUMCL. It provides a macro +@code{SPECIALIZED} that performs a Julia-like dispatch on the arguments, +lazily compiling a type-specific version of the function from the same +code. The main target of this macro is speed.") + (home-page "https://github.com/numcl/specialized-function") + (license license:lgpl3+) + (inputs + `(("trivia" ,sbcl-trivia) + ("alexandria" ,sbcl-alexandria) + ("iterate" ,sbcl-iterate) + ("lisp-namespace" ,sbcl-lisp-namespace) + ("type-r" ,sbcl-type-r) + ("trivial-cltl2" ,sbcl-trivial-cltl2))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "specialized-function" + #:asd-file "specialized-function.asd" + #:test-asd-file "specialized-function.test.asd"))))) + +(define-public cl-specialized-function + (sbcl-package->cl-source-package sbcl-specialized-function)) + +(define-public sbcl-constantfold + (let ((commit "0ff1d97a3fbcb89264f6a2af6ce62b73e7b421f4") + (revision "1")) + (package + (name "sbcl-constantfold") + (version (git-version "0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/numcl/constantfold.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "153h0569z6bff1qbad0bdssplwwny75l7ilqwcfqfdvzsxf9jh06")))) + (build-system asdf-build-system/sbcl) + (synopsis "Support library for numcl") + (description + "Support library for numcl. Registers a function as an +additional form that is considered as a candidate for a constant.") + (home-page "https://github.com/numcl/constantfold") + (license license:lgpl3+) + (inputs + `(("trivia" ,sbcl-trivia) + ("alexandria" ,sbcl-alexandria) + ("iterate" ,sbcl-iterate) + ("lisp-namespace" ,sbcl-lisp-namespace))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "constantfold" + #:asd-file "constantfold.asd" + #:test-asd-file "constantfold.test.asd"))))) + +(define-public cl-constantfold + (sbcl-package->cl-source-package sbcl-constantfold)) + +(define-public sbcl-gtype + (let ((commit "42275e3606242ae91e9c8dfa30c18ced50a35b66") + (revision "1")) + (package + (name "sbcl-gtype") + (version (git-version "0.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/numcl/gtype.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1f56dba998v945jcxhha391557n6md1ql25b7icfwwfivhmlaa9b")))) + (build-system asdf-build-system/sbcl) + (synopsis "C++/Julia-like parametric types in Common Lisp") + (description + "Support library for numcl that provides Julia-like runtime parametric +type correctness in Common Lisp. It is based on CLtL2 extensions.") + (home-page "https://github.com/numcl/gtype") + (license license:lgpl3+) + (inputs + `(("trivialib.type-unify" ,sbcl-trivialib-type-unify) + ("trivial-cltl2" ,sbcl-trivial-cltl2) + ("trivia" ,sbcl-trivia) + ("alexandria" ,sbcl-alexandria) + ("iterate" ,sbcl-iterate) + ("type-r" ,sbcl-type-r))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "gtype" + #:asd-file "gtype.asd" + #:test-asd-file "gtype.test.asd"))))) + +(define-public cl-gtype + (sbcl-package->cl-source-package sbcl-gtype)) + +(define-public sbcl-numcl + (let ((commit "1cf7dfa59f763a24a501092870e9c5ee745d0c17") + (revision "1")) + (package + (name "sbcl-numcl") + (version (git-version "0.1.0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/numcl/numcl.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0i3jby9hf4ii7blivgyza80g0vmjfhk8537i5i7kqqk0i5sdnym2")))) + (build-system asdf-build-system/sbcl) + (synopsis "Numpy clone in Common Lisp") + (description + "This is a Numpy clone in Common Lisp. At the moment the +library is written in pure Common Lisp, focusing more on correctness +and usefulness, not speed. Track the progress at +@url{https://github.com/numcl/numcl/projects/1}.") + (home-page "https://github.com/numcl/numcl") + (license license:lgpl3+) + (inputs + `(("trivia" ,sbcl-trivia) + ("alexandria" ,sbcl-alexandria) + ("iterate" ,sbcl-iterate) + ("lisp-namespace" ,sbcl-lisp-namespace) + ("type-r" ,sbcl-type-r) + ("constantfold" ,sbcl-constantfold) + ("cl-randist" ,sbcl-cl-randist) + ("float-features" ,sbcl-float-features) + ("function-cache" ,sbcl-function-cache) + ("specialized-function" ,sbcl-specialized-function) + ("gtype" ,sbcl-gtype))) + (native-inputs + `(("fiveam" ,sbcl-fiveam))) + (arguments + `(#:asd-system-name "numcl" + #:asd-file "numcl.asd" + #:test-asd-file "numcl.test.asd"))))) + +(define-public cl-numcl + (sbcl-package->cl-source-package sbcl-numcl)) diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm index f82288a5ac..369d4fc4ec 100644 --- a/gnu/packages/lisp.scm +++ b/gnu/packages/lisp.scm @@ -797,7 +797,7 @@ enough to play the original mainframe Zork all the way through.") (define-public txr (package (name "txr") - (version "230") + (version "232") (source (origin (method git-fetch) @@ -808,7 +808,7 @@ enough to play the original mainframe Zork all the way through.") (patches (search-patches "txr-shell.patch")) (sha256 (base32 - "1ma6nbqsnl4f8ndh47zzc8n5vzcny66v0z3ndddgm3g0bqaxzjzm")))) + "1vcnask4a1rxrljp4rcbkfihrndkv25l256l125vv39gjhf315xp")))) (build-system gnu-build-system) (arguments '(#:configure-flags '("cc=gcc") diff --git a/gnu/packages/lua.scm b/gnu/packages/lua.scm index a69291ec8a..45e08e066a 100644 --- a/gnu/packages/lua.scm +++ b/gnu/packages/lua.scm @@ -10,6 +10,7 @@ ;;; Copyright © 2016 José Miguel Sánchez García <jmi2k@openmailbox.org> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Fis Trivial <ybbs.daans@hotmail.com> +;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -34,6 +35,7 @@ #:use-module (guix utils) #:use-module (guix build-system gnu) #:use-module (guix build-system cmake) + #:use-module (guix build-system trivial) #:use-module (gnu packages) #:use-module (gnu packages readline) #:use-module (gnu packages tls) @@ -338,40 +340,130 @@ secure session between the peers.") (define-public lua5.2-sec (make-lua-sec "lua5.2-sec" lua-5.2)) -(define-public lua-lgi +(define-public lua-penlight + (package + (name "lua-penlight") + (version "1.7.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/Tieske/Penlight.git") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0qc2d1riyr4b5a0gnsmdw2lz5pw65s4ac60hc34w3mmk9l6yg6nl")))) + (build-system trivial-build-system) + (inputs + `(("lua" ,lua))) + (propagated-inputs + `(("lua-filesystem" ,lua-filesystem))) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((source (assoc-ref %build-inputs "source")) + (lua-version ,(version-major+minor (package-version lua))) + (destination (string-append (assoc-ref %outputs "out") + "/share/lua/" lua-version))) + (mkdir-p destination) + (with-directory-excursion source + (copy-recursively "lua/" destination))) + #t))) + (home-page "http://tieske.github.io/Penlight/") + (synopsis "Collection of general purpose libraries for the Lua language") + (description "Penlight is a set of pure Lua libraries focusing on +input data handling (such as reading configuration files), functional +programming (such as map, reduce, placeholder expressions,etc), and OS +path management. Much of the functionality is inspired by the Python +standard libraries.") + (license license:expat))) + +(define-public lua-ldoc + (package + (name "lua-ldoc") + (version "1.4.6") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/stevedonovan/LDoc.git") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1h0cf7bp4am54r0j8lhjs2l1c7q5vz74ba0jvw9qdbaqimls46g8")))) + (build-system gnu-build-system) + (inputs + `(("lua" ,lua))) + (propagated-inputs + `(("lua-penlight" ,lua-penlight))) + (arguments + `(#:tests? #f ;tests must run after installation. + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-installation-directory + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out")) + (lua-version ,(version-major+minor (package-version lua)))) + (substitute* "makefile" + (("LUA=.*") "#\n") + (("(LUA_PREFIX=).*" _ prefix) + (string-append prefix out "\n")) + (("(LUA_BINDIR=).*" _ prefix) + (string-append prefix out "/bin\n")) + (("(LUA_SHAREDIR=).*" _ prefix) + (string-append prefix out "/share/lua/" lua-version "\n")))) + #t)) + (delete 'configure) + (add-before 'install 'create-bin-directory + (lambda* (#:key outputs #:allow-other-keys) + (mkdir-p (string-append (assoc-ref outputs "out") "/bin")) + #t))))) + (home-page "http://stevedonovan.github.io/ldoc/") + (synopsis "Lua documentation generator") + (description + "LDoc is a LuaDoc-compatible documentation generation system for +Lua source code. It parses the declaration and documentation comments +in a set of Lua source files and produces a set of XHTML pages +describing the commented declarations and functions.") + (license license:expat))) + +(define (make-lua-lgi name lua) (package - (name "lua-lgi") + (name name) (version "0.9.2") (source - (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/pavouk/lgi") - (commit version))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "03rbydnj411xpjvwsyvhwy4plm96481d7jax544mvk7apd8sd5jj")))) + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/pavouk/lgi") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "03rbydnj411xpjvwsyvhwy4plm96481d7jax544mvk7apd8sd5jj")))) (build-system gnu-build-system) (arguments - '(#:make-flags (list "CC=gcc" - (string-append "PREFIX=" (assoc-ref %outputs "out"))) + `(#:make-flags + (list "CC=gcc" + (string-append "PREFIX=" (assoc-ref %outputs "out"))) #:phases (modify-phases %standard-phases - (delete 'configure) ; no configure script + (delete 'configure) ; no configure script (add-before 'build 'set-env (lambda* (#:key inputs #:allow-other-keys) - ;; we need to load cairo dynamically - (let* ((cairo (string-append - (assoc-ref inputs "cairo") "/lib" ))) + ;; We need to load cairo dynamically. + (let* ((cairo (string-append (assoc-ref inputs "cairo") "/lib"))) (setenv "LD_LIBRARY_PATH" cairo) #t))) (add-before 'build 'set-lua-version (lambda _ - ;; lua version and therefore install directories are hardcoded - ;; FIXME: This breaks when we update lua to >=5.3 + ;; Lua version and therefore install directories are hardcoded. (substitute* "./lgi/Makefile" - (("LUA_VERSION=5.1") "LUA_VERSION=5.2")) + (("LUA_VERSION=5.1") + (format #f + "LUA_VERSION=~a" + ,(version-major+minor (package-version lua))))) #t)) (add-before 'check 'skip-test-gtk (lambda _ @@ -392,26 +484,35 @@ secure session between the peers.") (assoc-ref inputs "xorg-server"))) (setenv "DISPLAY" ":1") #t))))) + (native-inputs + `(("dbus" ,dbus) ;tests use 'dbus-run-session' + ("pkg-config" ,pkg-config))) (inputs - `(("gobject-introspection" ,gobject-introspection) + `(("cairo" ,cairo) ("glib" ,glib) - ("pango" ,pango) + ("gobject-introspection" ,gobject-introspection) ("gtk" ,gtk+-2) - ("lua" ,lua) - ("cairo" ,cairo) ("libffi" ,libffi) + ("lua" ,lua) + ("pango" ,pango) ("xorg-server" ,xorg-server))) - (native-inputs - `(("pkg-config" ,pkg-config) - ("dbus" ,dbus))) ;tests use 'dbus-run-session' (home-page "https://github.com/pavouk/lgi/") (synopsis "Lua bridge to GObject based libraries") (description - "LGI is gobject-introspection based dynamic Lua binding to GObject -based libraries. It allows using GObject-based libraries directly from Lua. + "LGI is gobject-introspection based dynamic Lua binding to GObject based +libraries. It allows using GObject-based libraries directly from Lua. Notable examples are GTK+, GStreamer and Webkit.") (license license:expat))) +(define-public lua-lgi + (make-lua-lgi "lua-lgi" lua)) + +(define-public lua5.1-lgi + (make-lua-lgi "lua5.1-lgi" lua-5.1)) + +(define-public lua5.2-lgi + (make-lua-lgi "lua5.2-lgi" lua-5.2)) + (define (make-lua-lpeg name lua) (package (name name) diff --git a/gnu/packages/lxde.scm b/gnu/packages/lxde.scm index 5c5e70ff56..dac2ef6d24 100644 --- a/gnu/packages/lxde.scm +++ b/gnu/packages/lxde.scm @@ -281,7 +281,7 @@ with freedesktop.org standard.") (string-append "--sysconfdir=" (assoc-ref %outputs "out") "/etc")))) - (home-page "http://ignorantguru.github.io/spacefm/") + (home-page "https://ignorantguru.github.io/spacefm/") (synopsis "Multi-panel tabbed file manager") (description "SpaceFM is a graphical, multi-panel, tabbed file manager based on PCManFM with built-in virtual file system, udev-based device manager, diff --git a/gnu/packages/lxqt.scm b/gnu/packages/lxqt.scm index 12c92e52d1..a440491633 100644 --- a/gnu/packages/lxqt.scm +++ b/gnu/packages/lxqt.scm @@ -8,6 +8,7 @@ ;;; Copyright © 2018, 2019 Meiyo Peng <meiyo@riseup.net> ;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2019, 2020 Reza Alizadeh Majd <r.majd@pantherx.org> +;;; Copyright © 2020 Fakhri Sajadi <f.sajadi@pantherx.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -379,6 +380,7 @@ the operating system LXQt is running on.") ("qtx11extras" ,qtx11extras) ("solid" ,solid) ("xf86-input-libinput" ,xf86-input-libinput) + ("xkeyboard-config" ,xkeyboard-config) ("zlib" ,zlib))) (native-inputs `(("pkg-config" ,pkg-config) @@ -394,6 +396,14 @@ the operating system LXQt is running on.") (("DESTINATION \"\\$\\{LXQT_ETC_XDG_DIR\\}") "DESTINATION \"etc/xdg")) #t)) + (add-after 'unpack 'set-xkeyboard-config-file-name + (lambda* (#:key inputs #:allow-other-keys) + ;; Set the file name to xkeyboard-config. + (let ((xkb (assoc-ref inputs "xkeyboard-config"))) + (substitute* "lxqt-config-input/keyboardlayoutconfig.h" + (("/usr/share/X11/xkb/rules/base.lst") + (string-append xkb "/share/X11/xkb/rules/base.lst"))) + #t))) (add-after 'unpack 'patch-translations-dir (lambda* (#:key outputs #:allow-other-keys) (substitute* '("lxqt-config-file-associations/CMakeLists.txt" diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm index 0538342977..1a9f9e5e5c 100644 --- a/gnu/packages/mail.scm +++ b/gnu/packages/mail.scm @@ -397,9 +397,11 @@ aliasing facilities to work just as they would on normal mail.") `(("cyrus-sasl" ,cyrus-sasl) ("gdbm" ,gdbm) ("gpgme" ,gpgme) + ("libidn2" ,libidn2) ("ncurses" ,ncurses) ("openssl" ,openssl) - ("perl" ,perl))) + ("perl" ,perl) + ("sqlite" ,sqlite))) (arguments `(#:configure-flags '("--enable-smtp" "--enable-imap" @@ -407,8 +409,11 @@ aliasing facilities to work just as they would on normal mail.") "--enable-gpgme" "--enable-hcache" ; for header caching "--enable-sidebar" + "--enable-autocrypt" "--with-ssl" "--with-sasl" + "--with-sqlite3" ; required for Autocrypt + "--with-idn2" ; recommended for Autocrypt ;; so that mutt does not check whether the path ;; exists, which it does not in the chroot "--with-mailpath=/var/mail"))) @@ -2301,14 +2306,14 @@ transfer protocols.") (define-public opensmtpd (package (name "opensmtpd") - (version "6.6.2p1") + (version "6.6.3p1") (source (origin (method url-fetch) (uri (string-append "https://www.opensmtpd.org/archives/" "opensmtpd-" version ".tar.gz")) (sha256 - (base32 "16nz2n4s3djlasd6m6dqfwggf6igyfxzq5igny5i0qb8lnn13f33")))) + (base32 "1dqysjlyl0x3qzdzc9sjrla0063vpmlyq735lzf88p7wgzmw1xwy")))) (build-system gnu-build-system) (inputs `(("bdb" ,bdb) diff --git a/gnu/packages/man.scm b/gnu/packages/man.scm index f63946c04f..aa5fad06aa 100644 --- a/gnu/packages/man.scm +++ b/gnu/packages/man.scm @@ -4,7 +4,7 @@ ;;; Copyright © 2015, 2016 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2015 Alex Kost <alezost@gmail.com> ;;; Copyright © 2015, 2016 Efraim Flashner <efraim@flashner.co.il> -;;; Copyright © 2017, 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> +;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018, 2019 Rutger Helling <rhelling@mykolab.com> ;;; Copyright © 2018, 2019 Marius Bakke <mbakke@fastmail.com> ;;; @@ -162,7 +162,7 @@ the traditional flat-text whatis databases.") (define-public man-pages (package (name "man-pages") - (version "5.04") + (version "5.05") (source (origin (method url-fetch) @@ -172,7 +172,7 @@ the traditional flat-text whatis databases.") (string-append "mirror://kernel.org/linux/docs/man-pages/Archive/" "man-pages-" version ".tar.xz"))) (sha256 - (base32 "1bx4ws24bjq6iyfyilg7aih5f0qrhy9l97ksrwcd4yxvjh8gn13x")))) + (base32 "0izb6shcczvg37cyd3kzxsfsrffqj1qw9nqhhq9mi4kd36qkbcfm")))) (build-system gnu-build-system) (arguments '(#:phases (modify-phases %standard-phases (delete 'configure)) diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm index 0ef5b3f91e..c88a5ab8cf 100644 --- a/gnu/packages/maths.scm +++ b/gnu/packages/maths.scm @@ -74,6 +74,7 @@ #:use-module (gnu packages compression) #:use-module (gnu packages curl) #:use-module (gnu packages cyrus-sasl) + #:use-module (gnu packages dbm) #:use-module (gnu packages documentation) #:use-module (gnu packages elf) #:use-module (gnu packages flex) @@ -1491,7 +1492,7 @@ can solve two kinds of problems: (define-public octave-cli (package (name "octave-cli") - (version "5.1.0") + (version "5.2.0") (source (origin (method url-fetch) @@ -1499,11 +1500,12 @@ can solve two kinds of problems: version ".tar.lz")) (sha256 (base32 - "11wwxpy2q1bhxs2v41bqn05i2sb0905cj1xil6mg8l4k2kka4cq6")))) + "1848dq6nxzal8gwjrcp6xhi5gq96w89nss9d9rz75q408gb3mbl6")))) (build-system gnu-build-system) (inputs `(("alsa-lib" ,alsa-lib) ("arpack" ,arpack-ng) + ("bdb" ,bdb) ("curl" ,curl) ("fftw" ,fftw) ("fftwf" ,fftwf) diff --git a/gnu/packages/messaging.scm b/gnu/packages/messaging.scm index 4576741b44..044f4dae1d 100644 --- a/gnu/packages/messaging.scm +++ b/gnu/packages/messaging.scm @@ -1816,7 +1816,7 @@ QMatrixClient project.") (synopsis "Graphical client for the Matrix instant messaging protocol") (description "Quaternion is a Qt5 desktop client for the Matrix instant messaging protocol. It uses libqmatrixclient and is its reference client -implementation. Quaternion and libqmatriclient together form the +implementation. Quaternion and libqmatrixclient together form the QMatrixClient project.") (license (list license:gpl3+ ; all source code license:lgpl3+)))) ; icons/breeze diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index 1fb78c091f..2787ff0b00 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014, 2019 Eric Bavier <bavier@member.fsf.org> -;;; Copyright © 2015, 2016, 2017, 2018, 2019 Ricardo Wurmus <rekado@elephly.net> +;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org> ;;; Copyright © 2016 Al McElrath <hello@yrns.org> ;;; Copyright © 2016, 2017, 2019 Efraim Flashner <efraim@flashner.co.il> @@ -21,7 +21,7 @@ ;;; Copyright © 2018 Björn Höfling <bjoern.hoefling@bjoernhoefling.de> ;;; Copyright © 2019 Gabriel Hondet <gabrielhondet@gmail.com> ;;; Copyright © 2019 Timotej Lazar <timotej.lazar@araneo.si> -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; Copyright © 2019 raingloom <raingloom@protonmail.com> ;;; Copyright © 2019 David Wilson <david@daviwil.com> ;;; Copyright © 2019, 2020 Alexandros Theodotou <alex@zrythm.org> @@ -2213,7 +2213,7 @@ capabilities, custom envelopes, effects, etc.") (define-public yoshimi (package (name "yoshimi") - (version "1.6.1") + (version "1.7.0.1") (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/yoshimi/" @@ -2221,7 +2221,7 @@ capabilities, custom envelopes, effects, etc.") "/yoshimi-" version ".tar.bz2")) (sha256 (base32 - "1shnz429zgl0b4y5bpb61frk1747jwqfahq4hx44c972580zghzh")))) + "1pkqrrr51vlxh96vy0c0rf5ijjvymys4brsw9rv1bdp1bb8izw6c")))) (build-system cmake-build-system) (arguments `(#:tests? #f ; there are no tests @@ -2999,7 +2999,7 @@ using the beets FetchArt plugin.") module files. It attempts to recreate the module replay and user experience of the popular DOS program Fasttracker II, with special playback modes available for improved Amiga ProTracker 2/3 compatibility.") - (home-page "http://milkytracker.titandemo.org/") + (home-page "https://milkytracker.titandemo.org/") ;; 'src/milkyplay' is under Modified BSD, the rest is under GPL3 or later. (license (list license:bsd-3 license:gpl3+)))) @@ -3878,7 +3878,7 @@ audio samples and various soft sythesizers. It can receive input from a MIDI ke (define-public musescore (package (name "musescore") - (version "3.4.1") + (version "3.4.2") (source (origin (method git-fetch) @@ -3887,7 +3887,7 @@ audio samples and various soft sythesizers. It can receive input from a MIDI ke (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "16rx4x0czhwjg8vppcc7iw0cvii9q2l730cqhmhvip9r8wwamsvj")) + (base32 "14a9sg87nx7xca1qfbkplnpbx9pyg9k9vy87dq0g401ag6g6bi66")) (modules '((guix build utils))) (snippet ;; Un-bundle OpenSSL and remove unused libraries. @@ -3927,6 +3927,7 @@ audio samples and various soft sythesizers. It can receive input from a MIDI ke ("pulseaudio" ,pulseaudio) ("qtbase" ,qtbase) ("qtdeclarative" ,qtdeclarative) + ("qtquickcontrols2" ,qtquickcontrols2) ("qtscript" ,qtscript) ("qtsvg" ,qtsvg) ("qtxmlpatterns" ,qtxmlpatterns))) @@ -5142,7 +5143,7 @@ and as an LV2 plugin.") (define-public zrythm (package (name "zrythm") - (version "0.7.345") + (version "0.7.474") (source (origin (method url-fetch) @@ -5150,13 +5151,21 @@ and as an LV2 plugin.") version ".tar.xz")) (sha256 (base32 - "1csiwq38a1ckx23lairfpl7qjkz71wsa7a9vsxl3k58f9ybibiil")))) + "0qq9v8y27zhamcb7nq7pl76874ws8x8cxhp5r685b8binvl9p0az")))) (build-system meson-build-system) (arguments `(#:glib-or-gtk? #t #:configure-flags `("-Denable_tests=true" "-Dmanpage=true" - "-Dinstall_dseg_font=false" "-Denable_ffmpeg=true"))) + "-Dinstall_dseg_font=false" "-Denable_ffmpeg=true") + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'patch-xdg-open + (lambda _ + (substitute* "src/utils/io.c" + (("OPEN_DIR_CMD") + (string-append "\"" (which "xdg-open") "\""))) + #t))))) (inputs `(("alsa-lib" ,alsa-lib) ("jack" ,jack-1) diff --git a/gnu/packages/musl.scm b/gnu/packages/musl.scm index 6a6344efb5..7e4e27d00d 100644 --- a/gnu/packages/musl.scm +++ b/gnu/packages/musl.scm @@ -44,7 +44,7 @@ (synopsis "Small C standard library") (description "musl is a simple and lightweight C standard library. It strives to be correct in the sense of standards-conformance and safety.") - (home-page "https://www.musl-libc.org") + (home-page "https://musl.libc.org") ;; Musl as a whole is released under the Expat license. Parts of it are ;; derived from various third-party projects that are released under ;; non-copyleft licenses. See the COPYRIGHT file for details. diff --git a/gnu/packages/nano.scm b/gnu/packages/nano.scm index 0aceef83ea..ff7abfad73 100644 --- a/gnu/packages/nano.scm +++ b/gnu/packages/nano.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org> -;;; Copyright © 2015, 2016, 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016 Rene Saavedra <rennes@openmailbox.org> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; @@ -30,13 +30,13 @@ (define-public nano (package (name "nano") - (version "4.7") + (version "4.8") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/nano/nano-" version ".tar.xz")) (sha256 - (base32 "1x9nqy2kgaz6087p63i71gdjsqbdc9jjpx1ymlyclfakvsby3h2q")))) + (base32 "0qwf4ld0fl2bpnjh23z2pq7wcs6d14m2364360xmf7dbd0fgcj63")))) (build-system gnu-build-system) (inputs `(("gettext" ,gettext-minimal) diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm index ed339524c0..dbc40028ad 100644 --- a/gnu/packages/networking.scm +++ b/gnu/packages/networking.scm @@ -36,6 +36,8 @@ ;;; Copyright © 2019 Jan Wielkiewicz <tona_kosmicznego_smiecia@interia.pl> ;;; Copyright © 2019 Daniel Schaefer <git@danielschaefer.me> ;;; Copyright © 2019 Diego N. Barbato <dnbarbato@posteo.de> +;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -64,6 +66,7 @@ #:use-module (guix build-system perl) #:use-module (guix build-system python) #:use-module (guix build-system trivial) + #:use-module (guix utils) #:use-module (gnu packages) #:use-module (gnu packages admin) #:use-module (gnu packages adns) @@ -2824,6 +2827,43 @@ easy-to-understand binary values.") (home-page "http://jodies.de/ipcalc") (license license:gpl2+))) +(define-public tunctl + (package + (name "tunctl") + (version "1.5") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://sourceforge/tunctl/tunctl/" version "/" + "tunctl-" version ".tar.gz")) + (sha256 + (base32 "1zsgn7w6l2zh2q0j6qaw8wsx981qcr536qlz1lgb3b5zqr66qama")))) + (build-system gnu-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + (delete 'bootstrap) ;there is no configure.ac file + (delete 'configure) ;there is no configure script + (delete 'check) ;there are no tests + (replace 'build + (lambda _ + (setenv "CC" "gcc") + (invoke "make" "tunctl"))) + ;; TODO: Requires docbook2x to generate man page from SGML. + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (bin (string-append out "/bin"))) + (install-file "tunctl" bin)) + #t))))) + (home-page "http://tunctl.sourceforge.net") + (synopsis "Utility to set up and maintain TUN/TAP network interfaces") + (description "Tunctl is used to set up and maintain persistent TUN/TAP +network interfaces, enabling user applications to simulate network traffic. +Such interfaces are useful for VPN software, virtualization, emulation, +simulation, and a number of other applications.") + (license license:gpl2))) + (define-public vde2 (package (name "vde2") @@ -2853,3 +2893,46 @@ cables.") (license:non-copyleft ; slirpvde "file://COPYING.slirpvde" "See COPYING.slirpvde in the distribution."))))) + +(define-public haproxy + (package + (name "haproxy") + (version "2.1.3") + (source (origin + (method url-fetch) + (uri (string-append "https://www.haproxy.org/download/" + (version-major+minor version) + "/src/haproxy-" version ".tar.gz")) + (sha256 + (base32 + "0n8bw3d6gikr8c56ycrvksp1sl0b4yfzp19867cxkl3l0daqwrxv")))) + (build-system gnu-build-system) + (arguments + `(#:make-flags + (let* ((out (assoc-ref %outputs "out"))) + (list (string-append "PREFIX=" out) + (string-append "DOCDIR=" out "/share/" ,name) + "TARGET=linux-glibc" + "USE_LUA=1" + "USE_OPENSSL=1" + "USE_ZLIB=1" + "USE_PCRE_2=1")) + #:tests? #f ; there are only regression tests, using varnishtest + #:phases + (modify-phases %standard-phases + (delete 'configure)))) + (inputs + `(("lua" ,lua) + ("openssl" ,openssl) + ("pcre2" ,pcre2) + ("zlib" ,zlib))) + (home-page "https://www.haproxy.org/") + (synopsis "Reliable, high performance TCP/HTTP load balancer") + (description "HAProxy is a free, very fast and reliable solution offering +high availability, load balancing, and proxying for TCP and HTTP-based +applications. It is particularly suited for web sites crawling under very +high loads while needing persistence or Layer7 processing. Supporting tens of +thousands of connections is clearly realistic with today's hardware.") + (license (list license:gpl2+ + license:lgpl2.1 + license:lgpl2.1+)))) diff --git a/gnu/packages/node.scm b/gnu/packages/node.scm index 753d2cc06a..033a55a3d4 100644 --- a/gnu/packages/node.scm +++ b/gnu/packages/node.scm @@ -117,6 +117,10 @@ ;; This requires a DNS resolver. (delete-file "test/parallel/test-dns.js") + ;; FIXME: This test fails randomly: + ;; https://github.com/nodejs/node/issues/31213 + (delete-file "test/parallel/test-net-listen-after-destroying-stdin.js") + ;; These tests have an expiry date: they depend on the validity of ;; TLS certificates that are bundled with the source. We want this ;; package to be reproducible forever, so remove those. diff --git a/gnu/packages/opencl.scm b/gnu/packages/opencl.scm index 50c99118c1..04b3cb0524 100644 --- a/gnu/packages/opencl.scm +++ b/gnu/packages/opencl.scm @@ -20,6 +20,7 @@ (define-module (gnu packages opencl) #:use-module (guix build-system gnu) #:use-module (guix build-system cmake) + #:use-module (guix build-system python) #:use-module (guix download) #:use-module (guix git-download) #:use-module ((guix licenses) #:prefix license:) @@ -35,6 +36,7 @@ #:use-module (gnu packages ncurses) #:use-module (gnu packages pkg-config) #:use-module (gnu packages python) + #:use-module (gnu packages python-xyz) #:use-module (gnu packages ruby) #:use-module (gnu packages video) #:use-module (gnu packages xdisorg) @@ -342,3 +344,92 @@ implementation, and as a portability layer. Thus, if your desired target has an LLVM backend, it should be able to get OpenCL support easily by using pocl.") (license license:expat))) + +(define-public python-pytools + (package + (name "python-pytools") + (version "2020.1") + (source + (origin + (method url-fetch) + (uri (pypi-uri "pytools" version)) + (sha256 + (base32 + "19h47pqfrq7ax7601i5g8icpb6b42h8zzwq0dqfdcjjqamwd2cn1")))) + (build-system python-build-system) + (propagated-inputs + `(("python-appdirs" ,python-appdirs) + ("python-decorator" ,python-decorator) + ("python-numpy" ,python-numpy) + ("python-six" ,python-six) + ("python-mpi4py" ,python-mpi4py))) + (home-page "https://pypi.org/project/pytools/") + (synopsis "Assorted tools for Python") + (description + "Pytools is a bag of things that are ``missing'' from the Python standard +library: + +@itemize +@item +small helper functions such as @code{len_iterable}, @code{argmin}, +tuple generation, permutation generation, ASCII table pretty printing, +GvR's @code{monkeypatch_xxx} hack, the elusive @code{flatten}, and much more. +@item +Michele Simionato's decorator module +@item +A time-series logging module, @code{pytools.log}. +@item +Batch job submission, @code{pytools.batchjob}. +@item +A lexer, @code{pytools.lex}. +@end itemize\n") + (license license:expat))) + +(define-public python-pyopencl + (package + (name "python-pyopencl") + (version "2019.1.1") + (source + (origin + ;; The tarball on PyPI lacks test programs such as + ;; 'pygpu_language_opencl.cpp' so fetch it from Git. + ;; XXX: The server at git.tiker.net is unreliable. + (method git-fetch) + (uri (git-reference + (url "http://git.tiker.net/trees/pyopencl.git") + (commit (string-append "v" version)) + (recursive? #t))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "12q0rs8yla571vcfpsh0mfrjbdiayv0hi8r1rq0f178m3i3qjz80")))) + (build-system python-build-system) + (arguments + '(#:phases (modify-phases %standard-phases + (add-before 'build 'set-home + (lambda _ + ;; Some of the Python build scripts expect 'HOME' to be + ;; set. + (setenv "HOME" (getcwd)) + #t))) + + ;; Tests in 'compyte/ndarray/setup_opencl.py' appear to rely on + ;; 'nvcc', which is not an option. + #:tests? #f)) + (inputs + `(("opencl-headers" ,opencl-headers-1.2) ;POCL only supports OpenCL 1.2 + ("pybind11" ,pybind11) + ("ocl-icd" ,ocl-icd))) ;libOpenCL + (propagated-inputs + `(("python-appdirs" ,python-appdirs) + ("python-decorator" ,python-decorator) + ("python-numpy" ,python-numpy) + ("python-pytools" ,python-pytools) + ("python-six" ,python-six) + ("python-mako" ,python-mako))) + (home-page "http://mathema.tician.de/software/pyopencl") + (synopsis "Python wrapper for OpenCL") + (description + "PyOpenCL lets you access parallel computing devices such as GPUs from +Python @i{via} OpenCL.") + (license license:expat))) diff --git a/gnu/packages/parallel.scm b/gnu/packages/parallel.scm index 5bed372432..f1060bb66b 100644 --- a/gnu/packages/parallel.scm +++ b/gnu/packages/parallel.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013, 2014 Eric Bavier <bavier@member.fsf.org> +;;; Copyright © 2013, 2014, 2020 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2015 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2015, 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016 Pjotr Prins <pjotr.guix@thebird.nl> @@ -54,14 +54,14 @@ (define-public parallel (package (name "parallel") - (version "20191222") + (version "20200122") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/parallel/parallel-" version ".tar.bz2")) (sha256 - (base32 "0xvw578440s9cc382n7z2l8npj30nwr6wwmkyxn2pj1pcszfjagy")))) + (base32 "070cv3b1ja8lmn2a5h1ry6b5y35jpm4z5r9yv9nb5kd5im11wvqi")))) (build-system gnu-build-system) (arguments `(#:phases diff --git a/gnu/packages/password-utils.scm b/gnu/packages/password-utils.scm index da58c24680..a8c165e15d 100644 --- a/gnu/packages/password-utils.scm +++ b/gnu/packages/password-utils.scm @@ -25,6 +25,7 @@ ;;; Copyright © 2019 Jens Mølgaard <jens@zete.tk> ;;; Copyright © 2019 Tanguy Le Carrour <tanguy@bioneland.org> ;;; Copyright © 2020 Guillaume Le Vaillant <glv@posteo.net> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -497,17 +498,11 @@ any X11 window.") "sed" "tree" "which" "xclip")))) (wrap-program (string-append out "/bin/pass") `("PATH" ":" prefix (,(string-join path ":")))) - #t))) - (add-after 'wrap-path 'install-shell-completions - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (bashcomp (string-append out "/etc/bash_completion.d"))) - ;; TODO: install fish and zsh completions. - (mkdir-p bashcomp) - (copy-file "src/completion/pass.bash-completion" - (string-append bashcomp "/pass")) #t)))) - #:make-flags (list "CC=gcc" (string-append "PREFIX=" %output)) + #:make-flags (list "CC=gcc" (string-append "PREFIX=" %output) + "WITH_ALLCOMP=yes" + (string-append "BASHCOMPDIR=" + %output "/etc/bash_completion.d")) ;; Parallel tests may cause a race condition leading to a ;; timeout in some circumstances. #:parallel-tests? #f diff --git a/gnu/packages/patches/docker-adjust-tests-for-changes-in-go.patch b/gnu/packages/patches/docker-adjust-tests-for-changes-in-go.patch deleted file mode 100644 index 82d92cd4de..0000000000 --- a/gnu/packages/patches/docker-adjust-tests-for-changes-in-go.patch +++ /dev/null @@ -1,67 +0,0 @@ -From 4983ef7c1693ad6dfbe4e3809b12541241d7ff56 Mon Sep 17 00:00:00 2001 -From: Sebastiaan van Stijn <github@gone.nl> -Date: Wed, 14 Aug 2019 02:51:08 +0200 -Subject: [PATCH] Adjust tests for changes in Go 1.12.8 / 1.11.13 - -``` -00:38:11 === Failed -00:38:11 === FAIL: opts TestParseDockerDaemonHost (0.00s) -00:38:11 hosts_test.go:87: tcp tcp:a.b.c.d address expected error "Invalid bind address format: tcp:a.b.c.d" return, got "parse tcp://tcp:a.b.c.d: invalid port \":a.b.c.d\" after host" and addr -00:38:11 hosts_test.go:87: tcp tcp:a.b.c.d/path address expected error "Invalid bind address format: tcp:a.b.c.d/path" return, got "parse tcp://tcp:a.b.c.d/path: invalid port \":a.b.c.d\" after host" and addr -00:38:11 -00:38:11 === FAIL: opts TestParseTCP (0.00s) -00:38:11 hosts_test.go:129: tcp tcp:a.b.c.d address expected error Invalid bind address format: tcp:a.b.c.d return, got parse tcp://tcp:a.b.c.d: invalid port ":a.b.c.d" after host and addr -00:38:11 hosts_test.go:129: tcp tcp:a.b.c.d/path address expected error Invalid bind address format: tcp:a.b.c.d/path return, got parse tcp://tcp:a.b.c.d/path: invalid port ":a.b.c.d" after host and addr -``` - -Signed-off-by: Sebastiaan van Stijn <github@gone.nl> -Upstream-commit: 683766613a8c1dca8f95b19ddb7e083bb3aef266 -Component: engine ---- - opts/hosts_test.go | 12 ++++++------ - 1 file changed, 6 insertions(+), 6 deletions(-) - -diff --git a/opts/hosts_test.go b/opts/hosts_test.go -index 8c54ec0f4b..7a0a943adf 100644 ---- a/opts/hosts_test.go -+++ b/opts/hosts_test.go -@@ -53,8 +53,8 @@ func TestParseHost(t *testing.T) { - func TestParseDockerDaemonHost(t *testing.T) { - invalids := map[string]string{ - -- "tcp:a.b.c.d": "Invalid bind address format: tcp:a.b.c.d", -- "tcp:a.b.c.d/path": "Invalid bind address format: tcp:a.b.c.d/path", -+ "tcp:a.b.c.d": "", -+ "tcp:a.b.c.d/path": "", - "udp://127.0.0.1": "Invalid bind address format: udp://127.0.0.1", - "udp://127.0.0.1:2375": "Invalid bind address format: udp://127.0.0.1:2375", - "tcp://unix:///run/docker.sock": "Invalid proto, expected tcp: unix:///run/docker.sock", -@@ -83,7 +83,7 @@ func TestParseDockerDaemonHost(t *testing.T) { - "localhost:5555/path": "tcp://localhost:5555/path", - } - for invalidAddr, expectedError := range invalids { -- if addr, err := parseDaemonHost(invalidAddr); err == nil || err.Error() != expectedError { -+ if addr, err := parseDaemonHost(invalidAddr); err == nil || expectedError != "" && err.Error() != expectedError { - t.Errorf("tcp %v address expected error %q return, got %q and addr %v", invalidAddr, expectedError, err, addr) - } - } -@@ -99,8 +99,8 @@ func TestParseTCP(t *testing.T) { - defaultHTTPHost = "tcp://127.0.0.1:2376" - ) - invalids := map[string]string{ -- "tcp:a.b.c.d": "Invalid bind address format: tcp:a.b.c.d", -- "tcp:a.b.c.d/path": "Invalid bind address format: tcp:a.b.c.d/path", -+ "tcp:a.b.c.d": "", -+ "tcp:a.b.c.d/path": "", - "udp://127.0.0.1": "Invalid proto, expected tcp: udp://127.0.0.1", - "udp://127.0.0.1:2375": "Invalid proto, expected tcp: udp://127.0.0.1:2375", - } -@@ -125,7 +125,7 @@ func TestParseTCP(t *testing.T) { - "localhost:5555/path": "tcp://localhost:5555/path", - } - for invalidAddr, expectedError := range invalids { -- if addr, err := ParseTCPAddr(invalidAddr, defaultHTTPHost); err == nil || err.Error() != expectedError { -+ if addr, err := ParseTCPAddr(invalidAddr, defaultHTTPHost); err == nil || expectedError != "" && err.Error() != expectedError { - t.Errorf("tcp %v address expected error %v return, got %s and addr %v", invalidAddr, expectedError, err, addr) - } - } diff --git a/gnu/packages/patches/docker-engine-test-noinstall.patch b/gnu/packages/patches/docker-engine-test-noinstall.patch deleted file mode 100644 index 85d56a3465..0000000000 --- a/gnu/packages/patches/docker-engine-test-noinstall.patch +++ /dev/null @@ -1,23 +0,0 @@ -Last-Update: 2018-06-18 -Forwarded: not-needed -Author: Dmitry Smirnov <onlyjob@debian.org> -Description: prevents test-time installation that causes FTBFS. -~~~~ - go test net: open /usr/lib/go-1.10/pkg/linux_amd64/net.a: permission denied -~~~~ - ---- a/hack/test/unit -+++ b/hack/test/unit -@@ -18,12 +18,8 @@ - - exclude_paths="/vendor/|/integration" - pkg_list=$(go list $TESTDIRS | grep -vE "($exclude_paths)") - --# install test dependencies once before running tests for each package. This --# significantly reduces the runtime. --go test -i "${BUILDFLAGS[@]}" $pkg_list -- - for pkg in $pkg_list; do - go test "${BUILDFLAGS[@]}" \ - -cover \ - -coverprofile=profile.out \ diff --git a/gnu/packages/patches/docker-use-fewer-modprobes.patch b/gnu/packages/patches/docker-use-fewer-modprobes.patch deleted file mode 100644 index 4e4a45b6ce..0000000000 --- a/gnu/packages/patches/docker-use-fewer-modprobes.patch +++ /dev/null @@ -1,137 +0,0 @@ -This patch makes docker find out whether a filesystem type is supported -by trying to mount a filesystem of that type rather than invoking "modprobe". - -See <https://github.com/moby/moby/pull/38930>. - ---- docker-18.09.0-checkout/daemon/graphdriver/overlay/overlay.go.orig 1970-01-01 01:00:00.000000000 +0100 -+++ docker-18.09.0-checkout/daemon/graphdriver/overlay/overlay.go 2019-03-19 09:16:03.487087490 +0100 -@@ -8,7 +8,6 @@ - "io" - "io/ioutil" - "os" -- "os/exec" - "path" - "path/filepath" - "strconv" -@@ -201,9 +200,16 @@ - } - - func supportsOverlay() error { -- // We can try to modprobe overlay first before looking at -- // proc/filesystems for when overlay is supported -- exec.Command("modprobe", "overlay").Run() -+ // Access overlay filesystem so that Linux loads it (if possible). -+ mountTarget, err := ioutil.TempDir("", "supportsOverlay") -+ if err != nil { -+ logrus.WithField("storage-driver", "overlay2").Error("Could not create temporary directory, so assuming that 'overlay' is not supported.") -+ return graphdriver.ErrNotSupported -+ } else { -+ /* The mounting will fail--after the module has been loaded.*/ -+ defer os.RemoveAll(mountTarget) -+ unix.Mount("overlay", mountTarget, "overlay", 0, "") -+ } - - f, err := os.Open("/proc/filesystems") - if err != nil { ---- docker-18.09.0-checkout/daemon/graphdriver/overlay2/overlay.go.orig 2019-03-18 23:42:23.728525231 +0100 -+++ docker-18.09.0-checkout/daemon/graphdriver/overlay2/overlay.go 2019-03-19 08:54:31.411906113 +0100 -@@ -10,7 +10,6 @@ - "io" - "io/ioutil" - "os" -- "os/exec" - "path" - "path/filepath" - "strconv" -@@ -261,9 +260,16 @@ - } - - func supportsOverlay() error { -- // We can try to modprobe overlay first before looking at -- // proc/filesystems for when overlay is supported -- exec.Command("modprobe", "overlay").Run() -+ // Access overlay filesystem so that Linux loads it (if possible). -+ mountTarget, err := ioutil.TempDir("", "supportsOverlay2") -+ if err != nil { -+ logrus.WithField("storage-driver", "overlay2").Error("Could not create temporary directory, so assuming that 'overlay' is not supported.") -+ return graphdriver.ErrNotSupported -+ } else { -+ /* The mounting will fail--after the module has been loaded.*/ -+ defer os.RemoveAll(mountTarget) -+ unix.Mount("overlay", mountTarget, "overlay", 0, "") -+ } - - f, err := os.Open("/proc/filesystems") - if err != nil { ---- docker-18.09.0-checkout/daemon/graphdriver/devmapper/deviceset.go.orig 2019-03-19 09:19:16.592844887 +0100 -+++ docker-18.09.0-checkout/daemon/graphdriver/devmapper/deviceset.go 2019-03-19 09:21:18.019361761 +0100 -@@ -540,8 +539,14 @@ - return err // error text is descriptive enough - } - -- // Check if kernel supports xfs filesystem or not. -- exec.Command("modprobe", "xfs").Run() -+ mountTarget, err := ioutil.TempDir("", "supportsXFS") -+ if err != nil { -+ return errors.Wrapf(err, "error checking for xfs support") -+ } else { -+ /* The mounting will fail--after the module has been loaded.*/ -+ defer os.RemoveAll(mountTarget) -+ unix.Mount("none", mountTarget, "xfs", 0, "") -+ } - - f, err := os.Open("/proc/filesystems") - if err != nil { ---- docker-18.09.0-checkout/vendor/github.com/docker/libnetwork/iptables/iptables.go.orig 2019-03-19 09:47:19.430111170 +0100 -+++ docker-18.09.0-checkout/vendor/github.com/docker/libnetwork/iptables/iptables.go 2019-03-19 10:38:01.445136177 +0100 -@@ -72,11 +71,12 @@ - } - - func probe() { -- if out, err := exec.Command("modprobe", "-va", "nf_nat").CombinedOutput(); err != nil { -- logrus.Warnf("Running modprobe nf_nat failed with message: `%s`, error: %v", strings.TrimSpace(string(out)), err) -+ path, err := exec.LookPath("iptables") -+ if err != nil { -+ return - } -- if out, err := exec.Command("modprobe", "-va", "xt_conntrack").CombinedOutput(); err != nil { -- logrus.Warnf("Running modprobe xt_conntrack failed with message: `%s`, error: %v", strings.TrimSpace(string(out)), err) -+ if out, err := exec.Command(path, "--wait", "-t", "nat", "-L", "-n").CombinedOutput(); err != nil { -+ logrus.Warnf("Running iptables --wait -t nat -L -n failed with message: `%s`, error: %v", strings.TrimSpace(string(out)), err) - } - } - ---- docker-18.09.0-checkout/vendor/github.com/docker/libnetwork/ns/init_linux.go.orig 2019-03-19 11:23:20.738316699 +0100 -+++ docker-18.09.0-checkout/vendor/github.com/docker/libnetwork/ns/init_linux.go 2019-03-19 11:27:57.149753073 +0100 -@@ -76,12 +76,8 @@ func NlHandle() *netlink.Handle { - func getSupportedNlFamilies() []int { - fams := []int{syscall.NETLINK_ROUTE} - // NETLINK_XFRM test -- if err := loadXfrmModules(); err != nil { -- if checkXfrmSocket() != nil { -- logrus.Warnf("Could not load necessary modules for IPSEC rules: %v", err) -- } else { -- fams = append(fams, syscall.NETLINK_XFRM) -- } -+ if err := checkXfrmSocket(); err != nil { -+ logrus.Warnf("Could not load necessary modules for IPSEC rules: %v", err) - } else { - fams = append(fams, syscall.NETLINK_XFRM) - } -@@ -99,16 +95,6 @@ func getSupportedNlFamilies() []int { - return fams - } - --func loadXfrmModules() error { -- if out, err := exec.Command("modprobe", "-va", "xfrm_user").CombinedOutput(); err != nil { -- return fmt.Errorf("Running modprobe xfrm_user failed with message: `%s`, error: %v", strings.TrimSpace(string(out)), err) -- } -- if out, err := exec.Command("modprobe", "-va", "xfrm_algo").CombinedOutput(); err != nil { -- return fmt.Errorf("Running modprobe xfrm_algo failed with message: `%s`, error: %v", strings.TrimSpace(string(out)), err) -- } -- return nil --} -- - // API check on required xfrm modules (xfrm_user, xfrm_algo) - func checkXfrmSocket() error { - fd, err := syscall.Socket(syscall.AF_NETLINK, syscall.SOCK_RAW, syscall.NETLINK_XFRM) diff --git a/gnu/packages/patches/icecat-makeicecat.patch b/gnu/packages/patches/icecat-makeicecat.patch index 172b1dcadd..beaddf9437 100644 --- a/gnu/packages/patches/icecat-makeicecat.patch +++ b/gnu/packages/patches/icecat-makeicecat.patch @@ -25,7 +25,7 @@ index 8be2362..48716f2 100755 -wget -N https://ftp.mozilla.org/pub/mozilla.org/firefox/releases/${FFVERSION}esr/source/firefox-${FFVERSION}esr.source.tar.xz.asc -gpg --recv-keys --keyserver keyserver.ubuntu.com 14F26682D0916CDD81E37B6D61B7B526D98F0353 -gpg --verify firefox-${FFVERSION}esr.source.tar.xz.asc --echo -n a00a7712d0f919162ce8181a9a3fc3e9ef37adf1caff0945a863b4c0c1d9f360 firefox-${FFVERSION}esr.source.tar.xz |sha256sum -c - +-echo -n 52e784f98a37624e8b207f1b23289c2c88f66dd923798cae891a586a6d94a6d1 firefox-${FFVERSION}esr.source.tar.xz |sha256sum -c - - -echo Extracting Firefox tarball -tar -xf firefox-${FFVERSION}esr.source.tar.xz @@ -37,7 +37,7 @@ index 8be2362..48716f2 100755 +# wget -N https://ftp.mozilla.org/pub/mozilla.org/firefox/releases/${FFVERSION}esr/source/firefox-${FFVERSION}esr.source.tar.xz.asc +# gpg --recv-keys --keyserver keyserver.ubuntu.com 14F26682D0916CDD81E37B6D61B7B526D98F0353 +# gpg --verify firefox-${FFVERSION}esr.source.tar.xz.asc -+# echo -n a00a7712d0f919162ce8181a9a3fc3e9ef37adf1caff0945a863b4c0c1d9f360 firefox-${FFVERSION}esr.source.tar.xz |sha256sum -c - ++# echo -n 52e784f98a37624e8b207f1b23289c2c88f66dd923798cae891a586a6d94a6d1 firefox-${FFVERSION}esr.source.tar.xz |sha256sum -c - +# +# echo Extracting Firefox tarball +# tar -xf firefox-${FFVERSION}esr.source.tar.xz diff --git a/gnu/packages/patches/isc-dhcp-4.4.1-fixes-for-newer-bind.patch b/gnu/packages/patches/isc-dhcp-4.4.1-fixes-for-newer-bind.patch deleted file mode 100644 index 53e681ea31..0000000000 --- a/gnu/packages/patches/isc-dhcp-4.4.1-fixes-for-newer-bind.patch +++ /dev/null @@ -1,100 +0,0 @@ -These fixes are needed to adapt isc-dhcp-4.4.1 to build -successfully after its bundled copy of bind has been updated. - -It is derived from the following upstream commits: - -commit 8194daabfd590f17825f0c61e9534bee5c99cc86 -Author: Thomas Markwalder <tmark@isc.org> -Date: Fri Sep 14 13:41:14 2018 -0400 - - [master] Added includes of new BIND9 compatibility headers, updated util/bind.sh - - Merges in rt48072. - -commit cc35f84943df44dac2499f3e16e8aaba7d54191d -Author: Thomas Markwalder <tmark@isc.org> -Date: Tue Mar 19 08:36:23 2019 -0400 - - [master] Avoid Bind9 python dependency - - merges [#3,!1] Avoid Bind9 python dependency - ---- a/bind/Makefile.in -+++ b/bind/Makefile.in -@@ -23,7 +23,7 @@ exec_prefix = @exec_prefix@ - - bindconfig = --without-openssl --without-libxml2 --without-libjson \ - --without-gssapi --disable-threads --without-lmdb \ -- --includedir=@includedir@ --libdir=@libdir@ \ -+ --includedir=@includedir@ --libdir=@libdir@ --without-python\ - @BINDLT@ @BINDIOMUX@ @BINDCONFIG@ --enable-full-report - - @BIND_ATF_FALSE@cleandirs = ./lib ./include -diff --git a/includes/omapip/isclib.h b/includes/omapip/isclib.h -index 75a87ff6..538b927f 100644 ---- a/includes/omapip/isclib.h -+++ b/includes/omapip/isclib.h -@@ -48,6 +48,9 @@ - #include <string.h> - #include <netdb.h> - -+#include <isc/boolean.h> -+#include <isc/int.h> -+ - #include <isc/buffer.h> - #include <isc/lex.h> - #include <isc/lib.h> -diff --git a/includes/omapip/result.h b/includes/omapip/result.h -index 91243e1b..860298f6 100644 ---- a/includes/omapip/result.h -+++ b/includes/omapip/result.h -@@ -26,6 +26,7 @@ - #ifndef DHCP_RESULT_H - #define DHCP_RESULT_H 1 - -+#include <isc/boolean.h> - #include <isc/lang.h> - #include <isc/resultclass.h> - #include <isc/types.h> -diff --git a/server/dhcpv6.c b/server/dhcpv6.c -index a7110f98..cde4f617 100644 ---- a/server/dhcpv6.c -+++ b/server/dhcpv6.c -@@ -1034,7 +1034,8 @@ void check_pool6_threshold(struct reply_state *reply, - shared_name, - inet_ntop(AF_INET6, &lease->addr, - tmp_addr, sizeof(tmp_addr)), -- used, count); -+ (long long unsigned)(used), -+ (long long unsigned)(count)); - } - return; - } -@@ -1066,7 +1067,8 @@ void check_pool6_threshold(struct reply_state *reply, - "address: %s; high threshold %d%% %llu/%llu.", - shared_name, - inet_ntop(AF_INET6, &lease->addr, tmp_addr, sizeof(tmp_addr)), -- poolhigh, used, count); -+ poolhigh, (long long unsigned)(used), -+ (long long unsigned)(count)); - - /* handle the low threshold now, if we don't - * have one we default to 0. */ -@@ -1436,12 +1438,15 @@ pick_v6_address(struct reply_state *reply) - log_debug("Unable to pick client address: " - "no addresses available - shared network %s: " - " 2^64-1 < total, %llu active, %llu abandoned", -- shared_name, active - abandoned, abandoned); -+ shared_name, (long long unsigned)(active - abandoned), -+ (long long unsigned)(abandoned)); - } else { - log_debug("Unable to pick client address: " - "no addresses available - shared network %s: " - "%llu total, %llu active, %llu abandoned", -- shared_name, total, active - abandoned, abandoned); -+ shared_name, (long long unsigned)(total), -+ (long long unsigned)(active - abandoned), -+ (long long unsigned)(abandoned)); - } - - return ISC_R_NORESOURCES; diff --git a/gnu/packages/patches/libreoffice-glm.patch b/gnu/packages/patches/libreoffice-glm.patch deleted file mode 100644 index 9e76cf1389..0000000000 --- a/gnu/packages/patches/libreoffice-glm.patch +++ /dev/null @@ -1,58 +0,0 @@ -Fix build with GLM 0.9.9. - -This patch is an amalgamation of these upstream commits: - -https://github.com/LibreOffice/core/commit/953c4add8fd76d88f49a81ae4c21a1fdcc007e57 -https://github.com/LibreOffice/core/commit/5f1bf6598b5725ad1e50ae9f7ec7524cc8a834fa - -diff --git a/chart2/Library_chartcore.mk b/chart2/Library_chartcore.mk -index 28bc87b89057..69d4c0552636 100644 ---- a/chart2/Library_chartcore.mk -+++ b/chart2/Library_chartcore.mk -@@ -23,6 +23,12 @@ $(eval $(call gb_Library_add_defs,chartcore,\ - -DOOO_DLLIMPLEMENTATION_CHARTVIEW \ - )) - -+ifeq ($(SYSTEM_GLM),TRUE) -+$(eval $(call gb_Library_add_defs,chartcore,\ -+ -DGLM_ENABLE_EXPERIMENTAL \ -+)) -+endif -+ - $(eval $(call gb_Library_set_precompiled_header,chartcore,$(SRCDIR)/chart2/inc/pch/precompiled_chartcore)) - - $(eval $(call gb_Library_use_externals,chartcore,\ -diff --git a/vcl/Library_vcl.mk b/vcl/Library_vcl.mk -index c1f3cc5324e7..0b684c6185a9 100644 ---- a/vcl/Library_vcl.mk -+++ b/vcl/Library_vcl.mk -@@ -49,6 +49,12 @@ $(eval $(call gb_Library_add_defs,vcl,\ - -DENABLE_MERGELIBS=$(if $(MERGELIBS),1,0) \ - )) - -+ifeq ($(SYSTEM_GLM),TRUE) -+$(eval $(call gb_Library_add_defs,vcl,\ -+ -DGLM_ENABLE_EXPERIMENTAL \ -+)) -+endif -+ - $(eval $(call gb_Library_use_sdk_api,vcl)) - - $(eval $(call gb_Library_use_custom_headers,vcl,\ -diff --git a/vcl/Executable_icontest.mk b/vcl/Executable_icontest.mk -index ce163303f8a4..8c917b71cd0e 100644 ---- a/vcl/Executable_icontest.mk -+++ b/vcl/Executable_icontest.mk -@@ -19,6 +19,12 @@ $(eval $(call gb_Executable_use_externals,icontest,\ - )) - endif - -+ifeq ($(SYSTEM_GLM),TRUE) -+$(eval $(call gb_Executable_add_defs,icontest,\ -+ -DGLM_ENABLE_EXPERIMENTAL \ -+)) -+endif -+ - $(eval $(call gb_Executable_use_api,icontest,\ - offapi \ - udkapi \ diff --git a/gnu/packages/patches/libreoffice-icu.patch b/gnu/packages/patches/libreoffice-icu.patch deleted file mode 100644 index 2985d564aa..0000000000 --- a/gnu/packages/patches/libreoffice-icu.patch +++ /dev/null @@ -1,126 +0,0 @@ -This patch fixes the build of Libreoffice 6.0.5 with icu 61.1. -It was downloaded from https://bugs.gentoo.org/651702. - ---- a/forms/source/xforms/datatypes.hxx -+++ a/forms/source/xforms/datatypes.hxx -@@ -36,6 +36,8 @@ - - #include <memory> - -+using icu::RegexMatcher; -+ - - namespace xforms - { ---- a/i18npool/inc/collator_unicode.hxx -+++ a/i18npool/inc/collator_unicode.hxx -@@ -26,6 +26,8 @@ - - #include <unicode/tblcoll.h> - -+using icu::RuleBasedCollator; -+ - // ---------------------------------------------------- - // class Collator_Unicode - // ---------------------------------------------------- ---- a/i18npool/source/breakiterator/breakiterator_unicode.cxx -+++ a/i18npool/source/breakiterator/breakiterator_unicode.cxx -@@ -30,6 +30,9 @@ - #include <rtl/ustring.hxx> - #include <string.h> - -+using icu::BreakIterator; -+using icu::RuleBasedBreakIterator; -+ - U_CDECL_BEGIN - extern const char OpenOffice_dat[]; - U_CDECL_END ---- a/i18npool/source/collator/collator_unicode.cxx -+++ a/i18npool/source/collator/collator_unicode.cxx -@@ -29,6 +29,8 @@ - #include <com/sun/star/i18n/CollatorOptions.hpp> - #include <cppuhelper/supportsservice.hxx> - -+using icu::Collator; -+ - using namespace ::com::sun::star; - using namespace ::com::sun::star::i18n; - using namespace ::com::sun::star::lang; ---- a/i18npool/source/collator/gencoll_rule.cxx -+++ a/i18npool/source/collator/gencoll_rule.cxx -@@ -31,6 +31,8 @@ - - #include <unicode/tblcoll.h> - -+using icu::RuleBasedCollator; -+ - /* Main Procedure */ - - void data_write(char* file, char* name, sal_uInt8 *data, sal_Int32 len) ---- a/i18npool/source/ordinalsuffix/ordinalsuffix.cxx -+++ a/i18npool/source/ordinalsuffix/ordinalsuffix.cxx -@@ -29,6 +29,8 @@ - #include <unicode/normlzr.h> - #include <memory> - -+using icu::NumberFormat; -+ - using namespace ::com::sun::star::i18n; - using namespace ::com::sun::star::uno; - using namespace ::com::sun::star; ---- a/i18npool/source/transliteration/ignoreDiacritics_CTL.cxx -+++ a/i18npool/source/transliteration/ignoreDiacritics_CTL.cxx -@@ -12,6 +12,8 @@ - #include <unicode/translit.h> - #include <unicode/uchar.h> - -+using icu::UnicodeString; -+ - namespace i18npool { - - ignoreDiacritics_CTL::ignoreDiacritics_CTL() ---- a/i18nutil/source/utility/unicode.cxx -+++ a/i18nutil/source/utility/unicode.cxx -@@ -34,6 +34,9 @@ - // which (obviously) breaks UnicodeType::CURRENCY_SYMBOL - #undef CURRENCY_SYMBOL - -+using icu::NumberFormat; -+using icu::UnicodeString; -+ - using namespace ::com::sun::star::i18n; - - template<class L, typename T> ---- a/lotuswordpro/source/filter/localtime.cxx -+++ a/lotuswordpro/source/filter/localtime.cxx -@@ -57,6 +57,8 @@ - #include <limits.h> - #include <unicode/timezone.h> - -+using icu::TimeZone; -+ - const long DAY_SEC =24 * 60 * 60; - const long YEAR_SEC = 365 * DAY_SEC; - const long FOURYEAR_SEC = 4 * YEAR_SEC + DAY_SEC; ---- a/opencl/source/openclconfig.cxx -+++ a/opencl/source/openclconfig.cxx -@@ -17,6 +17,8 @@ - #include <sal/log.hxx> - #include <sal/types.h> - -+using icu::RegexMatcher; -+ - OpenCLConfig::OpenCLConfig() : - mbUseOpenCL(true) - { ---- a/vcl/inc/scrptrun.h -+++ a/vcl/inc/scrptrun.h -@@ -45,6 +45,8 @@ - #include <unicode/uscript.h> - #include <vector> - -+using icu::UObject; -+ - namespace vcl { - - struct ParenStackEntry diff --git a/gnu/packages/patches/lvm2-static-link.patch b/gnu/packages/patches/lvm2-static-link.patch index eb7849a679..2ade0a1aaa 100644 --- a/gnu/packages/patches/lvm2-static-link.patch +++ b/gnu/packages/patches/lvm2-static-link.patch @@ -3,23 +3,34 @@ and libm via libdevmapper.a. --- LVM2.2.02.166/tools/Makefile.in 2016-11-22 21:31:15.521045149 +0100 +++ LVM2.2.02.166/tools/Makefile.in 2016-11-22 21:31:24.085082767 +0100 -@@ -148,7 +148,7 @@ endif - - lvm.static: $(OBJECTS) lvm-static.o $(top_builddir)/lib/liblvm-internal.a $(interfacebuilddir)/libdevmapper.a - $(CC) $(CFLAGS) $(LDFLAGS) -static -L$(interfacebuilddir) -o $@ \ -- $(OBJECTS) lvm-static.o $(LVMLIBS) $(STATIC_LIBS) $(LIBS) -+ $(OBJECTS) lvm-static.o $(LVMLIBS) $(STATIC_LIBS) $(LIBS) $(PTHREAD_LIBS) $(M_LIBS) +@@ -137,7 +137,7 @@ + lvm.static: $(OBJECTS) lvm-static.o $(LVMINTERNAL_LIBS) + @echo " [CC] $@" + $(Q) $(CC) $(CFLAGS) $(LDFLAGS) -static -L$(interfacebuilddir) -o $@ $+ \ +- $(DMEVENT_LIBS) $(STATIC_LIBS) $(LVMLIBS) ++ $(DMEVENT_LIBS) $(STATIC_LIBS) $(LVMLIBS) $(PTHREAD_LIBS) liblvm2cmd.a: $(top_builddir)/lib/liblvm-internal.a $(OBJECTS) lvmcmdlib.o lvm2cmd.o - cat $(top_builddir)/lib/liblvm-internal.a > $@ + @echo " [AR] $@" --- a/make.tmpl.in 2018-07-31 22:00:39.969983104 +0200 +++ b/make.tmpl.in 2018-07-31 22:00:58.467613682 +0200 -@@ -53,7 +53,7 @@ +@@ -63,7 +63,7 @@ - LIBS = @LIBS@ + LIBS += @LIBS@ $(SELINUX_LIBS) $(UDEV_LIBS) $(BLKID_LIBS) $(RT_LIBS) $(M_LIBS) # Extra libraries always linked with static binaries -STATIC_LIBS = $(SELINUX_LIBS) $(UDEV_LIBS) $(BLKID_LIBS) +STATIC_LIBS = $(SELINUX_LIBS) $(UDEV_LIBS) $(BLKID_LIBS) $(M_LIBS) DEFS += @DEFS@ # FIXME set this only where it's needed, not globally? CFLAGS ?= @COPTIMISE_FLAG@ @CFLAGS@ +--- a/libdm/make.tmpl.in 2018-12-18 15:22:34.000000000 +0100 ++++ b/libdm/make.tmpl.in 2019-01-29 21:45:33.637345799 +0100 +@@ -57,7 +57,7 @@ + LIBS = @LIBS@ + LIBS += $(SELINUX_LIBS) $(UDEV_LIBS) $(BLKID_LIBS) $(RT_LIBS) -lm + # Extra libraries always linked with static binaries +-STATIC_LIBS = $(SELINUX_LIBS) $(UDEV_LIBS) $(BLKID_LIBS) ++STATIC_LIBS = $(SELINUX_LIBS) $(UDEV_LIBS) $(BLKID_LIBS) $(PTHREAD_LIBS) $(M_LIBS) + DEFS += @DEFS@ + # FIXME set this only where it's needed, not globally? + CFLAGS ?= @COPTIMISE_FLAG@ @CFLAGS@ diff --git a/gnu/packages/patches/qrcodegen-cpp-make-install.patch b/gnu/packages/patches/qrcodegen-cpp-make-install.patch new file mode 100644 index 0000000000..4da619d3c8 --- /dev/null +++ b/gnu/packages/patches/qrcodegen-cpp-make-install.patch @@ -0,0 +1,448 @@ +Make the library installable. Patch copied from pull request: + +https://github.com/nayuki/QR-Code-generator/pull/72 + +From 1625fc1665e1f83eb73c0f5670dcfda96dc0b3e4 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 3 Dec 2019 11:57:24 +0100 +Subject: [PATCH 1/7] Do not append to C/XX/FLAGS but just set them if not + defined already + +--- + c/Makefile | 2 +- + cpp/Makefile | 2 +- + 2 files changed, 2 insertions(+), 2 deletions(-) + +diff --git a/c/Makefile b/c/Makefile +index fd0c367..b27449c 100644 +--- a/c/Makefile ++++ b/c/Makefile +@@ -29,7 +29,7 @@ + # - CFLAGS: Any extra user-specified compiler flags (can be blank). + + # Recommended compiler flags: +-CFLAGS += -std=c99 -O ++CFLAGS ?= -std=c99 -O + + # Extra flags for diagnostics: + # CFLAGS += -g -Wall -Wextra -Wpedantic -Wconversion -Wsign-conversion -fsanitize=undefined,address +diff --git a/cpp/Makefile b/cpp/Makefile +index f83c512..666f976 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -29,7 +29,7 @@ + # - CXXFLAGS: Any extra user-specified compiler flags (can be blank). + + # Recommended compiler flags: +-CXXFLAGS += -std=c++11 -O ++CXXFLAGS ?= -std=c++11 -O + + # Extra flags for diagnostics: + # CXXFLAGS += -g -Wall -Wextra -Wpedantic -Wconversion -Wsign-conversion -fsanitize=undefined,address + +From 2e496a0f59d5c6782c1e3e2a3ca36d0272b384f3 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 3 Dec 2019 11:59:59 +0100 +Subject: [PATCH 2/7] Make use of -fPIC parameter when building' + +--- + c/Makefile | 2 +- + cpp/Makefile | 2 +- + 2 files changed, 2 insertions(+), 2 deletions(-) + +diff --git a/c/Makefile b/c/Makefile +index b27449c..bf79462 100644 +--- a/c/Makefile ++++ b/c/Makefile +@@ -77,7 +77,7 @@ $(LIBFILE): $(LIBOBJ) + + # Object files + %.o: %.c .deps/timestamp +- $(CC) $(CFLAGS) -c -o $@ -MMD -MF .deps/$*.d $< ++ $(CC) $(CFLAGS) -fPIC -c -o $@ -MMD -MF .deps/$*.d $< + + # Have a place to store header dependencies automatically generated by compiler + .deps/timestamp: +diff --git a/cpp/Makefile b/cpp/Makefile +index 666f976..f37cf66 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -73,7 +73,7 @@ $(LIBFILE): $(LIBOBJ) + + # Object files + %.o: %.cpp .deps/timestamp +- $(CXX) $(CXXFLAGS) -c -o $@ -MMD -MF .deps/$*.d $< ++ $(CXX) $(CXXFLAGS) -fPIC -c -o $@ -MMD -MF .deps/$*.d $< + + # Have a place to store header dependencies automatically generated by compiler + .deps/timestamp: + +From 29489faaa5a3b014c5c2d95ca34033df470de73c Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 3 Dec 2019 12:07:19 +0100 +Subject: [PATCH 3/7] Generate both shared and static libraries + +--- + c/Makefile | 14 ++++++++++---- + cpp/Makefile | 14 ++++++++++---- + 2 files changed, 20 insertions(+), 8 deletions(-) + +diff --git a/c/Makefile b/c/Makefile +index bf79462..38eda2d 100644 +--- a/c/Makefile ++++ b/c/Makefile +@@ -51,16 +51,19 @@ CFLAGS ?= -std=c99 -O + # ---- Targets to build ---- + + LIB = qrcodegen +-LIBFILE = lib$(LIB).a ++ARFILE = lib$(LIB).a ++LIBFILE = lib$(LIB).so ++# Bump the soname number when the ABI changes and gets incompatible ++SO_NAME = $(LIBFILE).1 + LIBOBJ = qrcodegen.o + MAINS = qrcodegen-demo qrcodegen-test qrcodegen-worker + + # Build all binaries +-all: $(LIBFILE) $(MAINS) ++all: $(LIBFILE) $(ARFILE) $(MAINS) + + # Delete build output + clean: +- rm -f -- $(LIBOBJ) $(LIBFILE) $(MAINS:=.o) $(MAINS) ++ rm -f -- $(LIBOBJ) $(LIBFILE) $(ARFILE) $(MAINS:=.o) $(MAINS) + rm -rf .deps + + # Executable files +@@ -72,9 +75,12 @@ qrcodegen-test: qrcodegen-test.c $(LIBOBJ:%.o=%.c) + $(CC) $(CFLAGS) -DQRCODEGEN_TEST -o $@ $^ + + # The library +-$(LIBFILE): $(LIBOBJ) ++$(ARFILE): $(LIBOBJ) + $(AR) -crs $@ -- $^ + ++$(LIBFILE): $(LIBOBJ) ++ $(CC) -shared -Wl,-soname,$(SO_NAME) $(LDFLAGS) -o $@ $^ ++ + # Object files + %.o: %.c .deps/timestamp + $(CC) $(CFLAGS) -fPIC -c -o $@ -MMD -MF .deps/$*.d $< +diff --git a/cpp/Makefile b/cpp/Makefile +index f37cf66..606cdad 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -51,16 +51,19 @@ CXXFLAGS ?= -std=c++11 -O + # ---- Targets to build ---- + + LIB = qrcodegen +-LIBFILE = lib$(LIB).a ++ARFILE = lib$(LIB).a ++LIBFILE = lib$(LIB).so ++# Bump the soname number when the ABI changes and gets incompatible ++SO_NAME = $(LIBFILE).1 + LIBOBJ = QrCode.o + MAINS = QrCodeGeneratorDemo QrCodeGeneratorWorker + + # Build all binaries +-all: $(LIBFILE) $(MAINS) ++all: $(LIBFILE) $(ARFILE) $(MAINS) + + # Delete build output + clean: +- rm -f -- $(LIBOBJ) $(LIBFILE) $(MAINS:=.o) $(MAINS) ++ rm -f -- $(LIBOBJ) $(LIBFILE) $(ARFILE) $(MAINS:=.o) $(MAINS) + rm -rf .deps + + # Executable files +@@ -68,9 +71,12 @@ clean: + $(CXX) $(CXXFLAGS) -o $@ $< -L . -l $(LIB) + + # The library +-$(LIBFILE): $(LIBOBJ) ++$(ARFILE): $(LIBOBJ) + $(AR) -crs $@ -- $^ + ++$(LIBFILE): $(LIBOBJ) ++ $(CC) -shared -Wl,-soname,$(SO_NAME) $(LDFLAGS) -o $@ $^ ++ + # Object files + %.o: %.cpp .deps/timestamp + $(CXX) $(CXXFLAGS) -fPIC -c -o $@ -MMD -MF .deps/$*.d $< + +From 064f38d6a8dc0a457728a47ee4ca1e927e46d5ec Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 3 Dec 2019 12:45:34 +0100 +Subject: [PATCH 4/7] Create install targets for C and CPP + +--- + c/Makefile | 26 ++++++++++++++++++++++++++ + cpp/Makefile | 27 +++++++++++++++++++++++++++ + 2 files changed, 53 insertions(+) + +diff --git a/c/Makefile b/c/Makefile +index 38eda2d..7521944 100644 +--- a/c/Makefile ++++ b/c/Makefile +@@ -34,6 +34,8 @@ CFLAGS ?= -std=c99 -O + # Extra flags for diagnostics: + # CFLAGS += -g -Wall -Wextra -Wpedantic -Wconversion -Wsign-conversion -fsanitize=undefined,address + ++# Version information ++VERSION = 1.5.0 + + # ---- Controlling make ---- + +@@ -55,9 +57,15 @@ ARFILE = lib$(LIB).a + LIBFILE = lib$(LIB).so + # Bump the soname number when the ABI changes and gets incompatible + SO_NAME = $(LIBFILE).1 ++REAL_NAME = $(LIBFILE).$(VERSION) ++HEADERS = qrcodegen.h + LIBOBJ = qrcodegen.o + MAINS = qrcodegen-demo qrcodegen-test qrcodegen-worker + ++# define paths to install ++INCLUDEDIR ?= $(DESTDIR)/usr/include/qrcodegen ++LIBDIR ?= $(DESTDIR)/usr/lib ++ + # Build all binaries + all: $(LIBFILE) $(ARFILE) $(MAINS) + +@@ -66,6 +74,24 @@ clean: + rm -f -- $(LIBOBJ) $(LIBFILE) $(ARFILE) $(MAINS:=.o) $(MAINS) + rm -rf .deps + ++install-shared: $(LIBFILE) ++ install -d $(LIBDIR) || true ++ install -m 0644 $(LIBFILE) $(LIBDIR)/$(REAL_NAME) ++ rm -f $(LIBDIR)/$(SO_NAME) ++ ln -s $(REAL_NAME) $(LIBDIR)/$(SO_NAME) ++ rm -f $(LIBDIR)/$(LIBFILE) ++ ln -s $(SO_NAME) $(LIBDIR)/$(LIBFILE) ++ ++install-static: $(ARFILE) ++ install -d $(LIBDIR) || true ++ install -m 0644 $(ARFILE) $(LIBDIR)/$(ARFILE) ++ ++install-header: $(HEADERS) ++ install -d $(INCLUDEDIR) || true ++ install -m 0644 $(HEADERS) $(INCLUDEDIR)/ ++ ++install: install-shared install-static install-header ++ + # Executable files + %: %.o $(LIBFILE) + $(CC) $(CFLAGS) -o $@ $< -L . -l $(LIB) +diff --git a/cpp/Makefile b/cpp/Makefile +index 606cdad..3271bd8 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -34,6 +34,8 @@ CXXFLAGS ?= -std=c++11 -O + # Extra flags for diagnostics: + # CXXFLAGS += -g -Wall -Wextra -Wpedantic -Wconversion -Wsign-conversion -fsanitize=undefined,address + ++# Version information ++VERSION = 1.5.0 + + # ---- Controlling make ---- + +@@ -55,9 +57,16 @@ ARFILE = lib$(LIB).a + LIBFILE = lib$(LIB).so + # Bump the soname number when the ABI changes and gets incompatible + SO_NAME = $(LIBFILE).1 ++REAL_NAME = $(LIBFILE).$(VERSION) ++HEADERS = QrCode.hpp + LIBOBJ = QrCode.o + MAINS = QrCodeGeneratorDemo QrCodeGeneratorWorker + ++# define paths to install ++INCLUDEDIR ?= $(DESTDIR)/usr/include/qrcodegen ++LIBDIR ?= $(DESTDIR)/usr/lib ++ ++ + # Build all binaries + all: $(LIBFILE) $(ARFILE) $(MAINS) + +@@ -66,6 +75,24 @@ clean: + rm -f -- $(LIBOBJ) $(LIBFILE) $(ARFILE) $(MAINS:=.o) $(MAINS) + rm -rf .deps + ++install-shared: $(LIBFILE) ++ install -d $(LIBDIR) || true ++ install -m 0644 $(LIBFILE) $(LIBDIR)/$(REAL_NAME) ++ rm -f $(LIBDIR)/$(SO_NAME) ++ ln -s $(REAL_NAME) $(LIBDIR)/$(SO_NAME) ++ rm -f $(LIBDIR)/$(LIBFILE) ++ ln -s $(SO_NAME) $(LIBDIR)/$(LIBFILE) ++ ++install-static: $(ARFILE) ++ install -d $(LIBDIR) || true ++ install -m 0644 $(ARFILE) $(LIBDIR)/$(ARFILE) ++ ++install-header: $(HEADERS) ++ install -d $(INCLUDEDIR) || true ++ install -m 0644 $(HEADERS) $(INCLUDEDIR)/ ++ ++install: install-shared install-static install-header ++ + # Executable files + %: %.o $(LIBFILE) + $(CXX) $(CXXFLAGS) -o $@ $< -L . -l $(LIB) + +From a635ff4654f94ab26b458c46a8841543e5bc8c67 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 3 Dec 2019 12:50:39 +0100 +Subject: [PATCH 5/7] Rename cpp library to qrcodegencpp to avoid conflict + +--- + cpp/Makefile | 2 +- + 1 file changed, 1 insertion(+), 1 deletion(-) + +diff --git a/cpp/Makefile b/cpp/Makefile +index 3271bd8..42fa4ff 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -52,7 +52,7 @@ VERSION = 1.5.0 + + # ---- Targets to build ---- + +-LIB = qrcodegen ++LIB = qrcodegencpp + ARFILE = lib$(LIB).a + LIBFILE = lib$(LIB).so + # Bump the soname number when the ABI changes and gets incompatible + +From c073e7dfad6454dfd725a69c347f8272d29ea41c Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 7 Jan 2020 09:18:59 +0100 +Subject: [PATCH 6/7] Add PREFIX variable and few minor fixes from code review + +--- + c/Makefile | 9 +++++---- + cpp/Makefile | 9 +++++---- + 2 files changed, 10 insertions(+), 8 deletions(-) + +diff --git a/c/Makefile b/c/Makefile +index 7521944..874933e 100644 +--- a/c/Makefile ++++ b/c/Makefile +@@ -29,7 +29,7 @@ + # - CFLAGS: Any extra user-specified compiler flags (can be blank). + + # Recommended compiler flags: +-CFLAGS ?= -std=c99 -O ++CFLAGS += -std=c99 + + # Extra flags for diagnostics: + # CFLAGS += -g -Wall -Wextra -Wpedantic -Wconversion -Wsign-conversion -fsanitize=undefined,address +@@ -63,8 +63,9 @@ LIBOBJ = qrcodegen.o + MAINS = qrcodegen-demo qrcodegen-test qrcodegen-worker + + # define paths to install +-INCLUDEDIR ?= $(DESTDIR)/usr/include/qrcodegen +-LIBDIR ?= $(DESTDIR)/usr/lib ++PREFIX ?= /usr/local ++INCLUDEDIR ?= $(DESTDIR)$(PREFIX)/include/qrcodegen ++LIBDIR ?= $(DESTDIR)$(PREFIX)/lib + + # Build all binaries + all: $(LIBFILE) $(ARFILE) $(MAINS) +@@ -105,7 +106,7 @@ $(ARFILE): $(LIBOBJ) + $(AR) -crs $@ -- $^ + + $(LIBFILE): $(LIBOBJ) +- $(CC) -shared -Wl,-soname,$(SO_NAME) $(LDFLAGS) -o $@ $^ ++ $(CC) $(CFLAGS) -shared -Wl,-soname,$(SO_NAME) $(LDFLAGS) -o $@ $^ + + # Object files + %.o: %.c .deps/timestamp +diff --git a/cpp/Makefile b/cpp/Makefile +index 42fa4ff..f8d9b7f 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -29,7 +29,7 @@ + # - CXXFLAGS: Any extra user-specified compiler flags (can be blank). + + # Recommended compiler flags: +-CXXFLAGS ?= -std=c++11 -O ++CXXFLAGS += -std=c++11 + + # Extra flags for diagnostics: + # CXXFLAGS += -g -Wall -Wextra -Wpedantic -Wconversion -Wsign-conversion -fsanitize=undefined,address +@@ -63,8 +63,9 @@ LIBOBJ = QrCode.o + MAINS = QrCodeGeneratorDemo QrCodeGeneratorWorker + + # define paths to install +-INCLUDEDIR ?= $(DESTDIR)/usr/include/qrcodegen +-LIBDIR ?= $(DESTDIR)/usr/lib ++PREFIX ?= /usr/local ++INCLUDEDIR ?= $(DESTDIR)$(PREFIX)/include/qrcodegen ++LIBDIR ?= $(DESTDIR)$(PREFIX)/lib + + + # Build all binaries +@@ -102,7 +103,7 @@ $(ARFILE): $(LIBOBJ) + $(AR) -crs $@ -- $^ + + $(LIBFILE): $(LIBOBJ) +- $(CC) -shared -Wl,-soname,$(SO_NAME) $(LDFLAGS) -o $@ $^ ++ $(CXX) $(CXXFLAGS) -shared -Wl,-soname,$(SO_NAME) $(LDFLAGS) -o $@ $^ + + # Object files + %.o: %.cpp .deps/timestamp + +From b43c1de5cc874535a7f549cef437f6849528e455 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Chv=C3=A1tal?= <tchvatal@suse.com> +Date: Tue, 7 Jan 2020 13:12:32 +0100 +Subject: [PATCH 7/7] Install static and shared library as an executable + +--- + c/Makefile | 4 ++-- + cpp/Makefile | 4 ++-- + 2 files changed, 4 insertions(+), 4 deletions(-) + +diff --git a/c/Makefile b/c/Makefile +index 874933e..631cc71 100644 +--- a/c/Makefile ++++ b/c/Makefile +@@ -77,7 +77,7 @@ clean: + + install-shared: $(LIBFILE) + install -d $(LIBDIR) || true +- install -m 0644 $(LIBFILE) $(LIBDIR)/$(REAL_NAME) ++ install -m 0755 $(LIBFILE) $(LIBDIR)/$(REAL_NAME) + rm -f $(LIBDIR)/$(SO_NAME) + ln -s $(REAL_NAME) $(LIBDIR)/$(SO_NAME) + rm -f $(LIBDIR)/$(LIBFILE) +@@ -85,7 +85,7 @@ install-shared: $(LIBFILE) + + install-static: $(ARFILE) + install -d $(LIBDIR) || true +- install -m 0644 $(ARFILE) $(LIBDIR)/$(ARFILE) ++ install -m 0755 $(ARFILE) $(LIBDIR)/$(ARFILE) + + install-header: $(HEADERS) + install -d $(INCLUDEDIR) || true +diff --git a/cpp/Makefile b/cpp/Makefile +index f8d9b7f..bbd861e 100644 +--- a/cpp/Makefile ++++ b/cpp/Makefile +@@ -78,7 +78,7 @@ clean: + + install-shared: $(LIBFILE) + install -d $(LIBDIR) || true +- install -m 0644 $(LIBFILE) $(LIBDIR)/$(REAL_NAME) ++ install -m 0755 $(LIBFILE) $(LIBDIR)/$(REAL_NAME) + rm -f $(LIBDIR)/$(SO_NAME) + ln -s $(REAL_NAME) $(LIBDIR)/$(SO_NAME) + rm -f $(LIBDIR)/$(LIBFILE) +@@ -86,7 +86,7 @@ install-shared: $(LIBFILE) + + install-static: $(ARFILE) + install -d $(LIBDIR) || true +- install -m 0644 $(ARFILE) $(LIBDIR)/$(ARFILE) ++ install -m 0755 $(ARFILE) $(LIBDIR)/$(ARFILE) + + install-header: $(HEADERS) + install -d $(INCLUDEDIR) || true diff --git a/gnu/packages/patches/reprotest-support-guix.patch b/gnu/packages/patches/reprotest-support-guix.patch new file mode 100644 index 0000000000..621c4e3359 --- /dev/null +++ b/gnu/packages/patches/reprotest-support-guix.patch @@ -0,0 +1,79 @@ +From 31bd4fe777cbff3ebca74115e5735a8b8f584fa7 Mon Sep 17 00:00:00 2001 +From: Vagrant Cascadian <vagrant@reproducible-builds.org> +Date: Thu, 6 Feb 2020 23:17:58 -0800 +Subject: [PATCH] Add support for GNU Guix. + +--- + reprotest/lib/adt_testbed.py | 2 ++ + reprotest/lib/system_interface/guix.py | 39 ++++++++++++++++++++++++++ + 2 files changed, 41 insertions(+) + create mode 100644 reprotest/lib/system_interface/guix.py + +diff --git a/reprotest/lib/adt_testbed.py b/reprotest/lib/adt_testbed.py +index ef704d6..60bf763 100644 +--- a/reprotest/lib/adt_testbed.py ++++ b/reprotest/lib/adt_testbed.py +@@ -40,6 +40,7 @@ import urllib.parse + from reprotest.lib.system_interface.debian import DebianInterface + from reprotest.lib.system_interface.arch import ArchInterface + from reprotest.lib.system_interface.fedora import FedoraInterface ++from reprotest.lib.system_interface.guix import GuixInterface + from reprotest.lib import adtlog + from reprotest.lib import VirtSubproc + +@@ -47,6 +48,7 @@ SYSTEM_INTERFACES = { + 'debian': DebianInterface, + 'arch': ArchInterface, + 'fedora': FedoraInterface, ++ 'guix': GuixInterface, + } + + timeouts = { +diff --git a/reprotest/lib/system_interface/guix.py b/reprotest/lib/system_interface/guix.py +new file mode 100644 +index 0000000..2b06104 +--- /dev/null ++++ b/reprotest/lib/system_interface/guix.py +@@ -0,0 +1,39 @@ ++# adt_testbed.py is part of autopkgtest ++# autopkgtest is a tool for testing Debian binary packages. The ++# system_interface module is an addition for reprotest to make ++# this module distro-agnostic ++# ++# autopkgtest is Copyright (C) 2006-2015 Canonical Ltd. ++# the system_interface module is Copyright (C) 2017 Santiago Torres-Arias ++# ++# This program 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 2 of the License, or ++# (at your option) any later version. ++# ++# This program 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 this program; if not, write to the Free Software ++# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. ++# ++# See the file CREDITS for a full list of credits information (often ++# installed as /usr/share/doc/autopkgtest/CREDITS). ++import subprocess ++ ++from . import SystemInterface ++ ++class GuixInterface(SystemInterface): ++ """ ++ SystemInterface implementation for GNU Guix hosts. Contains commands that ++ are specific to the GNU Guix toolchain. ++ """ ++ ++ def get_arch(self): ++ return ['uname', '-m'] ++ ++ def can_query_packages(self): ++ return False +-- +2.20.1 + diff --git a/gnu/packages/patches/rust-openssl-sys-no-vendor.patch b/gnu/packages/patches/rust-openssl-sys-no-vendor.patch new file mode 100644 index 0000000000..78a6b5e3f7 --- /dev/null +++ b/gnu/packages/patches/rust-openssl-sys-no-vendor.patch @@ -0,0 +1,23 @@ +https://sources.debian.org/data/main/r/rust-openssl-sys/0.9.53-1/debian/patches/disable-vendor.patch +"MIT" licensed according to debian/copyright file +slightly modified to only change the vendored openssl-src dependency + +--- a/Cargo.toml ++++ b/Cargo.toml +@@ -31,14 +31,11 @@ + [build-dependencies.cc] + version = "1.0" + +-[build-dependencies.openssl-src] +-version = "111.0.1" +-optional = true +- + [build-dependencies.pkg-config] + version = "0.3.9" + + [features] + vendored = ["openssl-src"] ++openssl-src = [] + [target."cfg(target_env = \"msvc\")".build-dependencies.vcpkg] + version = "0.2" + diff --git a/gnu/packages/patchutils.scm b/gnu/packages/patchutils.scm index 80c454a5c4..e32e6c7b12 100644 --- a/gnu/packages/patchutils.scm +++ b/gnu/packages/patchutils.scm @@ -322,7 +322,7 @@ you to figure out what is going on in that merge you keep avoiding.") (define-public patchwork (package (name "patchwork") - (version "2.1.4") + (version "2.1.5") (source (origin (method git-fetch) (uri (git-reference @@ -331,7 +331,7 @@ you to figure out what is going on in that merge you keep avoiding.") (file-name (git-file-name name version)) (sha256 (base32 - "0zi1hcqb0pi2diyznbv0c1631qk4rx02zl8ghyrr59g3ljlyr18y")))) + "1n4hfwlgmw6mj5kp261zfx47mgb0l7g2yzl1rf0rnm8x69lr3as6")))) (build-system python-build-system) (arguments `(;; TODO: Tests require a running database diff --git a/gnu/packages/pdf.scm b/gnu/packages/pdf.scm index 62120b9cf9..f1d3b56221 100644 --- a/gnu/packages/pdf.scm +++ b/gnu/packages/pdf.scm @@ -17,6 +17,7 @@ ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2019 Ben Sturmfels <ben@sturm.com.au> ;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com> +;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -45,6 +46,7 @@ #:use-module (guix build-system python) #:use-module (guix build-system trivial) #:use-module (gnu packages) + #:use-module (gnu packages audio) #:use-module (gnu packages autotools) #:use-module (gnu packages backup) #:use-module (gnu packages base) @@ -55,6 +57,7 @@ #:use-module (gnu packages djvu) #:use-module (gnu packages fontutils) #:use-module (gnu packages game-development) + #:use-module (gnu packages gcc) #:use-module (gnu packages gettext) #:use-module (gnu packages ghostscript) #:use-module (gnu packages gl) @@ -74,6 +77,7 @@ #:use-module (gnu packages perl) #:use-module (gnu packages photo) #:use-module (gnu packages pkg-config) + #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) #:use-module (gnu packages python-check) #:use-module (gnu packages python-web) @@ -82,8 +86,10 @@ #:use-module (gnu packages sdl) #:use-module (gnu packages sphinx) #:use-module (gnu packages sqlite) + #:use-module (gnu packages tex) #:use-module (gnu packages tls) #:use-module (gnu packages xdisorg) + #:use-module (gnu packages xml) #:use-module (gnu packages xorg) #:use-module (srfi srfi-1)) @@ -752,6 +758,94 @@ program capable of converting PDF into other formats.") using a stylus.") (license license:gpl2+))) +(define-public xournalpp + (package + (name "xournalpp") + (version "1.0.17") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/xournalpp/xournalpp.git") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0xw2mcgnm4sa9hrhfgp669lfypw97drxjmz5w8i5whaprpvmkxzw")))) + (build-system cmake-build-system) + (arguments + `(#:configure-flags (list "-DENABLE_CPPUNIT=ON") ;enable tests + #:imported-modules ((guix build glib-or-gtk-build-system) + ,@%cmake-build-system-modules) + #:modules (((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:) + (guix build cmake-build-system) + (guix build utils)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-permissions-on-po-files + (lambda _ + ;; Always generate translations. A recent upstream patch + ;; disabled it. + (substitute* "po/CMakeLists.txt" + (("gettext_create_translations \\(\"\\$\\{potfile\\}\"\\)") + "gettext_create_translations (\"${potfile}\" ALL)")) + ;; Make sure 'msgmerge' can modify the PO files. + (for-each (lambda (po) (chmod po #o666)) + (find-files "." "\\.po$")) + #t)) + (add-after 'install 'glib-or-gtk-wrap + (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))))) + (native-inputs + `(("cppunit" ,cppunit) + ("gcc" ,gcc-8) ;requires gcc 8+ + ("gettext" ,gettext-minimal) + ("pkg-config" ,pkg-config))) + (inputs + `(("alsa-lib" ,alsa-lib) + ("glib" ,glib) + ("gtk+" ,gtk+) + ("libsndfile" ,libsndfile) + ("libxml2" ,libxml2) + ("libzip" ,libzip) + ("lua" ,lua) ;FIXME: It cannot find the Lua library. + ("poppler" ,poppler) + ("portaudio" ,portaudio) + ("texlive-bin" ,texlive-bin))) + (home-page "https://github.com/xournalpp/xournalpp") + (synopsis "Handwriting notetaking software with PDF annotation support") + (description "Xournal++ is a hand note taking software written in +C++ with the target of flexibility, functionality and speed. Stroke +recognizer and other parts are based on Xournal code. + +Xournal++ features: + +@itemize +@item Support for Pen pressure, e.g., Wacom Tablet +@item Support for annotating PDFs +@item Fill shape functionality +@item PDF Export (with and without paper style) +@item PNG Export (with and without transparent background) +@item Allow to map different tools / colors etc. to stylus buttons / +mouse buttons +@item Sidebar with Page Previews with advanced page sorting, PDF +Bookmarks and Layers (can be individually hidden, editing layer can be +selected) +@item enhanced support for image insertion +@item Eraser with multiple configurations +@item LaTeX support +@item bug reporting, autosave, and auto backup tools +@item Customizeable toolbar, with multiple configurations, e.g., to +optimize toolbar for portrait / landscape +@item Page Template definitions +@item Shape drawing (line, arrow, circle, rectangle) +@item Shape resizing and rotation +@item Rotation snapping every 45 degrees +@item Rect snapping to grid +@item Audio recording and playback alongside with handwritten notes +@item Multi Language Support, Like English, German, Italian... +@item Plugins using LUA Scripting +@end itemize") + (license license:gpl2+))) + (define-public python-reportlab (package (name "python-reportlab") diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm index 590bd5083b..078aa95c34 100644 --- a/gnu/packages/perl.scm +++ b/gnu/packages/perl.scm @@ -24,6 +24,7 @@ ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2019 Stephen J. Scheck <sscheck@cpan.org> +;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -1371,6 +1372,26 @@ parser in your Perl programme and allows sharing configuration files between languages.") (license bsd-3))) +(define-public perl-config-grammar + (package + (name "perl-config-grammar") + (version "1.13") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://cpan/authors/id/D/DS/DSCHWEI/" + "Config-Grammar-" version ".tar.gz")) + (sha256 + (base32 "1qynf5bk6mnk90nggm3z8rdz2535kmqg46s0vj93pi68r6ia7cx8")))) + (build-system perl-build-system) + (home-page "https://metacpan.org/release/Config-Grammar") + (synopsis "Grammar-based config parser") + (description + "Config::Grammar is a module to parse configuration files. The +configuration may consist of multiple-level sections with assignments and +tabular data.") + (license (package-license perl)))) + (define-public perl-config-any (package (name "perl-config-any") diff --git a/gnu/packages/protobuf.scm b/gnu/packages/protobuf.scm index 9ef9587975..4ea36a2fba 100644 --- a/gnu/packages/protobuf.scm +++ b/gnu/packages/protobuf.scm @@ -75,7 +75,7 @@ data in motion, or as a file format for data at rest.") (define-public protobuf (package (name "protobuf") - (version "3.10.1") + (version "3.11.3") (source (origin (method url-fetch) (uri (string-append "https://github.com/google/protobuf/releases/" @@ -83,7 +83,7 @@ data in motion, or as a file format for data at rest.") version ".tar.gz")) (sha256 (base32 - "16xrclp3xw4hzni1h53px9s99657hs5790726lchm3hrvsyyabp8")))) + "0l8a1sgzhwwx5j5hv9n9zx8vkdwwn5gvd9dcpkkz4h0j17k1zywz")))) (build-system gnu-build-system) (inputs `(("zlib" ,zlib))) (outputs (list "out" @@ -203,14 +203,14 @@ encoder in C++. The developer using protozero has to manually translate the (define-public python-protobuf (package (name "python-protobuf") - (version "3.10.0") + (version "3.11.3") (source (origin (method url-fetch) (uri (pypi-uri "protobuf" version)) (sha256 (base32 - "1zjq3qi0wgqi0fwxgqlgwvj9ri1m4kmnz3jnpd803lqc5k0vb0yv")))) + "07qby3yc2a8a1vsxnc79j687q4r68k1d3npni7bldwmd3m6rfz67")))) (build-system python-build-system) (propagated-inputs `(("python-six" ,python-six))) diff --git a/gnu/packages/pulseaudio.scm b/gnu/packages/pulseaudio.scm index 62d555d788..7c4c26f009 100644 --- a/gnu/packages/pulseaudio.scm +++ b/gnu/packages/pulseaudio.scm @@ -10,6 +10,7 @@ ;;; Copyright © 2018 Pierre Langlois <pierre.langlois@gmx.com> ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com> +;;; Copyright © 2020 Amin Bandali <mab@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -39,9 +40,11 @@ #:use-module (gnu packages audio) #:use-module (gnu packages autotools) #:use-module (gnu packages avahi) + #:use-module (gnu packages boost) #:use-module (gnu packages check) #:use-module (gnu packages dbm) #:use-module (gnu packages glib) + #:use-module (gnu packages gnome) #:use-module (gnu packages gtk) #:use-module (gnu packages libcanberra) #:use-module (gnu packages web) @@ -385,3 +388,77 @@ install one or more of the following packages alongside pulseaudio-dlna: @item vorbis-tools - Vorbis transcoding support @end itemize") (license l:gpl3+)))) + +(define-public pamixer + (package + (name "pamixer") + (version "1.4") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/cdemoulins/pamixer.git") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1i14550n8paijwwnhksv5izgfqm3s5q2773bdfp6vyqybkll55f7")))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f ; There is no test suite. + #:make-flags + (list (string-append "PREFIX=" (assoc-ref %outputs "out"))) + #:phases + (modify-phases %standard-phases + (delete 'configure) ; There's no configure phase. + (add-before 'install 'mkdir-bin + (lambda _ + (mkdir-p (string-append (assoc-ref %outputs "out") "/bin")) + #t))))) + (inputs + `(("boost" ,boost) + ("pulseaudio" ,pulseaudio))) + (home-page "https://github.com/cdemoulins/pamixer") + (synopsis "PulseAudio command line mixer") + (description + "pamixer is like amixer but for PulseAudio, allowing easy control of the +volume levels of the sinks (get, set, decrease, increase, toggle mute, etc).") + (license l:gpl3+))) + +(define-public pasystray + (package + (name "pasystray") + (version "0.7.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/christophgysin/pasystray.git") + (commit (string-append name "-" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0xx1bm9kimgq11a359ikabdndqg5q54pn1d1dyyjnrj0s41168fk")))) + (build-system gnu-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-before 'bootstrap 'remove-bootstrap.sh + (lambda _ + ;; Interferes with the bootstrap phase. + (delete-file "bootstrap.sh") + #t))))) + (native-inputs + `(("autoconf" ,autoconf) + ("automake" ,automake) + ("pkg-config" ,pkg-config))) + (inputs + `(("avahi" ,avahi) + ("gtk+" ,gtk+) + ("libnotify" ,libnotify) + ("libx11" ,libx11) + ("pulseaudio" ,pulseaudio))) + (home-page "https://github.com/christophgysin/pasystray") + (synopsis "PulseAudio controller for the system tray") + (description "@command{pasystray} enables control of various +PulseAudio server settings from the X11 system tray. See the project +README.md for a detailed list of features.") + (license l:lgpl2.1+))) diff --git a/gnu/packages/python-xyz.scm b/gnu/packages/python-xyz.scm index 67d0582a4f..0014cc3bf3 100644 --- a/gnu/packages/python-xyz.scm +++ b/gnu/packages/python-xyz.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org> -;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013, 2014, 2015, 2016, 2019 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014, 2017 Eric Bavier <bavier@member.fsf.org> @@ -1990,6 +1990,28 @@ between Julian dates and Gregorian dates.") (define-public python2-jdcal (package-with-python2 python-jdcal)) +(define-public python-jsondiff + (package + (name "python-jsondiff") + (version "1.2.0") + (source + (origin + (method url-fetch) + (uri (pypi-uri "jsondiff" version)) + (sha256 + (base32 + "00v3689175aqzdscrxpffm712ylp8jvcpqdg51ca22ni6721p51l")))) + (build-system python-build-system) + (native-inputs + `(("python-nose" ,python-nose) + ("python-nose-random" ,python-nose-random))) + (home-page + "https://github.com/fzumstein/jsondiff") + (synopsis "Compare JSON and JSON-like structures in Python") + (description "@code{jsondiff} is a Python library which lets you +compare, diff, and patch JSON and JSON-like structures in Python.") + (license license:expat))) + (define-public python-jsonschema (package (name "python-jsonschema") @@ -2922,6 +2944,27 @@ for SSH and SFTP. It has the following main usages: @end itemize") (license license:asl2.0))) +(define-public python-rstr + (package + (name "python-rstr") + (version "2.2.6") + (source + (origin + (method url-fetch) + (uri (pypi-uri "rstr" version)) + (sha256 + (base32 + "197dw8mbq0pjjz1l6h1ksi62vgn7x55d373ch74y06744qiq5sjx")))) + (build-system python-build-system) + (home-page + "http://bitbucket.org/leapfrogdevelopment/rstr/overview") + (synopsis "Generate random strings in Python") + (description "This package provides a python module for generating +random strings of various types. It could be useful for fuzz testing, +generating dummy data, or other applications. It has no dependencies +outside the standard library.") + (license license:bsd-3))) + (define-public python-scp (package (name "python-scp") @@ -6716,14 +6759,14 @@ Python.") (define-public python-markdown (package (name "python-markdown") - (version "3.1.1") + (version "3.2") (source (origin (method url-fetch) (uri (pypi-uri "Markdown" version)) (sha256 (base32 - "0yhylk4ffqqs7x086fav4pnfsl1021v7lghznzkififprmmqfl1f")))) + "1gwqrhrp0n9xllgmjc8n1p260968kr0dd2jncjkj4r617q61imss")))) (build-system python-build-system) (native-inputs `(("python-nose" ,python-nose) @@ -6735,10 +6778,21 @@ Python.") Markdown. The library features international input, various Markdown extensions, and several HTML output formats. A command line wrapper markdown_py is also provided to convert Markdown files to HTML.") + (properties `((python2-variant . ,(delay python2-markdown)))) (license license:bsd-3))) +;; Markdown 3.2 dropped support for Python 2. (define-public python2-markdown - (package-with-python2 python-markdown)) + (let ((base (package-with-python2 (strip-python2-variant python-markdown)))) + (package/inherit + base + (version "3.1.1") + (source (origin + (method url-fetch) + (uri (pypi-uri "Markdown" version)) + (sha256 + (base32 + "0yhylk4ffqqs7x086fav4pnfsl1021v7lghznzkififprmmqfl1f"))))))) (define-public python-ptyprocess (package @@ -7427,14 +7481,14 @@ responses, rather than doing any computation.") (define-public python-pip (package (name "python-pip") - (version "19.2.1") + (version "20.0.2") (source (origin (method url-fetch) (uri (pypi-uri "pip" version)) (sha256 (base32 - "100sd12ss4mbdj5lf3wawad29cm573b27765mq098x6xhcj71395")))) + "0zwnlsjn6mb742cr995zfbk9v56ygxp8w3k49601r9by9kmcic3x")))) (build-system python-build-system) (arguments '(#:tests? #f)) ; there are no tests in the pypi archive. @@ -8867,7 +8921,7 @@ Pytest but stripped of Pytest specific details.") `(; FIXME: Missing: ("python-pytest-timeout" ,python-pytest-timeout) ("python-pytest" ,python-pytest) ; >= 2.3.5 ("python-setuptools-scm" ,python-setuptools-scm))) - (home-page "http://tox.testrun.org/") + (home-page "https://tox.readthedocs.io") (synopsis "Virtualenv-based automation of test activities") (description "Tox is a generic virtualenv management and test command line tool. It can be used to check that a package installs correctly with @@ -10505,13 +10559,13 @@ Wikipedia code samples at (define-public python-cleo (package (name "python-cleo") - (version "0.6.8") + (version "0.7.6") (source (origin (method url-fetch) (uri (pypi-uri "cleo" version)) (sha256 (base32 - "06zp695hq835rkaq6irr1ds1dp2qfzyf32v60vxpd8rcnxv319l5")))) + "02dlc0rn43zgvw0s5v4j80bca9n1jfpwy3r78gn9qjgk0qj39kwr")))) (build-system python-build-system) (native-inputs `( ;; For testing @@ -10520,6 +10574,7 @@ Wikipedia code samples at ("python-pytest" ,python-pytest))) (propagated-inputs `(("python-backpack" ,python-backpack) + ("python-clikit" ,python-clikit) ("python-pastel" ,python-pastel) ("python-pylev" ,python-pylev))) (home-page "https://github.com/sdispater/cleo") @@ -10535,14 +10590,14 @@ docstring and colored output.") (define-public python-tomlkit (package (name "python-tomlkit") - (version "0.5.7") + (version "0.5.8") (source (origin (method url-fetch) (uri (pypi-uri "tomlkit" version)) (sha256 (base32 - "18820ga5z3if1w8dvykxrfm000akracq01ic402xrbljgbn5grn4")))) + "0sf2a4q61kf344hjbw8kb6za1hlccl89j9lzqw0l2zpddp0hrh9j")))) (build-system python-build-system) (native-inputs `(("python-pytest" ,python-pytest))) @@ -10602,14 +10657,14 @@ more, possibly remote, memcached servers.") (define-public python-clikit (package (name "python-clikit") - (version "0.2.4") + (version "0.4.1") (source (origin (method url-fetch) (uri (pypi-uri "clikit" version)) (sha256 (base32 - "0dc8czib5f4j9px1ivcpqnmivnx2zjpc0xb00ldrhsqylks7r06n")))) + "10gab65pq0jdf589n33sj2513pxal2lisl4xwf1ijysdjxmpdr4a")))) (build-system python-build-system) (propagated-inputs `(("python-pastel" ,python-pastel) @@ -15453,7 +15508,7 @@ under Python 2.7.") (define-public pybind11 (package (name "pybind11") - (version "2.3.0") + (version "2.4.3") (source (origin (method git-fetch) (uri (git-reference @@ -15461,23 +15516,43 @@ under Python 2.7.") (commit (string-append "v" version)))) (sha256 (base32 - "11b6dniri8m05spfd2a19irz82shf4sdca73566bniggrf3zclnf")) + "0k89w4bsfbpzw963ykg1cyszi3h3nk393qd31m6y46pcfxkqh4rd")) (file-name (git-file-name name version)))) (build-system cmake-build-system) (native-inputs - `(("python" ,python) - ("python-pytest" ,python-pytest))) + `(("python" ,python-wrapper) + + ;; The following dependencies are used for tests. + ("python-pytest" ,python-pytest) + ("catch" ,catch-framework2-1) + ("eigen" ,eigen))) (arguments - `(#:test-target "check")) + `(#:configure-flags + (list (string-append "-DCATCH_INCLUDE_DIR=" + (assoc-ref %build-inputs "catch") + "/include/catch")) + + #:phases (modify-phases %standard-phases + (add-after 'install 'install-python + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (with-directory-excursion "../source" + (setenv "PYBIND11_USE_CMAKE" "yes") + (invoke "python" "setup.py" "install" + "--single-version-externally-managed" + "--root=/" + (string-append "--prefix=" out))))))) + + #:test-target "check")) (home-page "https://github.com/pybind/pybind11/") (synopsis "Seamless operability between C++11 and Python") - (description "pybind11 is a lightweight header-only library that exposes -C++ types in Python and vice versa, mainly to create Python bindings of -existing C++ code. Its goals and syntax are similar to the excellent -Boost.Python library by David Abrahams: to minimize boilerplate code in -traditional extension modules by inferring type information using compile-time -introspection.") - (license license:expat))) + (description + "@code{pybind11} is a lightweight header-only library that exposes C++ +types in Python and vice versa, mainly to create Python bindings of existing +C++ code. Its goals and syntax are similar to the @code{Boost.Python} +library: to minimize boilerplate code in traditional extension modules by +inferring type information using compile-time introspection.") + (license license:bsd-3))) (define-public python-fasteners (package diff --git a/gnu/packages/rust-apps.scm b/gnu/packages/rust-apps.scm index 90bd146442..ac50f9591a 100644 --- a/gnu/packages/rust-apps.scm +++ b/gnu/packages/rust-apps.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2019, 2020 John Soo <jsoo1@asu.edu> ;;; Copyright © 2019, 2020 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -24,14 +25,184 @@ #:use-module (guix packages) #:use-module (gnu packages compression) #:use-module (gnu packages crates-io) + #:use-module (gnu packages documentation) + #:use-module (gnu packages jemalloc) + #:use-module (gnu packages pcre) #:use-module (gnu packages pkg-config) #:use-module (gnu packages tls) #:use-module (gnu packages version-control)) +(define-public exa + (package + (name "exa") + (version "0.9.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "exa" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "1s902xgplz1167k0r7x235p914lprpsqy2if0kpa1mlb0fswqqq4")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-ansi-term" ,rust-ansi-term-0.12) + ("rust-datetime" ,rust-datetime-0.4) + ("rust-env-logger" ,rust-env-logger-0.6) + ("rust-git2" ,rust-git2-0.9) + ("rust-glob" ,rust-glob-0.3) + ("rust-lazy-static" ,rust-lazy-static-1) + ("rust-libc" ,rust-libc-0.2) + ("rust-locale" ,rust-locale-0.2) + ("rust-log" ,rust-log-0.4) + ("rust-natord" ,rust-natord-1.0) + ("rust-num-cpus" ,rust-num-cpus-1.11) + ("rust-number-prefix" ,rust-number-prefix-0.3) + ("rust-scoped-threadpool" ,rust-scoped-threadpool-0.1) + ("rust-term-grid" ,rust-term-grid-0.1) + ("rust-term-size" ,rust-term-size-0.3) + ("rust-unicode-width" ,rust-unicode-width-0.1) + ("rust-users" ,rust-users-0.9) + ("rust-zoneinfo-compiled" ,rust-zoneinfo-compiled-0.4)) + #:cargo-development-inputs + (("rust-datetime" ,rust-datetime-0.4)) + #:phases + (modify-phases %standard-phases + (add-after 'configure 'dont-vendor-sources + (lambda* (#:key inputs #:allow-other-keys) + (let ((openssl (assoc-ref inputs "openssl"))) + (setenv "OPENSSL_DIR" openssl)) + #t)) + ;; Ignoring failing tests. + ;; Reported in https://github.com/ogham/exa/issues/318 + (add-before 'check 'disable-failing-tests + (lambda _ + (substitute* "src/options/mod.rs" + (("^.*fn oneline_across.*" oneline-across) + (string-append "#[ignore]\n" oneline-across))) + + (substitute* "src/options/view.rs" + (("test!\\(across:.*") "") + (("test!\\(empty:.*") "") + (("test!\\(gracross:.*") "") + (("test!\\(grid:.*") "") + (("test!\\(icons:.*") "") + (("test!\\(just_binary:.*") "") + (("test!\\(just_blocks:.*") "") + (("test!\\(just_bytes:.*") "") + (("test!\\(just_git:.*") "") + (("test!\\(just_group:.*") "") + (("test!\\(just_header:.*") "") + (("test!\\(just_inode:.*") "") + (("test!\\(just_links:.*") "") + (("test!\\(leg:.*") "") + (("test!\\(lid:.*") "") + (("test!\\(original_g:.*") "")) + #t)) + (add-after 'install 'install-extras + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (share (string-append out "/share")) + (man1 (string-append share "/man/man1"))) + (install-file "contrib/man/exa.1" man1) + (mkdir-p (string-append out "/etc/bash_completion.d")) + (mkdir-p (string-append share "/fish/vendor_completions.d")) + (mkdir-p (string-append share "/zsh/site-functions")) + (copy-file "contrib/completions.bash" + (string-append out "/etc/bash_completion.d/exa")) + (copy-file "contrib/completions.fish" + (string-append share "/fish/vendor_completions.d/exa.fish")) + (copy-file "contrib/completions.zsh" + (string-append share "/zsh/site-functions/_exa")) + #t)))))) + (inputs + `(("libgit2" ,libgit2) + ("zlib" ,zlib))) + (native-inputs + `(("pkg-config" ,pkg-config))) + (home-page "https://the.exa.website/") + (synopsis "Modern replacement for ls") + (description "@code{exa} is a modern replacement for the command-line +program @code{ls}. It uses colours to distinguish file types and metadata. It +also knows about symlinks, extended attributes, and Git.") + (license license:expat))) + +(define-public fd + (package + (name "fd") + (version "7.4.0") + (source + (origin + (method url-fetch) + (uri (crate-uri "fd-find" version)) + (file-name + (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "147m872zff0srwq9vaxkkbab06g3fkklbk1g2lx90vdhgs37f5xj")))) + (build-system cargo-build-system) + (arguments + `(#:cargo-inputs + (("rust-ansi-term" ,rust-ansi-term-0.12) + ("rust-atty" ,rust-atty-0.2) + ("rust-clap" ,rust-clap-2) + ("rust-ctrlc" ,rust-ctrlc-3.1) + ("rust-globset" ,rust-globset-0.4) + ("rust-humantime" ,rust-humantime-1.3) + ("rust-ignore" ,rust-ignore-0.4) + ("rust-jemallocator" ,rust-jemallocator-0.3) + ("rust-lazy-static" ,rust-lazy-static-1) + ("rust-libc" ,rust-libc-0.2) + ("rust-lscolors" ,rust-lscolors-0.6) + ("rust-num-cpus" ,rust-num-cpus-1.10) + ("rust-regex" ,rust-regex-1.3) + ("rust-regex-syntax" ,rust-regex-syntax-0.6) + ("rust-version-check" ,rust-version-check-0.9)) + #:cargo-development-inputs + (("rust-diff" ,rust-diff-0.1) + ("rust-filetime" ,rust-filetime-0.2) + ("rust-tempdir" ,rust-tempdir-0.3)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'override-jemalloc + (lambda* (#:key inputs #:allow-other-keys) + (let ((jemalloc (assoc-ref inputs "jemalloc"))) + (setenv "JEMALLOC_OVERRIDE" + (string-append jemalloc "/lib/libjemalloc.so"))) + #t)) + (add-after 'install 'install-extra + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (install-completion + (lambda (completion out-dir) + (for-each + (lambda (f) + (install-file f (string-append out out-dir))) + (find-files "target/release/build/" completion))))) + ;; Manpages + (install-file "doc/fd.1" (string-append out "/share/man/man1")) + ;; Completions + (install-completion "^fd.bash$" "/etc/bash-completion.d") + (install-completion "^fd.fish$" "/share/fish/vendor_completions.d") + (install-completion "^_fd$" "/share/zsh/site-functions") + (rename-file (string-append out "/etc/bash-completion.d/fd.bash") + (string-append out "/etc/bash-completion.d/fd")) + #t)))))) + (inputs `(("jemalloc" ,jemalloc))) + (home-page "https://github.com/sharkdp/fd") + (synopsis "Simple, fast and user-friendly alternative to find") + (description + "@code{fd} is a simple, fast and user-friendly alternative to @code{find}. +While it does not seek to mirror all of find's powerful functionality, it +provides defaults for 80% of the use cases.") + (license (list license:expat license:asl2.0)))) + (define-public ripgrep (package (name "ripgrep") - (version "11.0.1") + (version "11.0.2") (source (origin (method url-fetch) @@ -40,25 +211,54 @@ (string-append name "-" version ".tar.gz")) (sha256 (base32 - "0bn40lz9n08llq615p4qqqbi24zbkf0appfx3zgxg34a86ga9zds")))) + "0vqjr96s2rs45715hzf0g0wjahig4zjyiqfijmzzg4jyh9ni80yr")))) (build-system cargo-build-system) (arguments `(#:cargo-inputs - (("rust-bstr" ,rust-bstr-0.1) + (("rust-bstr" ,rust-bstr-0.2) ("rust-clap" ,rust-clap-2) ("rust-grep" ,rust-grep-0.2) ("rust-ignore" ,rust-ignore-0.4) - ("rust-lazy-static" ,rust-lazy-static-1.3) + ("rust-jemallocator" ,rust-jemallocator-0.3) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-log" ,rust-log-0.4) ("rust-num-cpus" ,rust-num-cpus-1.10) ("rust-regex" ,rust-regex-1.1) ("rust-serde-json" ,rust-serde-json-1.0) ("rust-termcolor" ,rust-termcolor-1.0)) #:cargo-development-inputs - (("rust-clap" ,rust-clap-2) - ("rust-lazy-static" ,rust-lazy-static-1.3) - ("rust-serde" ,rust-serde-1.0) - ("rust-serde-derive" ,rust-serde-derive-1.0)))) + (("rust-serde" ,rust-serde-1.0) + ("rust-serde-derive" ,rust-serde-derive-1.0)) + #:modules ((ice-9 match) + (guix build cargo-build-system) + (guix build utils)) + #:phases + (modify-phases %standard-phases + (add-after 'build 'install-manpage + ;; NOTE: This is done before 'check so that there's only one output + ;; directory with the man page. + (lambda* (#:key outputs #:allow-other-keys) + (match (find-files "target" "^rg\\.1$") + ((manpage) + (install-file manpage (string-append + (assoc-ref outputs "out") + "/share/man/man1")))) + #t)) + (replace 'install + ;; Adapted from (guix build cargo-build-system). The flags need to + ;; be passed to `cargo install' too, as otherwise it will build + ;; another binary, without the features. + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (mkdir-p out) + (setenv "CARGO_TARGET_DIR" "./target") + (invoke "cargo" "install" "--path" "." "--root" out + "--features" "pcre2"))))) + #:cargo-build-flags '("--release" "--features" "pcre2"))) + (native-inputs + `(("asciidoc" ,asciidoc) + ("pcre2" ,pcre2) + ("pkg-config" ,pkg-config))) (home-page "https://github.com/BurntSushi/ripgrep") (synopsis "Line-oriented search tool") (description @@ -70,7 +270,7 @@ gitignore rules.") (define-public rust-cbindgen (package (name "rust-cbindgen") - (version "0.12.2") + (version "0.13.0") (source (origin (method url-fetch) @@ -78,7 +278,7 @@ gitignore rules.") (file-name (string-append name "-" version ".crate")) (sha256 (base32 - "13jzbmjz1bmmfr0i80hw6ar484mgabx3hbpb2ynhk0ddqi0yr58m")))) + "1kywaz62cglg8fv0p7mp1m946gwmrf62s8ffndd5zpf1mz21j472")))) (build-system cargo-build-system) (arguments `(#:cargo-inputs @@ -134,7 +334,7 @@ gitignore rules.") (("rust-git2" ,rust-git2-0.11) ("rust-handlebars" ,rust-handlebars-2.0) ("rust-ignore" ,rust-ignore-0.4) - ("rust-lazy-static" ,rust-lazy-static-1.4) + ("rust-lazy-static" ,rust-lazy-static-1) ("rust-regex" ,rust-regex-1.3) ("rust-serde-json" ,rust-serde-json-1.0) ("rust-tempfile" ,rust-tempfile-3.0)) diff --git a/gnu/packages/rust.scm b/gnu/packages/rust.scm index 97ba882553..76afdefabe 100644 --- a/gnu/packages/rust.scm +++ b/gnu/packages/rust.scm @@ -182,7 +182,7 @@ (copy-file "run_rustc/Makefile" (string-append run_rustc "/Makefile")) #t)))))) - (synopsis "Compiler for the Rust progamming language") + (synopsis "Compiler for the Rust programming language") (description "Rust is a systems programming language that provides memory safety and thread safety guarantees.") (home-page "https://github.com/thepowersgang/mrustc") diff --git a/gnu/packages/samba.scm b/gnu/packages/samba.scm index d0db693e30..4eef7de5d7 100644 --- a/gnu/packages/samba.scm +++ b/gnu/packages/samba.scm @@ -4,7 +4,7 @@ ;;; Copyright © 2016, 2017, 2019 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016 Adonay "adfeno" Felipe Nogueira <https://libreplanet.org/wiki/User:Adfeno> <adfeno@openmailbox.org> ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> -;;; Copyright © 2017, 2018 Marius Bakke <mbakke@fastmail.com> +;;; Copyright © 2017, 2018, 2020 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2019 Rutger Helling <rhelling@mykolab.com> @@ -423,26 +423,16 @@ key-value pair databases and a real LDAP database.") (define-public ppp (package (name "ppp") - (version "2.4.7") + (version "2.4.8") (source (origin - (method url-fetch) - (uri (string-append "https://www.samba.org/ftp/ppp/ppp-" - version ".tar.gz")) - (patches - (list (origin - ;; Use OpenSSL for cryptography instead of the obsolete glibc - ;; crypto functions that were removed in glibc 2.28. - (method url-fetch) - (uri (string-append "https://github.com/paulusmack/ppp/commit/" - "3c7b86229f7bd2600d74db14b1fe5b3896be3875" - ".patch")) - (file-name "ppp-use-openssl-crypto.patch") - (sha256 - (base32 - "0qlbi247lx3injpy8a1gcij9yilik0vfaibkpvdp88k3sa1rs69z"))))) + (method git-fetch) + (uri (git-reference + (url "https://github.com/paulusmack/ppp") + (commit (string-append "ppp-" version)))) + (file-name (git-file-name name version)) (sha256 (base32 - "0c7vrjxl52pdwi4ckrvfjr08b31lfpgwf3pp0cqy76a77vfs7q02")))) + "1i88m79h6g3fzsb4yw3k8bq1grsx3hsyawm7id2vcaab0gfqzjjv")))) (build-system gnu-build-system) (arguments '(#:tests? #f ; no check target diff --git a/gnu/packages/scanner.scm b/gnu/packages/scanner.scm index d3c63f6231..55a642241d 100644 --- a/gnu/packages/scanner.scm +++ b/gnu/packages/scanner.scm @@ -131,6 +131,13 @@ package contains the library, but no drivers.") ((#:phases phases) `(modify-phases ,phases (delete 'disable-backends) + (add-after 'disable-failing-tests 'disable-failing-backend-tests + (lambda _ + ;; Disable test that fails on i686: + ;; <https://bugs.gnu.org/39449> + (substitute* "testsuite/backend/genesys/Makefile.in" + ((" genesys_unit_tests\\$\\(EXEEXT\\)") "")) + #t)) (add-after 'unpack 'add-backends (lambda _ (substitute* "backend/dll.conf.in" diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm index 5fef20c92c..182e0250ad 100644 --- a/gnu/packages/scheme.scm +++ b/gnu/packages/scheme.scm @@ -368,47 +368,6 @@ applications in many fields such as multimedia (web galleries, music players, mashups, office (web agendas, mail clients, ...), etc.") (license gpl2+))) -(define-public chicken - (package - (name "chicken") - (version "5.0.0") - (source (origin - (method url-fetch) - (uri (string-append "https://code.call-cc.org/releases/" - version "/chicken-" version ".tar.gz")) - (sha256 - (base32 - "15b5yrzfa8aimzba79x7v6y282f898rxqxfxrr446sjx9jwlpfd8")))) - (build-system gnu-build-system) - (arguments - `(#:modules ((guix build gnu-build-system) - (guix build utils) - (srfi srfi-1)) - - ;; No `configure' script; run "make check" after "make install" as - ;; prescribed by README. - #:phases - (modify-phases %standard-phases - (delete 'configure) - (delete 'check) - (add-after 'install 'check - (assoc-ref %standard-phases 'check))) - - #:make-flags (let ((out (assoc-ref %outputs "out"))) - (list "PLATFORM=linux" - (string-append "PREFIX=" out) - (string-append "VARDIR=" out "/var/lib"))) - - ;; Parallel builds are not supported, as noted in README. - #:parallel-build? #f)) - (home-page "http://www.call-cc.org/") - (synopsis "R5RS Scheme implementation that compiles native code via C") - (description - "CHICKEN is a compiler for the Scheme programming language. CHICKEN -produces portable and efficient C, supports almost all of the R5RS Scheme -language standard, and includes many enhancements and extensions.") - (license bsd-3))) - (define-public scheme48 (package (name "scheme48") diff --git a/gnu/packages/screen.scm b/gnu/packages/screen.scm index b9a0f6a864..51168903a9 100644 --- a/gnu/packages/screen.scm +++ b/gnu/packages/screen.scm @@ -2,7 +2,7 @@ ;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com> ;;; Copyright © 2014 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2015, 2017 Eric Bavier <bavier@member.fsf.org> -;;; Copyright © 2016, 2017, 2019 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2016, 2017, 2019, 2020 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2017, 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> @@ -38,13 +38,13 @@ (define-public screen (package (name "screen") - (version "4.7.0") + (version "4.8.0") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/screen/screen-" version ".tar.gz")) (sha256 - (base32 "1h90bpy2wk304xw367y1zwz0kilrpm6h28nphykx4fvqz8l56xys")))) + (base32 "18ascpjzsy70h6hk7wpg8zmzjwgdyrdr7c6z4pg5z4l9hhyv24bf")))) (build-system gnu-build-system) (native-inputs `(("makeinfo" ,texinfo))) diff --git a/gnu/packages/sdr.scm b/gnu/packages/sdr.scm index f6c9050503..563a9b3887 100644 --- a/gnu/packages/sdr.scm +++ b/gnu/packages/sdr.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2019 Christopher Howard <christopher@librehacker.com> +;;; Copyright © 2019, 2020 Evan Straw <evan.straw99@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -19,11 +20,9 @@ (define-module (gnu packages sdr) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) - #:use-module (guix utils) #:use-module (guix download) #:use-module (guix git-download) #:use-module (guix build-system gnu) - #:use-module (gnu packages) #:use-module (gnu packages algebra) #:use-module (gnu packages autotools)) diff --git a/gnu/packages/serialization.scm b/gnu/packages/serialization.scm index 8149b05c95..21209f8b0c 100644 --- a/gnu/packages/serialization.scm +++ b/gnu/packages/serialization.scm @@ -95,7 +95,7 @@ #t))))) (native-inputs `(("doxygen" ,doxygen))) - (home-page "http://uscilab.github.io/cereal/") + (home-page "https://uscilab.github.io/cereal/") (synopsis "C++11 library for serialization") (description "Cereal is a header-only C++11 serialization library. Cereal takes diff --git a/gnu/packages/shells.scm b/gnu/packages/shells.scm index f5e839fd58..0e61284c50 100644 --- a/gnu/packages/shells.scm +++ b/gnu/packages/shells.scm @@ -12,7 +12,8 @@ ;;; Copyright © 2019 Meiyo Peng <meiyo.peng@gmail.com> ;;; Copyright © 2019 Timothy Sample <samplet@ngyro.com> ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com> -;;; Copyright © 2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org> +;;; Copyright © 2019, 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -403,7 +404,7 @@ history mechanism, job control and a C-like syntax.") (define-public zsh (package (name "zsh") - (version "5.6.2") + (version "5.7.1") (source (origin (method url-fetch) (uri (list (string-append @@ -414,9 +415,10 @@ history mechanism, job control and a C-like syntax.") ".tar.xz"))) (sha256 (base32 - "17iffliqcj4hv91g0bd2sxsyfcz51mfyh97sp2iyrs2p0mndc2x5")))) + "1s3yww0mzgvpc48kp0x868mm3gbna42sbgzya0nknj0x5hn2jq3j")))) (build-system gnu-build-system) - (arguments `(#:configure-flags '("--with-tcsetpgrp" "--enable-pcre") + (arguments `(#:configure-flags '("--with-tcsetpgrp" "--enable-pcre" + "--enable-maildir-support") #:phases (modify-phases %standard-phases (add-before 'configure 'fix-sh @@ -826,3 +828,30 @@ Scheme. It provides both the shell interface, as well as a Guile library for parsing shell scripts. Gash is designed to bootstrap Bash as part of the Guix bootstrap process.") (license gpl3+))) + +(define-public gash-utils + (package + (name "gash-utils") + (version "0.1.0") + (source (origin + (method url-fetch) + (uri (string-append "mirror://savannah/gash/gash-utils-" + version ".tar.gz")) + (sha256 + (base32 + "0ib2p52qmbac5n0s5bys4fiwim461ps546976l1n7pwbs0avh7fk")))) + (build-system gnu-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("guile" ,guile-2.2) + ("gash" ,gash))) + (home-page "https://savannah.nongnu.org/projects/gash/") + (synopsis "Core POSIX utilities written in Guile Scheme") + (description "Gash-Utils provides Scheme implementations of many +common POSIX utilities (there are about 40 of them, ranging in +complexity from @command{false} to @command{awk}). The utilities are +designed to be capable of bootstrapping their standard GNU counterparts. +Underpinning these utilities are many Scheme interfaces for manipulating +files and text.") + (license gpl3+))) diff --git a/gnu/packages/statistics.scm b/gnu/packages/statistics.scm index 18ca274482..c4b1f525e3 100644 --- a/gnu/packages/statistics.scm +++ b/gnu/packages/statistics.scm @@ -1306,7 +1306,7 @@ adapted for other output formats, such as HTML or LaTeX.") (base32 "1nsxbrx31k3y6yql30qkrvdfyznlia2qfvwv95mfiy7m7wdn4rm3")))) (build-system r-build-system) - (home-page "http://yihui.name/formatR") + (home-page "https://yihui.org/formatr/") (synopsis "Format R code automatically") (description "This package provides a function to format R source code. Spaces and @@ -3221,7 +3221,7 @@ analysis of large sparse or dense matrices.") `(("r-foreach" ,r-foreach) ("r-matrix" ,r-matrix) ("r-shape" ,r-shape))) - (home-page "http://www.jstatsoft.org/v33/i01") + (home-page "https://www.jstatsoft.org/article/view/v033i01") (synopsis "Lasso and elastic-net regularized generalized linear models") (description "The glmnet package provides efficient procedures for fitting the entire @@ -5441,7 +5441,7 @@ genome-wide association studies can be analyzed efficiently.") ("zlib" ,zlib))) (native-inputs `(("pkg-config" ,pkg-config))) - (home-page "http://www.rforge.net/Cairo/") + (home-page "https://www.rforge.net/Cairo/") (synopsis "R graphics device using Cairo graphics library") (description "This package provides a Cairo graphics device that can be use to @@ -5823,7 +5823,7 @@ Java package that provides routines for various statistical distributions.") #t)))) (build-system gnu-build-system) (arguments - (let ((base-directory "/share/emacs/site-lisp/guix.d/ess")) + (let ((base-directory "/share/emacs/site-lisp")) `(#:make-flags (list (string-append "PREFIX=" %output) (string-append "ETCDIR=" %output "/" ,base-directory "/etc") diff --git a/gnu/packages/stb.scm b/gnu/packages/stb.scm index 5444347644..9cb2ae10b6 100644 --- a/gnu/packages/stb.scm +++ b/gnu/packages/stb.scm @@ -101,3 +101,14 @@ decoding from file or memory. A variety of formats are supported.")) "stb-image-write" "1.13" "stb-image-write is a small library for writing image files to the C@tie{}@code{stdio} interface.")) + +(define-public stb-sprintf + (make-stb-header-package + "stb-sprintf" "1.06" + "stb-sprintf implements fast @code{sprintf}, @code{snprintf} for C/C++.")) + +(define-public stb-truetype + (make-stb-header-package + "stb-truetype" "1.22" + "stb-truetype is a library for parsing, decoding, and rasterizing +characters from TrueType fonts.")) diff --git a/gnu/packages/storage.scm b/gnu/packages/storage.scm index e3a883a535..875d105110 100644 --- a/gnu/packages/storage.scm +++ b/gnu/packages/storage.scm @@ -53,14 +53,14 @@ (define-public ceph (package (name "ceph") - (version "14.2.5") + (version "14.2.7") (source (origin (method url-fetch) (uri (string-append "https://download.ceph.com/tarballs/ceph-" version ".tar.gz")) (sha256 (base32 - "0wbkdplxs8higmlj57a7rydmx9rq08h0arjrmxmp0s80bn0v5x2c")) + "0qiqhm6hvz299q54k3i4crnb5dhpq6xnn2yqih9pxn9van0dq1ln")) (patches (search-patches "ceph-boost-compat.patch" "ceph-volume-respect-PATH.patch" diff --git a/gnu/packages/syncthing.scm b/gnu/packages/syncthing.scm index 8b41a6317f..2357b08f87 100644 --- a/gnu/packages/syncthing.scm +++ b/gnu/packages/syncthing.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2016 Petter <petter@mykolab.ch> -;;; Copyright © 2016, 2017, 2018, 2019 Leo Famulari <leo@famulari.name> +;;; Copyright © 2016, 2017, 2018, 2019, 2020 Leo Famulari <leo@famulari.name> ;;; ;;; This file is part of GNU Guix. ;;; @@ -30,7 +30,7 @@ (define-public syncthing (package (name "syncthing") - (version "1.2.2") + (version "1.3.4") (source (origin (method url-fetch) (uri (string-append "https://github.com/syncthing/syncthing" @@ -38,7 +38,7 @@ "/syncthing-source-v" version ".tar.gz")) (sha256 (base32 - "1wdjh8xw09s1nfkpc95v04619gqa4dpbygp2y5l35ww4g916lv3s")) + "025fhfqzcl5qd38zak8485pd67iqkzsf6frm02cl25s3ggv2f0p4")) (modules '((guix build utils))) ;; Delete bundled ("vendored") free software source code. (snippet '(begin @@ -52,8 +52,8 @@ ;; When updating Syncthing, check 'go.mod' in the source distribution to ;; ensure we are using the correct versions of these dependencies. (inputs - `(("go-github-com-audriusbutkevicius-go-nat-pmp" - ,go-github-com-audriusbutkevicius-go-nat-pmp) + `(("go-github-com-jackpal-go-nat-pmp" + ,go-github-com-jackpal-go-nat-pmp) ("go-github-com-bkaradzic-go-lz4" ,go-github-com-bkaradzic-go-lz4) ("go-github-com-calmh-xdr" ,go-github-com-calmh-xdr) ("go-github-com-chmduquesne-rollinghash" @@ -100,7 +100,10 @@ ("go-github-com-d4l3k-messagediff" ,go-github-com-d4l3k-messagediff))) (arguments - `(#:import-path "github.com/syncthing/syncthing" + `(#:modules ((srfi srfi-26) ; for cut + (guix build utils) + (guix build go-build-system)) + #:import-path "github.com/syncthing/syncthing" ;; We don't need to install the source code for end-user applications. #:install-source? #f #:phases @@ -114,7 +117,13 @@ (replace 'build (lambda _ (with-directory-excursion "src/github.com/syncthing/syncthing" - (invoke "go" "run" "build.go" "-no-upgrade")))) + ;; XXX The only way to build Syncthing without its automatic + ;; updater and to build the utilities is to "build all" and then + ;; "build syncthing" again with -no-upgrade. + ;; https://github.com/syncthing/syncthing/issues/6118 + (invoke "go" "run" "build.go" "build" "all") + (delete-file "syncthing") + (invoke "go" "run" "build.go" "-no-upgrade" "build" "syncthing")))) (replace 'check (lambda _ @@ -124,14 +133,16 @@ (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out")) - (utils (assoc-ref outputs "utils")) - (src "src/github.com/syncthing/syncthing/bin/")) - (install-file (string-append src "/syncthing") - (string-append out "/bin")) - (delete-file (string-append src "/syncthing")) - (copy-recursively "src/github.com/syncthing/syncthing/bin/" - (string-append utils "/bin")) - #t))) + (utils (assoc-ref outputs "utils"))) + (with-directory-excursion "src/github.com/syncthing/syncthing" + (install-file "syncthing" (string-append out "/bin")) + (for-each (cut install-file <> utils) + '("stcli" "stcompdirs" "stcrashreceiver" + "stdisco" "stdiscosrv" "stevents" "stfileinfo" + "stfinddevice" "stfindignored" "stgenfiles" + "stindex" "strelaypoolsrv" "strelaysrv" "stsigtool" + "stvanity" "stwatchfile" "uraggregate" "ursrv")) + #t)))) (add-after 'install 'install-docs (lambda* (#:key outputs #:allow-other-keys) @@ -163,29 +174,28 @@ Protocol.") (home-page "https://github.com/syncthing/syncthing") (license mpl2.0))) -(define-public go-github-com-audriusbutkevicius-go-nat-pmp - (let ((commit "452c97607362b2ab5a7839b8d1704f0396b640ca") - (revision "0")) - (package - (name "go-github-com-audriusbutkevicius-go-nat-pmp") - (version (git-version "0.0.0" revision commit)) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/AudriusButkevicius/go-nat-pmp") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 "1accmpl1llk16a19nlyy991fqrgfay6l53gb64hgmdfmqljdvbk7")))) - (build-system go-build-system) - (arguments - `(#:import-path "github.com/AudriusButkevicius/go-nat-pmp")) - (synopsis "Port mapping and discovery of external IP address") - (description "This package provides a Go client for the NAT-PMP internet +(define-public go-github-com-jackpal-go-nat-pmp + (package + (name "go-github-com-jackpal-go-nat-pmp") + (version "1.0.2") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/jackpal/go-nat-pmp") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1p2yrzfbkazc9nisr2iqjwzhb6q16zj6finyxxn2ikk7iiighl1g")))) + (build-system go-build-system) + (arguments + `(#:import-path "github.com/jackpal/go-nat-pmp")) + (synopsis "Port mapping and discovery of external IP address") + (description "This package provides a Go client for the NAT-PMP internet protocol for port mapping and discovering the external IP address of a firewall.") - (home-page "https://github.com/AudriusButkevicius/go-nat-pmp") - (license asl2.0)))) + (home-page "https://github.com/jackpal/go-nat-pmp") + (license asl2.0))) (define-public go-github-com-audriusbutkevicius-recli (package @@ -306,32 +316,30 @@ structs in the Go programming language.") (license expat))) (define-public go-github-com-gobwas-glob - (let ((commit "51eb1ee00b6d931c66d229ceeb7c31b985563420") - (revision "0")) - (package - (name "go-github-com-gobwas-glob") - (version (git-version "0.0.0" revision commit)) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/gobwas/glob") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "090wzpwsjana1qas8ipwh1pj959gvc4b7vwybzi01f3bmd79jwlp")))) - (build-system go-build-system) - (arguments - `(#:import-path "github.com/gobwas/glob")) - (synopsis "Go globbing library") - (description "This package provides a Go implementation of globs.") - (home-page "https://github.com/gobwas/glob") - (license expat)))) + (package + (name "go-github-com-gobwas-glob") + (version "0.2.3") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/gobwas/glob") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0jxk1x806zn5x86342s72dq2qy64ksb3zrvrlgir2avjhwb18n6z")))) + (build-system go-build-system) + (arguments + `(#:import-path "github.com/gobwas/glob")) + (synopsis "Go globbing library") + (description "This package provides a Go implementation of globs.") + (home-page "https://github.com/gobwas/glob") + (license expat))) (define-public go-github-com-golang-groupcache-lru - (let ((commit "84a468cf14b4376def5d68c722b139b881c450a4") - (revision "1")) + (let ((commit "869f871628b6baa9cfbc11732cdf6546b17c1298") + (revision "2")) (package (name "go-github-com-golang-groupcache-lru") (version (git-version "0.0.0" revision commit)) @@ -343,7 +351,7 @@ structs in the Go programming language.") (file-name (git-file-name name version)) (sha256 (base32 - "1ky1r9qh54yi9zp2769qrjngzndgd8fn7mja2qfac285n06chmcn")))) + "0r4nk8129bvx50qb4xzjaay39b2h6k7cbdqqzdlanmc82ygczsbw")))) (build-system go-build-system) (arguments `(#:import-path "github.com/golang/groupcache/lru" @@ -381,28 +389,26 @@ compression format.") (license bsd-3)))) (define-public go-github-com-jackpal-gateway - (let ((commit "5795ac81146e01d3fab7bcf21c043c3d6a32b006") - (revision "0")) - (package - (name "go-github-com-jackpal-gateway") - (version (git-version "0.0.0" revision commit)) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/jackpal/gateway") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "0fkwkwmhfadwk3cha8616bhqxfkr9gjjnynhhxyldlphixgs3f25")))) - (build-system go-build-system) - (arguments - `(#:import-path "github.com/jackpal/gateway")) - (synopsis "Discover the address of a LAN gateway") - (description "@code{gateway} is a Go library for discovering the IP + (package + (name "go-github-com-jackpal-gateway") + (version "1.0.5") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/jackpal/gateway") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1ird5xmizj632l3dq24s2xgb8w1dn6v8xznlqz252gvngyr2gjl1")))) + (build-system go-build-system) + (arguments + `(#:import-path "github.com/jackpal/gateway")) + (synopsis "Discover the address of a LAN gateway") + (description "@code{gateway} is a Go library for discovering the IP address of the default LAN gateway.") - (home-page "https://github.com/jackpal/gateway") - (license bsd-3)))) + (home-page "https://github.com/jackpal/gateway") + (license bsd-3))) (define-public go-github-com-lib-pq (package @@ -432,7 +438,7 @@ database/sql package.") (define-public go-github-com-oschwald-geoip2-golang (package (name "go-github-com-oschwald-geoip2-golang") - (version "1.3.0") + (version "1.4.0") (source (origin (method git-fetch) (uri (git-reference @@ -441,7 +447,7 @@ database/sql package.") (file-name (git-file-name name version)) (sha256 (base32 - "0jivzl15jb8n16rm1b2w97kf7vna5dd3kcz865wfi233qay075j2")))) + "1jj4rbdpy87rbl79czg5hs5dyn6xlbnk0bnvyzi71dsxan57nixw")))) (build-system go-build-system) (propagated-inputs `(("go-github-com-oschwald-maxminddb-golang" @@ -457,32 +463,30 @@ GeoLite2 and GeoIP2 databases in Go.") (license isc))) (define-public go-github-com-oschwald-maxminddb-golang - (let ((commit "26fe5ace1c706491c2936119e1dc69c1a9c04d7f") - (revision "0")) - (package - (name "go-github-com-oschwald-maxminddb-golang") - (version (git-version "1.2.0" revision commit)) - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/oschwald/maxminddb-golang") - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "1i6d935f3cv9djpjvc2ibh8aps8jqvg454b9pkwg2h98al759ggk")))) - (build-system go-build-system) - (propagated-inputs - `(("go-golang-org-x-sys" ,go-golang-org-x-sys))) - (arguments - `(#:import-path "github.com/oschwald/maxminddb-golang" - #:tests? #f)) ; Requires some unpackaged software and test data - (synopsis "MaxMind DB Reader for Go") - (description "This is a Go reader for the MaxMind DB format. Although + (package + (name "go-github-com-oschwald-maxminddb-golang") + (version "1.4.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/oschwald/maxminddb-golang") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "100wd5qv00pkcm6cb8c4x5gavc9jnn7drh6xrqh85hzci4rils66")))) + (build-system go-build-system) + (propagated-inputs + `(("go-golang-org-x-sys" ,go-golang-org-x-sys))) + (arguments + `(#:import-path "github.com/oschwald/maxminddb-golang" + #:tests? #f)) ; Requires some unpackaged software and test data + (synopsis "MaxMind DB Reader for Go") + (description "This is a Go reader for the MaxMind DB format. Although this can be used to read GeoLite2 and GeoIP2 databases, @code{geoip2} provides a higher-level API for doing so.") - (home-page "https://github.com/oschwald/maxminddb-golang") - (license isc)))) + (home-page "https://github.com/oschwald/maxminddb-golang") + (license isc))) (define-public go-github-com-stathat-go (let ((commit "74669b9f388d9d788c97399a0824adbfee78400e") @@ -508,8 +512,8 @@ higher-level API for doing so.") (license expat)))) (define-public go-github-com-rcrowley-go-metrics - (let ((commit "e181e095bae94582363434144c61a9653aff6e50") - (revision "1")) + (let ((commit "cac0b30c2563378d434b5af411844adff8e32960") + (revision "2")) (package (name "go-github-com-rcrowley-go-metrics") (version (git-version "0.0.0" revision commit)) @@ -521,7 +525,7 @@ higher-level API for doing so.") (file-name (git-file-name name version)) (sha256 (base32 - "1pwkyw801hy7n94skzk6h177zqcil6ayrmb5gs3jdpsfayh8ia5w")))) + "1hfxffnpaw49pr3wrkbzq3pnv3nyzsvk5dxndv0yz70xlrbg8a04")))) (build-system go-build-system) (arguments `(#:import-path "github.com/rcrowley/go-metrics")) @@ -558,8 +562,8 @@ run-time in Go.") (license asl2.0))) (define-public go-github-com-syndtr-goleveldb - (let ((commit "c3a204f8e96543bb0cc090385c001078f184fc46") - (revision "3")) + (let ((commit "758128399b1df3a87e92df6c26c1d2063da8fabe") + (revision "4")) (package (name "go-github-com-syndtr-goleveldb") (version (git-version "1.0.1" revision commit)) @@ -571,7 +575,7 @@ run-time in Go.") (file-name (git-file-name name version)) (sha256 (base32 - "18cac90dim2z5g28vazzibxa058q2ynihsmf0vbscwzba6l5s5ms")))) + "0mnkzrz4di13g6ggd54my7bkb9nwk8f5k672dyasn467wsg7bf8f")))) (build-system go-build-system) (propagated-inputs `(("go-github-com-golang-snappy" ,go-github-com-golang-snappy))) @@ -668,8 +672,8 @@ hashes.") (license expat)))) (define-public go-github-com-petermattis-goid - (let ((commit "3db12ebb2a599ba4a96bea1c17b61c2f78a40e02") - (revision "0")) + (let ((commit "b0b1615b78e5ee59739545bb38426383b2cda4c9") + (revision "1")) (package (name "go-github-com-petermattis-goid") (version (git-version "0.0.0" revision commit)) @@ -680,9 +684,8 @@ hashes.") (commit commit))) (file-name (git-file-name name version)) (sha256 - (base32 - "0z18a3mr72c52g7g94n08gxw0ksnaafbfwdl5p5jav2sffirb0kd")))) + "0ghfxn045r0bbn2vszw897lxzmhnm4k59aypjvpxl0pbzsw9ab2c")))) (build-system go-build-system) (arguments '(#:import-path "github.com/petermattis/goid")) @@ -693,8 +696,8 @@ the current goroutine's ID.") (license asl2.0)))) (define-public go-github-com-kballard-go-shellquote - (let ((commit "cd60e84ee657ff3dc51de0b4f55dd299a3e136f2") - (revision "0")) + (let ((commit "95032a82bc518f77982ea72343cc1ade730072f0") + (revision "1")) (package (name "go-github-com-kballard-go-shellquote") (version (git-version "0.0.0" revision commit)) @@ -706,7 +709,7 @@ the current goroutine's ID.") (file-name (git-file-name name version)) (sha256 (base32 - "1xjpin4jq1zl84dcn96xhjmn9bsfyszf6g9aqyj2dc0xfi6c88y0")))) + "1rspvmnsikdq95jmx3dykxd4k1rmgl98ryjrysvl0cf18hl1vq80")))) (build-system go-build-system) (arguments '(#:import-path "github.com/kballard/go-shellquote")) @@ -768,34 +771,9 @@ bounds.") (home-page "https://github.com/beorn7/perks") (license expat)))) -(define-public go-github-com-golang-protobuf-proto - (package - (name "go-github-com-golang-protobuf-proto") - (version "1.3.1") - (source (origin - (method git-fetch) - (uri (git-reference - (url "https://github.com/golang/protobuf.git") - (commit (string-append "v" version)))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "15am4s4646qy6iv0g3kkqq52rzykqjhm4bf08dk0fy2r58knpsyl")))) - (build-system go-build-system) - (arguments - '(#:import-path "github.com/golang/protobuf/proto" - #:unpack-path "github.com/golang/protobuf" - #:tests? #f ; requires unpackaged golang.org/x/sync/errgroup - )) - (synopsis "Go support for Protocol Buffers") - (description "This package provides Go support for the Protocol Buffers -data serialization format.") - (home-page "https://github.com/golang/protobuf") - (license bsd-3))) - (define-public go-github-com-prometheus-client-model - (let ((commit "fd36f4220a901265f90734c3183c5f0c91daa0b8") - (revision "1")) + (let ((commit "14fe0d1b01d4d5fc031dd4bec1823bd3ebbe8016") + (revision "2")) (package (name "go-github-com-prometheus-client-model") (version (git-version "0.0.2" revision commit)) @@ -807,7 +785,7 @@ data serialization format.") (file-name (git-file-name name version)) (sha256 (base32 - "1bs5d72k361llflgl94c22n0w53j30rsfh84smgk8mbjbcmjsaa5")))) + "0zdmk6rbbx39cvfz0r59v2jg5sg9yd02b4pds5n5llgvivi99550")))) (build-system go-build-system) (arguments '(#:import-path "github.com/prometheus/client_model" @@ -901,7 +879,7 @@ Prometheus metrics.") (define-public go-github-com-prometheus-procfs (package (name "go-github-com-prometheus-procfs") - (version "0.0.3") + (version "0.0.4") (source (origin (method git-fetch) (uri (git-reference @@ -910,7 +888,7 @@ Prometheus metrics.") (file-name (git-file-name name version)) (sha256 (base32 - "18c4m795fwng8f8qa395f3crvamlbk5y5afk8b5rzyisnmjq774y")))) + "1z5jq5rjala0a0di4nwk1rai0z9f73qwqj6mgcbpjbg2qknlb544")))) (build-system go-build-system) (arguments '(#:import-path "github.com/prometheus/procfs" @@ -926,7 +904,7 @@ system, kernel, and process metrics from the @file{/proc} pseudo file system.") (define-public go-github-com-prometheus-client-golang (package (name "go-github-com-prometheus-client-golang") - (version "0.9.4") + (version "1.2.1") (source (origin (method git-fetch) (uri (git-reference @@ -935,7 +913,7 @@ system, kernel, and process metrics from the @file{/proc} pseudo file system.") (file-name (git-file-name name version)) (sha256 (base32 - "0s134fj4i7k6pxdmxwkdi7amb1882yq33spv15hg3pkpbd3h311p")))) + "0zs49psk23n9z8wrl02d5vib5wclpym8kaxcy6n5pk696i419065")))) (build-system go-build-system) (arguments '(#:tests? #f @@ -953,7 +931,8 @@ system, kernel, and process metrics from the @file{/proc} pseudo file system.") ,go-github-com-prometheus-client-model) ("go-github-com-prometheus-common" ,go-github-com-prometheus-common) - ("go-github-com-prometheus-procfs" ,go-github-com-prometheus-procfs))) + ("go-github-com-prometheus-procfs" ,go-github-com-prometheus-procfs) + ("go-github-com-cespare-xxhash" ,go-github-com-cespare-xxhash))) (synopsis "HTTP server and client tools for Prometheus") (description "This package @code{promhttp} provides HTTP client and server tools for Prometheus metrics.") @@ -963,7 +942,7 @@ server tools for Prometheus metrics.") (define-public go-gopkg.in-asn1-ber.v1 (package (name "go-gopkg.in-asn1-ber.v1") - (version "1.2") + (version "1.3") (source (origin (method git-fetch) (uri (git-reference @@ -972,7 +951,7 @@ server tools for Prometheus metrics.") (file-name (git-file-name name version)) (sha256 (base32 - "1y8bvzbxpw0lfnn7pbcdwzqj4l90qj6xf88dvv9pxd9yl5g6cskx")))) + "00ixms8x3lrhywbvq5v2sagcqsxa1pcnlk17dp5lnwckv3xg4psb")))) (build-system go-build-system) (arguments '(#:import-path "gopkg.in/asn1-ber.v1" @@ -1089,3 +1068,25 @@ virtual connections from a single physical connection.") and RFC 5389).") (home-page "https://github.com/ccding/go-stun") (license asl2.0)))) + +(define-public go-github-com-cespare-xxhash + (package + (name "go-github-com-cespare-xxhash") + (version "2.1.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/cespare/xxhash") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "12ad3z7ki9j07c4kx3ywkl6188i2afsjg7sl60wd21p6zkkpfjxq")))) + (build-system go-build-system) + (arguments + '(#:import-path "github.com/cespare/xxhash")) + (synopsis "Go implementation of xxHash") + (description "This package provides of Go implementation of the 64-bit +xxHash algorithm (XXH64).") + (home-page "https://github.com/cespare/xxhash/") + (license expat))) diff --git a/gnu/packages/terminals.scm b/gnu/packages/terminals.scm index dae14aee8f..8773f1969f 100644 --- a/gnu/packages/terminals.scm +++ b/gnu/packages/terminals.scm @@ -935,7 +935,7 @@ tmux.") (define-public kitty (package (name "kitty") - (version "0.14.6") + (version "0.16.0") (home-page "https://sw.kovidgoyal.net/kitty/") (source (origin @@ -945,7 +945,7 @@ tmux.") (commit (string-append "v" version)))) (file-name (git-file-name name version)) (sha256 - (base32 "1rb5ys9xsdhd2qa3kz5gqzz111c6b14za98va6hlglk69wqlmb51")) + (base32 "1bszyddar0g1gdz67h8rd3gbrdhi6ahjg7j14cjiqxm1938z9ajf")) (modules '((guix build utils))) (snippet '(begin diff --git a/gnu/packages/text-editors.scm b/gnu/packages/text-editors.scm index 5d49d5d83d..9a35e7edce 100644 --- a/gnu/packages/text-editors.scm +++ b/gnu/packages/text-editors.scm @@ -1,7 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2016 José Miguel Sánchez García <jmi2k@openmailbox.org> ;;; Copyright © 2016 Carlo Zancanaro <carlo@zancanaro.id.au> -;;; Copyright © 2017, 2018 Eric Bavier <bavier@member.fsf.org> +;;; Copyright © 2017, 2018, 2020 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2017 Feng Shu <tumashu@163.com> ;;; Copyright © 2017 ng0 <ng0@n0.is> ;;; Copyright © 2014 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.org> @@ -416,7 +416,7 @@ scripts/input/X11/C/Shell/HTML/Dired): 49KB. (define-public ghostwriter (package (name "ghostwriter") - (version "1.7.4") + (version "1.8.0") (source (origin (method git-fetch) (uri (git-reference @@ -425,7 +425,7 @@ scripts/input/X11/C/Shell/HTML/Dired): 49KB. (file-name (git-file-name name version)) (sha256 (base32 - "1pqlr08z5syqcq5p282asxwzrrm7c1w94baxyb467swh8yp3fj5m")))) + "13yn82m1l2pq93wbl569a2lzpc3sn8a8g30hsgdch1l9xlmhwran")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config) @@ -433,9 +433,13 @@ scripts/input/X11/C/Shell/HTML/Dired): 49KB. (inputs `(("hunspell" ,hunspell) ("qtbase" ,qtbase) + ("qtdeclarative" ,qtdeclarative) ("qtmultimedia" ,qtmultimedia) + ("qtquickcontrols" ,qtquickcontrols) ("qtsvg" ,qtsvg) - ("qtwebkit" ,qtwebkit))) + ("qtwebchannel" ,qtwebchannel))) + (propagated-inputs ; To get native-search-path + `(("qtwebengine" ,qtwebengine))) (arguments `(#:phases (modify-phases %standard-phases diff --git a/gnu/packages/tls.scm b/gnu/packages/tls.scm index c7fb38f468..f1d3f94458 100644 --- a/gnu/packages/tls.scm +++ b/gnu/packages/tls.scm @@ -985,8 +985,8 @@ relatively simple Bash script.") (license license:expat))) (define-public go-github-com-certifi-gocertifi - (let ((commit "d2eda712971317d7dd278bc2a52acda7e945f97e") - (revision "0")) + (let ((commit "a5e0173ced670013bfb649c7e806bc9529c986ec") + (revision "1")) (package (name "go-github-com-certifi-gocertifi") (version (git-version "2018.01.18" revision commit)) @@ -998,7 +998,7 @@ relatively simple Bash script.") (file-name (git-file-name name version)) (sha256 (base32 - "0f3v26xps7gadw4qfmh1kxbpgp0cgqdd61a257xnnvnd7ll6k8dh")))) + "1n9drccl3q1rr8wg3nf60slkf1lgsmz5ahifrglbdrc6har3rryj")))) (build-system go-build-system) (arguments '(#:import-path "github.com/certifi/gocertifi")) diff --git a/gnu/packages/tor.scm b/gnu/packages/tor.scm index 19d4d670c6..d0b8dd6af4 100644 --- a/gnu/packages/tor.scm +++ b/gnu/packages/tor.scm @@ -1,7 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org> -;;; Copyright © 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2016, 2017, 2018, 2020 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2017 ng0 <ng0@n0.is> ;;; Copyright © 2017, 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2017, 2018, 2019 Eric Bavier <bavier@member.fsf.org> @@ -50,14 +50,14 @@ (define-public tor (package (name "tor") - (version "0.4.2.5") + (version "0.4.2.6") (source (origin (method url-fetch) (uri (string-append "https://dist.torproject.org/tor-" version ".tar.gz")) (sha256 (base32 - "1hnqg6psf7shcmlvfk44mkpaz7v66mify3cnx7mzl23q5s37anad")))) + "1i766s211nrbjvwvkd2375mjsbbc28yrg46564rbx6w46cj10005")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config) diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm index 3333cd5778..e90b8b8da2 100644 --- a/gnu/packages/version-control.scm +++ b/gnu/packages/version-control.scm @@ -26,6 +26,7 @@ ;;; Copyright © 2019 Kei Kebreau <kkebreau@posteo.net> ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2020 Roel Janssen <roel@gnu.org> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -625,7 +626,7 @@ write native speed custom Git applications in any language with bindings.") (define-public git-crypt (package (name "git-crypt") - (version "0.5.0") + (version "0.6.0") (source (origin (method git-fetch) @@ -634,25 +635,38 @@ write native speed custom Git applications in any language with bindings.") (commit version))) (file-name (git-file-name name version)) (sha256 - (base32 "1x9209n3k49k998saadr2d0lmvs01smjinx7gzzyjdwj9l904sii")))) + (base32 "1ba5s0fvmd9hhnfhfsjrm40v0qpxfnwc8vmm55m0k4dryzkzx66q")))) (build-system gnu-build-system) (inputs `(("git" ,git) ("openssl" ,openssl))) + (native-inputs + `(("docbook-xsl" ,docbook-xsl) + ("libxslt" ,libxslt))) (arguments `(#:tests? #f ; No tests. #:phases (modify-phases %standard-phases (delete 'configure) + (add-after 'unpack 'patch-makefile + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "Makefile" + (("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl") + (string-append (assoc-ref inputs "docbook-xsl") + "/xml/xsl/docbook-xsl-" + ,(package-version docbook-xsl) + "/manpages/docbook.xsl"))) + #t)) (replace 'build (lambda _ - (invoke "make"))) + (invoke "make" "ENABLE_MAN=yes"))) (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (invoke "make" "install" + "ENABLE_MAN=yes" (string-append "PREFIX=" out)))))))) - (home-page "https://www.agwa.name/projects/git-crypt") + (home-page "https://www.agwa.name/projects/git-crypt/") (synopsis "Transparent encryption of files in a git repository") (description "git-crypt enables transparent encryption and decryption of files in a git repository. Files which you choose to protect are encrypted when @@ -1038,16 +1052,16 @@ will work.") (name "git-flow") ;; This version has not be officially released yet, so we build it ;; directly from the git repository. - (version "0.4.2-pre") + (version "1.12.3") (source (origin (method git-fetch) (uri (git-reference - (url "https://github.com/nvie/gitflow/") - (commit "15aab26490facf285acef56cb5d61025eacb3a69"))) + (url "https://github.com/petervanderdoes/gitflow-avh/") + (commit version))) (file-name (git-file-name name version)) (sha256 (base32 - "01fs97q76fdfnvmrh2cyjhywcs3pykf1dg58sy0frflnsdzs6prx")))) + "13q4mnrxr03wz2dkhzy73j384g299m4d545cnhxcaznvdwfany4h")))) (build-system gnu-build-system) (inputs `(("shflags" ,shflags))) (arguments @@ -1447,7 +1461,9 @@ following features: "19zc215mhpnm92mlyl5jbv57r5zqp6cavr3s2g9yglp6j4kfgj0q")))) (build-system gnu-build-system) (arguments - '(#:phases + '(#:parallel-tests? #f ; TODO Seems to cause test failures on + ; i686-linux + #:phases (modify-phases %standard-phases (add-after 'configure 'patch-libtool-wrapper-ls (lambda* (#:key inputs #:allow-other-keys) @@ -1465,6 +1481,12 @@ following features: (substitute* "subversion/tests/libsvn_repos/repos-test.c" (("#!/bin/sh") (string-append "#!" (which "sh")))) #t)) + (add-before 'check 'set-PARALLEL + (lambda* (#:key parallel-tests? #:allow-other-keys) + (if parallel-tests? + (setenv "PARALLEL" (number->string (parallel-job-count))) + (simple-format #t "parallel-tests? are disabled\n")) + #t)) (add-after 'install 'install-perl-bindings (lambda* (#:key outputs #:allow-other-keys) ;; Follow the instructions from 'subversion/bindings/swig/INSTALL'. @@ -2150,7 +2172,7 @@ be served with a HTTP file server of your choice.") (define-public gource (package (name "gource") - (version "0.49") + (version "0.51") (source (origin (method url-fetch) (uri (string-append @@ -2158,7 +2180,7 @@ be served with a HTTP file server of your choice.") "/gource-" version "/gource-" version ".tar.gz")) (sha256 (base32 - "12hf5ipcsp9dxsqn84n4kr63xaiskrnf5a084wr29qk171lj7pd9")))) + "16p7b1x4r0915w883lp374jcdqqja37fnb7m8vnsfnl2n64gi8qr")))) (build-system gnu-build-system) (arguments `(#:configure-flags @@ -2177,7 +2199,7 @@ be served with a HTTP file server of your choice.") ("mesa" ,mesa) ("pcre" ,pcre) ("sdl-union" ,(sdl-union (list sdl2 sdl2-image))))) - (home-page "http://gource.io/") + (home-page "https://gource.io/") (synopsis "3D visualisation tool for source control repositories") (description "@code{gource} provides a software version control visualization. The repository is displayed as a tree where the root of the diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index d4a48bb503..cf767f43bf 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -36,6 +36,7 @@ ;;; Copyright © 2019 Arne Babenhauserheide <arne_bab@web.de> ;;; Copyright © 2019 Riku Viitanen <riku.viitanen@protonmail.com> ;;; Copyright © 2020 Oleg Pykhalov <go.wigust@gmail.com> +;;; Copyright © 2020 Josh Holland <josh@inv.alid.pw> ;;; ;;; This file is part of GNU Guix. ;;; @@ -1728,7 +1729,7 @@ audio, images) from the Web. It can use either mpv or vlc for playback.") (define-public youtube-viewer (package (name "youtube-viewer") - (version "3.7.0") + (version "3.7.4") (source (origin (method git-fetch) (uri (git-reference @@ -1737,7 +1738,7 @@ audio, images) from the Web. It can use either mpv or vlc for playback.") (file-name (git-file-name name version)) (sha256 (base32 - "1h0m8rn7najdrzvg5md9albiax287273b40ncrihh9amsvvb47c9")))) + "1plsm1sc04lwlg5h2gapxpykc3cpd4frjll14lamql89dm4a50vi")))) (build-system perl-build-system) (native-inputs `(("perl-module-build" ,perl-module-build))) @@ -2182,14 +2183,14 @@ and custom quantization matrices.") (define-public streamlink (package (name "streamlink") - (version "1.3.0") + (version "1.3.1") (source (origin (method url-fetch) (uri (pypi-uri "streamlink" version)) (sha256 (base32 - "0593ffjpz82jrljnzxfafkcmcqad3r1ijjan0hm04xjcnxc9cr00")))) + "0cnlg3ra3g6dml4xfy9ysy9b4qwyn458fadd8ac44cfwi3v4gq6y")))) (build-system python-build-system) (home-page "https://github.com/streamlink/streamlink") (native-inputs diff --git a/gnu/packages/vim.scm b/gnu/packages/vim.scm index f130ae4392..1d4a7a3f94 100644 --- a/gnu/packages/vim.scm +++ b/gnu/packages/vim.scm @@ -7,7 +7,7 @@ ;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019 HiPhish <hiphish@posteo.de> ;;; Copyright © 2019 Julien Lepiller <julien@lepiller.eu> -;;; Copyright © 2019 Jakub Kądziołka <kuba@kadziolka.net> +;;; Copyright © 2019, 2020 Jakub Kądziołka <kuba@kadziolka.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -68,7 +68,7 @@ (define-public vim (package (name "vim") - (version "8.2.0069") + (version "8.2.0236") (source (origin (method git-fetch) (uri (git-reference @@ -77,7 +77,7 @@ (file-name (git-file-name name version)) (sha256 (base32 - "0kxzfcpv96s1lbx97g6451p1i7yanws5bvzl05jh1ywaqv5f4y7g")))) + "0ixwr7kkxc1cj837v1bbgghkd68gbynfn7pc4rb87ah9sm6bgaz3")))) (build-system gnu-build-system) (arguments `(#:test-target "test" @@ -189,9 +189,20 @@ with the editor vim."))) "--enable-xim" "--disable-selinux" "--enable-gui") + ;; This flag fixes the following error: + ;; .../libpython3.7m.a(pyexpat.o): undefined reference to symbol 'XML_FreeContentModel' + ;; .../libexpat.so.1: error adding symbols: DSO missing from command line + #:make-flags '("LDFLAGS=-lexpat") ,@(substitute-keyword-arguments (package-arguments vim) ((#:phases phases) `(modify-phases ,phases + (add-before 'check 'skip-previewpopup + ;; This test fails when the path to the source is long. See: + ;; https://github.com/vim/vim/issues/5615 + (lambda _ + (substitute* "src/testdir/test_popupwin.vim" + ((".*Test_previewpopup.*" line) + (string-append line "return\n"))))) (add-before 'check 'skip-test87 ;; This test fails for unknown reasons after switching ;; to a git checkout. diff --git a/gnu/packages/web-browsers.scm b/gnu/packages/web-browsers.scm index 1983b65e51..8778e5e17a 100644 --- a/gnu/packages/web-browsers.scm +++ b/gnu/packages/web-browsers.scm @@ -511,8 +511,7 @@ features for productive professionals.") #:asd-system-name "next/hooks")) (inputs `(("alexandria" ,sbcl-alexandria) - ("serapeum" ,sbcl-serapeum) - ("fare-quasiquote-extras" ,cl-fare-quasiquote-extras))) + ("serapeum" ,sbcl-serapeum))) (native-inputs `(("trivial-features" ,sbcl-trivial-features) ("prove-asdf" ,sbcl-prove-asdf))) @@ -592,7 +591,6 @@ features for productive professionals.") ("closer-mop" ,sbcl-closer-mop) ("dbus" ,cl-dbus) ("dexador" ,sbcl-dexador) - ("fare-quasiquote-extras" ,cl-fare-quasiquote-extras) ; For serapeum. Guix bug? ("ironclad" ,sbcl-ironclad) ("local-time" ,sbcl-local-time) ("log4cl" ,sbcl-log4cl) diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index cd83613c6e..0b1a3a6135 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -1,7 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2013 Aljosha Papsch <misc@rpapsch.de> -;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2015, 2016, 2017, 2018, 2019 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2018 Raoul Jean Pierre Bonnal <ilpuccio.febo@gmail.com> @@ -34,11 +34,13 @@ ;;; Copyright © 2019 Brendan Tildesley <mail@brendan.scot> ;;; Copyright © 2019 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com> -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2019 Pierre-Moana Levesque <pierre.moana.levesque@gmail.com> ;;; Copyright © 2019 Florian Pelz <pelzflorian@pelzflorian.de> ;;; Copyright © 2020 Timotej Lazar <timotej.lazar@araneo.si> +;;; Copyright © 2020 Alexandros Theodotou <alex@zrythm.org> +;;; Copyright © 2020 Pierre Neidhardt <mail@ambrevar.xyz> ;;; ;;; This file is part of GNU Guix. ;;; @@ -91,6 +93,7 @@ #:use-module (gnu packages databases) #:use-module (gnu packages bison) #:use-module (gnu packages flex) + #:use-module (gnu packages fontutils) #:use-module (gnu packages freedesktop) #:use-module (gnu packages kerberos) #:use-module (gnu packages gcc) @@ -4831,6 +4834,46 @@ developed as part of the Netsurf project.") written in C. It is developed as part of the NetSurf project.") (license license:expat))) +(define-public libcyaml + (package + (name "libcyaml") + (version "1.0.1") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/tlsa/libcyaml.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "0h5ydyqdl8kzh526np3jsi0pm7ks16nh1hjkdsjcd6pacw7y6i6z")))) + (build-system gnu-build-system) + (arguments + `(#:make-flags + (list (string-append "PREFIX=" (assoc-ref %outputs "out")) + (string-append "CC=gcc")) + #:phases + (modify-phases %standard-phases + (delete 'configure) ; no configure script + (replace 'check + (lambda _ + (setenv "CC" "gcc") + (invoke "make" "test")))))) + (inputs + `(("libyaml" ,libyaml))) + (native-inputs + `(("git", git) + ("pkg-config", pkg-config))) + (synopsis "C library for reading and writing YAML") + (description + "LibCYAML is a C library written in ISO C11 for reading and writing +structured YAML documents. The fundamental idea behind CYAML is to allow +applications to construct schemas which describe both the permissible +structure of the YAML documents to read/write, and the C data structure(s) +in which the loaded data is arranged in memory.") + (home-page "https://github.com/tlsa/libcyaml") + (license license:isc))) + (define-public libdom (package (name "libdom") @@ -5156,7 +5199,7 @@ w3c webidl files and a binding configuration file.") (copy-file "frontends/gtk/res/netsurf-gtk.desktop" desktop) (substitute* desktop - (("netsurf-gtk") (string-append out "/bin/netsurf-gtk")) + (("netsurf-gtk") (string-append out "/bin/netsurf-gtk3")) (("netsurf.png") (string-append out "/share/netsurf/" "netsurf.xpm"))) (install-file "docs/netsurf-gtk.1" @@ -5367,13 +5410,13 @@ deployments.") (package (name "varnish") (home-page "https://varnish-cache.org/") - (version "6.3.1") + (version "6.3.2") (source (origin (method url-fetch) (uri (string-append home-page "_downloads/varnish-" version ".tgz")) (sha256 (base32 - "0xa14pd68zpi5hxcax3arl14rcmh5d1cdwa8gv4l5f23mmynr8ni")))) + "1f5ahzdh3am6fij5jhiybv3knwl11rhc5r3ig1ybzw55ai7788q8")))) (build-system gnu-build-system) (arguments `(#:configure-flags (list (string-append "LDFLAGS=-Wl,-rpath=" %output "/lib") @@ -5666,7 +5709,7 @@ into your tests. It automatically starts up a HTTP server in a separate thread (define-public http-parser (package (name "http-parser") - (version "2.9.2") + (version "2.9.3") (home-page "https://github.com/nodejs/http-parser") (source (origin (method git-fetch) @@ -5675,7 +5718,7 @@ into your tests. It automatically starts up a HTTP server in a separate thread (file-name (git-file-name name version)) (sha256 (base32 - "1qs6x3n2nrcj1wiik5pg5i16inykf7rcfdfdy7rwyzf40pvdl3c2")))) + "189zi61vczqgmqjd2myjcjbbi5icrk7ccs0kn6nj8hxqiv5j3811")))) (build-system gnu-build-system) (arguments `(#:test-target "test" @@ -6865,14 +6908,13 @@ features include: "0s7b5whqsmfa57prbgl66ym551kg6ly0z14h5dgrlx4lqm70y2yw")))) (build-system trivial-build-system) (arguments - `(#:modules ((guix build utils) - (srfi srfi-1) - (srfi srfi-26)) + `(#:modules ((guix build utils)) #:builder (begin (use-modules (guix build utils) (srfi srfi-1) (srfi srfi-26)) + (let ((source (assoc-ref %build-inputs "source")) (php-dir (string-append %output "/share/web/" ,name "/"))) ;; The cache directory must not be in the store, but in a writable @@ -7178,3 +7220,44 @@ of the DOM tree (license (list license:lgpl2.0 license:gpl2 license:asl2.0)))) + +(define-public librocket + (package + (name "librocket") + (version "1.3.0.0") + (source + (origin + (method git-fetch) + (uri + (git-reference + (url "https://github.com/libRocket/libRocket") + (commit (string-append "release-" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1n6gq007vqijyfasfnfg6c8d2rc9qarl4bhzbgkz062m4h5izlfs")))) + (build-system cmake-build-system) + (arguments + `(#:tests? #f ; No tests. + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'chdir + (lambda _ + (chdir "Build")))))) + (inputs + `(("freetype" ,freetype))) + (home-page "https://github.com/libRocket/libRocket") ; http://librocket.com/ is down. + (synopsis "HTML/CSS user interface library") + (description "libRocket is a C++ user interface package based on the HTML +and CSS standards. libRocket uses the open standards XHTML1.0 and +CSS2.0 (while borrowing features from HTML5 and CSS3), and extends them with +features suited towards real-time applications. It is designed as a complete +solution for any project's interface needs: + +@itemize +@item Dynamic layout system. +@item Efficient application-wide styling, with a custom-built templating engine. +@item Fully featured control set: buttons, sliders, drop-downs, etc. +@item Runtime visual debugging suite. +@item Easily integrated and extensible with Python or Lua scripting. +@end itemize\n") + (license license:expat))) diff --git a/gnu/packages/webkit.scm b/gnu/packages/webkit.scm index aeead92871..e138817fb6 100644 --- a/gnu/packages/webkit.scm +++ b/gnu/packages/webkit.scm @@ -93,14 +93,14 @@ backend which implements them.") (define-public wpebackend-fdo (package (name "wpebackend-fdo") - (version "1.4.0") + (version "1.4.1") (source (origin (method url-fetch) (uri (string-append "https://wpewebkit.org/releases/" "wpebackend-fdo-" version ".tar.xz")) (sha256 (base32 - "1bwbs47v4nlzhsqrw9fpyny5m3n9ry0kfzsvk90zjif4bd5cl6d9")))) + "1799vf6wc78z15l39sfh39l5rrvlqpi29ynjm0324rpsrfvs0jb2")))) (build-system cmake-build-system) (arguments `(#:tests? #f)) ;no tests @@ -121,14 +121,14 @@ engine that uses Wayland for graphics output.") (define-public webkitgtk (package (name "webkitgtk") - (version "2.26.3") + (version "2.26.4") (source (origin (method url-fetch) (uri (string-append "https://www.webkitgtk.org/releases/" "webkitgtk-" version ".tar.xz")) (sha256 (base32 - "04g6y0sv04d20bw401myq3k828ikysjhx383ly81vh9wji9i3mdd")))) + "0gqi9f9njrdn8vad1zvr59b25arwc8r0n8bp25sgkbfz2c3r11j3")))) (build-system cmake-build-system) (outputs '("out" "doc")) (arguments diff --git a/gnu/packages/wine.scm b/gnu/packages/wine.scm index f5b879ae36..23850e2df8 100644 --- a/gnu/packages/wine.scm +++ b/gnu/packages/wine.scm @@ -554,7 +554,7 @@ version)") ;; This package provides 32-bit dxvk libraries on 64-bit systems. (package (name "dxvk32") - (version "1.5") + (version "1.5.4") (home-page "https://github.com/doitsujin/dxvk/") (source (origin (method git-fetch) @@ -564,7 +564,7 @@ version)") (file-name (git-file-name name version)) (sha256 (base32 - "009p99jkskrmy186gsqrf0p3v9z3lskw51r4vdp35af057q26a6x")))) + "0yhxd5rnn5mcvcb2n062z9wqqwxjq5c0rzfbjz1z9ppznj8gn37i")))) (build-system meson-build-system) (arguments `(#:system "i686-linux" @@ -633,6 +633,5 @@ Use @command{setup_dxvk} to install the required libraries to a Wine prefix.") ,@(match (%current-system) ("x86_64-linux" `(("dxvk32" ,dxvk32))) - (_ '())) - )) + (_ '())))) (supported-systems '("i686-linux" "x86_64-linux")))) diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm index 52d7042806..d79af78db2 100644 --- a/gnu/packages/wm.scm +++ b/gnu/packages/wm.scm @@ -31,6 +31,8 @@ ;;; Copyright © 2019 Brett Gilio <brettg@gnu.org> ;;; Copyright © 2019 Noodles! <nnoodle@chiru.no> ;;; Copyright © 2019 Alexandru-Sergiu Marton <brown121407@member.fsf.org> +;;; Copyright © 2020 Nicolas Goaziou <mail@nicolasgoaziou.fr> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -95,10 +97,10 @@ #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) #:use-module (gnu packages serialization) + #:use-module (gnu packages sphinx) #:use-module (gnu packages suckless) #:use-module (gnu packages texinfo) #:use-module (gnu packages textutils) - #:use-module (gnu packages version-control) #:use-module (gnu packages video) #:use-module (gnu packages web) #:use-module (gnu packages xdisorg) @@ -868,89 +870,108 @@ experience.") (define-public awesome (package (name "awesome") - (version "4.2") + (version "4.3") (source - (origin (method url-fetch) - (uri (string-append - "https://github.com/awesomeWM/awesome-releases/raw/" - "master/awesome-" version ".tar.xz")) - (sha256 - (base32 - "0kwpbls9h1alxcmvxh5g9qb995fds5b2ngcr44w0ibazkyls2pdc")) - (modules '((guix build utils) - (srfi srfi-19))) - (snippet '(begin - ;; Remove non-reproducible timestamp and use the date - ;; of the source file instead. - (substitute* "common/version.c" - (("__DATE__ \" \" __TIME__") - (date->string - (time-utc->date - (make-time time-utc 0 - (stat:mtime (stat "awesome.c")))) - "\"~c\""))) - #t)) - (patches (search-patches "awesome-reproducible-png.patch")))) + (origin + (method url-fetch) + (uri (string-append + "https://github.com/awesomeWM/awesome-releases/raw/master/" + "awesome-" version ".tar.xz")) + (sha256 + (base32 "0lqpw401mkkmp9wgbvrmm45bqq2j9357l4irwdqv6l1305pls9kq")) + (modules '((guix build utils) + (srfi srfi-19))) + (snippet + '(begin + ;; Remove non-reproducible timestamp and use the date of + ;; the source file instead. + (substitute* "common/version.c" + (("__DATE__ \" \" __TIME__") + (date->string + (time-utc->date + (make-time time-utc 0 (stat:mtime (stat "awesome.c")))) + "\"~c\""))) + #t)) + (patches + (search-patches "awesome-reproducible-png.patch")))) (build-system cmake-build-system) - (native-inputs `(("asciidoc" ,asciidoc) - ("docbook-xsl" ,docbook-xsl) - ("doxygen" ,doxygen) - ("gperf" ,gperf) - ("imagemagick" ,imagemagick) - ("libxml2" ,libxml2) ;for XML_CATALOG_FILES - ("pkg-config" ,pkg-config) - ("xmlto" ,xmlto))) - (inputs `(("cairo" ,cairo) - ("dbus" ,dbus) - ("gdk-pixbuf" ,gdk-pixbuf) - ("glib" ,glib) - ("gobject-introspection" ,gobject-introspection) - ("imlib2" ,imlib2) - ("libev" ,libev) - ("libxcb" ,libxcb) - ("libxcursor" ,libxcursor) - ("libxdg-basedir" ,libxdg-basedir) - ("libxkbcommon" ,libxkbcommon) - ("lua" ,lua) - ("lua-lgi" ,lua-lgi) - ("pango" ,pango) - ("startup-notification" ,startup-notification) - ("xcb-util" ,xcb-util) - ("xcb-util-cursor" ,xcb-util-cursor) - ("xcb-util-image" ,xcb-util-image) - ("xcb-util-keysyms" ,xcb-util-keysyms) - ("xcb-util-renderutil" ,xcb-util-renderutil) - ("xcb-util-xrm" ,xcb-util-xrm) - ("xcb-util-wm" ,xcb-util-wm))) + (native-inputs + `(("asciidoc" ,asciidoc) + ("docbook-xsl" ,docbook-xsl) + ("doxygen" ,doxygen) + ("gperf" ,gperf) + ("imagemagick" ,imagemagick) + ("libxml2" ,libxml2) ;for XML_CATALOG_FILES + ("lua-ldoc" ,lua-ldoc) + ("pkg-config" ,pkg-config) + ("xmlto" ,xmlto))) + (inputs + `(("cairo" ,cairo) + ("dbus" ,dbus) + ("gdk-pixbuf" ,gdk-pixbuf) + ("glib" ,glib) + ("gobject-introspection" ,gobject-introspection) + ("imlib2" ,imlib2) + ("libev" ,libev) + ("libxcb" ,libxcb) + ("libxcursor" ,libxcursor) + ("libxdg-basedir" ,libxdg-basedir) + ("libxkbcommon" ,libxkbcommon) + ("lua" ,lua) + ("lua-lgi" ,lua-lgi) + ("pango" ,pango) + ("startup-notification" ,startup-notification) + ("xcb-util" ,xcb-util) + ("xcb-util-cursor" ,xcb-util-cursor) + ("xcb-util-image" ,xcb-util-image) + ("xcb-util-keysyms" ,xcb-util-keysyms) + ("xcb-util-renderutil" ,xcb-util-renderutil) + ("xcb-util-xrm" ,xcb-util-xrm) + ("xcb-util-wm" ,xcb-util-wm))) (arguments - `(;; Let compression happen in our 'compress-documentation' phase so that - ;; '--no-name' is used, which removes timestamps from gzip output. - #:configure-flags '("-DCOMPRESS_MANPAGES=off") - - ;; Building awesome in its source dir is no longer supported. + `(#:modules ((guix build cmake-build-system) + (guix build utils) + (ice-9 match)) + ;; Let compression happen in our 'compress-documentation' phase + ;; so that '--no-name' is used, which removes timestamps from + ;; gzip output. + #:configure-flags + '("-DCOMPRESS_MANPAGES=off") + ;; Building awesome in its source directory is no longer + ;; supported. #:out-of-source? #t - #:phases (modify-phases %standard-phases - (add-before 'build 'xmlto-skip-validation - (lambda _ - ;; We can't download the necessary schema, so so skip - ;; validation and assume they're valid. - (substitute* "../build/CMakeFiles/man.dir/build.make" - (("/xmlto") - (string-append "/xmlto --skip-validation"))) - #t)) - (add-before 'configure 'set-lua-paths + (add-before 'configure 'set-paths (lambda* (#:key inputs #:allow-other-keys) - ;; The build process needs to load cairo dynamically. - (let* ((cairo (string-append - (assoc-ref inputs "cairo") "/lib" )) - (lua-lgi (assoc-ref inputs "lua-lgi") )) - (setenv "LD_LIBRARY_PATH" cairo ) - (setenv "LUA_PATH" (string-append lua-lgi - "/share/lua/5.2/?.lua")) - (setenv "LUA_CPATH" (string-append lua-lgi - "/lib/lua/5.2/?.so")) + ;; The build process needs to load Cairo dynamically. + (let* ((cairo (string-append (assoc-ref inputs "cairo") "/lib")) + (lua-version ,(version-major+minor (package-version lua))) + (lua-dependencies + (filter (match-lambda + ((label . _) (string-prefix? "lua-" label))) + inputs)) + (lua-path + (string-join + (map (match-lambda + ((_ . dir) + (string-append + dir "/share/lua/" lua-version "/?.lua;" + dir "/share/lua/" lua-version "/?/?.lua"))) + lua-dependencies) + ";")) + (lua-cpath + (string-join + (map (match-lambda + ((_ . dir) + (string-append + dir "/lib/lua/" lua-version "/?.so;" + dir "/lib/lua/" lua-version "/?/?.so"))) + lua-dependencies) + ";"))) + (setenv "LD_LIBRARY_PATH" cairo) + (setenv "LUA_PATH" (string-append "?.lua;" lua-path)) + (setenv "LUA_CPATH" lua-cpath) #t))) (replace 'check (lambda _ @@ -967,22 +988,23 @@ experience.") (add-after 'install 'wrap (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((awesome (assoc-ref outputs "out")) - (cairo (string-append - (assoc-ref inputs "cairo") "/lib" )) - (lua-lgi (assoc-ref inputs "lua-lgi") )) + (cairo (string-append (assoc-ref inputs "cairo") "/lib")) + (lua-version ,(version-major+minor (package-version lua))) + (lua-lgi (assoc-ref inputs "lua-lgi"))) (wrap-program (string-append awesome "/bin/awesome") + `("LUA_PATH" suffix + (,(format #f "~a/share/lua/~a/?.lua" lua-lgi lua-version))) + `("LUA_CPATH" suffix + (,(format #f "~a/lib/lua/~a/?.so" lua-lgi lua-version))) `("GI_TYPELIB_PATH" ":" prefix (,(getenv "GI_TYPELIB_PATH"))) - `("LD_LIBRARY_PATH" suffix (, cairo)) - `("LUA_PATH" suffix (,(string-append lua-lgi - "/share/lua/5.2/?.lua"))) - `("LUA_CPATH" suffix (,(string-append - lua-lgi "/lib/lua/5.2/?.so")))))))))) + `("LD_LIBRARY_PATH" suffix (,cairo))) + #t)))))) + (home-page "https://awesomewm.org/") (synopsis "Highly configurable window manager") (description "Awesome has been designed as a framework window manager. It is fast, small, dynamic and extensible using the Lua programming language.") - (license license:gpl2+) - (home-page "https://awesomewm.org/"))) + (license license:gpl2+))) (define-public menumaker (package @@ -1272,6 +1294,9 @@ its size ("xcb-util-xrm" ,xcb-util-xrm))) (native-inputs `(("pkg-config" ,pkg-config) + ("python-sphinx" ,python-sphinx) ; for the manual + ;; XXX: "python" input must be located after "python-2", or the package + ;; fails to build with "missing required python module: xcbgen". ("python-2" ,python-2) ; lib/xpp depends on python 2 ("python" ,python))) ; xcb-proto depends on python 3 (home-page "https://polybar.github.io/") @@ -1367,8 +1392,7 @@ modules for building a Wayland compositor.") ("swaybg" ,swaybg) ("wayland" ,wayland) ("wlroots" ,wlroots))) - (native-inputs `(("git" ,git) - ("libcap" ,libcap) + (native-inputs `(("libcap" ,libcap) ("linux-pam" ,linux-pam) ("mesa" ,mesa) ("pkg-config" ,pkg-config) @@ -1424,8 +1448,7 @@ modules for building a Wayland compositor.") ("libxkbcommon" ,libxkbcommon) ;("linux-pam" ,linux-pam) ; FIXME: Doesn't work. ("wayland" ,wayland))) - (native-inputs `(("git" ,git) - ("pango" ,pango) + (native-inputs `(("pango" ,pango) ("pkg-config" ,pkg-config) ("scdoc" ,scdoc) ("wayland-protocols" ,wayland-protocols))) @@ -1451,8 +1474,7 @@ modules for building a Wayland compositor.") (inputs `(("cairo" ,cairo) ("gdk-pixbuf" ,gdk-pixbuf) ("wayland" ,wayland))) - (native-inputs `(("git" ,git) - ("pkg-config" ,pkg-config) + (native-inputs `(("pkg-config" ,pkg-config) ("scdoc" ,scdoc) ("wayland-protocols" ,wayland-protocols))) (home-page "https://github.com/swaywm/sway") diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm index 5d8cac61dd..af10d97bf6 100644 --- a/gnu/packages/xdisorg.scm +++ b/gnu/packages/xdisorg.scm @@ -32,6 +32,7 @@ ;;; Copyright © 2020 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2020 David Wilson <david@daviwil.com> ;;; Copyright © 2020 Ivan Vilata i Balaguer <ivan@selidor.net> +;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; ;;; This file is part of GNU Guix. ;;; @@ -153,58 +154,53 @@ program.") (license license:gpl3+))) (define-public autorandr - ;; Use latest commit since 1.7 lacks many new features such as the - ;; autorandr_launcher. - (let ((commit "b484c0ea9c9a4838278bbd661a7cc384333c1df8")) - (package - (name "autorandr") - (version (git-version "1.7" "1" commit)) - (home-page "https://github.com/phillipberndt/autorandr") - (source - (origin - (method git-fetch) - (uri (git-reference - (url home-page) - (commit commit))) - (file-name (git-file-name name version)) - (sha256 - (base32 - "0da17kzsisjv3s993j5idkk1n2d2cvjdn7pngs2b0ic1r2h5z02h")))) - (build-system python-build-system) - (native-inputs - `(("man-db" ,man-db))) - (inputs - `(("xrandr" ,xrandr) - ("libxcb" ,libxcb))) - (arguments - `(#:phases - (modify-phases %standard-phases - (add-before 'build 'configure - (lambda* (#:key inputs #:allow-other-keys) + (package + (name "autorandr") + (version "1.9") + (home-page "https://github.com/phillipberndt/autorandr") + (source + (origin + (method git-fetch) + (uri (git-reference + (url home-page) + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1bb0l7fcm5lcx9y02zdxv7pfdqf4v4gsc5br3v1x9gzjvqj64l7n")))) + (build-system python-build-system) + (inputs + `(("xrandr" ,xrandr) + ("libxcb" ,libxcb))) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-before 'build 'configure + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((xrandr (string-append (assoc-ref inputs "xrandr") + "/bin/xrandr"))) + (substitute* "contrib/etc/xdg/autostart/autorandr.desktop" + (("/usr") (assoc-ref outputs "out"))) (substitute* "autorandr.py" - (("popen\\(\"xrandr") (string-append "popen(\"" - (assoc-ref inputs "xrandr") - "/bin/xrandr")) - (("\\[\"xrandr") (string-append "[\"" - (assoc-ref inputs "xrandr") - "/bin/xrandr"))) - #t)) - (add-after 'install 'install-contrib - (lambda* (#:key outputs #:allow-other-keys) - (invoke "make" - (string-append "DESTDIR=" (assoc-ref outputs "out")) - "PREFIX=" - "BASH_COMPLETIONS_DIR=etc/bash_completiond.d" - "install_manpage" - "install_bash_completion" - "install_launcher")))))) - (synopsis "Auto-detect connected displays and load appropriate setup") - (description "Autorandr wraps around xrandr to help with X11 + (("popen\\(\"xrandr") (string-append "popen(\"" xrandr)) + (("\\[\"xrandr") (string-append "[\"" xrandr)))) + #t)) + (add-after 'install 'install-contrib + (lambda* (#:key outputs #:allow-other-keys) + (invoke "make" + (string-append "DESTDIR=" (assoc-ref outputs "out")) + "PREFIX=" + "BASH_COMPLETIONS_DIR=etc/bash_completiond.d" + "install_manpage" + "install_bash_completion" + "install_launcher" + "install_autostart_config")))))) + (synopsis "Auto-detect connected displays and load appropriate setup") + (description "Autorandr wraps around xrandr to help with X11 multi-screen configuration management. It allows the user to create profiles for various multi-screen setups. Autorandr automatically detects the profiles that can be activated based on the connected hardware. Hook scripts can be used to further tweak the behaviour of the different profiles.") - (license license:gpl3+)))) + (license license:gpl3+))) (define-public bemenu (package diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm index 9dcdf38be1..1294d748ac 100644 --- a/gnu/services/desktop.scm +++ b/gnu/services/desktop.scm @@ -1070,7 +1070,7 @@ as expected."))) (match-lambda (($ <inputattach-configuration> type device baud-rate log-file) (let ((args (append (if baud-rate - (list "--baud-rate" (number->string baud-rate)) + (list "--baud" (number->string baud-rate)) '()) (list (string-append "--" type) device)))) diff --git a/gnu/services/web.scm b/gnu/services/web.scm index 3ac7b7f52c..075140816a 100644 --- a/gnu/services/web.scm +++ b/gnu/services/web.scm @@ -1436,6 +1436,10 @@ ALLOWED_HOSTS = [ allowed-hosts)) "] +DEFAULT_FROM_EMAIL = '" #$default-from-email "' +SERVER_EMAIL = DEFAULT_FROM_EMAIL +NOTIFICATION_FROM_EMAIL = DEFAULT_FROM_EMAIL + ADMINS = [ " #$(string-concatenate (map (match-lambda diff --git a/gnu/tests/reconfigure.scm b/gnu/tests/reconfigure.scm index fb11e6164e..8b85920979 100644 --- a/gnu/tests/reconfigure.scm +++ b/gnu/tests/reconfigure.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.lonestar.org> +;;; Copyright © 2019 Jakob L. Kreuze <zerodaysfordays@sdf.org> ;;; ;;; This file is part of GNU Guix. ;;; |