Commit | Line | Data |
---|---|---|
e55354b8 | 1 | ;;; GNU Guix --- Functional package management for GNU |
97039f6e | 2 | ;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr> |
73161579 | 3 | ;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org> |
e596ab0f | 4 | ;;; Copyright © 2014 Alex Kost <alezost@gmail.com> |
4100fe9d | 5 | ;;; Copyright © 2014 Ricardo Wurmus <rekado@elephly.net> |
0731a47c | 6 | ;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com> |
97039f6e | 7 | ;;; Copyright © 2014 John Darrington <jmd@gnu.org> |
e55354b8 DT |
8 | ;;; |
9 | ;;; This file is part of GNU Guix. | |
10 | ;;; | |
11 | ;;; GNU Guix is free software; you can redistribute it and/or modify it | |
12 | ;;; under the terms of the GNU General Public License as published by | |
13 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
14 | ;;; your option) any later version. | |
15 | ;;; | |
16 | ;;; GNU Guix is distributed in the hope that it will be useful, but | |
17 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 | ;;; GNU General Public License for more details. | |
20 | ;;; | |
21 | ;;; You should have received a copy of the GNU General Public License | |
22 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. | |
23 | ||
24 | (define-module (gnu packages image) | |
25 | #:use-module (gnu packages) | |
97039f6e | 26 | #:use-module (gnu packages algebra) |
894e2cba | 27 | #:use-module (gnu packages autotools) |
97039f6e | 28 | #:use-module (gnu packages boost) |
e55354b8 | 29 | #:use-module (gnu packages compression) |
97039f6e | 30 | #:use-module (gnu packages doxygen) |
efa77baf | 31 | #:use-module (gnu packages fontutils) |
97039f6e | 32 | #:use-module (gnu packages ghostscript) |
060ad3de | 33 | #:use-module (gnu packages gl) |
97039f6e AE |
34 | #:use-module (gnu packages maths) |
35 | #:use-module (gnu packages perl) | |
efa77baf | 36 | #:use-module (gnu packages pkg-config) |
97039f6e | 37 | #:use-module (gnu packages python) |
efa77baf | 38 | #:use-module (gnu packages xml) |
76d88cfa | 39 | #:use-module (gnu packages xorg) |
43402c5c | 40 | #:use-module (gnu packages zip) |
b5b73a82 | 41 | #:use-module ((guix licenses) #:prefix license:) |
e55354b8 DT |
42 | #:use-module (guix packages) |
43 | #:use-module (guix download) | |
38c55e5c | 44 | #:use-module (guix build-system gnu) |
e596ab0f AK |
45 | #:use-module (guix build-system cmake) |
46 | #:use-module (srfi srfi-1)) | |
e55354b8 DT |
47 | |
48 | (define-public libpng | |
49 | (package | |
50 | (name "libpng") | |
73161579 | 51 | (version "1.5.21") |
e55354b8 DT |
52 | (source (origin |
53 | (method url-fetch) | |
54 | ||
55 | ;; Note: upstream removes older tarballs. | |
56 | (uri (list (string-append "mirror://sourceforge/libpng/libpng15/" | |
57 | version "/libpng-" version ".tar.xz") | |
58 | (string-append | |
59 | "ftp://ftp.simplesystems.org/pub/libpng/png/src" | |
60 | "/libpng15/libpng-" version ".tar.xz"))) | |
61 | (sha256 | |
73161579 | 62 | (base32 "19yvzw6sf9gf7v25ha9bla8bw1nijh82wj8ag6brjj3hpij1q5dm")))) |
e55354b8 DT |
63 | (build-system gnu-build-system) |
64 | ||
65 | ;; libpng.la says "-lz", so propagate it. | |
66 | (propagated-inputs `(("zlib" ,zlib))) | |
67 | ||
68 | (synopsis "Library for handling PNG files") | |
69 | (description | |
70 | "Libpng is the official PNG (Portable Network Graphics) reference | |
35b9e423 | 71 | library. It supports almost all PNG features and is extensible.") |
e55354b8 DT |
72 | (license license:zlib) |
73 | (home-page "http://www.libpng.org/pub/png/libpng.html"))) | |
74 | ||
75 | (define-public libjpeg | |
76 | (package | |
77 | (name "libjpeg") | |
a0e9b72e | 78 | (version "9a") |
e55354b8 DT |
79 | (source (origin |
80 | (method url-fetch) | |
81 | (uri (string-append "http://www.ijg.org/files/jpegsrc.v" | |
82 | version ".tar.gz")) | |
83 | (sha256 (base32 | |
a0e9b72e | 84 | "19q5zr4n60sjcvfbyv06n4pcl1mai3ipvnd2akflayciinj3wx9s")))) |
e55354b8 | 85 | (build-system gnu-build-system) |
35b9e423 | 86 | (synopsis "Library for handling JPEG files") |
e55354b8 DT |
87 | (description |
88 | "Libjpeg implements JPEG image encoding, decoding, and transcoding. | |
89 | JPEG is a standardized compression method for full-color and gray-scale | |
90 | images. | |
91 | The included programs provide conversion between the JPEG format and | |
92 | image files in PBMPLUS PPM/PGM, GIF, BMP, and Targa file formats.") | |
93 | (license license:ijg) | |
94 | (home-page "http://www.ijg.org/"))) | |
95 | ||
96 | (define-public libjpeg-8 | |
97 | (package (inherit libjpeg) | |
98 | (version "8d") | |
99 | (source (origin | |
100 | (method url-fetch) | |
101 | (uri (string-append "http://www.ijg.org/files/jpegsrc.v" | |
102 | version ".tar.gz")) | |
103 | (sha256 (base32 | |
104 | "1cz0dy05mgxqdgjf52p54yxpyy95rgl30cnazdrfmw7hfca9n0h0")))))) | |
105 | ||
106 | (define-public libtiff | |
107 | (package | |
108 | (name "libtiff") | |
109 | (version "4.0.3") | |
110 | (source (origin | |
111 | (method url-fetch) | |
112 | (uri (string-append "ftp://ftp.remotesensing.org/pub/libtiff/tiff-" | |
113 | version ".tar.gz")) | |
114 | (sha256 (base32 | |
115 | "0wj8d1iwk9vnpax2h29xqc2hwknxg3s0ay2d5pxkg59ihbifn6pa")))) | |
116 | (build-system gnu-build-system) | |
117 | (inputs `(("zlib" ,zlib) | |
118 | ("libjpeg-8" ,libjpeg-8))) | |
119 | ;; currently does not compile with libjpeg version 9 | |
e55354b8 DT |
120 | (arguments |
121 | `(#:configure-flags | |
122 | (list (string-append "--with-jpeg-include-dir=" | |
123 | (assoc-ref %build-inputs "libjpeg-8") | |
c198872b | 124 | "/include")))) |
35b9e423 | 125 | (synopsis "Library for handling TIFF files") |
e55354b8 DT |
126 | (description |
127 | "Libtiff provides support for the Tag Image File Format (TIFF), a format | |
128 | used for storing image data. | |
129 | Included are a library, libtiff, for reading and writing TIFF and a small | |
130 | collection of tools for doing simple manipulations of TIFF images.") | |
166191b3 LC |
131 | (license (license:non-copyleft "file://COPYRIGHT" |
132 | "See COPYRIGHT in the distribution.")) | |
e55354b8 | 133 | (home-page "http://www.libtiff.org/"))) |
efa77baf MB |
134 | |
135 | (define-public libwmf | |
136 | (package | |
137 | (name "libwmf") | |
138 | (version "0.2.8.4") | |
139 | (source | |
140 | (origin | |
141 | (method url-fetch) | |
757d5ff3 LC |
142 | (uri (string-append "mirror://sourceforge/wvware/" |
143 | name "/" version | |
144 | "/" name "-" version ".tar.gz")) | |
efa77baf MB |
145 | (sha256 |
146 | (base32 "1y3wba4q8pl7kr51212jwrsz1x6nslsx1gsjml1x0i8549lmqd2v")))) | |
147 | ||
148 | (build-system gnu-build-system) | |
149 | (inputs | |
150 | `(("freetype" ,freetype) | |
151 | ("libjpeg" ,libjpeg) | |
152 | ("libpng",libpng) | |
153 | ("libxml2" ,libxml2) | |
154 | ("zlib" ,zlib))) | |
155 | (native-inputs | |
156 | `(("pkg-config" ,pkg-config))) | |
157 | (synopsis "Library for reading images in the Microsoft WMF format") | |
158 | (description | |
159 | "libwmf is a library for reading vector images in Microsoft's native | |
160 | Windows Metafile Format (WMF) and for either (a) displaying them in, e.g., an X | |
161 | window; or (b) converting them to more standard/free file formats such as, e.g., | |
162 | the W3C's XML-based Scaleable Vector Graphic (SVG) format.") | |
163 | (home-page "http://wvware.sourceforge.net/libwmf.html") | |
164 | ||
165 | ;; 'COPYING' is the GPLv2, but file headers say LGPLv2.0+. | |
166 | (license license:lgpl2.0+))) | |
8d9872b5 | 167 | |
894e2cba TUBK |
168 | (define-public leptonica |
169 | (package | |
170 | (name "leptonica") | |
171 | (version "1.71") | |
172 | (source | |
173 | (origin | |
174 | (method url-fetch) | |
175 | (uri (string-append "http://www.leptonica.com/source/leptonica-" | |
176 | version ".tar.gz")) | |
177 | (sha256 | |
178 | (base32 "0j5qgrff6im5n9waflbi7w643q1p6mahyf2z35gb4vj9h5p76pfc")) | |
179 | (modules '((guix build utils))) | |
180 | ;; zlib and openjpg should be under Libs, not Libs.private. See: | |
181 | ;; https://code.google.com/p/tesseract-ocr/issues/detail?id=1436 | |
182 | (snippet | |
183 | '(substitute* "lept.pc.in" | |
184 | (("^(Libs\\.private: .*)@ZLIB_LIBS@(.*)" all pre post) | |
185 | (string-append pre post)) | |
186 | (("^(Libs\\.private: .*)@JPEG_LIBS@(.*)" all pre post) | |
187 | (string-append pre post)) | |
188 | (("^Libs: .*" all) | |
189 | (string-append all " @ZLIB_LIBS@ @JPEG_LIBS@")))))) | |
190 | (build-system gnu-build-system) | |
191 | (native-inputs | |
192 | `(("gnuplot" ,gnuplot))) ;needed for test suite | |
193 | (inputs | |
194 | `(("giflib" ,giflib) | |
195 | ("libjpeg" ,libjpeg) | |
196 | ("libpng" ,libpng) | |
197 | ("libtiff" ,libtiff) | |
198 | ("libwebp" ,libwebp))) | |
199 | (propagated-inputs | |
200 | `(("openjpeg" ,openjpeg) | |
201 | ("zlib" ,zlib))) | |
202 | (arguments | |
203 | '(#:phases | |
204 | (modify-phases %standard-phases | |
205 | ;; Prevent make from trying to regenerate config.h.in. | |
206 | (add-after | |
f8503e2b | 207 | 'unpack 'set-config-h-in-file-time |
894e2cba TUBK |
208 | (lambda _ |
209 | (set-file-time "config/config.h.in" (stat "configure")))) | |
210 | (add-after | |
f8503e2b | 211 | 'unpack 'patch-reg-wrapper |
894e2cba TUBK |
212 | (lambda _ |
213 | (substitute* "prog/reg_wrapper.sh" | |
214 | ((" /bin/sh ") | |
215 | (string-append " " (which "sh") " ")))))))) | |
216 | (home-page "http://www.leptonica.com/") | |
217 | (synopsis "Library and tools for image processing and analysis") | |
218 | (description | |
219 | "Leptonica is a C library and set of command-line tools for efficient | |
220 | image processing and image analysis operations. It supports rasterop, affine | |
221 | transformations, binary and grayscale morphology, rank order, and convolution, | |
222 | seedfill and connected components, image transformations combining changes in | |
223 | scale and pixel depth, and pixelwise masking, blending, enhancement, and | |
224 | arithmetic ops.") | |
225 | (license license:bsd-2))) | |
226 | ||
8d9872b5 MB |
227 | (define-public jbig2dec |
228 | (package | |
229 | (name "jbig2dec") | |
230 | (version "0.11") | |
231 | (source | |
232 | (origin | |
233 | (method url-fetch) | |
234 | (uri ;; The link on the homepage is dead. | |
235 | (string-append "http://distfiles.gentoo.org/distfiles/" name "-" | |
236 | version ".tar.gz")) | |
237 | (sha256 | |
238 | (base32 "1ffhgmf2fqzk0h4k736pp06z7q5y4x41fg844bd6a9vgncq86bby")) | |
239 | (patches (list (search-patch "jbig2dec-ignore-testtest.patch"))))) | |
240 | ||
241 | (build-system gnu-build-system) | |
242 | (synopsis "Decoder of the JBIG2 image compression format") | |
243 | (description | |
244 | "JBIG2 is designed for lossy or lossless encoding of 'bilevel' | |
245 | (1-bit monochrome) images at moderately high resolution, and in | |
246 | particular scanned paper documents. In this domain it is very | |
247 | efficient, offering compression ratios on the order of 100:1. | |
248 | ||
249 | This is a decoder only implementation, and currently is in the alpha | |
250 | stage, meaning it doesn't completely work yet. However, it is | |
251 | maintaining parity with available encoders, so it is useful for real | |
252 | work.") | |
253 | (home-page "http://jbig2dec.sourceforge.net/") | |
254 | (license license:gpl2+))) | |
38c55e5c MB |
255 | |
256 | (define-public openjpeg | |
257 | (package | |
258 | (name "openjpeg") | |
ca407756 | 259 | (version "2.1.0") |
38c55e5c MB |
260 | (source |
261 | (origin | |
262 | (method url-fetch) | |
263 | (uri | |
da2021bc RW |
264 | (string-append "mirror://sourceforge/openjpeg.mirror/" name "-" |
265 | version ".tar.gz")) | |
38c55e5c | 266 | (sha256 |
ca407756 | 267 | (base32 "00zzm303zvv4ijzancrsb1cqbph3pgz0nky92k9qx3fq9y0vnchj")))) |
38c55e5c MB |
268 | (build-system cmake-build-system) |
269 | (arguments | |
270 | ;; Trying to run `$ make check' results in a no rule fault. | |
271 | '(#:tests? #f)) | |
272 | (inputs | |
273 | `(("lcms" ,lcms) | |
274 | ("libpng" ,libpng) | |
275 | ("libtiff" ,libtiff) | |
276 | ("zlib" ,zlib))) | |
277 | (synopsis "JPEG 2000 codec") | |
278 | (description | |
279 | "The OpenJPEG library is a JPEG 2000 codec written in C. It has | |
280 | been developed in order to promote the use of JPEG 2000, the new | |
281 | still-image compression standard from the Joint Photographic Experts | |
282 | Group (JPEG). | |
283 | ||
284 | In addition to the basic codec, various other features are under | |
285 | development, among them the JP2 and MJ2 (Motion JPEG 2000) file formats, | |
286 | an indexing tool useful for the JPIP protocol, JPWL-tools for | |
287 | error-resilience, a Java-viewer for j2k-images, ...") | |
4100fe9d | 288 | (home-page "https://code.google.com/p/openjpeg/") |
38c55e5c | 289 | (license license:bsd-2))) |
76d88cfa | 290 | |
ca407756 EB |
291 | (define-public openjpeg-2.0 |
292 | (package (inherit openjpeg) | |
293 | (name "openjpeg") | |
294 | (version "2.0.1") | |
295 | (source | |
296 | (origin | |
297 | (method url-fetch) | |
298 | (uri | |
299 | (string-append "mirror://sourceforge/openjpeg.mirror/" name "-" | |
300 | version ".tar.gz")) | |
301 | (sha256 | |
302 | (base32 "1c2xc3nl2mg511b63rk7hrckmy14681p1m44mzw3n1fyqnjm0b0z")))))) | |
303 | ||
6140b9d8 RW |
304 | (define-public openjpeg-1 |
305 | (package (inherit openjpeg) | |
306 | (name "openjpeg") | |
307 | (version "1.5.2") | |
308 | (source | |
309 | (origin | |
310 | (method url-fetch) | |
311 | (uri | |
312 | (string-append "mirror://sourceforge/openjpeg.mirror/" name "-" | |
313 | version ".tar.gz")) | |
314 | (sha256 | |
315 | (base32 "11waq9w215zvzxrpv40afyd18qf79mxc28fda80bm3ax98cpppqm")))))) | |
316 | ||
e596ab0f AK |
317 | (define-public giflib |
318 | (package | |
319 | (name "giflib") | |
320 | (version "4.2.3") | |
321 | (source (origin | |
322 | (method url-fetch) | |
323 | (uri (string-append "mirror://sourceforge/giflib/giflib-" | |
324 | (first (string-split version #\.)) | |
325 | ".x/giflib-" version ".tar.bz2")) | |
326 | (sha256 | |
327 | (base32 "0rmp7ipzk42r841bggd7bfqk4p8qsssbp4wcck4qnz7p4rkxbj0a")))) | |
328 | (build-system gnu-build-system) | |
329 | (outputs '("bin" ; utility programs | |
330 | "out")) ; library | |
331 | (inputs `(("libx11" ,libx11) | |
332 | ("libice" ,libice) | |
333 | ("libsm" ,libsm) | |
334 | ("perl" ,perl))) | |
335 | (arguments | |
336 | `(#:phases (alist-cons-after | |
337 | 'unpack 'disable-html-doc-gen | |
338 | (lambda _ | |
339 | (substitute* "doc/Makefile.in" | |
340 | (("^all: allhtml manpages") ""))) | |
341 | (alist-cons-after | |
342 | 'install 'install-manpages | |
343 | (lambda* (#:key outputs #:allow-other-keys) | |
344 | (let* ((bin (assoc-ref outputs "bin")) | |
345 | (man1dir (string-append bin "/share/man/man1"))) | |
346 | (mkdir-p man1dir) | |
347 | (for-each (lambda (file) | |
348 | (let ((base (basename file))) | |
349 | (format #t "installing `~a' to `~a'~%" | |
350 | base man1dir) | |
351 | (copy-file file | |
352 | (string-append | |
353 | man1dir "/" base)))) | |
354 | (find-files "doc" "\\.1")))) | |
355 | %standard-phases)))) | |
356 | (synopsis "Tools and library for working with GIF images") | |
357 | (description | |
35b9e423 | 358 | "GIFLIB is a library for reading and writing GIF images. It is API and |
e596ab0f AK |
359 | ABI compatible with libungif which was in wide use while the LZW compression |
360 | algorithm was patented. Tools are also included to convert, manipulate, | |
361 | compose, and analyze GIF images.") | |
362 | (home-page "http://giflib.sourceforge.net/") | |
363 | (license license:x11))) | |
364 | ||
0731a47c TUBK |
365 | (define-public libungif |
366 | (package | |
367 | (name "libungif") | |
368 | (version "4.1.4") | |
369 | (source (origin | |
370 | (method url-fetch) | |
371 | (uri (string-append "mirror://sourceforge/giflib/libungif-" | |
372 | version ".tar.bz2")) | |
373 | (sha256 | |
374 | (base32 | |
375 | "0cnksimmmjngdrys302ik1385sg1sj4i0gxivzldhgwd46n7x2kh")))) | |
376 | (build-system gnu-build-system) | |
377 | (inputs `(("perl" ,perl))) ;package ships some perl tools | |
378 | (home-page "http://giflib.sourceforge.net/") | |
379 | (synopsis "GIF decompression library") | |
380 | (description | |
381 | "libungif is the old GIF decompression library by the GIFLIB project.") | |
382 | (license license:expat))) | |
383 | ||
76d88cfa AK |
384 | (define-public imlib2 |
385 | (package | |
386 | (name "imlib2") | |
387 | (version "1.4.6") | |
388 | (source (origin | |
389 | (method url-fetch) | |
390 | (uri (string-append | |
391 | "mirror://sourceforge/enlightenment/imlib2-" | |
392 | version ".tar.gz")) | |
393 | (sha256 | |
394 | (base32 | |
395 | "0kjggg4gfn6chi8v1xddd5qwk1fbnl7rvd93qiclv5v11s615k0p")))) | |
396 | (build-system gnu-build-system) | |
397 | (arguments | |
398 | '(;; Will be fixed in the next release: | |
399 | ;; <http://git.enlightenment.org/legacy/imlib2.git/commit/?id=5dde234b2d3caf067ea827858c53adc5d4c56c13>. | |
400 | #:phases (alist-cons-before | |
401 | 'configure 'patch-config | |
402 | (lambda _ | |
403 | (substitute* "imlib2-config.in" | |
404 | (("@my_libs@") ""))) | |
405 | %standard-phases))) | |
406 | (native-inputs | |
407 | `(("pkgconfig" ,pkg-config))) | |
408 | (inputs | |
409 | `(("libx11" ,libx11) | |
410 | ("libxext" ,libxext) | |
411 | ("freetype" ,freetype) | |
412 | ("libjpeg" ,libjpeg) | |
413 | ("libpng" ,libpng) | |
414 | ("libtiff" ,libtiff) | |
415 | ("giflib" ,giflib) | |
416 | ("bzip2" ,bzip2))) | |
417 | (home-page "http://sourceforge.net/projects/enlightenment/") | |
418 | (synopsis | |
419 | "Loading, saving, rendering and manipulating image files") | |
420 | (description | |
421 | "Imlib2 is a library that does image file loading and saving as well as | |
422 | rendering, manipulation, arbitrary polygon support, etc. | |
423 | ||
424 | It does ALL of these operations FAST. Imlib2 also tries to be highly | |
425 | intelligent about doing them, so writing naive programs can be done easily, | |
426 | without sacrificing speed. | |
427 | ||
428 | This is a complete rewrite over the Imlib 1.x series. The architecture is | |
429 | more modular, simple, and flexible.") | |
8835aed4 | 430 | (license license:imlib2))) |
f7d28082 AK |
431 | |
432 | (define-public giblib | |
433 | (package | |
434 | (name "giblib") | |
435 | (version "1.2.4") | |
436 | (source (origin | |
437 | (method url-fetch) | |
438 | (uri (string-append | |
439 | "http://linuxbrit.co.uk/downloads/giblib-" | |
440 | version ".tar.gz")) | |
441 | (sha256 | |
442 | (base32 | |
443 | "1b4bmbmj52glq0s898lppkpzxlprq9aav49r06j2wx4dv3212rhp")))) | |
444 | (build-system gnu-build-system) | |
445 | (inputs | |
446 | `(("libx11" ,libx11) | |
447 | ("imlib2" ,imlib2))) | |
448 | (home-page "http://linuxbrit.co.uk/software/") ; no real home-page | |
449 | (synopsis "Wrapper library for imlib2") | |
450 | (description | |
35b9e423 | 451 | "Giblib is a simple library which wraps imlib2's context API, avoiding |
f7d28082 AK |
452 | all the context_get/set calls, adds fontstyles to the truetype renderer and |
453 | supplies a generic doubly-linked list and some string functions.") | |
454 | ;; This license removes a clause about X Consortium from the original | |
455 | ;; X11 license. | |
456 | (license (license:x11-style "file://COPYING" | |
457 | "See 'COPYING' in the distribution.")))) | |
43402c5c DT |
458 | |
459 | (define-public freeimage | |
460 | (package | |
461 | (name "freeimage") | |
462 | (version "3.16.0") | |
463 | (source (origin | |
464 | (method url-fetch) | |
465 | (uri (string-append | |
466 | "mirror://sourceforge/freeimage/Source%20Distribution/" | |
467 | version "/FreeImage" | |
468 | (string-join (string-split version #\.) "") | |
469 | ".zip")) | |
470 | (sha256 | |
471 | (base32 | |
472 | "0q1gnjnxgphsh4l8i9rfly4bi8xsczsb9ryzbm8hf38lc3fk5bq3")))) | |
473 | (build-system gnu-build-system) | |
474 | (arguments | |
da6dd842 LC |
475 | '(#:phases (alist-delete |
476 | 'configure | |
477 | (alist-cons-before | |
478 | 'build 'patch-makefile | |
479 | (lambda* (#:key outputs #:allow-other-keys) | |
480 | (substitute* "Makefile.gnu" | |
481 | (("/usr") (assoc-ref outputs "out")) | |
482 | (("-o root -g root") ""))) | |
483 | %standard-phases)) | |
43402c5c DT |
484 | #:make-flags '("CC=gcc") |
485 | #:tests? #f)) ; no check target | |
486 | (native-inputs | |
487 | `(("unzip" ,unzip))) | |
f9664de7 DT |
488 | ;; Fails to build on MIPS due to assembly code in the source. |
489 | (supported-systems (delete "mips64el-linux" %supported-systems)) | |
43402c5c DT |
490 | (synopsis "Library for handling popular graphics image formats") |
491 | (description | |
492 | "FreeImage is a library for developers who would like to support popular | |
493 | graphics image formats like PNG, BMP, JPEG, TIFF and others.") | |
494 | (license license:gpl2+) | |
495 | (home-page "http://freeimage.sourceforge.net"))) | |
97039f6e AE |
496 | |
497 | (define-public vigra | |
498 | (package | |
499 | (name "vigra") | |
500 | (version "1.10.0") | |
501 | (source | |
502 | (origin | |
503 | (method url-fetch) | |
504 | (uri (string-append "https://hci.iwr.uni-heidelberg.de/vigra/vigra-" | |
505 | version "-src.tar.gz")) | |
506 | (sha256 (base32 | |
507 | "16d0jvz3k49niljg9qvvlyxxl15yk0300xkymvyznlmvn1hs7m22")))) | |
508 | (build-system cmake-build-system) | |
509 | (inputs | |
510 | `(("boost" ,boost) | |
511 | ("fftw" ,fftw) | |
512 | ("fftwf" ,fftwf) | |
513 | ("hdf5" ,hdf5) | |
514 | ("libjpeg" ,libjpeg) | |
515 | ("libpng" ,libpng) | |
516 | ("libtiff" ,libtiff) | |
517 | ("python" ,python-2) ; print syntax | |
518 | ("python2-numpy" ,python2-numpy) | |
519 | ("zlib" ,zlib))) | |
520 | (native-inputs | |
521 | `(("doxygen" ,doxygen) | |
522 | ("python2-nose" ,python2-nose) | |
523 | ("python2-sphinx" ,python2-sphinx))) | |
524 | (arguments | |
525 | `(#:test-target "check" | |
526 | #:configure-flags | |
527 | (list "-Wno-dev" ; suppress developer mode with lots of warnings | |
528 | (string-append "-DVIGRANUMPY_INSTALL_DIR=" | |
529 | (assoc-ref %outputs "out") | |
530 | "/lib/python2.7/site-packages")))) | |
531 | (synopsis "Computer vision library") | |
532 | (description | |
533 | "VIGRA stands for Vision with Generic Algorithms. It is an image | |
534 | processing and analysis library that puts its main emphasis on customizable | |
535 | algorithms and data structures. It is particularly strong for | |
536 | multi-dimensional image processing.") | |
537 | (license license:expat) | |
538 | (home-page "https://hci.iwr.uni-heidelberg.de/vigra"))) | |
060ad3de TUBK |
539 | |
540 | (define-public libwebp | |
541 | (package | |
542 | (name "libwebp") | |
543 | (version "0.4.3") | |
544 | (source | |
545 | (origin | |
546 | (method url-fetch) | |
547 | (uri (string-append | |
548 | "http://downloads.webmproject.org/releases/webp/libwebp-" version | |
549 | ".tar.gz")) | |
550 | (sha256 | |
551 | (base32 "1i4hfczjm3b1qj1g4cc9hgb69l47f3nkgf6hk7nz4dm9zmc0vgpg")))) | |
552 | (build-system gnu-build-system) | |
553 | (inputs | |
554 | `(("freeglut" ,freeglut) | |
555 | ("giflib" ,giflib) | |
556 | ("libjpeg" ,libjpeg) | |
557 | ("libpng" ,libpng) | |
558 | ("libtiff" ,libtiff))) | |
559 | (arguments | |
560 | '(#:configure-flags '("--enable-libwebpmux" | |
561 | "--enable-libwebpdemux" | |
562 | "--enable-libwebpdecoder"))) | |
563 | (home-page "https://developers.google.com/speed/webp/") | |
564 | (synopsis "Lossless and lossy image compression") | |
565 | (description | |
566 | "WebP is a new image format that provides lossless and lossy compression | |
567 | for images. WebP lossless images are 26% smaller in size compared to | |
568 | PNGs. WebP lossy images are 25-34% smaller in size compared to JPEG images at | |
569 | equivalent SSIM index. WebP supports lossless transparency (also known as | |
570 | alpha channel) with just 22% additional bytes. Transparency is also supported | |
571 | with lossy compression and typically provides 3x smaller file sizes compared | |
572 | to PNG when lossy compression is acceptable for the red/green/blue color | |
573 | channels.") | |
574 | (license license:bsd-3))) |