gnu: clamav: Use new style and G-expressions.

* gnu/packages/antivirus.scm (clamav)[source]: Remove trailing #t from snippet.
[inputs]: Use new input style.
[arguments]: Use G-expressions. Remove trailing #t from phases
[configure-flags]: Adjust to new input style.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
kiasoc5 2022-05-18 22:51:14 -04:00 committed by Ludovic Courtès
parent 48c748226e
commit d9f15a0b7b
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -21,6 +21,7 @@
(define-module (gnu packages antivirus) (define-module (gnu packages antivirus)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix gexp)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix utils) #:use-module (guix utils)
@ -59,8 +60,7 @@
'("win32" ; unnecessary '("win32" ; unnecessary
"libclamav/c++/llvm" ; use system llvm "libclamav/c++/llvm" ; use system llvm
"libclamav/tomsfastmath" ; use system tomsfastmath "libclamav/tomsfastmath" ; use system tomsfastmath
"libclamunrar")) ; non-free license "libclamunrar")))) ; non-free license
#t))
(patches (patches
(search-patches "clamav-system-tomsfastmath.patch" (search-patches "clamav-system-tomsfastmath.patch"
"clamav-config-llvm-libs.patch")))) "clamav-config-llvm-libs.patch"))))
@ -72,36 +72,36 @@
libtool libtool
pkg-config)) pkg-config))
(inputs (inputs
`(("bzip2" ,bzip2) (list bzip2
("libcurl" ,curl) curl
("libjson" ,json-c) json-c
("libltdl" ,libltdl) libltdl
("libmspack" ,libmspack) libmspack
("llvm" ,llvm-3.6) ; requires <3.7, for JIT/verifier llvm-3.6 ; requires <3.7, for JIT/verifier
("ncurses" ,ncurses) ncurses
("openssl" ,libressl) libressl
("pcre2" ,pcre2) pcre2
("sasl" ,cyrus-sasl) ; for linking curl with libtool cyrus-sasl ; for linking curl with libtool
("tomsfastmath" ,tomsfastmath) tomsfastmath
("xml" ,libxml2) libxml2
("zlib" ,zlib))) zlib))
(arguments (arguments
`(#:configure-flags (list #:configure-flags
(let-syntax ((with (syntax-rules () #~(let-syntax ((with (syntax-rules ()
((_ name) ((_ name use)
(string-append "--with-" name "=" (string-append "--with-" name "="
(assoc-ref %build-inputs name)))))) (assoc-ref %build-inputs use))))))
(list "--disable-unrar" (list "--disable-unrar"
"--enable-llvm" "--enable-llvm"
"--with-system-llvm" "--with-system-llvm"
"--with-system-libmspack" "--with-system-libmspack"
"--without-included-ltdl" "--without-included-ltdl"
(with "xml") (with "xml" "libxml2")
(with "openssl") (with "openssl" "libressl")
(with "libjson") (with "libjson" "json-c")
(with "pcre2") (with "pcre2" "pcre2")
(with "zlib") (with "zlib" "zlib")
(with "libcurl") (with "libcurl" "curl")
;; For sanity, specifying --enable-* flags turns ;; For sanity, specifying --enable-* flags turns
;; "support unavailable" warnings into errors. ;; "support unavailable" warnings into errors.
"--enable-bzip2" "--enable-bzip2"
@ -110,8 +110,10 @@
;; Default database directory needs to be writeable ;; Default database directory needs to be writeable
"--with-dbdir=/var/db/clamav")) "--with-dbdir=/var/db/clamav"))
;; install sample .conf files to %output/etc rather than /etc/clamav ;; install sample .conf files to %output/etc rather than /etc/clamav
#:make-flags (list (string-append "sysconfdir=" %output "/etc")) #:make-flags
#:phases (modify-phases %standard-phases #~(list (string-append "sysconfdir=" %output "/etc"))
#:phases
#~(modify-phases %standard-phases
;; Regenerate configure script. Without this we don't get ;; Regenerate configure script. Without this we don't get
;; the correct value for LLVM linker variables. ;; the correct value for LLVM linker variables.
(add-after 'unpack 'reconf (add-after 'unpack 'reconf
@ -127,15 +129,13 @@
;; contains. They're used only for listing extra build ;; contains. They're used only for listing extra build
;; dependencies, so ignore them until that's fixed. ;; dependencies, so ignore them until that's fixed.
(substitute* "libclamav/c++/Makefile.in" (substitute* "libclamav/c++/Makefile.in"
(("@LLVMCONFIG_LIBFILES@") "")) (("@LLVMCONFIG_LIBFILES@") ""))))
#t))
(add-before 'check 'skip-clamd-tests (add-before 'check 'skip-clamd-tests
;; XXX: The check?_clamd tests fail inside the build ;; XXX: The check?_clamd tests fail inside the build
;; chroot, but pass outside. ;; chroot, but pass outside.
(lambda _ (lambda _
(substitute* "unit_tests/Makefile" (substitute* "unit_tests/Makefile"
(("check2_clamd.sh.*check4_clamd.sh") "")) (("check2_clamd.sh.*check4_clamd.sh") "")))))))
#t)))))
(home-page "https://www.clamav.net") (home-page "https://www.clamav.net")
(synopsis "Antivirus engine") (synopsis "Antivirus engine")
(description (description