From 1f4335ae78300c658e441340195b5144595977b4 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Thu, 9 Jul 2015 12:35:24 -0400 Subject: gnu: openssl: Update to 1.0.2d. * gnu/packages/tls.scm (openssl): Update to 1.0.2d. --- gnu/packages/tls.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/tls.scm b/gnu/packages/tls.scm index 9cd47cd449..3d0000e3fa 100644 --- a/gnu/packages/tls.scm +++ b/gnu/packages/tls.scm @@ -178,14 +178,14 @@ required structures.") (define-public openssl (package (name "openssl") - (version "1.0.2c") + (version "1.0.2d") (source (origin (method url-fetch) (uri (string-append "ftp://ftp.openssl.org/source/openssl-" version ".tar.gz")) (sha256 (base32 - "10vasdg52qiyqvgbp14n9z7ghglmhzvag9qpiz2nfqssycvvlf00")) + "1j58r7rdj9fz2lanir8ajbx4bspb5jnm5ikl6dq8lql5fx43c737")) (patches (list (search-patch "openssl-runpath.patch"))))) (build-system gnu-build-system) (native-inputs `(("perl" ,perl))) -- cgit v1.2.3 From 5d6792f06f1b8646fe9c6d8ca5763323912a7fba Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 8 Jul 2015 12:31:32 -0400 Subject: gnu: bootstrap: Create a wrapper for guile to set the system load path. * gnu/packages/bootstrap.scm (raw-build): After unpacking, use the bootstrap guile to create its own wrapper that sets the guile system load path. --- gnu/packages/bootstrap.scm | 38 ++++++++++++++++++++++++++++++++++++-- 1 file changed, 36 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/bootstrap.scm b/gnu/packages/bootstrap.scm index 1f0fe16688..f3c1c5a617 100644 --- a/gnu/packages/bootstrap.scm +++ b/gnu/packages/bootstrap.scm @@ -197,6 +197,33 @@ successful, or false to signal an error." "guile-2.0.11.tar.xz") (_ "guile-2.0.9.tar.xz")))) + ;; The following code, run by the bootstrap guile after it is + ;; unpacked, creates a wrapper for itself to set its load path. + ;; This replaces the previous non-portable method based on + ;; reading the /proc/self/exe symlink. + (make-guile-wrapper + '(begin + (use-modules (ice-9 match)) + (match (command-line) + ((_ out bash) + (let ((bin-dir (string-append out "/bin")) + (guile (string-append out "/bin/guile")) + (guile-real (string-append out "/bin/.guile-real")) + ;; We must avoid using a bare dollar sign in this code, + ;; because it would be interpreted by the shell. + (dollar (string (integer->char 36)))) + (chmod bin-dir #o755) + (rename-file guile guile-real) + (call-with-output-file guile + (lambda (p) + (format p "\ +#!~a +export GUILE_SYSTEM_PATH=~a/share/guile/2.0 +export GUILE_SYSTEM_COMPILED_PATH=~a/lib/guile/2.0/ccache +exec -a \"~a0\" ~a \"~a@\"\n" + bash out out dollar guile-real dollar))) + (chmod guile #o555) + (chmod bin-dir #o555)))))) (builder (add-text-to-store store "build-bootstrap-guile.sh" @@ -206,10 +233,17 @@ echo \"unpacking bootstrap Guile to '$out'...\" cd $out ~a -dc < ~a | ~a xv +# Use the bootstrap guile to create its own wrapper to set the load path. +GUILE_SYSTEM_PATH=$out/share/guile/2.0 \ +GUILE_SYSTEM_COMPILED_PATH=$out/lib/guile/2.0/ccache \ +$out/bin/guile -c ~s $out ~a + # Sanity check. $out/bin/guile --version~%" - mkdir xz guile tar) - (list mkdir xz guile tar)))) + mkdir xz guile tar + (format #f "~s" make-guile-wrapper) + bash) + (list mkdir xz guile tar bash)))) (derivation store name bash `(,builder) #:system system -- cgit v1.2.3 From 6f317fa365ebbf5c1f8e42826803db6bd423ba42 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:31:16 -0400 Subject: gnu: gcc-4.9: Update to 4.9.3. * gnu/packages/gcc.scm (gcc-4.9): Update to 4.9.3. Remove "gcc-arm-link-spec-fix.patch" from patches. --- gnu/packages/gcc.scm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/gcc.scm b/gnu/packages/gcc.scm index 39e99c1228..23bfd90b33 100644 --- a/gnu/packages/gcc.scm +++ b/gnu/packages/gcc.scm @@ -319,17 +319,15 @@ Go. It also includes runtime support libraries for these languages.") (define-public gcc-4.9 (package (inherit gcc-4.8) - (version "4.9.2") + (version "4.9.3") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/gcc/gcc-" version "/gcc-" version ".tar.bz2")) (sha256 (base32 - "1pbjp4blk2ycaa6r3jmw4ky5f1s9ji3klbqgv8zs2sl5jn1cj810")) - (patches (map search-patch - '("gcc-arm-link-spec-fix.patch" - "gcc-libvtv-runpath.patch"))))))) + "0zmnm00d2a1hsd41g34bhvxzvxisa2l584q3p447bd91lfjv4ci3")) + (patches (list (search-patch "gcc-libvtv-runpath.patch"))))))) (define-public gcc-5.1 (package (inherit gcc-4.9) -- cgit v1.2.3 From c2ba49ef8ee1bb72513ecda8f22e29680ab208ef Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:22:13 -0400 Subject: gnu: coreutils: Update to 8.24. * gnu/packages/patches/coreutils-dummy-man.patch: Remove file. * gnu-system.am (dist_patch_DATA): Remove it. * gnu/packages/base.scm (coreutils): Update to 8.24. Remove patch. --- gnu/packages/base.scm | 5 ++--- gnu/packages/patches/coreutils-dummy-man.patch | 21 --------------------- 2 files changed, 2 insertions(+), 24 deletions(-) delete mode 100644 gnu/packages/patches/coreutils-dummy-man.patch (limited to 'gnu/packages') diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm index 31331a1080..9a433ae5e4 100644 --- a/gnu/packages/base.scm +++ b/gnu/packages/base.scm @@ -238,15 +238,14 @@ used to apply commands with arbitrarily long arguments.") (define-public coreutils (package (name "coreutils") - (version "8.23") + (version "8.24") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/coreutils/coreutils-" version ".tar.xz")) (sha256 (base32 - "0bdq6yggyl7nkc2pbl6pxhhyx15nyqhz3ds6rfn448n6rxdwlhzc")) - (patches (list (search-patch "coreutils-dummy-man.patch"))))) + "0w11jw3fb5sslf0f72kxy7llxgk1ia3a6bcw0c9kmvxrlj355mx2")))) (build-system gnu-build-system) (inputs `(("acl" ,acl) ; TODO: add SELinux ("gmp" ,gmp))) diff --git a/gnu/packages/patches/coreutils-dummy-man.patch b/gnu/packages/patches/coreutils-dummy-man.patch deleted file mode 100644 index a43cfc47c3..0000000000 --- a/gnu/packages/patches/coreutils-dummy-man.patch +++ /dev/null @@ -1,21 +0,0 @@ -Patch adapted from . - -Fix for 'dummy-man' usage, when cross-compiling. - -The options should be before the final argument, otherwise, the following error -would appear when compiling: - - dummy-man: too many non-option arguments - ---- coreutils-8.23/Makefile.in 2014-07-18 18:22:24.000000000 -0400 -+++ coreutils-8.23/Makefile.in 2014-08-03 20:21:10.849158313 -0400 -@@ -14076,8 +14076,8 @@ - && $(run_help2man) \ - --source='$(PACKAGE_STRING)' \ - --include=$(srcdir)/man/$$name.x \ -- --output=$$t/$$name.1 $$t/$$argv \ - --info-page='coreutils \(aq'$$name' invocation\(aq' \ -+ --output=$$t/$$name.1 $$t/$$argv \ - && sed \ - -e 's|$*\.td/||g' \ - -e '/For complete documentation/d' \ -- cgit v1.2.3 From 79e09ef2fd6892f7cf8d5af28a7f085f86146819 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:23:59 -0400 Subject: gnu: gettext: Update to 0.19.5. * gnu/packages/patches/gettext-msgunfmt.patch: Remove file. * gnu-system.am (dist_patch_DATA): Remove it. * gnu/packages/gettext.scm (gnu-gettext): Update to 0.19.5. Remove patch. --- gnu/packages/gettext.scm | 5 +-- gnu/packages/patches/gettext-msgunfmt.patch | 58 ----------------------------- 2 files changed, 2 insertions(+), 61 deletions(-) delete mode 100644 gnu/packages/patches/gettext-msgunfmt.patch (limited to 'gnu/packages') diff --git a/gnu/packages/gettext.scm b/gnu/packages/gettext.scm index 9289946178..6be3093bd6 100644 --- a/gnu/packages/gettext.scm +++ b/gnu/packages/gettext.scm @@ -35,15 +35,14 @@ (define-public gnu-gettext (package (name "gettext") - (version "0.19.4") + (version "0.19.5") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/gettext/gettext-" version ".tar.gz")) (sha256 (base32 - "0gvz86m4cs8bdf3mwmwsyx6lrq4ydfxgadrgd9jlx32z3bnz3jca")) - (patches (list (search-patch "gettext-msgunfmt.patch"))))) + "0fppvj4l9maa9q1swvhnv96hsqxx90vcjbdyjhqpir3ll55q2n0j")))) (build-system gnu-build-system) (inputs `(("expat" ,expat))) diff --git a/gnu/packages/patches/gettext-msgunfmt.patch b/gnu/packages/patches/gettext-msgunfmt.patch deleted file mode 100644 index 4a50abddc2..0000000000 --- a/gnu/packages/patches/gettext-msgunfmt.patch +++ /dev/null @@ -1,58 +0,0 @@ -From . - -2015-03-11 Daiki Ueno - - msgunfmt: Check allocated size for static segment - Reported by Max Lin in: - http://lists.gnu.org/archive/html/bug-gettext/2015-03/msg00005.html - * read-mo.c (get_sysdep_string): Check if the embedded segment - size is valid, before adding it to the string length. - -diff --git a/gettext-tools/src/read-mo.c b/gettext-tools/src/read-mo.c -index b97bbad..1c024a8 100644 ---- a/gettext-tools/src/read-mo.c -+++ b/gettext-tools/src/read-mo.c -@@ -149,6 +149,7 @@ get_sysdep_string (const struct binary_mo_file *bfp, size_t offset, - nls_uint32 s_offset; - - /* Compute the length. */ -+ s_offset = get_uint32 (bfp, offset); - length = 0; - for (i = 4; ; i += 8) - { -@@ -158,9 +159,14 @@ get_sysdep_string (const struct binary_mo_file *bfp, size_t offset, - nls_uint32 ss_length; - nls_uint32 ss_offset; - size_t ss_end; -+ size_t s_end; - size_t n; - -+ s_end = xsum (s_offset, segsize); -+ if (size_overflow_p (s_end) || s_end > bfp->size) -+ error (EXIT_FAILURE, 0, _("file \"%s\" is truncated"), bfp->filename); - length += segsize; -+ s_offset += segsize; - - if (sysdepref == SEGMENTS_END) - break; -@@ -175,7 +181,7 @@ get_sysdep_string (const struct binary_mo_file *bfp, size_t offset, - ss_end = xsum (ss_offset, ss_length); - if (size_overflow_p (ss_end) || ss_end > bfp->size) - error (EXIT_FAILURE, 0, _("file \"%s\" is truncated"), bfp->filename); -- if (!(ss_length > 0 && bfp->data[ss_offset + ss_length - 1] == '\0')) -+ if (!(ss_length > 0 && bfp->data[ss_end - 1] == '\0')) - { - char location[30]; - sprintf (location, "sysdep_segment[%u]", (unsigned int) sysdepref); -@@ -198,11 +204,8 @@ get_sysdep_string (const struct binary_mo_file *bfp, size_t offset, - nls_uint32 sysdep_segment_offset; - nls_uint32 ss_length; - nls_uint32 ss_offset; -- size_t s_end = xsum (s_offset, segsize); - size_t n; - -- if (size_overflow_p (s_end) || s_end > bfp->size) -- error (EXIT_FAILURE, 0, _("file \"%s\" is truncated"), bfp->filename); - memcpy (p, bfp->data + s_offset, segsize); - p += segsize; - s_offset += segsize; -- cgit v1.2.3 From 302af59fc14c6dc3686a24d4e11429f719c0c7d1 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:25:00 -0400 Subject: gnu: ed: Update to 1.12. * gnu/packages/ed.scm (ed): Update to 1.12. --- gnu/packages/ed.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/ed.scm b/gnu/packages/ed.scm index 0d2b24cf8d..7cd1fcd71d 100644 --- a/gnu/packages/ed.scm +++ b/gnu/packages/ed.scm @@ -27,14 +27,14 @@ (define-public ed (package (name "ed") - (version "1.11") + (version "1.12") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/ed/ed-" version ".tar.lz")) (sha256 (base32 - "0d518yhs3kpdpv9fbpa1rhxk2fbry2yzcknrdaa20pi2bzg6w55x")))) + "0bw0187a311rci58vznvncsj6pfp8bhs5phrlrqn03sa2i1mfrfj")))) (build-system gnu-build-system) (native-inputs `(("lzip" ,lzip))) (arguments -- cgit v1.2.3 From 87da4f1ed8ecd22c8337aac5d6b7d2bfb1fc9112 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:28:14 -0400 Subject: gnu: mpfr: Update to 3.1.3. * gnu/packages/multiprecision.scm (mpfr): Update to 3.1.3. --- gnu/packages/multiprecision.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/multiprecision.scm b/gnu/packages/multiprecision.scm index da52b2b1e9..6e136037d1 100644 --- a/gnu/packages/multiprecision.scm +++ b/gnu/packages/multiprecision.scm @@ -69,13 +69,13 @@ cryptography and computational algebra.") (define-public mpfr (package (name "mpfr") - (version "3.1.2") + (version "3.1.3") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/mpfr/mpfr-" version ".tar.xz")) (sha256 (base32 - "0fs501qi8l523gs3cpy4jjcnvwxggyfbklcys80wq236xx3hz79r")))) + "05jaa5z78lvrayld09nyr0v27c1m5dm9l7kr85v2bj4jv65s0db8")))) (build-system gnu-build-system) (outputs '("out" "debug")) (propagated-inputs `(("gmp" ,gmp))) ; refers to -- cgit v1.2.3 From 518265744938d0aac20dfbcb922484ece9ddc02d Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:25:58 -0400 Subject: gnu: libunistring: Update to 0.9.6. * gnu/packages/libunistring.scm (libunistring): Update to 0.9.6. --- gnu/packages/libunistring.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/libunistring.scm b/gnu/packages/libunistring.scm index aa053711a9..f29b7424de 100644 --- a/gnu/packages/libunistring.scm +++ b/gnu/packages/libunistring.scm @@ -26,7 +26,7 @@ (define-public libunistring (package (name "libunistring") - (version "0.9.5") + (version "0.9.6") (source (origin (method url-fetch) (uri (string-append @@ -34,7 +34,7 @@ version ".tar.gz")) (sha256 (base32 - "05va4x47ik006nd13grwm276gfxb8igsj63k37vvwl3q8rr0g30s")))) + "0ixxmgpgh2v8ifm6hbwsjxl023myk3dfnj7wnvmqjivza31fw9cn")))) (propagated-inputs '()) ; FIXME: add libiconv when !glibc (build-system gnu-build-system) (arguments -- cgit v1.2.3 From f7b55b0416edf311d7354b9a5708484aa1f433bd Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:35:23 -0400 Subject: gnu: texinfo: Use version 6.0 by default. * gnu/packages/texinfo.scm (texinfo): Update to 6.0. (texinfo-6): Removed. (texinfo-5): New variable. --- gnu/packages/texinfo.scm | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/texinfo.scm b/gnu/packages/texinfo.scm index ca411a95ac..cf367c11ef 100644 --- a/gnu/packages/texinfo.scm +++ b/gnu/packages/texinfo.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012, 2013, 2015 Ludovic Courtès ;;; Copyright © 2014 Eric Bavier +;;; Copyright © 2015 Mark H Weaver ;;; ;;; This file is part of GNU Guix. ;;; @@ -30,14 +31,14 @@ (define-public texinfo (package (name "texinfo") - (version "5.2") + (version "6.0") (source (origin - (method url-fetch) - (uri (string-append "mirror://gnu/texinfo/texinfo-" - version ".tar.xz")) - (sha256 - (base32 - "1njfwh2z34r2c4r0iqa7v24wmjzvsfyz4vplzry8ln3479lfywal")))) + (method url-fetch) + (uri (string-append "mirror://gnu/texinfo/texinfo-" + version ".tar.xz")) + (sha256 + (base32 + "1r3i6jyynn6ab45fxw5bms8mflk9ry4qpj6gqyry72vfd5c47fhi")))) (build-system gnu-build-system) (inputs `(("ncurses" ,ncurses) ("xz" ,xz) @@ -53,17 +54,16 @@ their source and the command-line Info reader. The emphasis of the language is on expressing the content semantically, avoiding physical markup commands.") (license gpl3+))) -(define-public texinfo-6 - (package - (inherit texinfo) - (version "6.0") +(define-public texinfo-5 + (package (inherit texinfo) + (version "5.2") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/texinfo/texinfo-" version ".tar.xz")) (sha256 (base32 - "1r3i6jyynn6ab45fxw5bms8mflk9ry4qpj6gqyry72vfd5c47fhi")))))) + "1njfwh2z34r2c4r0iqa7v24wmjzvsfyz4vplzry8ln3479lfywal")))))) (define-public texinfo-4 (package (inherit texinfo) -- cgit v1.2.3 From f9aec676acda2644f8622e83a9b40dca3b8d72d9 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:27:07 -0400 Subject: gnu: libidn: Update to 1.31. * gnu/packages/libidn.scm (libidn): Update to 1.31. --- gnu/packages/libidn.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/libidn.scm b/gnu/packages/libidn.scm index 49dafbeb6d..4a7840c78c 100644 --- a/gnu/packages/libidn.scm +++ b/gnu/packages/libidn.scm @@ -26,13 +26,13 @@ (define-public libidn (package (name "libidn") - (version "1.30") + (version "1.31") (source (origin (method url-fetch) (uri (string-append "mirror://gnu/libidn/libidn-" version ".tar.gz")) (sha256 (base32 - "0lxh5r1z8gsk4jxx3rv8aasjv8p53j4y04kvfn2w30a0syagrf9r")))) + "026z12mczlag443ms9n954h36pi3m7iva9jfw8y4ispsj772zpxg")))) (build-system gnu-build-system) ;; FIXME: No Java and C# libraries are currently built. (synopsis "Internationalized string processing library") -- cgit v1.2.3 From c273728a12303955c4fb8aace73346a79501d089 Mon Sep 17 00:00:00 2001 From: Paul van der Walt Date: Thu, 9 Jul 2015 13:08:15 +0200 Subject: gnu: libgpg-error: Update to 1.19. * gnu/packages/gnupg.scm (libgpg-error): Update to 1.19. --- gnu/packages/gnupg.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm index 8aea3dabb9..1c2b567d89 100644 --- a/gnu/packages/gnupg.scm +++ b/gnu/packages/gnupg.scm @@ -41,7 +41,7 @@ (define-public libgpg-error (package (name "libgpg-error") - (version "1.18") + (version "1.19") (source (origin (method url-fetch) @@ -49,7 +49,7 @@ version ".tar.bz2")) (sha256 (base32 - "0408v19h3h0q6w61g51hgbdg6cyw81nyzkh70qfprvsc3pkddwcz")))) + "12wpqhjlsw4iaanifbqm2kich6c7x7lm8a7zhy6x5ifm6c9hw4jk")))) (build-system gnu-build-system) (home-page "http://gnupg.org") (synopsis "Library of error values for GnuPG components") -- cgit v1.2.3 From 8ba24e62af6a3a7a8e1fc600dd9256581c411c5d Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:37:50 -0400 Subject: gnu: nss: Update to 3.19.2. * gnu/packages/gnuzilla.scm (nss): Update to 3.19.2. --- gnu/packages/gnuzilla.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm index d84275e78d..d76bf93b8f 100644 --- a/gnu/packages/gnuzilla.scm +++ b/gnu/packages/gnuzilla.scm @@ -129,7 +129,7 @@ in the Mozilla clients.") (define-public nss (package (name "nss") - (version "3.19.1") + (version "3.19.2") (source (origin (method url-fetch) (uri (let ((version-with-underscores @@ -140,7 +140,7 @@ in the Mozilla clients.") "nss-" version ".tar.gz"))) (sha256 (base32 - "1zrgqlli01gsg2a5w4bk2p0q3aagi5dhd31yirnj04zca6ap1gmp")) + "1bn9wbf52z4423134hpkyvcxq1568fvzmkybv2d49n31iwz6c1hk")) ;; Create nss.pc and nss-config. (patches (list (search-patch "nss-pkgconfig.patch"))))) (build-system gnu-build-system) -- cgit v1.2.3 From 47ed8e048bd5905f7648bed472a13eb95393767d Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Sat, 11 Jul 2015 00:56:39 -0400 Subject: gnu: texinfo: Add procps to native-inputs to fix tests. * gnu/packages/texinfo.scm (texinfo)[native-inputs]: Add procps. (texinfo-5, texinfo-4)[native-inputs]: Override to be empty. * gnu/packages/commencement.scm (texinfo-boot0)[texinfo]: Override native-inputs to be empty. --- gnu/packages/commencement.scm | 1 + gnu/packages/texinfo.scm | 6 +++++- 2 files changed, 6 insertions(+), 1 deletion(-) (limited to 'gnu/packages') diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm index 02a9a3632c..d3f239f5f7 100644 --- a/gnu/packages/commencement.scm +++ b/gnu/packages/commencement.scm @@ -284,6 +284,7 @@ ;; because we don't need the stand-alone Info reader. ;; Also, use %BOOT0-INPUTS to avoid building Perl once more. (let ((texinfo (package (inherit texinfo) + (native-inputs '()) (inputs (alist-delete "ncurses" (package-inputs texinfo)))))) (package-with-bootstrap-guile (package-with-explicit-inputs texinfo %boot0-inputs diff --git a/gnu/packages/texinfo.scm b/gnu/packages/texinfo.scm index cf367c11ef..92bd9471dd 100644 --- a/gnu/packages/texinfo.scm +++ b/gnu/packages/texinfo.scm @@ -26,6 +26,7 @@ #:use-module (gnu packages) #:use-module (gnu packages compression) #:use-module (gnu packages perl) + #:use-module (gnu packages linux) #:use-module (gnu packages ncurses)) (define-public texinfo @@ -40,6 +41,7 @@ (base32 "1r3i6jyynn6ab45fxw5bms8mflk9ry4qpj6gqyry72vfd5c47fhi")))) (build-system gnu-build-system) + (native-inputs `(("procps" ,procps))) ;one of the tests needs pgrep (inputs `(("ncurses" ,ncurses) ("xz" ,xz) ("perl" ,perl))) @@ -63,7 +65,8 @@ is on expressing the content semantically, avoiding physical markup commands.") version ".tar.xz")) (sha256 (base32 - "1njfwh2z34r2c4r0iqa7v24wmjzvsfyz4vplzry8ln3479lfywal")))))) + "1njfwh2z34r2c4r0iqa7v24wmjzvsfyz4vplzry8ln3479lfywal")))) + (native-inputs '()))) (define-public texinfo-4 (package (inherit texinfo) @@ -77,6 +80,7 @@ is on expressing the content semantically, avoiding physical markup commands.") (sha256 (base32 "1rf9ckpqwixj65bw469i634897xwlgkm5i9g2hv3avl6mv7b0a3d")))) + (native-inputs '()) (inputs `(("ncurses" ,ncurses) ("xz" ,xz))))) (define-public texi2html -- cgit v1.2.3 From db35fb88e448d70978d91b419b34ed8f91581989 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Sat, 11 Jul 2015 01:04:18 -0400 Subject: gnu: bash: Update to 4.3.39. * gnu/packages/bash.scm (%patch-series-4.3): Add patches 34-39. --- gnu/packages/bash.scm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'gnu/packages') diff --git a/gnu/packages/bash.scm b/gnu/packages/bash.scm index 45676f568b..6b2d0b855d 100644 --- a/gnu/packages/bash.scm +++ b/gnu/packages/bash.scm @@ -86,7 +86,13 @@ (30 "0nrqb0m7s89qsrbfaffpilc5gcf82bx9yvgzld4hr79p5y54yhw5") ;CVE-2014-6278 (31 "07d62bl3z7qa8v6kgk47vzzazw563mlk9zhrsr4xsbqgvmcrylnd") (32 "0jjgapfq4qhmndfrw8c3q3lva8xjdhlbd9cc631v41b0kb95g4w8") - (33 "05ma5rlxiadnfh925p4y7s0vvk917kmsdb1mfdx05gizl63pfapv"))) + (33 "05ma5rlxiadnfh925p4y7s0vvk917kmsdb1mfdx05gizl63pfapv") + (34 "12gq9whkq3naa3iy7c7x5pfpvrg7d0kwqld8609zxphhy424ysgi") + (35 "1qy1jflmbazjykq766gwabkaiswnx7pwa66whqiny0w02zjqa39p") + (36 "0z6jbyy70lfdm6d3x0sbazbqdxb3xnpn9bmz7madpvrnbd284pxc") + (37 "04sqr8zkl6s5fccfvb775ppn3ldij5imria9swc39aq0fkfp1w9k") + (38 "0rv3g14mpgv8br267bf7rmgqlgwnc4v6g3g8y0sjba571i8amgmd") + (39 "1v3l3vkc3g2b6fjycqwlakr8xhiw6bmw6q0zd6bi0m0m4bnxr55b"))) (define (download-patches store count) "Download COUNT Bash patches into store. Return a list of number/base32-hash tuples, directly usable in the 'patch-series' form." -- cgit v1.2.3 From 16f71908308106d098fa44104e177e328c593359 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Sat, 11 Jul 2015 13:00:13 -0400 Subject: gnu: pcre: Enable more features. * gnu/packages/pcre.scm (pcre)[arguments]: To configure-flags, add "--enable-unicode-properties", "--enable-pcre16", and "--enable-pcre32". --- gnu/packages/pcre.scm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'gnu/packages') diff --git a/gnu/packages/pcre.scm b/gnu/packages/pcre.scm index 86d3ca3874..d07e434190 100644 --- a/gnu/packages/pcre.scm +++ b/gnu/packages/pcre.scm @@ -45,6 +45,9 @@ "--enable-pcregrep-libz" "--enable-pcregrep-libbz2" "--enable-pcretest-libreadline" + "--enable-unicode-properties" + "--enable-pcre16" + "--enable-pcre32" "--enable-jit"))) (synopsis "Perl Compatible Regular Expressions") (description -- cgit v1.2.3 From aa7251176f273d64ec54f71e305d813092bf4c7f Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:51:04 -0400 Subject: gnu: Require NEON on armhf. * gnu/packages/gcc.scm (gcc-configure-flags-for-triplet): On armhf, include --with-fpu=neon. * doc/guix.texi (GNU Distribution): Document that our armhf port requires NEON. --- gnu/packages/gcc.scm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/gcc.scm b/gnu/packages/gcc.scm index 23bfd90b33..8b88dff4dc 100644 --- a/gnu/packages/gcc.scm +++ b/gnu/packages/gcc.scm @@ -55,9 +55,7 @@ where the OS part is overloaded to denote a specific ABI---into GCC '("--with-arch=armv7-a" "--with-float=hard" "--with-mode=thumb" - - ;; See - "--with-fpu=vfpv3-d16")) + "--with-fpu=neon")) (else ;; TODO: Add `arm.*-gnueabi', etc. -- cgit v1.2.3 From f727ec5bc8a6f97ae1083026e508b917235dfd2d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sun, 12 Jul 2015 00:18:22 +0200 Subject: gnu: perl: Do not retain references to Binutils and other build-time tools. * gnu/packages/perl.scm (perl)[arguments]: Pass -Dlibpth and -Dplibpth to ./Configure. --- gnu/packages/perl.scm | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'gnu/packages') diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm index 3d28455405..d1a0218158 100644 --- a/gnu/packages/perl.scm +++ b/gnu/packages/perl.scm @@ -72,7 +72,15 @@ "-Dinstallstyle=lib/perl5" "-Duseshrplib" (string-append "-Dlocincpth=" libc "/include") - (string-append "-Dloclibpth=" libc "/lib")))))) + (string-append "-Dloclibpth=" libc "/lib") + + ;; Force the library search path to contain only libc + ;; because it is recorded in Config.pm and + ;; Config_heavy.pl; we don't want to keep a reference + ;; to everything that's in $LIBRARY_PATH at build + ;; time (Binutils, bzip2, file, etc.) + (string-append "-Dlibpth=" libc "/lib") + (string-append "-Dplibpth=" libc "/lib")))))) (add-before 'strip 'make-shared-objects-writable -- cgit v1.2.3 From b2314ca2283275df29d30a04d56062aa9923d353 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Mon, 13 Jul 2015 18:59:32 -0400 Subject: gnu: gmp: Remove --build from configure-flags. This is a followup to commit 3c7d023d6458669c6bfa23bc85e098c91f699892, "build-system/gnu: Pass --build= to configure by default" * gnu/packages/multiprecision.scm (gmp)[arguments]: Remove field. --- gnu/packages/multiprecision.scm | 10 +--------- 1 file changed, 1 insertion(+), 9 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/multiprecision.scm b/gnu/packages/multiprecision.scm index 6e136037d1..903d160b24 100644 --- a/gnu/packages/multiprecision.scm +++ b/gnu/packages/multiprecision.scm @@ -47,15 +47,7 @@ '(;; Build a "fat binary", with routines for several ;; sub-architectures. "--enable-fat" - "--enable-cxx" - - ;; FIXME: gmp-6.0.0a's config.guess fails on - ;; multi-core armhf systems. - ,@(if (%current-target-system) - '() - (let ((triplet - (nix-system->gnu-triplet (%current-system)))) - (list (string-append "--build=" triplet))))))) + "--enable-cxx"))) (synopsis "Multiple-precision arithmetic library") (description "GMP is a library for arbitrary precision arithmetic, operating on -- cgit v1.2.3 From 28b26cab94bfa3db445be89b58b35ddb19cb44e5 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Mon, 13 Jul 2015 19:02:09 -0400 Subject: gnu: xbindkeys: Remove --build from configure flags. This is a followup to commit 3c7d023d6458669c6bfa23bc85e098c91f699892, "build-system/gnu: Pass --build= to configure by default" * gnu/packages/xdisorg.scm (xbindkeys)[arguments]: Remove field. --- gnu/packages/xdisorg.scm | 7 ------- 1 file changed, 7 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm index f928aa1f58..2f6738f1eb 100644 --- a/gnu/packages/xdisorg.scm +++ b/gnu/packages/xdisorg.scm @@ -447,13 +447,6 @@ transparent text on your screen.") (inputs `(("libx11" ,libx11) ("guile" ,guile-2.0))) - (arguments `(#:configure-flags - '(;; FIXME: xbindkeys-1.8.6's config.guess fails on mips64el. - ,@(if (%current-target-system) - '() - (let ((triplet - (nix-system->gnu-triplet (%current-system)))) - (list (string-append "--build=" triplet))))))) (home-page "http://www.nongnu.org/xbindkeys/") (synopsis "Associate a combination of keys with a shell command") (description -- cgit v1.2.3 From 92e79092ebad48d0afe26eeb2fee9ff46fcb6732 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Mon, 13 Jul 2015 19:03:02 -0400 Subject: gnu: sysfsutils-1: Remove --build from configure flags. This is a followup to commit 3c7d023d6458669c6bfa23bc85e098c91f699892, "build-system/gnu: Pass --build= to configure by default" * gnu/packages/linux.scm (sysfsutils-1)[arguments]: Remove field. --- gnu/packages/linux.scm | 7 ------- 1 file changed, 7 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 289b80ea38..7810335a3b 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -2014,13 +2014,6 @@ also contains the libsysfs library.") (substitute* "configure" (("includedir='(\\$\\{prefix\\}/include)'" all orig) (string-append "includedir='" orig "/sysfs'"))))))) - ;; XXX sysfsutils-1.3.0's config.guess fails on mips64el - (arguments `(#:configure-flags - '(,@(if (%current-target-system) - '() - (let ((triplet - (nix-system->gnu-triplet (%current-system)))) - (list (string-append "--build=" triplet))))))) (synopsis "System utilities based on Linux sysfs (version 1.x)"))) (define-public cpufrequtils -- cgit v1.2.3 From 412a242258def6668a933efc56dd60bbd286d389 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Mon, 13 Jul 2015 19:04:27 -0400 Subject: gnu: liba52: Remove --build from configure flags. This is a followup to commit 3c7d023d6458669c6bfa23bc85e098c91f699892, "build-system/gnu: Pass --build= to configure by default" * gnu/packages/video.scm (liba52)[arguments]: Remove --build from configure flags. --- gnu/packages/video.scm | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index d0983808c6..99cdd1ae09 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -139,14 +139,7 @@ old-fashioned output methods with powerful ascii-art renderer.") `(("autoconf" ,autoconf) ("automake" ,automake) ("libtool" ,libtool))) - (arguments `(#:configure-flags - '("--enable-shared" - ;; FIXME: liba52-0.7.4's config.guess fails on mips64el. - ,@(if (%current-target-system) - '() - (let ((triplet - (nix-system->gnu-triplet (%current-system)))) - (list (string-append "--build=" triplet))))) + (arguments `(#:configure-flags '("--enable-shared") #:phases (modify-phases %standard-phases ;; XXX We need to run ./bootstrap because of the build -- cgit v1.2.3 From 7a34576206620d61a58bca3fdcc46e1cc7669e22 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Mon, 13 Jul 2015 19:05:17 -0400 Subject: gnu: corkscrew: Pass triplet instead of system as --build and --host. This is a followup to commit 3c7d023d6458669c6bfa23bc85e098c91f699892, "build-system/gnu: Pass --build= to configure by default" * gnu/packages/ssh.scm (corkscrew)[arguments]: In custom configure phase, accept 'build' keyword argument and pass it to configure in --build argument and, if not cross-compiling, the --host argument. Previously, the nix system string was passed. --- gnu/packages/ssh.scm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/ssh.scm b/gnu/packages/ssh.scm index 0a1a841922..5d44b07f97 100644 --- a/gnu/packages/ssh.scm +++ b/gnu/packages/ssh.scm @@ -260,7 +260,7 @@ libssh library.") '(#:phases (alist-replace 'configure - (lambda* (#:key outputs inputs system target + (lambda* (#:key outputs inputs system build target #:allow-other-keys #:rest args) (let* ((configure (assoc-ref %standard-phases 'configure)) (prefix (assoc-ref outputs "out")) @@ -268,9 +268,8 @@ libssh library.") ;; Set --build and --host flags as the provided config.guess ;; is not able to detect them (flags `(,(string-append "--prefix=" prefix) - ,(string-append "--build=" system) - ,(string-append "--host=" - (or target system))))) + ,(string-append "--build=" build) + ,(string-append "--host=" (or target build))))) (setenv "CONFIG_SHELL" bash) (zero? (apply system* bash (string-append "." "/configure") -- cgit v1.2.3 From 1b9cf4ad2fa4149e436787fcf50e4f68a098f32a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Tue, 14 Jul 2015 12:39:58 +0200 Subject: gnu: util-linux: Use 'modify-phases'. * gnu/packages/linux.scm (util-linux)[arguments]: Use 'modify-phases' instead of 'alist-cons-before'. --- gnu/packages/linux.scm | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 7810335a3b..f27b8281ab 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -417,17 +417,17 @@ providing the system administrator with some help in common tasks.") (string-append "--with-bashcompletiondir=" (assoc-ref %outputs "out") "/etc/bash_completion.d")) - #:phases (alist-cons-before - 'check 'pre-check - (lambda* (#:key inputs outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out")) - (net (assoc-ref inputs "net-base"))) - ;; Change the test to refer to the right file. - (substitute* "tests/ts/misc/mcookie" - (("/etc/services") - (string-append net "/etc/services"))) - #t)) - %standard-phases))) + #:phases (modify-phases %standard-phases + (add-before + 'check 'pre-check + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out")) + (net (assoc-ref inputs "net-base"))) + ;; Change the test to refer to the right file. + (substitute* "tests/ts/misc/mcookie" + (("/etc/services") + (string-append net "/etc/services"))) + #t)))))) (inputs `(("zlib" ,zlib) ("ncurses" ,ncurses))) (native-inputs -- cgit v1.2.3 From 7e5124976b0bc19cf26ef7376ea041b25b7fbd35 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Tue, 14 Jul 2015 14:00:46 +0200 Subject: gnu: util-linux: Fix file name of 'umount' in 'eject'. Fixes . Reported by Alex Sassmannshausen . * gnu/packages/linux.scm (util-linux)[arguments]: Add 'set-umount-file-name'. --- gnu/packages/linux.scm | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'gnu/packages') diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index f27b8281ab..c5d055366e 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -418,6 +418,15 @@ providing the system administrator with some help in common tasks.") (assoc-ref %outputs "out") "/etc/bash_completion.d")) #:phases (modify-phases %standard-phases + (add-before + 'build 'set-umount-file-name + (lambda* (#:key outputs #:allow-other-keys) + ;; Tell 'eject' the right file name of 'umount'. + (let ((out (assoc-ref outputs "out"))) + (substitute* "sys-utils/eject.c" + (("\"/bin/umount\"") + (string-append "\"" out "/bin/umount\""))) + #t))) (add-before 'check 'pre-check (lambda* (#:key inputs outputs #:allow-other-keys) -- cgit v1.2.3 From c6d33a9d9c7a9ec3f5d7b1afb6d836dae3c8706e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Tue, 14 Jul 2015 16:15:30 +0200 Subject: gnu: Adjust packages to new handling of propagated inputs. This is a followup to 161094c, which gets rid of the "a/b" notation for propagated inputs. * gnu/packages/cross-base.scm (cross-gcc-arguments): Change reference from "libc/linux-headers" to "linux-headers". * gnu/packages/emacs.scm (magit-svn): Change "magit/git-modes" to "git-modes". --- gnu/packages/cross-base.scm | 5 ++--- gnu/packages/emacs.scm | 3 +-- 2 files changed, 3 insertions(+), 5 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/cross-base.scm b/gnu/packages/cross-base.scm index b5e07b81f0..712aa9d585 100644 --- a/gnu/packages/cross-base.scm +++ b/gnu/packages/cross-base.scm @@ -165,8 +165,7 @@ may be either a libc package or #f.)" ;; Add the cross Linux headers to CROSS_CPATH, and remove them ;; from CPATH. (let ((libc (assoc-ref inputs "libc")) - (linux (assoc-ref inputs - "libc/linux-headers"))) + (linux (assoc-ref inputs "linux-headers"))) (define (cross? x) ;; Return #t if X is a cross-libc or cross Linux. (or (string-prefix? libc x) @@ -314,7 +313,7 @@ XBINUTILS and the cross tool chain." #t)) ,phases)))) - ;; Shadow the native "linux-headers" because glibc's recipe expect the + ;; Shadow the native "linux-headers" because glibc's recipe expects the ;; "linux-headers" input to point to the right thing. (propagated-inputs `(("linux-headers" ,xlinux-headers))) diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm index f00e15c86a..84e167d1fe 100644 --- a/gnu/packages/emacs.scm +++ b/gnu/packages/emacs.scm @@ -408,8 +408,7 @@ operations.") "/bin/emacs")) (magit (string-append (assoc-ref %build-inputs "magit") "/share/emacs/site-lisp")) - (commit (string-append (assoc-ref %build-inputs - "magit/git-modes") + (commit (string-append (assoc-ref %build-inputs "git-modes") "/share/emacs/site-lisp")) (source (assoc-ref %build-inputs "source")) (lisp-dir (string-append %output "/share/emacs/site-lisp"))) -- cgit v1.2.3 From c09e6a5f5e2a77beff89d68069f3037c1b6310e5 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Tue, 14 Jul 2015 19:44:38 -0400 Subject: gnu: Build tarballs deterministically. * gnu/packages/make-bootstrap.scm (tarball-package)[arguments]: Build tarball deterministically. * gnu/packages/admin.scm (isc-dhcp)[arguments]: In 'post-configure' phase, create bind.tar.gz deterministically. * gnu/packages/video.scm (avidemux)[arguments]: In 'repack-ffmpeg' phase, create ffmpeg-1.2.1.tar.bz2 deterministically. --- gnu/packages/admin.scm | 6 +++++- gnu/packages/make-bootstrap.scm | 4 +++- gnu/packages/video.scm | 4 +++- 3 files changed, 11 insertions(+), 3 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index c96e11635b..ee255b0c15 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -412,7 +412,11 @@ connection alive.") (for-each patch-shebang (find-files "bind-9.9.5-P1" ".*")) (zero? (system* "tar" "cf" "bind.tar.gz" - "bind-9.9.5-P1")))) + "bind-9.9.5-P1" + ;; avoid non-determinism in the archive + "--mtime=@0" + "--owner=root:0" + "--group=root:0")))) (alist-cons-after 'install 'post-install (lambda* (#:key inputs outputs #:allow-other-keys) diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scm index e140582a4a..07e8b5160b 100644 --- a/gnu/packages/make-bootstrap.scm +++ b/gnu/packages/make-bootstrap.scm @@ -629,7 +629,9 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." ,(or (%current-target-system) (%current-system)) ".tar.xz") - ".")))))))))) + "." + ;; avoid non-determinism in the archive + "--mtime=@0" "--owner=root:0" "--group=root:0")))))))))) (define %bootstrap-binaries-tarball ;; A tarball with the statically-linked bootstrap binaries. diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 99cdd1ae09..0af5a3e13e 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -1150,7 +1150,9 @@ for use with HTML5 video.") (with-directory-excursion "avidemux_core/ffmpeg_package" (substitute* "ffmpeg-1.2.1/configure" (("#! /bin/sh") (string-append "#!" (which "bash")))) - (system* "tar" "cjf" "ffmpeg-1.2.1.tar.bz2" "ffmpeg-1.2.1") + (system* "tar" "cjf" "ffmpeg-1.2.1.tar.bz2" "ffmpeg-1.2.1" + ;; avoid non-determinism in the archive + "--mtime=@0" "--owner=root:0" "--group=root:0") (delete-file-recursively "ffmpeg-1.2.1"))) (alist-replace 'configure (lambda _ -- cgit v1.2.3 From 46472ecd006e7fd5e36056b2c7a0f3023d4efbd7 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 15 Jul 2015 13:31:51 -0400 Subject: gnu: python: Set source file times to 1980 to fix test. * gnu/packages/python.scm (python-2)[arguments]: Use 'modify-phases'. Return true from phases where needed. Add 'set-source-file-times-to-1980' phase. Add (ice-9 ftw) to #:modules. --- gnu/packages/python.scm | 50 ++++++++++++++++++++++++++++++++----------------- 1 file changed, 33 insertions(+), 17 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/python.scm b/gnu/packages/python.scm index 5dcaba0871..9ceb5b2f5e 100644 --- a/gnu/packages/python.scm +++ b/gnu/packages/python.scm @@ -155,24 +155,40 @@ "-L" zlib "/lib " "-Wl,-rpath=" out "/lib"))) + #:modules ((ice-9 ftw) + ,@%gnu-build-system-modules) #:phases - (alist-cons-before - 'configure 'patch-lib-shells - (lambda _ - ;; Filter for existing files, since some may not exist in all - ;; versions of python that are built with this recipe. - (substitute* (filter file-exists? - '("Lib/subprocess.py" - "Lib/popen2.py" - "Lib/distutils/tests/test_spawn.py" - "Lib/test/test_subprocess.py")) - (("/bin/sh") (which "sh")))) - (alist-cons-before - 'check 'pre-check - (lambda _ - ;; 'Lib/test/test_site.py' needs a valid $HOME - (setenv "HOME" (getcwd))) - %standard-phases)))) + (modify-phases %standard-phases + (add-before + 'configure 'patch-lib-shells + (lambda _ + ;; Filter for existing files, since some may not exist in all + ;; versions of python that are built with this recipe. + (substitute* (filter file-exists? + '("Lib/subprocess.py" + "Lib/popen2.py" + "Lib/distutils/tests/test_spawn.py" + "Lib/test/test_subprocess.py")) + (("/bin/sh") (which "sh"))) + #t)) + (add-before + 'check 'pre-check + (lambda _ + ;; 'Lib/test/test_site.py' needs a valid $HOME + (setenv "HOME" (getcwd)) + #t)) + (add-after + 'unpack 'set-source-file-times-to-1980 + ;; XXX One of the tests uses a ZIP library to pack up some of the + ;; source tree, and fails with "ZIP does not support timestamps + ;; before 1980". Work around this by setting the file times in the + ;; source tree to sometime in early 1980. + (lambda _ + (let ((circa-1980 (* 10 366 24 60 60))) + (ftw "." (lambda (file stat flag) + (utime file circa-1980 circa-1980) + #t)) + #t)))))) (inputs `(("bzip2" ,bzip2) ("gdbm" ,gdbm) -- cgit v1.2.3 From 3a286b959401f8ea025c8985c4dd9e80bb53d575 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:54:30 -0400 Subject: gnu: mplayer: Enable use of NEON on armhf. * gnu/packages/video.scm (mplayer)[arguments]: Remove "--disable-neon" from arguments passed to configure. --- gnu/packages/video.scm | 18 ------------------ 1 file changed, 18 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 0af5a3e13e..9a0e959d54 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -658,7 +658,6 @@ treaming protocols.") (or (%current-target-system) (nix-system->gnu-triplet (%current-system))))))) - "--disable-neon" "--disable-iwmmxt")))) %standard-phases))) (home-page "http://www.mplayerhq.hu/design7/news.html") @@ -898,23 +897,6 @@ projects while introducing many more.") (zero? (system* "./configure" "--enable-shared" "--as=yasm" - ,@(if (and (not (%current-target-system)) - (string-prefix? - "armhf-" - (%current-system))) - ;; When building on ARMv7, libvpx - ;; assumes that NEON will be - ;; available. On Guix, armhf - ;; does not require NEON, so we - ;; build for ARMv6 and -marm (since - ;; no thumb2 on ARMv6) to ensure - ;; compatibility with all ARMv7 - ;; cores we support. Based on - ;; the Debian libvpx package. - '("--target=armv6-linux-gcc" - "--extra-cflags=-marm" - "--enable-small") - '()) (string-append "--prefix=" out))))) %standard-phases) #:tests? #f)) ; no check target -- cgit v1.2.3 From 84811c22ff144503785b4f70794a409021adc74b Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 10 Jul 2015 14:52:45 -0400 Subject: gnu: qt: On armhf, enable use of NEON. * gnu/packages/qt.scm (qt-4)[arguments]: Remove "-no-neon" from arguments passed to configure. --- gnu/packages/qt.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/qt.scm b/gnu/packages/qt.scm index 340462dba3..313d63993a 100644 --- a/gnu/packages/qt.scm +++ b/gnu/packages/qt.scm @@ -297,8 +297,7 @@ developers using C++ or QML, a CSS & JavaScript like language.") "-no-ssse3" "-no-sse4.1" "-no-sse4.2" - "-no-avx" - "-no-neon"))))) + "-no-avx"))))) (add-after 'install 'move-doc (lambda* (#:key outputs #:allow-other-keys) -- cgit v1.2.3 From 25338e9f2f932628be221ae4a4e43c9392f4757d Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 15 Jul 2015 15:03:56 -0400 Subject: gnu: libgnome: Move popt to propagated-inputs. * gnu/packages/gnome.scm (libgnome)[inputs]: Move popt to ... [propagated-inputs]: ... here. --- gnu/packages/gnome.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm index 597b53e2c4..36ba382206 100644 --- a/gnu/packages/gnome.scm +++ b/gnu/packages/gnome.scm @@ -1086,8 +1086,8 @@ to access local and remote files with a single consistent API.") (substitute* "libgnome/Makefile.in" (("-DG_DISABLE_DEPRECATED") "-DGLIB_DISABLE_DEPRECATION_WARNINGS"))) %standard-phases))) - (inputs `(("popt" ,popt) - ("libxml2" ,libxml2))) + (propagated-inputs `(("popt" ,popt))) ; gnome-program.h includes popt.h + (inputs `(("libxml2" ,libxml2))) (native-inputs `(("glib" ,glib "bin") ; for glib-mkenums, etc. ("intltool" ,intltool) -- cgit v1.2.3 From c6f909809aecb225b66dc27e4afd3ff46ec31a38 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 15 Jul 2015 15:08:47 -0400 Subject: gnu: freetype: Update to 2.6. * gnu/packages/fontutils.scm (freetype): Update to 2.6. --- gnu/packages/fontutils.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/fontutils.scm b/gnu/packages/fontutils.scm index c04f24b83c..5953caa87a 100644 --- a/gnu/packages/fontutils.scm +++ b/gnu/packages/fontutils.scm @@ -40,13 +40,13 @@ (define-public freetype (package (name "freetype") - (version "2.5.5") + (version "2.6") (source (origin (method url-fetch) (uri (string-append "mirror://savannah/freetype/freetype-" version ".tar.bz2")) (sha256 (base32 - "1fdgl7js99xv1yy5zx1ravmqd0jxlnqpv7zcl954h4hbg15wqyrq")))) + "0zilx15fwcpa8hmcxpc423jwb8ijw4qpq968kh18akvn4j0znsc4")))) (build-system gnu-build-system) (arguments `(#:phases -- cgit v1.2.3 From 385ae063c9826baf00ae47d7689f23af52bce753 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 15 Jul 2015 22:55:26 -0400 Subject: gnu: unzip: Fix CVE-2014-9636 and some other bugs. * gnu/packages/patches/unzip-CVE-2014-9636.patch, gnu/packages/patches/unzip-allow-greater-hostver-values.patch, gnu/packages/patches/unzip-increase-size-of-cfactorstr.patch, gnu/packages/patches/unzip-initialize-symlink-flag.patch, gnu/packages/patches/unzip-remove-build-date.patch: New files. * gnu-system.am (dist_patch_DATA): Add them. * gnu/packages/zip.scm (unzip)[source]: Add patches. [arguments]: Use 'modify-phases'. Remove custom 'configure' phase; pass additional make-flags instead. Add custom 'build' phase that builds "generic_gcc" target; remove "generic_gcc" from make-flags. --- gnu/packages/patches/unzip-CVE-2014-9636.patch | 41 ++++++++++++++++++++++ .../unzip-allow-greater-hostver-values.patch | 16 +++++++++ .../unzip-increase-size-of-cfactorstr.patch | 18 ++++++++++ .../patches/unzip-initialize-symlink-flag.patch | 22 ++++++++++++ gnu/packages/patches/unzip-remove-build-date.patch | 19 ++++++++++ gnu/packages/zip.scm | 36 +++++++++++-------- 6 files changed, 137 insertions(+), 15 deletions(-) create mode 100644 gnu/packages/patches/unzip-CVE-2014-9636.patch create mode 100644 gnu/packages/patches/unzip-allow-greater-hostver-values.patch create mode 100644 gnu/packages/patches/unzip-increase-size-of-cfactorstr.patch create mode 100644 gnu/packages/patches/unzip-initialize-symlink-flag.patch create mode 100644 gnu/packages/patches/unzip-remove-build-date.patch (limited to 'gnu/packages') diff --git a/gnu/packages/patches/unzip-CVE-2014-9636.patch b/gnu/packages/patches/unzip-CVE-2014-9636.patch new file mode 100644 index 0000000000..a38c3da51c --- /dev/null +++ b/gnu/packages/patches/unzip-CVE-2014-9636.patch @@ -0,0 +1,41 @@ +Copied from Debian. + +From: mancha +Date: Mon, 3 Nov 2014 +Subject: Info-ZIP UnZip buffer overflow +Bug-Debian: http://bugs.debian.org/776589 + +By carefully crafting a corrupt ZIP archive with "extra fields" that +purport to have compressed blocks larger than the corresponding +uncompressed blocks in STORED no-compression mode, an attacker can +trigger a heap overflow that can result in application crash or +possibly have other unspecified impact. + +This patch ensures that when extra fields use STORED mode, the +"compressed" and uncompressed block sizes match. + +--- a/extract.c ++++ b/extract.c +@@ -2228,6 +2228,7 @@ + ulg eb_ucsize; + uch *eb_ucptr; + int r; ++ ush eb_compr_method; + + if (compr_offset < 4) /* field is not compressed: */ + return PK_OK; /* do nothing and signal OK */ +@@ -2244,6 +2245,14 @@ + ((eb_ucsize > 0L) && (eb_size <= (compr_offset + EB_CMPRHEADLEN)))) + return IZ_EF_TRUNC; /* no/bad compressed data! */ + ++ /* 2014-11-03 Michal Zalewski, SMS. ++ * For STORE method, compressed and uncompressed sizes must agree. ++ * http://www.info-zip.org/phpBB3/viewtopic.php?f=7&t=450 ++ */ ++ eb_compr_method = makeword( eb + (EB_HEADSIZE + compr_offset)); ++ if ((eb_compr_method == STORED) && (eb_size - compr_offset != eb_ucsize)) ++ return PK_ERR; ++ + if ( + #ifdef INT_16BIT + (((ulg)(extent)eb_ucsize) != eb_ucsize) || diff --git a/gnu/packages/patches/unzip-allow-greater-hostver-values.patch b/gnu/packages/patches/unzip-allow-greater-hostver-values.patch new file mode 100644 index 0000000000..d98937f1cb --- /dev/null +++ b/gnu/packages/patches/unzip-allow-greater-hostver-values.patch @@ -0,0 +1,16 @@ +Copied from Debian. + +From: Santiago Vila +Subject: zipinfo.c: Do not crash when hostver byte is >= 100 + +--- a/zipinfo.c ++++ b/zipinfo.c +@@ -2114,7 +2114,7 @@ + else + attribs[9] = (xattr & UNX_ISVTX)? 'T' : '-'; /* T==undefined */ + +- sprintf(&attribs[12], "%u.%u", hostver/10, hostver%10); ++ sprintf(&attribs[11], "%2u.%u", hostver/10, hostver%10); + break; + + } /* end switch (hostnum: external attributes format) */ diff --git a/gnu/packages/patches/unzip-increase-size-of-cfactorstr.patch b/gnu/packages/patches/unzip-increase-size-of-cfactorstr.patch new file mode 100644 index 0000000000..3417ad873d --- /dev/null +++ b/gnu/packages/patches/unzip-increase-size-of-cfactorstr.patch @@ -0,0 +1,18 @@ +Copied from Debian. + +From: sms +Subject: Increase size of cfactorstr array to avoid buffer overflow +Bug-Debian: http://bugs.debian.org/741384 +X-Debian-version: 6.0-11 + +--- a/list.c ++++ b/list.c +@@ -97,7 +97,7 @@ + { + int do_this_file=FALSE, cfactor, error, error_in_archive=PK_COOL; + #ifndef WINDLL +- char sgn, cfactorstr[10]; ++ char sgn, cfactorstr[12]; + int longhdr=(uO.vflag>1); + #endif + int date_format; diff --git a/gnu/packages/patches/unzip-initialize-symlink-flag.patch b/gnu/packages/patches/unzip-initialize-symlink-flag.patch new file mode 100644 index 0000000000..3b0f391300 --- /dev/null +++ b/gnu/packages/patches/unzip-initialize-symlink-flag.patch @@ -0,0 +1,22 @@ +Copied from Debian. + +From: Andreas Schwab +Subject: Initialize the symlink flag +Bug-Debian: http://bugs.debian.org/717029 +X-Debian-version: 6.0-10 + +--- a/process.c ++++ b/process.c +@@ -1758,6 +1758,12 @@ + = (G.crec.general_purpose_bit_flag & (1 << 11)) == (1 << 11); + #endif + ++#ifdef SYMLINKS ++ /* Initialize the symlink flag, may be set by the platform-specific ++ mapattr function. */ ++ G.pInfo->symlink = 0; ++#endif ++ + return PK_COOL; + + } /* end function process_cdir_file_hdr() */ diff --git a/gnu/packages/patches/unzip-remove-build-date.patch b/gnu/packages/patches/unzip-remove-build-date.patch new file mode 100644 index 0000000000..8beff92d1a --- /dev/null +++ b/gnu/packages/patches/unzip-remove-build-date.patch @@ -0,0 +1,19 @@ +Copied from Debian. + +From: Jérémy Bobbio +Subject: Remove build date +Bug-Debian: http://bugs.debian.org/782851 + In order to make unzip build reproducibly, we remove the + (already optional) build date from the binary. + +--- a/unix/unix.c ++++ b/unix/unix.c +@@ -1705,7 +1705,7 @@ + #endif /* Sun */ + #endif /* SGI */ + +-#ifdef __DATE__ ++#if 0 + " on ", __DATE__ + #else + "", "" diff --git a/gnu/packages/zip.scm b/gnu/packages/zip.scm index e6f5067295..f0f27ddfe2 100644 --- a/gnu/packages/zip.scm +++ b/gnu/packages/zip.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2013 Andreas Enge -;;; Copyright © 2014 Mark H Weaver +;;; Copyright © 2014, 2015 Mark H Weaver ;;; ;;; This file is part of GNU Guix. ;;; @@ -81,23 +81,29 @@ Compression ratios of 2:1 to 3:1 are common for text files.") (sha256 (base32 "0dxx11knh3nk95p2gg2ak777dd11pr7jx5das2g49l262scrcv83")) - (patches (list (search-patch "unzip-CVE-2014-8139.patch") - (search-patch "unzip-CVE-2014-8140.patch") - (search-patch "unzip-CVE-2014-8141.patch"))))) + (patches (map search-patch '("unzip-CVE-2014-8139.patch" + "unzip-CVE-2014-8140.patch" + "unzip-CVE-2014-8141.patch" + "unzip-CVE-2014-9636.patch" + "unzip-allow-greater-hostver-values.patch" + "unzip-increase-size-of-cfactorstr.patch" + "unzip-initialize-symlink-flag.patch" + "unzip-remove-build-date.patch"))))) (build-system gnu-build-system) ;; no inputs; bzip2 is not supported, since not compiled with BZ_NO_STDIO (arguments - `(#:make-flags '("generic_gcc") - #:phases - (alist-replace - 'configure - (lambda* (#:key inputs outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out"))) - (copy-file "unix/Makefile" "Makefile") - (substitute* "Makefile" - (("/usr/local") out) - (("/man/") "/share/man/")))) - %standard-phases))) + `(#:phases (modify-phases %standard-phases + (delete 'configure) + (replace 'build + (lambda* (#:key make-flags #:allow-other-keys) + (zero? (apply system* "make" + `("-j" ,(number->string + (parallel-job-count)) + ,@make-flags + "generic_gcc")))))) + #:make-flags (list "-f" "unix/Makefile" + (string-append "prefix=" %output) + (string-append "MANDIR=" %output "/share/man/man1")))) (home-page "http://www.info-zip.org/UnZip.html") (synopsis "Decompression and file extraction utility") (description -- cgit v1.2.3 From bbd19615457ac6ced724489be80c6fbff972492e Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 15 Jul 2015 23:18:30 -0400 Subject: gnu: ghc: Don't pass --build= to configure. * gnu/packages/haskell.scm (ghc)[arguments]: Add #:build #f. --- gnu/packages/haskell.scm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'gnu/packages') diff --git a/gnu/packages/haskell.scm b/gnu/packages/haskell.scm index 75bbb24479..298caf108c 100644 --- a/gnu/packages/haskell.scm +++ b/gnu/packages/haskell.scm @@ -116,6 +116,11 @@ ;; gremlin) doesn't support it yet, so skip this phase. #:validate-runpath? #f + ;; Don't pass --build=, because the configure script + ;; auto-detects slightly different triplets for --host and --target and + ;; then complains that they don't match. + #:build #f + #:modules ((guix build gnu-build-system) (guix build utils) (guix build rpath) -- cgit v1.2.3 From 1084ec08c2fba55c436f9e2167c310ada0e3f632 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Wed, 15 Jul 2015 23:43:33 -0400 Subject: gnu: perl-net-ssleay: Avoid patching source in 'origin'. * gnu/packages/tls.scm (perl-net-ssleay)[source]: Move patch to ... [native-inputs]: ... here, and also add the 'patch' program. [arguments]: Use 'modify-phases'. Add 'apply-patch' phase. Return boolean result from 'set-ssl-prefix' phase. --- gnu/packages/tls.scm | 30 +++++++++++++++++++++--------- 1 file changed, 21 insertions(+), 9 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/tls.scm b/gnu/packages/tls.scm index 3d0000e3fa..61a26ce662 100644 --- a/gnu/packages/tls.scm +++ b/gnu/packages/tls.scm @@ -276,18 +276,30 @@ security, and applying best practice development processes.") "Net-SSLeay-" version ".tar.gz")) (sha256 (base32 - "1m2wwzhjwsg0drlhp9w12fl6bsgj69v8gdz72jqrqll3qr7f408p")) - (patches - ;; XXX Try removing this patch for perl-net-ssleay > 1.68 - (list (search-patch "perl-net-ssleay-disable-ede-test.patch"))))) + "1m2wwzhjwsg0drlhp9w12fl6bsgj69v8gdz72jqrqll3qr7f408p")))) (build-system perl-build-system) + (native-inputs + `(("patch" ,patch) + ("patch/disable-ede-test" + ,(search-patch "perl-net-ssleay-disable-ede-test.patch")))) (inputs `(("openssl" ,openssl))) (arguments - `(#:phases (alist-cons-before - 'configure 'set-ssl-prefix - (lambda* (#:key inputs #:allow-other-keys) - (setenv "OPENSSL_PREFIX" (assoc-ref inputs "openssl"))) - %standard-phases))) + `(#:phases + (modify-phases %standard-phases + (add-after + 'unpack 'apply-patch + (lambda* (#:key inputs #:allow-other-keys) + ;; XXX We apply this patch here instead of in the 'origin' because + ;; this package's build system fails badly when the source file + ;; times are zeroed. + ;; XXX Try removing this patch for perl-net-ssleay > 1.68 + (zero? (system* "patch" "--force" "-p1" "-i" + (assoc-ref inputs "patch/disable-ede-test"))))) + (add-before + 'configure 'set-ssl-prefix + (lambda* (#:key inputs #:allow-other-keys) + (setenv "OPENSSL_PREFIX" (assoc-ref inputs "openssl")) + #t))))) (synopsis "Perl extension for using OpenSSL") (description "This module offers some high level convenience functions for accessing -- cgit v1.2.3 From a640d3d51b5f116cea06f47d93b05b9281f81bc7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Thu, 16 Jul 2015 17:17:12 +0200 Subject: gnu: libgnome: Leave only one 'propagated-inputs' field. * gnu/packages/gnome.scm (libgnome): Merge the two 'propagated-inputs' fields (followup to 25338e9.) --- gnu/packages/gnome.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm index 2cb44f97ba..723cff0d0e 100644 --- a/gnu/packages/gnome.scm +++ b/gnu/packages/gnome.scm @@ -1086,7 +1086,6 @@ to access local and remote files with a single consistent API.") (substitute* "libgnome/Makefile.in" (("-DG_DISABLE_DEPRECATED") "-DGLIB_DISABLE_DEPRECATION_WARNINGS"))) %standard-phases))) - (propagated-inputs `(("popt" ,popt))) ; gnome-program.h includes popt.h (inputs `(("libxml2" ,libxml2))) (native-inputs `(("glib" ,glib "bin") ; for glib-mkenums, etc. @@ -1100,7 +1099,8 @@ to access local and remote files with a single consistent API.") `(("libcanberra" ,libcanberra) ("libbonobo" ,libbonobo) ("gconf" ,gconf) - ("gnome-vfs" ,gnome-vfs))) + ("gnome-vfs" ,gnome-vfs) + ("popt" ,popt))) ;gnome-program.h includes popt.h (home-page "https://developer.gnome.org/libgnome/") (synopsis "Useful routines for building applications") (description "The libgnome library provides a number of useful routines -- cgit v1.2.3 From 81e558fdb16386c34db53c540e20b8d633ae3a64 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Thu, 16 Jul 2015 23:33:15 +0200 Subject: gnu: subversion: Skip the faulty test. The added patch from upstream didn't help, nor did downgrading to SQLite 3.8.9. Thus, shamelessly skip the offending test. * gnu/packages/patches/subversion-sqlite-3.8.9-fix.patch: Add one hunk to skip the faulty test, and another one from upstream. --- .../patches/subversion-sqlite-3.8.9-fix.patch | 73 ++++++++++++++++++++++ 1 file changed, 73 insertions(+) (limited to 'gnu/packages') diff --git a/gnu/packages/patches/subversion-sqlite-3.8.9-fix.patch b/gnu/packages/patches/subversion-sqlite-3.8.9-fix.patch index 92d8a85c8f..2f7bcee344 100644 --- a/gnu/packages/patches/subversion-sqlite-3.8.9-fix.patch +++ b/gnu/packages/patches/subversion-sqlite-3.8.9-fix.patch @@ -1,7 +1,25 @@ +Despite all the efforts below, the 'wc-queries-test.c' still fails, +both with SQLite 3.8.9 and 3.8.10.2. We choose to just skip it +until a better solution arises. + +--- subversion/tests/libsvn_wc/wc-queries-test.c 2015-07-16 23:24:03.458279053 +0200 ++++ subversion/tests/libsvn_wc/wc-queries-test.c 2015-07-16 23:24:18.866423439 +0200 +@@ -898,8 +898,6 @@ struct svn_test_descriptor_t test_funcs[ + "sqlite up-to-date"), + SVN_TEST_PASS2(test_parsable, + "queries are parsable"), +- SVN_TEST_PASS2(test_query_expectations, +- "test query expectations"), + SVN_TEST_PASS2(test_schema_statistics, + "test schema statistics"), + SVN_TEST_NULL + + This upstream patch (r1672295) is needed to fix a test failure when built against sqlite 3.8.9. See: https://mail-archives.apache.org/mod_mbox/subversion-dev/201504.mbox/%3C5526D197.6020808@gmx.de%3E + https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=785496 r1672295 | rhuijben | 2015-04-09 07:31:12 -0400 (Thu, 09 Apr 2015) | 15 lines @@ -57,3 +75,58 @@ Index: subversion/libsvn_wc/wc-metadata.sql /* sqlite_autoindex_WORK_QUEUE_1 doesn't exist because WORK_QUEUE is a INTEGER PRIMARY KEY AUTOINCREMENT table */ + +r1673691 | rhuijben | 2015-04-15 05:30:04 -0400 (Wed, 15 Apr 2015) | 5 lines + +* subversion/libsvn_wc/wc-metadata.sql + (STMT_INSTALL_SCHEMA_STATISTICS): Delete existing sqlite_stat1 rows for + the externals table before installing new rows to avoid duplicate entries. + Remove unneeded 'OR REPLACE' from all inserts. + + +Index: subversion/libsvn_wc/wc-metadata.sql +=================================================================== +--- subversion/libsvn_wc/wc-metadata.sql (revision 1673690) ++++ subversion/libsvn_wc/wc-metadata.sql (revision 1673691) +@@ -598,30 +598,30 @@ + ANALYZE sqlite_master; /* Creates empty sqlite_stat1 if necessary */ + + DELETE FROM sqlite_stat1 +-WHERE tbl in ('NODES', 'ACTUAL_NODE', 'LOCK', 'WC_LOCK'); ++WHERE tbl in ('NODES', 'ACTUAL_NODE', 'LOCK', 'WC_LOCK', 'EXTERNALS'); + +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('NODES', 'sqlite_autoindex_NODES_1', '8000 8000 2 1'); +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('NODES', 'I_NODES_PARENT', '8000 8000 10 2 1'); + /* Tell a lie: We ignore that 99.9% of all moved_to values are NULL */ +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('NODES', 'I_NODES_MOVED', '8000 8000 1 1'); + +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('ACTUAL_NODE', 'sqlite_autoindex_ACTUAL_NODE_1', '8000 8000 1'); +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('ACTUAL_NODE', 'I_ACTUAL_PARENT', '8000 8000 10 1'); + +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('LOCK', 'sqlite_autoindex_LOCK_1', '100 100 1'); + +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('WC_LOCK', 'sqlite_autoindex_WC_LOCK_1', '100 100 1'); + +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('EXTERNALS','sqlite_autoindex_EXTERNALS_1', '100 100 1'); +-INSERT OR REPLACE INTO sqlite_stat1(tbl, idx, stat) VALUES ++INSERT INTO sqlite_stat1(tbl, idx, stat) VALUES + ('EXTERNALS','I_EXTERNALS_DEFINED', '100 100 3 1'); + + /* sqlite_autoindex_WORK_QUEUE_1 doesn't exist because WORK_QUEUE is + -- cgit v1.2.3 From e4d801623e7a64b3de8aadd00b5e4a1aa34728a7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Fri, 17 Jul 2015 00:01:38 +0200 Subject: gnu: libpsl: Update to 0.7.1. Removing the 'snippet' allows us to avoid 'patch-and-repack', which resets all the mtimes, thereby breaking the expectation tested in 'test-is-public-builtin.c' that the mtime returned by 'psl_builtin_file_time' is non-zero. * gnu/packages/web.scm (libpsl): Update to 0.7.1. [source]: Remove 'modules' and 'snippet'. [native-inputs]: Add PKG-CONFIG. --- gnu/packages/web.scm | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index 99a176f9d5..9a20b30e92 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -320,20 +320,15 @@ for efficient socket-like bidirectional reliable communication channels.") (define-public libpsl (package (name "libpsl") - (version "0.6.0") + (version "0.7.1") (source (origin (method url-fetch) (uri (string-append "https://github.com/rockdaboot/libpsl/" "archive/" version ".tar.gz")) (sha256 (base32 - "10s7xxxx6pp4ydp3san69sa6q379ih3pv92fyi565ggmlw8igv7a")) - (file-name (string-append name "-" version ".tar.gz")) - (modules '((guix build utils))) - (snippet - ;; Believe it or not, the .pc is invalid. Fix it. - '(substitute* "libpsl.pc.in" - (("-llibpsl") "-lpsl"))))) + "1k0klj668c9v0r4993vfs3kq773mzdz61vsigqw6v1mjcwnf1si3")) + (file-name (string-append name "-" version ".tar.gz")))) (build-system gnu-build-system) (inputs `(("icu4c" ,icu4c))) ;; The release tarball lacks the generated files. @@ -341,7 +336,8 @@ for efficient socket-like bidirectional reliable communication channels.") ("automake" ,automake) ("gettext" ,gnu-gettext) ("which" ,which) - ("libtool" ,libtool))) + ("libtool" ,libtool) + ("pkg-config" ,pkg-config))) (arguments `(#:phases (alist-cons-after 'unpack 'bootstrap -- cgit v1.2.3 From 355e53c4ca95b309b74a815559a960e0624b034f Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Thu, 16 Jul 2015 16:39:45 -0500 Subject: gnu: git: Adjust to new handling of propagated inputs. This is a followup to 161094c, which gets rid of the "a/b" notation for propagated inputs. * gnu/packages/version-control.scm (package-transitive-propagated-labels*): Do not prepend the package name to its input label. (package-propagated-input-refs): Delete duplicate labels. (git)[arguments]: Adjust wrapping of git-send-email accordingly. --- gnu/packages/version-control.scm | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm index e3498ee76f..d89ce09dab 100644 --- a/gnu/packages/version-control.scm +++ b/gnu/packages/version-control.scm @@ -104,7 +104,7 @@ as well as the classic centralized workflow.") `(,name ,@(map (match-lambda ((label (? package? _) . _) - (string-append name "/" label))) + label)) (package-transitive-propagated-inputs package))))) (define (package-propagated-input-refs inputs packages) @@ -112,8 +112,9 @@ as well as the classic centralized workflow.") PACKAGES and their propagated inputs." (map (lambda (l) `(assoc-ref ,inputs ,l)) - (append-map package-transitive-propagated-labels* - packages))) + (delete-duplicates ;XXX: efficiency + (append-map package-transitive-propagated-labels* + packages)))) (define-public git ;; Keep in sync with 'git-manpages'! @@ -236,13 +237,12 @@ PACKAGES and their propagated inputs." (wrap-program git-se* `("PERL5LIB" ":" prefix ,(map (lambda (o) (string-append o "/lib/perl5/site_perl")) - (delete-duplicates - (list - ,@(package-propagated-input-refs - 'inputs - `(,perl-authen-sasl - ,perl-net-smtp-ssl - ,perl-io-socket-ssl))))))) + (list + ,@(package-propagated-input-refs + 'inputs + (list perl-authen-sasl + perl-net-smtp-ssl + perl-io-socket-ssl)))))) ;; Tell 'git-submodule' where Perl is. (wrap-program git-sm -- cgit v1.2.3 From 2fdc68274282a0e6243c706ea6d97785be4ead3b Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Thu, 16 Jul 2015 23:32:51 -0400 Subject: gnu: icecat: Add patch to adapt to freetype 2.6. * gnu/packages/patches/icecat-freetype-2.6.patch: New file. * gnu-system.am (dist_patch_DATA): Add it. * gnu/packages/gnuzilla.scm (icecat)[source]: Add patch. --- gnu/packages/gnuzilla.scm | 1 + gnu/packages/patches/icecat-freetype-2.6.patch | 14 ++++++++++++++ 2 files changed, 15 insertions(+) create mode 100644 gnu/packages/patches/icecat-freetype-2.6.patch (limited to 'gnu/packages') diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm index 8be3d48871..dfa1d5d8a4 100644 --- a/gnu/packages/gnuzilla.scm +++ b/gnu/packages/gnuzilla.scm @@ -279,6 +279,7 @@ standards.") "db/sqlite3")) #t)) (patches (map search-patch '("icecat-enable-acceleration-and-webgl.patch" + "icecat-freetype-2.6.patch" "icecat-libvpx-1.4.patch"))))) (build-system gnu-build-system) (inputs diff --git a/gnu/packages/patches/icecat-freetype-2.6.patch b/gnu/packages/patches/icecat-freetype-2.6.patch new file mode 100644 index 0000000000..ef69f2f715 --- /dev/null +++ b/gnu/packages/patches/icecat-freetype-2.6.patch @@ -0,0 +1,14 @@ +Adapt to freetype 2.6. This patch copied from upstream, see: +https://bugzilla.mozilla.org/show_bug.cgi?id=1143411 +https://hg.mozilla.org/mozilla-central/rev/afd840d66e6a + +--- a/config/system-headers ++++ b/config/system-headers +@@ -415,6 +415,7 @@ freetype/ftbitmap.h + freetype/ftxf86.h + freetype.h + ftcache.h ++ftfntfmt.h + ftglyph.h + ftsynth.h + ftoutln.h -- cgit v1.2.3 From e12027179f136766609fb8dbc920f5705d62fc95 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 17 Jul 2015 03:31:28 -0400 Subject: gnu: openssl: Work around GCC code generation bug on ARM with NEON. * gnu/packages/tls.scm (openssl)[arguments]: When compiling natively for armhf, pass -mfpu=vfpv3 to ./config. --- gnu/packages/tls.scm | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/tls.scm b/gnu/packages/tls.scm index 61a26ce662..090f64afaf 100644 --- a/gnu/packages/tls.scm +++ b/gnu/packages/tls.scm @@ -190,7 +190,7 @@ required structures.") (build-system gnu-build-system) (native-inputs `(("perl" ,perl))) (arguments - '(#:parallel-build? #f + `(#:parallel-build? #f #:parallel-tests? #f #:test-target "test" #:phases @@ -202,7 +202,13 @@ required structures.") (system* "./config" "shared" ; build shared libraries "--libdir=lib" - (string-append "--prefix=" out))))) + (string-append "--prefix=" out) + ;; XXX FIXME: Work around a code generation bug in GCC + ;; 4.9.3 on ARM when compiled with -mfpu=neon. + ,@(if (and (not (%current-target-system)) + (string-prefix? "armhf" (%current-system))) + '("-mfpu=vfpv3") + '()))))) (alist-cons-before 'patch-source-shebangs 'patch-tests (lambda* (#:key inputs native-inputs #:allow-other-keys) -- cgit v1.2.3 From b7e147fffd05951b91e1e042a644ea7bc5394990 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Fri, 17 Jul 2015 22:10:24 +0200 Subject: gnu: libpsl: Fix source URL. * gnu/packages/web.scm (libpsl)[source]: Fix 'uri'. Remove now unneeded 'file-name'. --- gnu/packages/web.scm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index 9a20b30e92..088aa0b2df 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -324,11 +324,10 @@ for efficient socket-like bidirectional reliable communication channels.") (source (origin (method url-fetch) (uri (string-append "https://github.com/rockdaboot/libpsl/" - "archive/" version ".tar.gz")) + "archive/libpsl-" version ".tar.gz")) (sha256 (base32 - "1k0klj668c9v0r4993vfs3kq773mzdz61vsigqw6v1mjcwnf1si3")) - (file-name (string-append name "-" version ".tar.gz")))) + "1k0klj668c9v0r4993vfs3kq773mzdz61vsigqw6v1mjcwnf1si3")))) (build-system gnu-build-system) (inputs `(("icu4c" ,icu4c))) ;; The release tarball lacks the generated files. -- cgit v1.2.3 From f90ef3c355a009e0d41ce02a9138b841165dcb49 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 17 Jul 2015 18:33:05 -0400 Subject: gnu: clisp: Do not pass --build= to configure. * gnu/packages/lisp.scm (clisp)[arguments]: Add #:build #f. --- gnu/packages/lisp.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'gnu/packages') diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm index feaa08af38..78ff83de15 100644 --- a/gnu/packages/lisp.scm +++ b/gnu/packages/lisp.scm @@ -168,7 +168,10 @@ supporting ASDF, Sockets, Gray streams, MOP, and other useful components.") ("readline" ,readline) ("libsigsegv" ,libsigsegv))) (arguments - '(#:phases + '(;; XXX The custom configure script does not cope well when passed + ;; --build=. + #:build #f + #:phases (alist-cons-after 'unpack 'patch-sh-and-pwd (lambda _ -- cgit v1.2.3 From b40c3d09b590b463a35185bde99778bb3492ee50 Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 17 Jul 2015 21:25:58 -0400 Subject: gnu: ninja: Use modify-phases. * gnu/packages/ninja.scm (ninja)[arguments]: Use modify-phases. Return a boolean result from all phase procedures. --- gnu/packages/ninja.scm | 49 ++++++++++++++++++++++++++----------------------- 1 file changed, 26 insertions(+), 23 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/ninja.scm b/gnu/packages/ninja.scm index 2483cc51fe..82f3e44013 100644 --- a/gnu/packages/ninja.scm +++ b/gnu/packages/ninja.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2015 Sou Bunnbu +;;; Copyright © 2015 Mark H Weaver ;;; ;;; This file is part of GNU Guix. ;;; @@ -40,33 +41,35 @@ (build-system gnu-build-system) (arguments '(#:phases - (alist-replace - 'configure - (lambda _ - (substitute* "src/subprocess-posix.cc" - (("/bin/sh") (which "sh")))) - (alist-replace - 'build - (lambda _ - (zero? (system* "./configure.py" "--bootstrap"))) - (alist-replace + (modify-phases %standard-phases + (replace + 'configure + (lambda _ + (substitute* "src/subprocess-posix.cc" + (("/bin/sh") (which "sh"))) + #t)) + (replace + 'build + (lambda _ + (zero? (system* "./configure.py" "--bootstrap")))) + (replace 'check (lambda _ (and (zero? (system* "./configure.py")) (zero? (system* "./ninja" "ninja_test")) - (zero? (system* "./ninja_test")))) - (alist-replace - 'install - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (bin (string-append out "/bin")) - (doc (string-append out "/share/doc/ninja"))) - (mkdir-p bin) - (copy-file "ninja" (string-append bin "/ninja")) - (mkdir-p doc) - (copy-file "doc/manual.asciidoc" - (string-append doc "/manual.asciidoc")))) - %standard-phases)))))) + (zero? (system* "./ninja_test"))))) + (replace + 'install + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (bin (string-append out "/bin")) + (doc (string-append out "/share/doc/ninja"))) + (mkdir-p bin) + (copy-file "ninja" (string-append bin "/ninja")) + (mkdir-p doc) + (copy-file "doc/manual.asciidoc" + (string-append doc "/manual.asciidoc")) + #t)))))) (native-inputs `(("python" ,python-2))) (home-page "http://martine.github.io/ninja/") (synopsis "Small build system") -- cgit v1.2.3 From 47f315a73f535550d404c22d09ab576991a2b3bf Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Fri, 17 Jul 2015 21:46:14 -0400 Subject: gnu: ninja: Apply the patch in a phase to avoid 'patch-and-repack'. * gnu/packages/ninja.scm (ninja)[source]: Comment out 'patches' field. [native-inputs]: Add 'patch' and "ninja-tests.patch". Move above 'arguments' field. [arguments]: Add 'apply-ninja-tests.patch' phase. --- gnu/packages/ninja.scm | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/ninja.scm b/gnu/packages/ninja.scm index 82f3e44013..b55dd37e78 100644 --- a/gnu/packages/ninja.scm +++ b/gnu/packages/ninja.scm @@ -23,6 +23,7 @@ #:use-module (guix download) #:use-module (guix build-system gnu) #:use-module (gnu packages) + #:use-module (gnu packages base) #:use-module (gnu packages python)) (define-public ninja @@ -37,11 +38,23 @@ (sha256 (base32 "1h3yfwcfl61v493vna6jia2fizh8rpig7qw2504cvkr6gid3p5bw")) - (patches (list (search-patch "ninja-tests.patch"))))) + ;; XXX Ninja's build system doesn't cope well with zeroed + ;; time stamps in the source tree, so we must avoid using + ;; 'patch-and-repack'. + #; (patches (list (search-patch "ninja-tests.patch"))))) (build-system gnu-build-system) + (native-inputs `(("python" ,python-2) + ("patch" ,patch) + ("ninja-tests.patch" ,(search-patch "ninja-tests.patch")))) (arguments '(#:phases (modify-phases %standard-phases + (add-after + 'unpack 'apply-ninja-tests.patch + ;; XXX Apply the patch here to avoid 'patch-and-repack'. See above. + (lambda* (#:key inputs #:allow-other-keys) + (zero? (system* "patch" "--force" "-p1" "-i" + (assoc-ref inputs "ninja-tests.patch"))))) (replace 'configure (lambda _ @@ -70,7 +83,6 @@ (copy-file "doc/manual.asciidoc" (string-append doc "/manual.asciidoc")) #t)))))) - (native-inputs `(("python" ,python-2))) (home-page "http://martine.github.io/ninja/") (synopsis "Small build system") (description -- cgit v1.2.3 From c5c4c4b437f977f4aaedb34a258cd94146c93d4d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 18 Jul 2015 22:53:50 +0200 Subject: gnu: rapidjson: Build without -Werror. * gnu/packages/web.scm (rapidjson)[source]: Add 'snippet'. --- gnu/packages/web.scm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'gnu/packages') diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index 088aa0b2df..830d9db7dd 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -272,7 +272,13 @@ parse JSON formatted strings back into the C representation of JSON objects.") (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 - "0rl6s0vg5y1dhh9vfl1lqay3sxf69sxjh0czxrjmasn7ng91wwf3")))) + "0rl6s0vg5y1dhh9vfl1lqay3sxf69sxjh0czxrjmasn7ng91wwf3")) + (modules '((guix build utils))) + (snippet + ;; Building with GCC 4.8 with -Werror was fine, but 4.9.3 + ;; complains in new ways, so turn of -Werror. + '(substitute* (find-files "." "^CMakeLists\\.txt$") + (("-Werror") ""))))) (build-system cmake-build-system) (home-page "https://github.com/miloyip/rapidjson") (synopsis "JSON parser/generator for C++ with both SAX/DOM style API") -- cgit v1.2.3 From 2e839545c7f363b50ae760c9b9c15da9e7619da9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 18 Jul 2015 23:27:18 +0200 Subject: gnu: ninja: Do not report files with mtime = 0 as missing. This is a followup to 47f315a. * gnu/packages/patches/ninja-zero-mtime.patch: New file. * gnu-system.am (dist_patch_DATA): Add it. * gnu/packages/ninja.scm (ninja)[source]: Reinstate 'patches' field and add this patch. [arguments]: Remove 'apply-ninja-tests.patch' phase. --- gnu/packages/ninja.scm | 17 +++-------------- gnu/packages/patches/ninja-zero-mtime.patch | 19 +++++++++++++++++++ 2 files changed, 22 insertions(+), 14 deletions(-) create mode 100644 gnu/packages/patches/ninja-zero-mtime.patch (limited to 'gnu/packages') diff --git a/gnu/packages/ninja.scm b/gnu/packages/ninja.scm index b55dd37e78..a0eb109bbb 100644 --- a/gnu/packages/ninja.scm +++ b/gnu/packages/ninja.scm @@ -23,7 +23,6 @@ #:use-module (guix download) #:use-module (guix build-system gnu) #:use-module (gnu packages) - #:use-module (gnu packages base) #:use-module (gnu packages python)) (define-public ninja @@ -38,23 +37,13 @@ (sha256 (base32 "1h3yfwcfl61v493vna6jia2fizh8rpig7qw2504cvkr6gid3p5bw")) - ;; XXX Ninja's build system doesn't cope well with zeroed - ;; time stamps in the source tree, so we must avoid using - ;; 'patch-and-repack'. - #; (patches (list (search-patch "ninja-tests.patch"))))) + (patches (map search-patch + '("ninja-zero-mtime.patch" "ninja-tests.patch"))))) (build-system gnu-build-system) - (native-inputs `(("python" ,python-2) - ("patch" ,patch) - ("ninja-tests.patch" ,(search-patch "ninja-tests.patch")))) + (native-inputs `(("python" ,python-2))) (arguments '(#:phases (modify-phases %standard-phases - (add-after - 'unpack 'apply-ninja-tests.patch - ;; XXX Apply the patch here to avoid 'patch-and-repack'. See above. - (lambda* (#:key inputs #:allow-other-keys) - (zero? (system* "patch" "--force" "-p1" "-i" - (assoc-ref inputs "ninja-tests.patch"))))) (replace 'configure (lambda _ diff --git a/gnu/packages/patches/ninja-zero-mtime.patch b/gnu/packages/patches/ninja-zero-mtime.patch new file mode 100644 index 0000000000..c9b9e8d798 --- /dev/null +++ b/gnu/packages/patches/ninja-zero-mtime.patch @@ -0,0 +1,19 @@ +Work around a design defect in Ninja whereby a zero mtime is used to +denote missing files (we happen to produce files that have a zero mtime +and yet really do exist.) + +--- ninja-1.5.3/src/disk_interface.cc 2014-11-24 18:37:47.000000000 +0100 ++++ ninja-1.5.3/src/disk_interface.cc 2015-07-18 23:20:38.572290139 +0200 +@@ -194,6 +194,12 @@ TimeStamp RealDiskInterface::Stat(const + } + return -1; + } ++ ++ if (st.st_mtime == 0) ++ // All the code assumes that mtime == 0 means "file missing". Here we ++ // know the file is not missing, so tweak the mtime. ++ st.st_mtime = 1; ++ + return st.st_mtime; + #endif + } -- cgit v1.2.3 From aa27987f71cb8afa698ede551e20b1248f160113 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sun, 19 Jul 2015 00:15:44 +0200 Subject: gnu: cross-base: Distinguish cross Linux headers from native headers. Commit c6d33a9 provided an incorrect fix, whereby the "linux-headers" key would be used twice in %BUILD-INPUTS and the 'set-cross-path' phase would refer to the first one of them, which happened to be the native headers, and not the target headers. This patch solves the problem by removing the ambiguity. * gnu/packages/cross-base.scm (cross-gcc-arguments)[set-cross-path]: Remove to "xlinux-headers" instead of "linux-headers". (cross-gcc): When LIBC is true, add explicit "xlinux-headers" input, taken from LIBC's propagated inputs. --- gnu/packages/cross-base.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'gnu/packages') diff --git a/gnu/packages/cross-base.scm b/gnu/packages/cross-base.scm index 712aa9d585..eda44cea41 100644 --- a/gnu/packages/cross-base.scm +++ b/gnu/packages/cross-base.scm @@ -165,7 +165,7 @@ may be either a libc package or #f.)" ;; Add the cross Linux headers to CROSS_CPATH, and remove them ;; from CPATH. (let ((libc (assoc-ref inputs "libc")) - (linux (assoc-ref inputs "linux-headers"))) + (linux (assoc-ref inputs "xlinux-headers"))) (define (cross? x) ;; Return #t if X is a cross-libc or cross Linux. (or (string-prefix? libc x) @@ -244,6 +244,9 @@ GCC that does not target a libc; otherwise, target that libc." (alist-delete "libc" %final-inputs)))) (if libc `(("libc" ,libc) + ("xlinux-headers" ;the target headers + ,@(assoc-ref (package-propagated-inputs libc) + "linux-headers")) ,@inputs) inputs)))) -- cgit v1.2.3