mirror/guix
mirror/guix
1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-15 19:40:46 +02:00
Code Releases Activity

gnu: squashfs-tools: Update to 4.6.1. [security fixes]

Browse source 
This fixes CVE-2021-40153 and CVE-2021-41072.

* gnu/packages/compression.scm (squashfs-tools): Update to 4.6.1.
[arguments]: Improve style.
<#:make-flags>: Add INSTALL_MANPAGES_DIR value.
<#:phases>: Remove phase 'install-documentation. Add phase
'patch-generated-source-shebangs.
[native-inputs]: Add coreutils-minimal, help2man, which.
[inputs]: Remove labels.

Change-Id: I095427f071ad0f8d1d2609cfc4dd3ed719ece812
This commit is contained in:
Nicolas Graves 2024-11-03 17:02:09 +01:00 • committed by Zheng Junjie
parent dde8ec55b7
commit 99bac834ea
No known key found for this signature in database
GPG key ID: 3B5AA993E1A2DFF0
1 changed files with 26 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

34
gnu/packages/compression.scm
View file

@ -1023,7 +1023,7 @@ time for compression ratio.")
(define-public squashfs-tools (define-public squashfs-tools
(package (package
(name "squashfs-tools") (name "squashfs-tools")
(version "4.5") (version "4.6.1")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@ -1032,34 +1032,34 @@ time for compression ratio.")
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "18d4nwa22vgb8j2badngjngw63f0lj501cvlh3920wqy2mqxwav6")))) (base32 "14nisidxx2d2qivyv7xfcg59qkj4fjiniir7nvymazdsng63gcr1"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; no check target (list
#:tests? #f ; no check target
#:make-flags #:make-flags
(list (string-append "CC=" ,(cc-for-target)) #~(list
(string-append "CC=" #$(cc-for-target))
"XZ_SUPPORT=1" "XZ_SUPPORT=1"
"LZO_SUPPORT=1" "LZO_SUPPORT=1"
"LZ4_SUPPORT=1" "LZ4_SUPPORT=1"
"ZSTD_SUPPORT=1" "ZSTD_SUPPORT=1"
(string-append "INSTALL_DIR=" (assoc-ref %outputs "out") "/bin")) (string-append "INSTALL_DIR=" #$output "/bin")
(string-append "INSTALL_MANPAGES_DIR=" #$output "/share/man/man1"))
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(replace 'configure (replace 'configure
(lambda _ (lambda _
(chdir "squashfs-tools"))) (chdir "squashfs-tools")))
(add-after 'install 'install-documentation (add-after 'patch-source-shebangs 'patch-generated-source-shebangs
;; Install what very little usage documentation is provided. (lambda _
(lambda* (#:key outputs #:allow-other-keys) (substitute* (find-files "generate-manpages" "\\.sh")
(let* ((out (assoc-ref outputs "out")) (("print \"#!/bin/sh")
(doc (string-append out "/share/doc/" ,name))) (string-append "print \"#!" (which "sh")))))))))
(install-file "../USAGE" doc))))))) (native-inputs
(list coreutils-minimal help2man which))
(inputs (inputs
`(("lz4" ,lz4) (list lz4 lzo xz zlib `(,zstd "lib")))
("lzo" ,lzo)
("xz" ,xz)
("zlib" ,zlib)
("zstd:lib" ,zstd "lib")))
(home-page "https://github.com/plougher/squashfs-tools") (home-page "https://github.com/plougher/squashfs-tools")
(synopsis "Tools to create and extract squashfs file systems") (synopsis "Tools to create and extract squashfs file systems")
(description (description