me/guix
Archived
1
0
Fork 0
Code Activity

gnu: american-fuzzy-lop: Update to 2.52b.

Browse source 
* gnu/packages/debug.scm (american-fuzzy-lop): Update to 2.52b.
[inputs]: custom-qemu now inherits from qemu-minimal.
(qemu-2.3.0): Remove variable.
This commit is contained in:
Efraim Flashner 2018-01-16 22:16:45 +02:00
parent 00f45cbb4a
commit 7746af6605
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 7 additions and 28 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

35
gnu/packages/debug.scm
View file

@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014, 2015, 2016, 2017 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2014, 2015, 2016, 2017 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -143,27 +143,6 @@ intended for use by people who discover and report bugs in compilers and other
tools that process C/C++ code.") tools that process C/C++ code.")
(license ncsa))) (license ncsa)))
(define qemu-2.3.0
(package
(inherit qemu-minimal)
(version "2.3.0")
(source (origin
(method url-fetch)
(uri (string-append
"http://wiki.qemu-project.org/download/qemu-"
version ".tar.bz2"))
(sha256
(base32
"120m53c3p28qxmfzllicjzr8syjv6v4d9rsyrgkp7gnmcgvvgfmn"))))
(arguments
;; XXX: Disable tests because of GTester's rejection of duplicate test
;; names, which wasn't addressed in this version of QEMU.
`(#:tests? #f
,@(substitute-keyword-arguments (package-arguments qemu-minimal)
((#:phases phases)
;; We disable the tests so we skip the phase disabling the qga test.
`(modify-phases ,phases (delete 'disable-test-qga))))))))
(define-public american-fuzzy-lop (define-public american-fuzzy-lop
(let ((machine (match (or (%current-target-system) (let ((machine (match (or (%current-target-system)
(%current-system)) (%current-system))
@ -177,7 +156,7 @@ tools that process C/C++ code.")
(_ "UNSUPPORTED")))) (_ "UNSUPPORTED"))))
(package (package
(name "american-fuzzy-lop") (name "american-fuzzy-lop")
(version "2.49b") ;It seems all releases have the 'b' suffix (version "2.52b") ;It seems all releases have the 'b' suffix
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@ -185,22 +164,22 @@ tools that process C/C++ code.")
"afl-" version ".tgz")) "afl-" version ".tgz"))
(sha256 (sha256
(base32 (base32
"1lc8mpwlbyb1iil9961yfysp8l2l4nw0s07781m1haiz4jq2rigp")))) "0ig0ij4n1pwry5dw1hk4q88801jzzy2cric6y2gd6560j55lnqa3"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (inputs
`(("custom-qemu" `(("custom-qemu"
;; The afl-qemu tool builds qemu 2.3.0 with a few patches applied. ;; The afl-qemu tool builds qemu 2.10.0 with a few patches applied.
,(package (inherit qemu-2.3.0) ,(package (inherit qemu-minimal)
(name "afl-qemu") (name "afl-qemu")
(inputs (inputs
`(("afl-src" ,source) `(("afl-src" ,source)
,@(package-inputs qemu-2.3.0))) ,@(package-inputs qemu-minimal)))
;; afl only supports using a single afl-qemu-trace executable, so ;; afl only supports using a single afl-qemu-trace executable, so
;; we only build qemu for the native target. ;; we only build qemu for the native target.
(arguments (arguments
`(#:modules ((srfi srfi-1) `(#:modules ((srfi srfi-1)
,@%gnu-build-system-modules) ,@%gnu-build-system-modules)
,@(substitute-keyword-arguments (package-arguments qemu-2.3.0) ,@(substitute-keyword-arguments (package-arguments qemu-minimal)
((#:configure-flags config-flags) ((#:configure-flags config-flags)
``(,(string-append "--target-list=" ,machine "-linux-user") ``(,(string-append "--target-list=" ,machine "-linux-user")
,@(remove (λ (f) (string-prefix? "--target-list=" f)) ,@(remove (λ (f) (string-prefix? "--target-list=" f))