mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 12:05:19 -06:00
147719952a
* gnu/packages/nettle.scm (nettle-2): Delete variable. Change-Id: I79c7d7266323192a108db727401f4754dccf927e
86 lines
4 KiB
Scheme
86 lines
4 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2012, 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org>
|
|
;;; Copyright © 2016, 2021 Mark H Weaver <mhw@netris.org>
|
|
;;; Copyright © 2017, 2020-2022 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2021 Maxim Cournoyer <maxim@guixotic.coop>
|
|
;;;
|
|
;;; 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 nettle)
|
|
#:use-module (guix utils)
|
|
#:use-module (guix licenses)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix download)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (gnu packages)
|
|
#:use-module (gnu packages multiprecision)
|
|
#:use-module (gnu packages m4))
|
|
|
|
(define-public nettle
|
|
;; FIXME: The "cons" in #:configure-flags is a left-over from uninheriting
|
|
;; to avoid changing the derivation; it should be removed and the package
|
|
;; be modernized to use gexps the next time the package definition is
|
|
;; modified.
|
|
(package
|
|
(name "nettle")
|
|
(version "3.10.1")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "mirror://gnu/nettle/nettle-"
|
|
version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0cli5lkr7h9vxrz3j9kylnsdbw2ag6x8bpgivj06xsndq1zxvz5h"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:configure-flags
|
|
(cons "--enable-fat"
|
|
;; 'sexp-conv' and other programs need to have their RUNPATH point to
|
|
;; $libdir, which is not the case by default. Work around it.
|
|
(list (string-append "LDFLAGS=-Wl,-rpath="
|
|
(assoc-ref %outputs "out")
|
|
"/lib")))
|
|
#:phases (modify-phases %standard-phases
|
|
(add-after 'install 'move-static-libraries
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((out (assoc-ref outputs "out"))
|
|
(slib (string-append (assoc-ref outputs "static")
|
|
"/lib")))
|
|
(mkdir-p slib)
|
|
(with-directory-excursion (string-append out "/lib")
|
|
(for-each (lambda (ar)
|
|
(rename-file ar (string-append
|
|
slib "/"
|
|
(basename ar))))
|
|
(find-files
|
|
"."
|
|
,(if (target-mingw?)
|
|
'(lambda (filename _)
|
|
(and (string-suffix? ".a" filename)
|
|
(not (string-suffix? ".dll.a" filename))))
|
|
"\\.a$"))))
|
|
#t))))))
|
|
(outputs '("out" "debug" "static"))
|
|
(native-inputs (list m4))
|
|
(propagated-inputs (list gmp))
|
|
(home-page "https://www.lysator.liu.se/~nisse/nettle/")
|
|
(synopsis "C library for low-level cryptographic functionality")
|
|
(description
|
|
"GNU Nettle is a low-level cryptographic library. It is designed to
|
|
fit in easily in almost any context. It can be easily included in
|
|
cryptographic toolkits for object-oriented languages or in applications
|
|
themselves.")
|
|
(license gpl2+)))
|