diff options
author | Pierre Neidhardt <ambrevar@gmail.com> | 2018-05-26 22:10:57 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2018-05-26 22:11:18 +0200 |
commit | 5735256d0b5161ae99ad6e531748fce2d1bfa1b0 (patch) | |
tree | 2b0f43f153e7368ba93abec3d90e15d178ce5ad9 /gnu | |
parent | 719871771d4fd6482878d1fedc3505c5d54c6622 (diff) | |
download | guix-patches-5735256d0b5161ae99ad6e531748fce2d1bfa1b0.tar guix-patches-5735256d0b5161ae99ad6e531748fce2d1bfa1b0.tar.gz |
gnu: Add upx.
* gnu/packages/compression.scm (upx): New variable.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/compression.scm | 50 |
1 files changed, 50 insertions, 0 deletions
diff --git a/gnu/packages/compression.scm b/gnu/packages/compression.scm index 4ce481ad19..29518b115d 100644 --- a/gnu/packages/compression.scm +++ b/gnu/packages/compression.scm @@ -2174,3 +2174,53 @@ Decompression requires no additional memory. Compared to LZO, the UCL algorithms achieve a better compression ratio but decompression is a little bit slower.") (license license:gpl2+))) + +(define-public upx + (package + (name "upx") + (version "3.94") + (source (origin + (method url-fetch) + (uri (string-append "https://github.com/upx/upx/releases/download/v" + version "/" name "-" version "-src.tar.xz")) + (sha256 + (base32 + "08anybdliqsbsl6x835iwzljahnm9i7v26icdjkcv33xmk6p5vw1")))) + (build-system gnu-build-system) + (native-inputs `(("perl" ,perl) + ("ucl" ,ucl))) + (inputs `(("zlib" ,zlib))) + (arguments + `(#:make-flags + (list "all" + ;; CHECK_WHITESPACE does not seem to work. + ;; See https://git.archlinux.org/svntogit/community.git/tree/trunk/PKGBUILD?h=packages/upx. + "CHECK_WHITESPACE=true") + #:phases + (modify-phases %standard-phases + (delete 'configure) + (delete 'check) + (delete 'install) + (add-before 'build 'patch-exec-bin-sh + (lambda _ + (substitute* (find-files "Makefile") + (("/bin/sh") (which "sh"))) + (substitute* "src/Makefile" + (("/bin/sh") (which "sh"))) + #t)) + (add-after 'build 'install-upx + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (bin (string-append out "/bin"))) + (mkdir-p bin) + (copy-file "src/upx.out" (string-append bin "/upx"))) + #t)) + ))) + (home-page "https://upx.github.io/") + (synopsis "Compression tool for executables") + (description + "The Ultimate Packer for eXecutables (UPX) is an executable file +compressor. UPX typically reduces the file size of programs and shared +libraries by around 50%--70%, thus reducing disk space, network load times, +download times, and other distribution and storage costs.") + (license license:gpl2+))) |