gnu: arm-trusted-firmware: Remove blobs in a snippet.

* gnu/packages/firmware.scm (make-arm-trusted-firmware)[source]: Add
snippet to remove binary blobs.
[arguments]: Remove related phase.
This commit is contained in:
Efraim Flashner 2022-11-24 10:17:11 +02:00
parent 255450bed2
commit b3beeaa309
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -656,18 +656,19 @@ (define* (make-arm-trusted-firmware platform #:optional (arch "aarch64"))
(file-name (git-file-name "arm-trusted-firmware" version))
(sha256
(base32
"0grq3fgxi9xhcljnhwlxjvdghyz15gaq50raw41xy4lm8rkmnzp3"))))
"0grq3fgxi9xhcljnhwlxjvdghyz15gaq50raw41xy4lm8rkmnzp3"))
(snippet
#~(begin
(use-modules (guix build utils))
;; Remove binary blobs which do not contain source or proper license.
(for-each (lambda (file)
(delete-file file))
(find-files "." "\\.bin$"))))))
(build-system gnu-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(delete 'configure) ; no configure script
;; Remove binary blobs which do not contain source or proper license.
(add-after 'unpack 'remove-binary-blobs
(lambda _
(for-each (lambda (file)
(delete-file file))
(find-files "." "\\.bin$"))))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))