01/01: gnu: libgcrypt: Fix CVE-2018-0495.

[Efraim Flashner]

efraim pushed a commit to branch master
in repository guix.

commit 03439df66fc2699b22e5786b33324e5432cfe8cf
Author: Efraim Flashner <address@hidden>
Date:   Wed Jun 13 22:28:48 2018 +0300

    gnu: libgcrypt: Fix CVE-2018-0495.
    
    * gnu/packages/gnupg.scm (libgcrypt)[replacement]: New field.
    (libgcrypt/fixed): New package.
---
 gnu/packages/gnupg.scm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
index ecd280f..6a0defb 100644
--- a/gnu/packages/gnupg.scm
+++ b/gnu/packages/gnupg.scm
@@ -108,6 +108,7 @@ Daemon and possibly more in the future.")
 
 (define-public libgcrypt
   (package
+    (replacement libgcrypt/fixed)
     (name "libgcrypt")
     (version "1.8.2")
     (source (origin
@@ -142,6 +143,19 @@ generation.")
     (properties '((ftp-server . "ftp.gnupg.org")
                   (ftp-directory . "/gcrypt/libgcrypt")))))
 
+(define libgcrypt/fixed
+  (package
+    (inherit libgcrypt)
+    (name "libgcrypt")
+    (version "1.8.3")
+    (source (origin
+             (method url-fetch)
+             (uri (string-append "mirror://gnupg/libgcrypt/libgcrypt-"
+                                 version ".tar.bz2"))
+             (sha256
+              (base32
+               "0z5gs1khzyknyfjr19k8gk4q148s6q987ya85cpn0iv70fz91v36"))))))
+
 (define-public libassuan
   (package
     (name "libassuan")