HCoop / jackhill / guix / guix.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
gnu: bdb: Update to 6.2.23.
[jackhill/guix/guix.git] / gnu / packages / video.scm
CommitLineData
39efcc9b 1;;; GNU Guix --- Functional package management for GNU
71ee51a0 2;;; Copyright © 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr>
945d985a 3;;; Copyright © 2014, 2015, 2016 David Thompson <davet@gnu.org>
ca3f9952 4;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org>
cda163cd 5;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
26da7c26 6;;; Copyright © 2015, 2016 Efraim Flashner <efraim@flashner.co.il>
12f92e38 7;;; Copyright © 2015 Andy Patterson <ajpatter@uwaterloo.ca>
307ad140 8;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
2ad9515c 9;;; Copyright © 2015 Alex Vong <alexvong1995@gmail.com>
39efcc9b
AE		 10;;;
11;;; This file is part of GNU Guix.
12;;;
13;;; GNU Guix is free software; you can redistribute it and/or modify it
14;;; under the terms of the GNU General Public License as published by
15;;; the Free Software Foundation; either version 3 of the License, or (at
16;;; your option) any later version.
17;;;
18;;; GNU Guix is distributed in the hope that it will be useful, but
19;;; WITHOUT ANY WARRANTY; without even the implied warranty of
20;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21;;; GNU General Public License for more details.
22;;;
23;;; You should have received a copy of the GNU General Public License
24;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
25
26(define-module (gnu packages video)
fe138965 27 #:use-module (ice-9 match)
ae0bdd81 28 #:use-module ((guix licenses) #:prefix license:)
e930c2a3 29 #:use-module (guix utils)
39efcc9b
AE		 30 #:use-module (guix packages)
31 #:use-module (guix download)
38829eac 32 #:use-module (guix git-download)
44726031 33 #:use-module (guix build-system cmake)
39efcc9b 34 #:use-module (guix build-system gnu)
615215a5 35 #:use-module (guix build-system python)
1c1178cd 36 #:use-module (guix build-system waf)
3b02429c 37 #:use-module (gnu packages)
39efcc9b 38 #:use-module (gnu packages algebra)
72bfebf5 39 #:use-module (gnu packages audio)
f1044010 40 #:use-module (gnu packages autotools)
d5a748e8 41 #:use-module (gnu packages avahi)
38829eac 42 #:use-module (gnu packages base)
d5a748e8 43 #:use-module (gnu packages cdrom)
39efcc9b 44 #:use-module (gnu packages compression)
f464016d 45 #:use-module (gnu packages curl)
44726031 46 #:use-module (gnu packages databases)
f22e0e26 47 #:use-module (gnu packages elf)
39efcc9b 48 #:use-module (gnu packages fontutils)
44726031
AE		 49 #:use-module (gnu packages fribidi)
50 #:use-module (gnu packages gettext)
38829eac 51 #:use-module (gnu packages ghostscript)
d5a748e8
AE		 52 #:use-module (gnu packages gl)
53 #:use-module (gnu packages glib)
2cd85cf9 54 #:use-module (gnu packages guile)
d5a748e8 55 #:use-module (gnu packages gnupg)
44726031 56 #:use-module (gnu packages gtk)
e55354b8 57 #:use-module (gnu packages image)
d5a748e8
AE		 58 #:use-module (gnu packages linux)
59 #:use-module (gnu packages lua)
60 #:use-module (gnu packages mp3)
4d94b93c 61 #:use-module (gnu packages ncurses)
6f6c8b65 62 #:use-module (gnu packages ocr)
39efcc9b
AE		 63 #:use-module (gnu packages perl)
64 #:use-module (gnu packages pkg-config)
a7d94b54 65 #:use-module (gnu packages popt)
d5a748e8 66 #:use-module (gnu packages pulseaudio)
39efcc9b 67 #:use-module (gnu packages python)
d5a748e8
AE		 68 #:use-module (gnu packages qt)
69 #:use-module (gnu packages sdl)
70 #:use-module (gnu packages ssh)
6b2c6be0 71 #:use-module (gnu packages texinfo)
c426e61e 72 #:use-module (gnu packages textutils)
a7fd7b68 73 #:use-module (gnu packages tls)
d5a748e8 74 #:use-module (gnu packages version-control)
bb470bd3 75 #:use-module (gnu packages web)
ee3b55ea 76 #:use-module (gnu packages xdisorg)
54ff0b7d 77 #:use-module (gnu packages xiph)
d5a748e8
AE		 78 #:use-module (gnu packages xml)
79 #:use-module (gnu packages xorg)
44726031
AE		 80 #:use-module (gnu packages yasm)
81 #:use-module (gnu packages zip))
39efcc9b 82
6b2c6be0
SB		 83(define-public aalib
84 (package
85 (name "aalib")
86 (version "1.4rc5")
87 (source (origin
88 (method url-fetch)
89 (uri (string-append "mirror://sourceforge/aa-project/"
90 name "-" version ".tar.gz"))
91 (sha256
92 (base32
93 "1vkh19gb76agvh4h87ysbrgy82hrw88lnsvhynjf4vng629dmpgv"))))
94 (build-system gnu-build-system)
95 (native-inputs
96 `(("makeinfo" ,texinfo)))
97 (inputs
98 `(("ncurses" ,ncurses)))
99 (arguments
100 '(#:phases
101 (modify-phases %standard-phases
3a4de6b2 102 (replace 'configure
014cbde6 103 (lambda* (#:key build inputs outputs #:allow-other-keys)
6b2c6be0
SB		 104 ;; This old `configure' script doesn't support
105 ;; variables passed as arguments.
106 (let ((out (assoc-ref outputs "out"))
107 (ncurses (assoc-ref inputs "ncurses")))
108 (setenv "CONFIG_SHELL" (which "bash"))
109 (zero? (system* "./configure"
110 (string-append "--prefix=" out)
014cbde6 111 (string-append "--build=" build)
6b2c6be0
SB		 112 (string-append "--with-ncurses="
113 ncurses)))))))))
114 (home-page "http://aa-project.sourceforge.net/aalib/")
115 (synopsis "ASCII-art library")
116 (description
117 "AA-lib is a low level gfx library which does not require graphics device.
118In fact, there is no graphical output possible. AA-lib replaces those
119old-fashioned output methods with powerful ascii-art renderer.")
120 (license license:lgpl2.0+)))
121
cda163cd
TUBK		 122(define-public liba52
123 (package
124 (name "liba52")
125 (version "0.7.4")
126 (source (origin
127 (method url-fetch)
8c056935
TUBK		 128 (uri (string-append
129 ;; A mirror://sourceforge URI doesn't work, presumably
130 ;; because the SourceForge project is misconfigured.
131 "http://liba52.sourceforge.net/files/a52dec-" version
132 ".tar.gz"))
cda163cd
TUBK		 133 (sha256
134 (base32
23da88f6 135 "0czccp4fcpf2ykp16xcrzdfmnircz1ynhls334q374xknd5747d2"))
fc1adab1
AK		 136 (patches (search-patches "liba52-enable-pic.patch"
137 "liba52-set-soname.patch"
138 "liba52-use-mtune-not-mcpu.patch"
139 "liba52-link-with-libm.patch"))))
cda163cd 140 (build-system gnu-build-system)
23da88f6
MW		 141 ;; XXX We need to run ./bootstrap because of the build system fixes above.
142 (native-inputs
143 `(("autoconf" ,autoconf)
144 ("automake" ,automake)
145 ("libtool" ,libtool)))
412a2422 146 (arguments `(#:configure-flags '("--enable-shared")
23da88f6
MW		 147 #:phases
148 (modify-phases %standard-phases
149 ;; XXX We need to run ./bootstrap because of the build
150 ;; system fixes above.
151 (add-after
152 'unpack 'bootstrap
153 (lambda _ (zero? (system* "sh" "bootstrap")))))))
cda163cd
TUBK		 154 (home-page "http://liba52.sourceforge.net/")
155 (synopsis "ATSC A/52 stream decoder")
156 (description "liba52 is a library for decoding ATSC A/52 streams. The
157A/52 standard is used in a variety of applications, including digital
158television and DVD. It is also known as AC-3.")
ae0bdd81 159 (license license:gpl2+)))
cda163cd 160
e0884109
MW		 161(define-public libmpeg2
162 (package
163 (name "libmpeg2")
164 (version "0.5.1")
165 (source (origin
166 (method url-fetch)
167 ;; A mirror://sourceforge URI doesn't work, presumably
168 ;; because the SourceForge project is misconfigured.
169 (uri (string-append "http://libmpeg2.sourceforge.net/files/"
170 name "-" version ".tar.gz"))
171 (sha256
172 (base32
173 "1m3i322n2fwgrvbs1yck7g5md1dbg22bhq5xdqmjpz5m7j4jxqny"))))
174 (inputs
175 `(("libx11" ,libx11)
176 ("libxext" ,libxext)
177 ("libxv" ,libxv)
178 ("libsm" ,libsm)
179 ("libice" ,libice)
180 ("sdl" ,sdl)))
181 (build-system gnu-build-system)
182 (home-page "http://libmpeg2.sourceforge.net/")
183 (synopsis "MPEG1 and MPEG2 video decoder library")
184 (description
185 "libmpeg2 is a library which can decode MPEG1 and MPEG2 video streams.")
186 (license license:gpl2+)))
187
82712597
MW		 188(define-public libx264
189 (package
190 (name "libx264")
466a7d70 191 (version "20160220-2245")
82712597
MW		 192 (source (origin
193 (method url-fetch)
735e84c7 194 (uri (string-append "http://download.videolan.org/pub/x264/snapshots/"
82712597
MW		 195 "x264-snapshot-" version ".tar.bz2"))
196 (sha256
197 (base32
466a7d70 198 "12zyzbiihfhamf7yi4qqaj6k0nisnrydvfr36kxadvmsm7dg4sj3"))))
82712597
MW		 199 (build-system gnu-build-system)
200 (native-inputs
201 `(("pkg-config" ,pkg-config)
202 ("yasm" ,yasm)))
203 ;; TODO: Add gpac input
204 (arguments
205 `(#:tests? #f ;no check target
206 #:configure-flags '("--enable-shared"
207 ;; Don't build the command-line program. If we
208 ;; want it later, we should do so in a different
209 ;; package to avoid a circular dependency (the x264
210 ;; program depends on ffmpeg and ffmpeg depends on
211 ;; libx264).
212 "--disable-cli")))
213 (home-page "http://www.videolan.org/developers/x264.html")
214 (synopsis "H.264 video coding library")
215 (description "libx264 is an advanced encoding library for creating
216H.264 (MPEG-4 AVC) video streams.")
217 (license (list license:gpl2+ ;most files
218 license:isc ;common/x86/x86inc.asm
219 license:lgpl2.1+ ;extras/getopt.c
220 license:bsd-3 ;extras/inttypes.h
221 (license:non-copyleft ;extras/cl*.h
222 "file://extras/cl.h"
223 "See extras/cl.h in the distribution.")))))
224
c426e61e
TUBK		 225(define-public libass
226 (package
227 (name "libass")
97206519 228 (version "0.13.2")
c426e61e
TUBK		 229 (source (origin
230 (method url-fetch)
231 (uri (string-append
232 "https://github.com/libass/libass/releases/download/"
233 version "/libass-" version ".tar.xz"))
234 (sha256
235 (base32
97206519 236 "1kpsw4zw95v4cjvild9wpk73dzavn1khsm3bm32kcz6amnkd166n"))))
c426e61e
TUBK		 237 (build-system gnu-build-system)
238 (native-inputs
239 `(("pkg-config" ,pkg-config)
240 ("yasm" ,yasm)))
241 (propagated-inputs
242 `(("freetype" ,freetype)
243 ("fribidi" ,fribidi)
244 ("fontconfig" ,fontconfig)
245 ("harfbuzz" ,harfbuzz)
246 ("enca" ,enca)))
247 (home-page "https://github.com/libass/libass")
248 (synopsis "Subtitle rendering library for the ASS/SSA format")
249 (description "libass is a subtitle rendering library for the
250ASS/SSA (Advanced Substation Alpha/SubStation Alpha) subtitle format.")
ae0bdd81 251 (license license:isc)))
c426e61e 252
4d94b93c
TUBK		 253(define-public libcaca
254 (package
255 (name "libcaca")
256 (version "0.99.beta19")
257 (source (origin
258 (method url-fetch)
259 (uri (string-append "http://caca.zoy.org/files/libcaca/libcaca-"
260 version ".tar.gz"))
261 (sha256
262 (base32
263 "1x3j6yfyxl52adgnabycr0n38j9hx2j74la0hz0n8cnh9ry4d2qj"))))
264 (build-system gnu-build-system)
265 (native-inputs `(("pkg-config" ,pkg-config)))
266 (inputs
267 `(("freeglut" ,freeglut)
268 ("ftgl" ,ftgl)
269 ("libx11" ,libx11)
270 ("mesa" ,mesa)
271 ("ncurses" ,ncurses)
272 ("zlib" ,zlib)))
273 (home-page "http://caca.zoy.org/wiki/libcaca")
274 (synopsis "Colour ASCII-art library")
275 (description "libcaca is a graphics library that outputs text instead of
276pixels, so that it can work on older video cards or text terminals. It
277supports Unicode, 2048 colors, dithering of color images, and advanced text
278canvas operations.")
ae0bdd81 279 (license (license:fsf-free "file://COPYING")))) ;WTFPL version 2
4d94b93c 280
3bfb78dc
TUBK		 281(define-public libdca
282 (package
283 (name "libdca")
284 (version "0.0.5")
285 (source (origin
286 (method url-fetch)
287 (uri (string-append
288 "http://download.videolan.org/pub/videolan/libdca/"
289 version "/libdca-" version ".tar.bz2"))
290 (sha256
291 (base32
292 "0hh6a7l8vvccsd5i1fkv9av2gzv9fy8m0b8jpsn5p6hh4bh2586v"))))
293 (build-system gnu-build-system)
294 (home-page "http://www.videolan.org/developers/libdca.html")
295 (synopsis "DTS Coherent Acoustics decoder")
296 (description "libdca is a library for decoding DTS Coherent Acoustics
297streams.")
ae0bdd81 298 (license license:gpl2+)))
3bfb78dc 299
99d4c455
TUBK		 300(define-public libdv
301 (package
302 (name "libdv")
303 (version "1.0.0")
304 (source (origin
305 (method url-fetch)
306 (uri (string-append
307 "mirror://sourceforge/libdv/libdv-" version ".tar.gz"))
308 (sha256
309 (base32
310 "1fl96f2xh2slkv1i1ix7kqk576a0ak1d33cylm0mbhm96d0761d3"))))
311 (build-system gnu-build-system)
312 (native-inputs `(("pkg-config" ,pkg-config)))
313 (inputs `(("libxv" ,libxv)))
314 (home-page "http://libdv.sourceforge.net/")
315 (synopsis "DV video (IEC 61834 and SMPTE 314M) codec")
316 (description "The Quasar DV codec (libdv) is a software codec for DV
317video, the encoding format used by most digital camcorders, typically those
318that support the IEEE 1394 (a.k.a. FireWire or i.Link) interface. Libdv was
319developed according to the official standards for DV video: IEC 61834 and
320SMPTE 314M.")
ae0bdd81 321 (license license:lgpl2.1+)))
99d4c455 322
ee3b55ea
TUBK		 323(define-public libva
324 (package
325 (name "libva")
26fceae2 326 (version "1.6.1")
ee3b55ea
TUBK		 327 (source
328 (origin
329 (method url-fetch)
330 (uri (string-append
5cc3096c 331 "https://www.freedesktop.org/software/vaapi/releases/libva/libva-"
ee3b55ea
TUBK		 332 version".tar.bz2"))
333 (sha256
26fceae2 334 (base32 "0bjfb5s8dk3lql843l91ffxzlq47isqks5sj19cxh7j3nhzw58kz"))))
ee3b55ea
TUBK		 335 (build-system gnu-build-system)
336 (native-inputs
337 `(("pkg-config" ,pkg-config)))
338 (inputs
339 `(("libdrm" ,libdrm)
340 ("libx11" ,libx11)
341 ("libxext" ,libxext)
342 ("libxfixes" ,libxfixes)
343 ("mesa" ,mesa)))
372cf039
TUBK		 344 (arguments
345 `(#:phases
346 (modify-phases %standard-phases
347 (add-before
348 'build 'fix-dlopen-paths
349 (lambda* (#:key outputs #:allow-other-keys)
350 (let ((out (assoc-ref outputs "out")))
351 (substitute* "va/drm/va_drm_auth_x11.c"
352 (("\"libva-x11\\.so\\.%d\"")
353 (string-append "\"" out "/lib/libva-x11.so.%d\"")))))))
354 ;; Most drivers are in mesa's $prefix/lib/dri, so use that. (Can be
355 ;; overridden at run-time via LIBVA_DRIVERS_PATH.)
356 #:configure-flags
357 (list (string-append "--with-drivers-path="
358 (assoc-ref %build-inputs "mesa") "/lib/dri"))
359 ;; However, we can't write to mesa's store directory, so override the
360 ;; following make variable to install the dummy driver to libva's
361 ;; $prefix/lib/dri directory.
362 #:make-flags
363 (list (string-append "dummy_drv_video_ladir="
364 (assoc-ref %outputs "out") "/lib/dri"))))
26fceae2 365 (home-page "http://www.freedesktop.org/wiki/Software/vaapi/")
ee3b55ea
TUBK		 366 (synopsis "Video acceleration library")
367 (description "The main motivation for VA-API (Video Acceleration API) is
368to enable hardware accelerated video decode/encode at various
369entry-points (VLD, IDCT, Motion Compensation etc.) for prevailing coding
370standards (MPEG-2, MPEG-4 ASP/H.263, MPEG-4 AVC/H.264, and VC-1/VMW3).")
ae0bdd81 371 (license license:expat)))
ee3b55ea 372
39efcc9b
AE		 373(define-public ffmpeg
374 (package
375 (name "ffmpeg")
702bfbf1 376 (version "3.0.2")
39efcc9b
AE		 377 (source (origin
378 (method url-fetch)
a1121a7f
EF		 379 (uri (string-append "https://ffmpeg.org/releases/ffmpeg-"
380 version ".tar.xz"))
39efcc9b
AE		 381 (sha256
382 (base32
702bfbf1 383 "08sjp4dxgcinmv9ly7nm24swmn2cnbbhvph44ihlplf4n33kr542"))))
39efcc9b
AE		 384 (build-system gnu-build-system)
385 (inputs
c4c4cc05 386 `(("fontconfig" ,fontconfig)
39efcc9b 387 ("freetype" ,freetype)
c8dab7f4 388 ("gnutls" ,gnutls)
e816b348 389 ("opus" ,opus)
71241192 390 ("ladspa" ,ladspa)
d4f12db8 391 ("lame" ,lame)
c426e61e 392 ("libass" ,libass)
5d3609e4 393 ("libbluray" ,libbluray)
4d94b93c 394 ("libcaca" ,libcaca)
cc6c0170 395 ("libcdio-paranoia" ,libcdio-paranoia)
39efcc9b 396 ("libtheora" ,libtheora)
f88f0d20 397 ("libvdpau" ,libvdpau)
39efcc9b 398 ("libvorbis" ,libvorbis)
dc55b8b2 399 ("libvpx" ,libvpx)
f88f0d20 400 ("libx11" ,libx11)
549381d6 401 ("libx264" ,libx264)
f88f0d20 402 ("mesa" ,mesa)
71241192 403 ("openal" ,openal)
71241192 404 ("pulseaudio" ,pulseaudio)
72bfebf5 405 ("soxr" ,soxr)
c4c4cc05 406 ("speex" ,speex)
72bfebf5 407 ("twolame" ,twolame)
67932f86 408 ("xvid" ,xvid)
b3546174 409 ("zlib" ,zlib)))
c4c4cc05
JD		 410 (native-inputs
411 `(("bc" ,bc)
39efcc9b
AE		 412 ("perl" ,perl)
413 ("pkg-config" ,pkg-config)
824d9dc3 414 ("texinfo" ,texinfo)
39efcc9b
AE		 415 ("python" ,python-2) ; scripts use interpreter python2
416 ("speex" ,speex)
c4c4cc05 417 ("yasm" ,yasm)))
39efcc9b 418 (arguments
31f9322e 419 `(#:test-target "fate"
12f92e38
AP		 420 #:configure-flags
421 ;; possible additional inputs:
422 ;; --enable-avisynth enable reading of AviSynth script
423 ;; files [no]
424 ;; --enable-frei0r enable frei0r video filtering
425 ;; --enable-libaacplus enable AAC+ encoding via libaacplus [no]
426 ;; --enable-libcelt enable CELT decoding via libcelt [no]
427 ;; --enable-libdc1394 enable IIDC-1394 grabbing using libdc1394
428 ;; and libraw1394 [no]
429 ;; --enable-libfaac enable AAC encoding via libfaac [no]
430 ;; --enable-libfdk-aac enable AAC de/encoding via libfdk-aac [no]
431 ;; --enable-libflite enable flite (voice synthesis) support via
432 ;; libflite [no]
433 ;; --enable-libgme enable Game Music Emu via libgme [no]
434 ;; --enable-libgsm enable GSM de/encoding via libgsm [no]
435 ;; --enable-libiec61883 enable iec61883 via libiec61883 [no]
436 ;; --enable-libilbc enable iLBC de/encoding via libilbc [no]
437 ;; --enable-libmodplug enable ModPlug via libmodplug [no]
438 ;; --enable-libnut enable NUT (de)muxing via libnut,
439 ;; native (de)muxer exists [no]
440 ;; --enable-libopencore-amrnb enable AMR-NB de/encoding via
441 ;; libopencore-amrnb [no]
442 ;; --enable-libopencore-amrwb enable AMR-WB decoding via
443 ;; libopencore-amrwb [no]
444 ;; --enable-libopencv enable video filtering via libopencv [no]
445 ;; --enable-libopenjpeg enable JPEG 2000 de/encoding via
446 ;; OpenJPEG [no]
447 ;; --enable-librtmp enable RTMP[E] support via librtmp [no]
448 ;; --enable-libschroedinger enable Dirac de/encoding via
449 ;; libschroedinger [no]
450 ;; --enable-libshine enable fixed-point MP3 encoding via
451 ;; libshine [no]
452 ;; --enable-libssh enable SFTP protocol via libssh [no]
453 ;; (libssh2 does not work)
454 ;; --enable-libstagefright-h264 enable H.264 decoding via
455 ;; libstagefright [no]
456 ;; --enable-libutvideo enable Ut Video encoding and decoding via
457 ;; libutvideo [no]
458 ;; --enable-libv4l2 enable libv4l2/v4l-utils [no]
459 ;; --enable-libvidstab enable video stabilization using
460 ;; vid.stab [no]
461 ;; --enable-libvo-aacenc enable AAC encoding via libvo-aacenc [no]
462 ;; --enable-libvo-amrwbenc enable AMR-WB encoding via
463 ;; libvo-amrwbenc [no]
464 ;; --enable-libwavpack enable wavpack encoding via libwavpack [no]
465 ;; --enable-libxavs enable AVS encoding via xavs [no]
466 ;; --enable-libzmq enable message passing via libzmq [no]
467 ;; --enable-libzvbi enable teletext support via libzvbi [no]
468 ;; --enable-opencl enable OpenCL code
12f92e38
AP		 469 '("--enable-avresample"
470 "--enable-gpl" ; enable optional gpl licensed parts
471 "--enable-shared"
472 "--enable-fontconfig"
c8dab7f4 473 "--enable-gnutls"
12f92e38
AP		 474 "--enable-ladspa"
475 "--enable-libass"
476 "--enable-libbluray"
477 "--enable-libcaca"
478 "--enable-libcdio"
479 "--enable-libfreetype"
480 "--enable-libmp3lame"
481 "--enable-libopus"
482 "--enable-libpulse"
12f92e38
AP		 483 "--enable-libsoxr"
484 "--enable-libspeex"
485 "--enable-libtheora"
486 "--enable-libtwolame"
487 "--enable-libvorbis"
488 "--enable-libvpx"
489 "--enable-libxvid"
490 "--enable-libx264"
491 "--enable-openal"
f88f0d20
EF		 492 "--enable-opengl"
493 "--enable-x11grab"
12f92e38
AP		 494
495 "--enable-runtime-cpudetect"
496
497 ;; Runtime cpu detection is not implemented on
498 ;; MIPS, so we disable some features.
499 "--disable-mips32r2"
c5e1fcd0 500 "--disable-mipsdsp"
12f92e38
AP		 501 "--disable-mipsdspr2"
502 "--disable-mipsfpu")
31f9322e 503 #:phases
f2feb0ce
LC		 504 (modify-phases %standard-phases
505 (replace
39efcc9b
AE		 506 'configure
507 ;; configure does not work followed by "SHELL=..." and
508 ;; "CONFIG_SHELL=..."; set environment variables instead
509 (lambda* (#:key outputs configure-flags #:allow-other-keys)
510 (let ((out (assoc-ref outputs "out")))
511 (substitute* "configure"
512 (("#! /bin/sh") (string-append "#!" (which "bash"))))
513 (setenv "SHELL" (which "bash"))
514 (setenv "CONFIG_SHELL" (which "bash"))
12f92e38
AP		 515 (zero? (apply system*
516 "./configure"
517 (string-append "--prefix=" out)
518 ;; Add $libdir to the RUNPATH of all the binaries.
519 (string-append "--extra-ldflags=-Wl,-rpath="
520 out "/lib")
521 configure-flags)))))
457e528e
LC		 522 (add-before
523 'check 'set-ld-library-path
524 (lambda _
525 ;; Allow $(top_builddir)/ffmpeg to find its dependencies when
526 ;; running tests.
527 (let* ((dso (find-files "." "\\.so$"))
528 (path (string-join (map dirname dso) ":")))
529 (format #t "setting LD_LIBRARY_PATH to ~s~%" path)
530 (setenv "LD_LIBRARY_PATH" path)
27350ef8 531 #t))))))
702bfbf1 532 (home-page "https://www.ffmpeg.org/")
39efcc9b
AE		 533 (synopsis "Audio and video framework")
534 (description "FFmpeg is a complete, cross-platform solution to record,
535convert and stream audio and video. It includes the libavcodec
536audio/video codec library.")
ae0bdd81 537 (license license:gpl2+)))
d5a748e8 538
940778c7
LC		 539(define-public ffmpeg-2.8
540 (package
541 (inherit ffmpeg)
542 (version "2.8.6")
543 (source (origin
544 (method url-fetch)
545 (uri (string-append "https://ffmpeg.org/releases/ffmpeg-"
546 version ".tar.xz"))
547 (sha256
548 (base32
549 "1yh7dvm7zwdlsspdaq524s5qaggma5md9h95qc4kvb5dmyyyvg15"))))
550 (arguments
551 (substitute-keyword-arguments (package-arguments ffmpeg)
552 ((#:configure-flags flags)
553 `(map (lambda (flag)
554 (if (string=? flag "--disable-mipsdsp")
555 "--disable-mipsdspr1"
556 flag))
557 ,flags))))))
558
d5a748e8
AE		 559(define-public vlc
560 (package
561 (name "vlc")
9c55bae6 562 (version "2.2.1")
d5a748e8
AE		 563 (source (origin
564 (method url-fetch)
565 (uri (string-append
566 "http://download.videolan.org/pub/videolan/vlc/"
567 version "/vlc-" version ".tar.xz"))
568 (sha256
569 (base32
4ef2721b
LC		 570 "1jqzrzrpw6932lbkf863xk8cfmn4z2ngbxz7w8ggmh4f6xz9sgal"))
571 (modules '((guix build utils)))
572 (snippet
573 ;; There are two occurrences where __DATE__ and __TIME__ are
574 ;; used to capture the build time and show it to the user.
575 '(substitute* (find-files "." "help\\.c(pp)?$")
576 (("__DATE__") "\"2016\"")
577 (("__TIME__") "\"00:00\"")))))
d5a748e8
AE		 578 (build-system gnu-build-system)
579 (native-inputs
580 `(("git" ,git) ; needed for a test
581 ("pkg-config" ,pkg-config)))
582 ;; FIXME: Add optional inputs once available.
583 (inputs
584 `(("alsa-lib" ,alsa-lib)
585 ("avahi" ,avahi)
586 ("dbus" ,dbus)
587 ("flac" ,flac)
b4dff935 588 ("ffmpeg" ,ffmpeg-2.8) ;fails to build against ffmpeg 3.0
d5a748e8
AE		 589 ("fontconfig" ,fontconfig)
590 ("freetype" ,freetype)
591 ("gnutls" ,gnutls)
592 ("libcddb" ,libcddb)
593 ("libgcrypt" ,libgcrypt)
594 ("libkate" ,libkate)
595 ("libmad" ,libmad)
596 ("libogg" ,libogg)
597 ("libpng" ,libpng)
598 ("libsamplerate" ,libsamplerate)
599 ("libssh2" ,libssh2)
600 ("libvorbis" ,libvorbis)
601 ("libtheora" ,libtheora)
602 ("libxext" ,libxext)
603 ("libxinerama" ,libxinerama)
604 ("libxml2" ,libxml2)
605 ("libxpm" ,libxpm)
606 ("lua" ,lua-5.1)
607 ("mesa" ,mesa)
608 ("opus" ,opus)
609 ("perl" ,perl)
610 ("pulseaudio" ,pulseaudio)
611 ("python" ,python-wrapper)
c6c86cd7 612 ("qt" ,qt)
d5a748e8
AE		 613 ("sdl" ,sdl)
614 ("sdl-image" ,sdl-image)
615 ("speex" ,speex)
616 ("xcb-util-keysyms" ,xcb-util-keysyms)))
617 (arguments
618 `(#:configure-flags
619 `("--disable-a52" ; FIXME: reenable once available
d5a748e8
AE		 620 ,(string-append "LDFLAGS=-Wl,-rpath -Wl,"
621 (assoc-ref %build-inputs "ffmpeg")
cd76fbde
LC		 622 "/lib")) ;needed for the tests
623
624 #:phases
625 (modify-phases %standard-phases
626 (add-after 'install 'regenerate-plugin-cache
627 (lambda* (#:key outputs #:allow-other-keys)
628 ;; The 'install-exec-hook' rule in the top-level Makefile.am
629 ;; generates 'lib/vlc/plugins/plugins.dat', a plugin cache, using
630 ;; 'vlc-cache-gen'. This file includes the mtime of the plugins
631 ;; it references. Thus, we first reset the timestamps of all
632 ;; these files, and then regenerate the cache such that the
633 ;; mtimes it includes are always zero instead of being dependent
634 ;; on the build time.
635 (let* ((out (assoc-ref outputs "out"))
636 (pkglibdir (string-append out "/lib/vlc"))
637 (plugindir (string-append pkglibdir "/plugins"))
638 (cachegen (string-append pkglibdir "/vlc-cache-gen")))
639 ;; TODO: Factorize 'reset-timestamps'.
640 (for-each (lambda (file)
641 (let ((s (lstat file)))
642 (unless (eq? (stat:type s) 'symlink)
643 (utime file 0 0 0 0))))
644 (find-files plugindir))
645 (zero? (system* cachegen plugindir))))))))
d5a748e8
AE		 646 (home-page "https://www.videolan.org/")
647 (synopsis "Audio and video framework")
648 (description "VLC is a cross-platform multimedia player and framework
649that plays most multimedia files as well as DVD, Audio CD, VCD, and various
650treaming protocols.")
ae0bdd81 651 (license license:gpl2+)))
ace69243
AE		 652
653(define-public mplayer
654 (package
655 (name "mplayer")
e71b20e5 656 (version "1.3.0")
ace69243
AE		 657 (source (origin
658 (method url-fetch)
659 (uri (string-append
ebde7c7a 660 "https://www.mplayerhq.hu/MPlayer/releases/MPlayer-"
ace69243
AE		 661 version ".tar.xz"))
662 (sha256
663 (base32
e71b20e5 664 "0hwqn04bdknb2ic88xd75smffxx63scvz0zvwvjb56nqj9n89l1s"))))
ace69243
AE		 665 (build-system gnu-build-system)
666 ;; FIXME: Add additional inputs once available.
667 (native-inputs
668 `(("pkg-config" ,pkg-config)))
669 (inputs
670 `(("alsa-lib" ,alsa-lib)
671 ("cdparanoia" ,cdparanoia)
b3546174 672 ("ffmpeg" ,ffmpeg)
778a6a8b 673 ("fontconfig" ,fontconfig)
ace69243 674 ("freetype" ,freetype)
778a6a8b 675;; ("giflib" ,giflib) ; uses QuantizeBuffer, requires version >= 5
ace69243 676 ("lame" ,lame)
778a6a8b 677 ("libass" ,libass)
b3546174
MW		 678 ("libdvdcss" ,libdvdcss)
679 ("libdvdnav" ,libdvdnav)
ace69243 680 ("libjpeg" ,libjpeg)
778a6a8b
EF		 681 ("libmpeg2" ,libmpeg2)
682 ("libmpg123" ,mpg123) ; audio codec for MP3
ace69243
AE		 683 ("libpng" ,libpng)
684 ("libtheora" ,libtheora)
778a6a8b 685 ("libvdpau" ,libvdpau)
ace69243
AE		 686 ("libvorbis" ,libvorbis)
687 ("libx11" ,libx11)
778a6a8b 688 ("libx264" ,libx264)
ace69243
AE		 689 ("libxinerama" ,libxinerama)
690 ("libxv" ,libxv)
778a6a8b 691 ("libxxf86dga" ,libxxf86dga)
ace69243 692 ("mesa" ,mesa)
778a6a8b 693 ("opus" ,opus)
ace69243
AE		 694 ("perl" ,perl)
695 ("pulseaudio" ,pulseaudio)
696 ("python" ,python-wrapper)
697 ("sdl" ,sdl)
698 ("speex" ,speex)
699 ("yasm" ,yasm)
700 ("zlib" ,zlib)))
701 (arguments
702 `(#:tests? #f ; no test target
703 #:phases
ebde7c7a
EF		 704 (modify-phases %standard-phases
705 (replace 'configure
ace69243
AE		 706 ;; configure does not work followed by "SHELL=..." and
707 ;; "CONFIG_SHELL=..."; set environment variables instead
708 (lambda* (#:key inputs outputs #:allow-other-keys)
709 (let ((out (assoc-ref outputs "out"))
710 (libx11 (assoc-ref inputs "libx11")))
711 (substitute* "configure"
712 (("#! /bin/sh") (string-append "#!" (which "bash"))))
713 (setenv "SHELL" (which "bash"))
714 (setenv "CONFIG_SHELL" (which "bash"))
715 (zero? (system*
716 "./configure"
717 (string-append "--extra-cflags=-I"
718 libx11 "/include") ; to detect libx11
ebde7c7a 719 "--disable-ffmpeg_a" ; disables bundled ffmpeg
ace69243 720 (string-append "--prefix=" out)
fe138965
MW		 721 ;; Enable runtime cpu detection where supported,
722 ;; and choose a suitable target.
723 ,@(match (or (%current-target-system)
724 (%current-system))
725 ("x86_64-linux"
726 '("--enable-runtime-cpudetection"
727 "--target=x86_64-linux"))
728 ("i686-linux"
729 '("--enable-runtime-cpudetection"
730 "--target=i686-linux"))
731 ("mips64el-linux"
f0d6d835
MW		 732 '("--target=mips3-linux"))
733 (_ (list (string-append
734 "--target="
735 (or (%current-target-system)
736 (nix-system->gnu-triplet
737 (%current-system)))))))
ebde7c7a
EF		 738 "--disable-iwmmxt"))))))))
739 (home-page "https://www.mplayerhq.hu/design7/news.html")
ace69243
AE		 740 (synopsis "Audio and video player")
741 (description "MPlayer is a movie player. It plays most MPEG/VOB, AVI,
742Ogg/OGM, VIVO, ASF/WMA/WMV, QT/MOV/MP4, RealMedia, Matroska, NUT,
743NuppelVideo, FLI, YUV4MPEG, FILM, RoQ, PVA files. One can watch VideoCD,
744SVCD, DVD, 3ivx, DivX 3/4/5, WMV and H.264 movies.")
ae0bdd81 745 (license license:gpl2)))
d0ed39be 746
1c1178cd
TUBK		 747(define-public mpv
748 (package
749 (name "mpv")
ad25a1fa 750 (version "0.17.0")
1c1178cd
TUBK		 751 (source (origin
752 (method url-fetch)
753 (uri (string-append
754 "https://github.com/mpv-player/mpv/archive/v" version
755 ".tar.gz"))
756 (sha256
757 (base32
ad25a1fa 758 "0vms3viwqcwl1mrgmf2yy4c69fvv7xpbkyrl693l6zpwynqd4b30"))
1c1178cd
TUBK		 759 (file-name (string-append name "-" version ".tar.gz"))))
760 (build-system waf-build-system)
761 (native-inputs
762 `(("perl" ,perl)
763 ("pkg-config" ,pkg-config)
764 ("python-docutils" ,python-docutils)))
81c29ccc 765 ;; Missing features: libguess, Wayland, V4L2
1c1178cd
TUBK		 766 (inputs
767 `(("alsa-lib" ,alsa-lib)
768 ("enca" ,enca)
769 ("ffmpeg" ,ffmpeg)
2d8781a4 770 ("jack" ,jack-1)
1c1178cd
TUBK		 771 ("ladspa" ,ladspa)
772 ("lcms" ,lcms)
773 ("libass" ,libass)
774 ("libbluray" ,libbluray)
775 ("libcaca" ,libcaca)
776 ("libbs2b" ,libbs2b)
777 ("libcdio-paranoia" ,libcdio-paranoia)
778 ("libdvdread" ,libdvdread)
779 ("libdvdnav" ,libdvdnav)
780 ("libjpeg" ,libjpeg)
781 ("libva" ,libva)
81c29ccc 782 ("libvdpau" ,libvdpau)
1c1178cd
TUBK		 783 ("libx11" ,libx11)
784 ("libxext" ,libxext)
785 ("libxinerama" ,libxinerama)
786 ("libxrandr" ,libxrandr)
787 ("libxscrnsaver" ,libxscrnsaver)
788 ("libxv" ,libxv)
789 ("lua" ,lua)
790 ("mesa" ,mesa)
791 ("mpg123" ,mpg123)
792 ("pulseaudio" ,pulseaudio)
793 ("rsound" ,rsound)
1c1178cd
TUBK		 794 ("vapoursynth" ,vapoursynth)
795 ("waf" ,(origin
796 (method url-fetch)
797 ;; Keep this in sync with the version in the bootstrap.py
798 ;; script of the source tarball.
54567afa 799 (uri "http://www.freehackers.org/~tnagy/release/waf-1.8.12")
1c1178cd
TUBK		 800 (sha256
801 (base32
54567afa 802 "12y9c352zwliw0zk9jm2lhynsjcf5jy0k1qch1c1av8hnbm2pgq1"))))
1c1178cd
TUBK		 803 ("youtube-dl" ,youtube-dl)
804 ("zlib" ,zlib)))
805 (arguments
806 '(#:phases
807 (modify-phases %standard-phases
808 (add-before
f8503e2b 809 'configure 'setup-waf
1c1178cd
TUBK		 810 (lambda* (#:key inputs #:allow-other-keys)
811 (copy-file (assoc-ref inputs "waf") "waf")
599fd842 812 (setenv "CC" "gcc"))))
81c29ccc 813 #:configure-flags (list "--enable-gpl3" "--enable-zsh-comp")
1c1178cd
TUBK		 814 ;; No check function defined.
815 #:tests? #f))
581873b5 816 (home-page "https://mpv.io/")
1c1178cd
TUBK		 817 (synopsis "Audio and video player")
818 (description "mpv is a general-purpose audio and video player. It is a
819fork of mplayer2 and MPlayer. It shares some features with the former
820projects while introducing many more.")
ae0bdd81 821 (license license:gpl2+)))
1c1178cd 822
d0ed39be
DT		 823(define-public libvpx
824 (package
825 (name "libvpx")
fb197c0d 826 (version "1.5.0")
d0ed39be
DT		 827 (source (origin
828 (method url-fetch)
723e8866
MW		 829 (uri (string-append "http://storage.googleapis.com/"
830 "downloads.webmproject.org/releases/webm/"
831 name "-" version ".tar.bz2"))
d0ed39be
DT		 832 (sha256
833 (base32
fb197c0d 834 "15v7qw0ydyxn08ksb6lxn1l51pxgpwgshdwd3275yrr5hs86fv9h"))))
d0ed39be
DT		 835 (build-system gnu-build-system)
836 (arguments
0e47b4e7
EF		 837 `(#:phases
838 (modify-phases %standard-phases
839 (replace 'configure
840 (lambda* (#:key outputs #:allow-other-keys)
841 (setenv "CONFIG_SHELL" (which "bash"))
842 (let ((out (assoc-ref outputs "out")))
843 (setenv "LDFLAGS"
844 (string-append "-Wl,-rpath=" out "/lib"))
845 (zero? (system* "./configure"
846 "--enable-shared"
847 "--as=yasm"
848 ;; Limit size to avoid CVE-2015-1258
849 "--size-limit=16384x16384"
850 (string-append "--prefix=" out)))))))
4f8f15cd 851 #:tests? #f)) ; no check target
d0ed39be
DT		 852 (native-inputs
853 `(("perl" ,perl)
854 ("yasm" ,yasm)))
855 (synopsis "VP8/VP9 video codec")
856 (description "libvpx is a codec for the VP8/VP9 video compression format.")
ae0bdd81 857 (license license:bsd-3)
d0ed39be 858 (home-page "http://www.webmproject.org/")))
615215a5
LC		 859
860(define-public youtube-dl
861 (package
862 (name "youtube-dl")
e20a94aa 863 (version "2016.05.01")
615215a5
LC		 864 (source (origin
865 (method url-fetch)
b798dfde 866 (uri (string-append "http://youtube-dl.org/downloads/"
615215a5
LC		 867 version "/youtube-dl-"
868 version ".tar.gz"))
869 (sha256
870 (base32
e20a94aa 871 "1w04afmwq5pjvp3nl2k59q0cigqrj9n8fwkydcfldwpq83l15j5d"))))
615215a5 872 (build-system python-build-system)
615215a5 873 (home-page "http://youtube-dl.org")
2ad9515c
AV		 874 (arguments
875 ;; The problem here is that the directory for the man page and completion
876 ;; files is relative, and for some reason, setup.py uses the
877 ;; auto-detected sys.prefix instead of the user-defined "--prefix=FOO".
878 ;; So, we need pass the prefix directly. In addition, make sure the Bash
879 ;; completion file is called 'youtube-dl' rather than
880 ;; 'youtube-dl.bash-completion'.
881 `(#:phases (modify-phases %standard-phases
882 (add-before 'install 'fix-the-data-directories
883 (lambda* (#:key outputs #:allow-other-keys)
884 (let ((prefix (assoc-ref outputs "out")))
885 (mkdir "bash-completion")
886 (rename-file "youtube-dl.bash-completion"
887 "bash-completion/youtube-dl")
888 (substitute* "setup.py"
889 (("youtube-dl\\.bash-completion")
890 "bash-completion/youtube-dl")
891 (("'etc/")
892 (string-append "'" prefix "/etc/"))
893 (("'share/")
894 (string-append "'" prefix "/share/")))))))))
615215a5
LC		 895 (synopsis "Download videos from YouTube.com and other sites")
896 (description
b798dfde 897 "Youtube-dl is a small command-line program to download videos from
615215a5 898YouTube.com and a few more sites.")
ae0bdd81 899 (license license:public-domain)))
e6bdb36a 900
5d3609e4
TUBK		 901(define-public libbluray
902 (package
903 (name "libbluray")
59eef6f2 904 (version "0.9.2")
5d3609e4
TUBK		 905 (source (origin
906 (method url-fetch)
907 (uri (string-append "http://download.videolan.org/videolan/"
908 name "/" version "/"
909 name "-" version ".tar.bz2"))
910 (sha256
911 (base32
59eef6f2 912 "1sp71j4agcsg17g6b85cqz78pn5vknl5pl39rvr6mkib5ps99jgg"))))
5d3609e4 913 (build-system gnu-build-system)
2da45ebe
EF		 914 (arguments `(#:configure-flags '("--disable-bdjava")))
915 (native-inputs `(("pkg-config" ,pkg-config)))
5d3609e4 916 (inputs
71ee51a0 917 `(("fontconfig" ,fontconfig)
5d3609e4 918 ("freetype" ,freetype)
71ee51a0 919 ("libxml2" ,libxml2)))
5d3609e4
TUBK		 920 (home-page "http://www.videolan.org/developers/libbluray.html")
921 (synopsis "Blu-Ray Disc playback library")
922 (description
923 "libbluray is a library designed for Blu-Ray Disc playback for media
924players, like VLC or MPlayer.")
ae0bdd81 925 (license license:lgpl2.1+)))
5d3609e4 926
e6bdb36a
AE		 927(define-public libdvdread
928 (package
929 (name "libdvdread")
9aebf330 930 (version "5.0.3")
e6bdb36a
AE		 931 (source (origin
932 (method url-fetch)
933 (uri (string-append "http://download.videolan.org/videolan/"
934 name "/" version "/"
935 name "-" version ".tar.bz2"))
936 (sha256
937 (base32
9aebf330 938 "0ayqiq0psq18rcp6f5pz82sxsq66v0kwv0y55dbrcg68plnxy71j"))))
e6bdb36a
AE		 939 (build-system gnu-build-system)
940 (home-page "http://dvdnav.mplayerhq.hu/")
941 (synopsis "Library for reading video DVDs")
942 (description
943 "Libdvdread provides a simple foundation for reading DVD video
944disks. It provides the functionality that is required to access many
945DVDs. It parses IFO files, reads NAV-blocks, and performs CSS
946authentication and descrambling (if an external libdvdcss library is
947installed).")
ae0bdd81 948 (license license:gpl2+)))
b027d919
AE		 949
950(define-public libdvdnav
951 (package
952 (name "libdvdnav")
734976b6 953 (version "5.0.3")
b027d919
AE		 954 (source (origin
955 (method url-fetch)
956 (uri (string-append "http://download.videolan.org/videolan/"
957 name "/" version "/"
958 name "-" version ".tar.bz2"))
959 (sha256
960 (base32
734976b6 961 "0v8byv5z598k06rqzdmj7739vc86xq3zf79zfr698dib7lz055sh"))))
b027d919
AE		 962 (build-system gnu-build-system)
963 (native-inputs
964 `(("pkg-config" ,pkg-config)))
965 (inputs
966 `(("libdvdread" ,libdvdread)))
967 (home-page "http://dvdnav.mplayerhq.hu/")
968 (synopsis "Library for video DVD navigation features")
969 (description
970 "Libdvdnav is a library for developers of multimedia
971applications. It allows easy use of sophisticated DVD navigation features
972such as DVD menus, multiangle playback and even interactive DVD games. All
973this functionality is provided through a simple API which provides the DVD
974playback as a single logical stream of blocks, intermitted by special
975dvdnav events to report certain conditions. The main usage of libdvdnav is
976a loop regularly calling a function to get the next block, surrounded by
977additional calls to tell the library of user interaction. The whole
978DVD virtual machine and internal playback states are completely
979encapsulated.")
ae0bdd81 980 (license license:gpl2+)))
2cd85cf9 981
f1044010
TUBK		 982(define-public libdvdnav-4
983 (package
984 (inherit libdvdnav)
985 (version "4.2.1")
986 (source (origin
987 (method url-fetch)
988 (uri
989 (string-append
990 "http://download.videolan.org/videolan/libdvdnav/libdvdnav-"
991 version ".tar.xz"))
992 (sha256
993 (base32
994 "0wi3gy408c8xj0ism0hckv5jbfh3lg4pmgxv87gbch9jrhp2gjkz"))))
995 (native-inputs
996 `(("pkg-config" ,pkg-config)
997 ("autoconf" ,autoconf)
998 ("automake" ,automake)
999 ("libtool" ,libtool)))
1000 (arguments
1001 '(#:phases
1002 (alist-cons-after
1003 'unpack 'autoreconf
1004 (lambda _
1005 (zero? (system* "autoreconf" "-vif")))
1006 %standard-phases)))))
1007
a6f710ec
TUBK		 1008(define-public libdvdcss
1009 (package
1010 (name "libdvdcss")
98416109 1011 (version "1.4.0")
a6f710ec
TUBK		 1012 (source (origin
1013 (method url-fetch)
98416109 1014 (uri (string-append "http://download.videolan.org/pub/"
a6f710ec
TUBK		 1015 name "/" version "/"
1016 name "-" version ".tar.bz2"))
1017 (sha256
1018 (base32
98416109 1019 "0nl45ifc4xcb196snv9d6hinfw614cqpzcqp92dg43c0hickg290"))))
a6f710ec
TUBK		 1020 (build-system gnu-build-system)
1021 (home-page "http://www.videolan.org/developers/libdvdcss.html")
1022 (synopsis "Library for accessing DVDs as block devices")
1023 (description
1024 "libdvdcss is a simple library designed for accessing DVDs like a block
1025device without having to bother about the decryption.")
ae0bdd81 1026 (license license:gpl2+)))
a6f710ec 1027
2cd85cf9
DT		 1028(define-public srt2vtt
1029 (package
1030 (name "srt2vtt")
1031 (version "0.1")
1032 (source (origin
1033 (method url-fetch)
1034 (uri (string-append
1035 "http://dthompson.us/releases/srt2vtt/srt2vtt-"
1036 version ".tar.gz"))
1037 (sha256
1038 (base32
1039 "16b377znjm6qlga5yb8aj7b7bcisa1ghcnj2lrb1d30lvxp4liif"))))
1040 (build-system gnu-build-system)
1041 (inputs
1042 `(("guile" ,guile-2.0)))
1043 (synopsis "SubRip to WebVTT subtitle converter")
1044 (description "srt2vtt converts SubRip formatted subtitles to WebVTT format
1045for use with HTML5 video.")
1046 (home-page "http://dthompson.us/pages/software/srt2vtt")
ae0bdd81 1047 (license license:gpl3+)))
44726031
AE		 1048
1049(define-public avidemux
1050 (package
1051 (name "avidemux")
aae70767 1052 (version "2.6.10")
44726031
AE		 1053 (source (origin
1054 (method url-fetch)
1055 (uri (string-append
1056 "mirror://sourceforge/avidemux/avidemux_"
1057 version ".tar.gz"))
1058 (sha256
1059 (base32
aae70767 1060 "1vas43bwb15q2wv3dpp7fgp8dc6szinmwl7i0ziq2vv5l2128v0p"))
fc1adab1 1061 (patches (search-patches "avidemux-install-to-lib.patch"))))
44726031
AE		 1062 (build-system cmake-build-system)
1063 (native-inputs
1064 `(("pkg-config" ,pkg-config)))
1065 ;; FIXME: Once packaged, add libraries not found during the build.
1066 (inputs
1067 `(("alsa-lib" ,alsa-lib)
1068 ("fontconfig" ,fontconfig)
1069 ("freetype" ,freetype)
1070 ("fribidi" ,fribidi)
1071 ("glu" ,glu)
44726031
AE		 1072 ("jack" ,jack-1)
1073 ("lame" ,lame)
1074 ("libvorbis" ,libvorbis)
1075 ("libvpx" ,libvpx)
1076 ("libxv" ,libxv)
1077 ("perl" ,perl)
1078 ("pulseaudio" ,pulseaudio)
1079 ("python" ,python-wrapper)
aab56ab7 1080 ("qt" ,qt)
44726031
AE		 1081 ("sdl" ,sdl)
1082 ("sqlite" ,sqlite)
1083 ("yasm" ,yasm)
1084 ("zlib" ,zlib)))
1085 (arguments
1086 `(#:tests? #f ; no check target
1087 #:phases
1088 ;; Make sure files inside the included ffmpeg tarball are
1089 ;; patch-shebanged.
1090 (alist-cons-before
1091 'patch-source-shebangs 'unpack-ffmpeg
1092 (lambda _
1093 (with-directory-excursion "avidemux_core/ffmpeg_package"
aae70767
AE		 1094 (system* "tar" "xf" "ffmpeg-2.6.1.tar.bz2")
1095 (delete-file "ffmpeg-2.6.1.tar.bz2")))
44726031
AE		 1096 (alist-cons-after
1097 'patch-source-shebangs 'repack-ffmpeg
1098 (lambda _
1099 (with-directory-excursion "avidemux_core/ffmpeg_package"
aae70767 1100 (substitute* "ffmpeg-2.6.1/configure"
44726031 1101 (("#! /bin/sh") (string-append "#!" (which "bash"))))
aae70767 1102 (system* "tar" "cjf" "ffmpeg-2.6.1.tar.bz2" "ffmpeg-2.6.1"
c09e6a5f 1103 ;; avoid non-determinism in the archive
92226a47
MW		 1104 "--sort=name" "--mtime=@0"
1105 "--owner=root:0" "--group=root:0")
aae70767 1106 (delete-file-recursively "ffmpeg-2.6.1")))
44726031
AE		 1107 (alist-replace 'configure
1108 (lambda _
1109 ;; Copy-paste settings from the cmake build system.
1110 (setenv "CMAKE_LIBRARY_PATH" (getenv "LIBRARY_PATH"))
e8e2e18b 1111 (setenv "CMAKE_INCLUDE_PATH" (getenv "C_INCLUDE_PATH")))
44726031
AE		 1112 (alist-replace 'build
1113 (lambda* (#:key inputs outputs #:allow-other-keys)
1114 (let*
1115 ((out (assoc-ref outputs "out"))
a060ca32 1116 (lib (string-append out "/lib"))
44726031
AE		 1117 (top (getcwd))
1118 (sdl (assoc-ref inputs "sdl"))
1119 (build_component
1120 (lambda* (component srcdir #:optional (args '()))
1121 (let ((builddir (string-append "build_" component)))
1122 (mkdir builddir)
1123 (with-directory-excursion builddir
1124 (zero? (and
1125 (apply system* "cmake"
1126 "-DCMAKE_INSTALL_RPATH_USE_LINK_PATH=TRUE"
1127 (string-append "-DCMAKE_INSTALL_PREFIX=" out)
1128 (string-append "-DCMAKE_INSTALL_RPATH=" lib)
c687f731
AE		 1129 (string-append "-DCMAKE_SHARED_LINKER_FLAGS="
1130 "\"-Wl,-rpath=" lib "\"")
44726031
AE		 1131 (string-append "-DAVIDEMUX_SOURCE_DIR=" top)
1132 (string-append "-DSDL_INCLUDE_DIR="
1133 sdl "/include/SDL")
1134 (string-append "../" srcdir)
aab56ab7 1135 "-DENABLE_QT5=True"
44726031
AE		 1136 args)
1137 (system* "make" "-j"
1138 (number->string (parallel-job-count)))
1139 (system* "make" "install"))))))))
1140 (mkdir out)
1141 (and (build_component "core" "avidemux_core")
1142 (build_component "cli" "avidemux/cli")
1143 (build_component "qt4" "avidemux/qt4")
44726031
AE		 1144 (build_component "plugins_common" "avidemux_plugins"
1145 '("-DPLUGIN_UI=COMMON"))
1146 (build_component "plugins_cli" "avidemux_plugins"
1147 '("-DPLUGIN_UI=CLI"))
1148 (build_component "plugins_qt4" "avidemux_plugins"
1149 '("-DPLUGIN_UI=QT4"))
44726031
AE		 1150 (build_component "plugins_settings" "avidemux_plugins"
1151 '("-DPLUGIN_UI=SETTINGS")))
1152 ;; Remove .exe and .dll file.
1153 (delete-file-recursively
1154 (string-append out "/share/ADM6_addons"))))
1155 (alist-delete 'install
1156 %standard-phases)))))))
1157 (home-page "http://fixounet.free.fr/avidemux/")
1158 (synopsis "Video editor")
1159 (description "Avidemux is a video editor designed for simple cutting,
1160filtering and encoding tasks. It supports many file types, including AVI,
1161DVD compatible MPEG files, MP4 and ASF, using a variety of codecs. Tasks
1162can be automated using projects, job queue and powerful scripting
1163capabilities.")
1164 ;; Software with various licenses is included, see License.txt.
ae0bdd81 1165 (license license:gpl2+)))
44726031 1166
6f6c8b65
TUBK		 1167(define-public vapoursynth
1168 (package
1169 (name "vapoursynth")
f673552c 1170 (version "28")
6f6c8b65
TUBK		 1171 (source (origin
1172 (method url-fetch)
1173 (uri (string-append
1174 "https://github.com/vapoursynth/vapoursynth/archive/R"
1175 version ".tar.gz"))
f673552c 1176 (file-name (string-append name "-" version))
6f6c8b65
TUBK		 1177 (sha256
1178 (base32
f673552c 1179 "0pnrawcg1j65i46yim0z447lglq1af5zgx0lkqf1x5xl1bfwc0v7"))))
6f6c8b65
TUBK		 1180 (build-system gnu-build-system)
1181 (native-inputs
1182 `(("autoconf" ,autoconf)
1183 ("automake" ,automake)
1184 ("cython" ,python-cython)
1185 ("libtool" ,libtool)
1186 ("pkg-config" ,pkg-config)
1187 ("python" ,python)
1188 ("yasm" ,yasm)))
1189 (inputs
1190 `(("ffmpeg" ,ffmpeg)
1191 ("libass" ,libass)
1192 ("tesseract-ocr" ,tesseract-ocr)))
1193 (arguments
1194 '(#:phases
1195 (modify-phases %standard-phases
1196 (add-after
f8503e2b 1197 'unpack 'autogen
6f6c8b65
TUBK		 1198 (lambda _
1199 (zero? (system* "sh" "autogen.sh")))))))
1200 (home-page "http://www.vapoursynth.com/")
1201 (synopsis "Video processing framework")
1202 (description "VapourSynth is a C++ library and Python module for video
1203manipulation. It aims to be a modern rewrite of Avisynth, supporting
1204multithreading, generalized colorspaces, per frame properties, and videos with
1205format changes.")
1206 ;; As seen from the source files.
ae0bdd81 1207 (license license:lgpl2.1+)))
6f6c8b65 1208
67932f86
TUBK		 1209(define-public xvid
1210 (package
1211 (name "xvid")
e05035c7 1212 (version "1.3.4")
67932f86
TUBK		 1213 (source (origin
1214 (method url-fetch)
1215 (uri (string-append
1216 "http://downloads.xvid.org/downloads/xvidcore-"
1217 version ".tar.bz2"))
1218 (sha256
1219 (base32
e05035c7 1220 "1xwbmp9wqshc0ckm970zdpi0yvgqxlqg0s8bkz98mnr8p2067bsz"))))
67932f86
TUBK		 1221 (build-system gnu-build-system)
1222 (native-inputs `(("yasm" ,yasm)))
1223 (arguments
1224 '(#:phases
62fe2d47
EF		 1225 (modify-phases %standard-phases
1226 (add-before
1227 'configure 'pre-configure
1228 (lambda _
1229 (chdir "build/generic")
1230 (substitute* "configure"
1231 (("#! /bin/sh") (string-append "#!" (which "sh")))))))
67932f86
TUBK		 1232 ;; No 'check' target.
1233 #:tests? #f))
1234 (home-page "https://www.xvid.com/")
1235 (synopsis "MPEG-4 Part 2 Advanced Simple Profile video codec")
1236 (description "Xvid is an MPEG-4 Part 2 Advanced Simple Profile (ASP) video
1237codec library. It uses ASP features such as b-frames, global and quarter
1238pixel motion compensation, lumi masking, trellis quantization, and H.263, MPEG
1239and custom quantization matrices.")
ae0bdd81 1240 (license license:gpl2+)))
e16fde14
DT		 1241
1242(define-public livestreamer
1243 (package
1244 (name "livestreamer")
68e88a09 1245 (version "1.12.2")
e16fde14
DT		 1246 (source (origin
1247 (method url-fetch)
1248 (uri (string-append
1249 "https://github.com/chrippa/livestreamer/archive/v"
1250 version ".tar.gz"))
1251 (file-name (string-append "livestreamer-" version ".tar.gz"))
1252 (sha256
1253 (base32
68e88a09 1254 "1fp3d3z2grb1ls97smjkraazpxnvajda2d1g1378s6gzmda2jvjd"))))
e16fde14
DT		 1255 (build-system python-build-system)
1256 (arguments
1257 '(#:tests? #f)) ; tests rely on external web servers
e16fde14 1258 (propagated-inputs
5b9fe59f 1259 `(("python-requests" ,python-requests)))
e16fde14
DT		 1260 (synopsis "Internet video stream viewer")
1261 (description "Livestreamer is a command-line utility that extracts streams
1262from various services and pipes them into a video playing application.")
1263 (home-page "http://livestreamer.io/")
1264 (license license:bsd-2)))
307ad140
RW		 1265
1266(define-public mlt
1267 (package
1268 (name "mlt")
4c7729dc 1269 (version "6.2.0")
307ad140
RW		 1270 (source (origin
1271 (method url-fetch)
4c7729dc
EF		 1272 (uri (string-append "https://github.com/mltframework/mlt/"
1273 "archive/v" version ".tar.gz"))
1274 (file-name (string-append name "-" version ".tar.gz"))
307ad140
RW		 1275 (sha256
1276 (base32
4c7729dc 1277 "1zwzfgxrcbwkxnkiwv0a1rzxdnnaly90yyarl9wdw84nx11ffbnx"))))
307ad140
RW		 1278 (build-system gnu-build-system)
1279 (arguments
1280 `(#:tests? #f ; no tests
1281 #:make-flags '("CC=gcc")
1282 #:configure-flags
1283 (list "--enable-gpl3"
1284 "--enable-gpl")
1285 #:phases
1286 (modify-phases %standard-phases
1287 (add-after
1288 'configure 'override-LDFLAGS
1289 (lambda* (#:key outputs #:allow-other-keys)
1290 (substitute* "config.mak"
1291 (("LDFLAGS\\+=")
1292 (string-append "LDFLAGS+=-Wl,-rpath="
1293 (assoc-ref outputs "out")
1294 "/lib ")))
1295 #t)))))
1296 (inputs
1297 `(("alsa-lib" ,alsa-lib)
1298 ("fftw" ,fftw)
1299 ("libxml2" ,libxml2)
1300 ("jack" ,jack-1)
1301 ("ladspa" ,ladspa)
1302 ("libsamplerate" ,libsamplerate)
4c7729dc 1303 ("pulseaudio" ,pulseaudio)
307ad140
RW		 1304 ("sdl" ,sdl)
1305 ("sox" ,sox)))
1306 (native-inputs
1307 `(("pkg-config" ,pkg-config)))
4c7729dc 1308 (home-page "https://www.mltframework.org/")
307ad140
RW		 1309 (synopsis "Author, manage, and run multitrack audio/video compositions")
1310 (description
1311 "MLT is a multimedia framework, designed and developed for television
1312broadcasting. It provides a toolkit for broadcasters, video editors, media
1313players, transcoders, web streamers and many more types of applications. The
1314functionality of the system is provided via an assortment of ready to use
1315tools, XML authoring components, and an extensible plug-in based API.")
1316 (license license:lgpl2.1+)))
f464016d 1317
945d985a
DT		 1318(define-public v4l-utils
1319 (package
1320 (name "v4l-utils")
1d4ac724 1321 (version "1.10.0")
945d985a
DT		 1322 (source (origin
1323 (method url-fetch)
1d4ac724 1324 (uri (string-append "https://linuxtv.org/downloads/v4l-utils"
945d985a
DT		 1325 "/v4l-utils-" version ".tar.bz2"))
1326 (sha256
1327 (base32
1d4ac724 1328 "0srkwh3r6f0bkb4kp0d7i0mlmp8babs3qc22cdy1sw4awmzd5skq"))))
945d985a
DT		 1329 (build-system gnu-build-system)
1330 (arguments
1331 '(#:configure-flags
1332 (list (string-append "--with-udevdir="
1333 (assoc-ref %outputs "out")
1334 "/lib/udev"))))
1335 (native-inputs
1336 `(("pkg-config" ,pkg-config)))
1337 (inputs
1338 `(("alsa-lib" ,alsa-lib)
1339 ("glu" ,glu)
1340 ("libjpeg" ,libjpeg)
1341 ("libx11" ,libx11)
1342 ("qt" ,qt)
1343 ("eudev" ,eudev)))
1344 (synopsis "Realtime video capture utilities for Linux")
1345 (description "The v4l-utils provide a series of libraries and utilities to
1346be used for realtime video capture via Linux-specific APIs.")
1347 (home-page "https://linuxtv.org/wiki/index.php/V4l-utils")
1348 ;; libv4l2 is LGPL2.1+, while utilities are GPL2 only.
1349 (license (list license:lgpl2.1+ license:gpl2))))
1350
f464016d
DT		 1351(define-public obs
1352 (package
1353 (name "obs")
6cd6d1ad 1354 (version "0.14.1")
f464016d
DT		 1355 (source (origin
1356 (method url-fetch)
1357 (uri (string-append "https://github.com/jp9000/obs-studio"
1358 "/archive/" version ".tar.gz"))
1359 (file-name (string-append name "-" version ".tar.gz"))
1360 (sha256
1361 (base32
6cd6d1ad 1362 "1w07ign2swfigmsjd2jyaqqdnj2zpzs8hzsjzzk5l377jbx3ml5g"))))
f464016d
DT		 1363 (build-system cmake-build-system)
1364 (arguments '(#:tests? #f)) ; no tests
1365 (native-inputs
1366 `(("pkg-config" ,pkg-config)))
1367 (inputs
1368 `(("curl" ,curl)
1369 ("eudev" ,eudev)
1370 ("ffmpeg" ,ffmpeg)
1371 ("freetype" ,freetype)
1372 ("jack" ,jack-1)
1373 ("jansson" ,jansson)
1374 ("libx264" ,libx264)
1375 ("libxcomposite" ,libxcomposite)
1376 ("mesa" ,mesa)
1377 ("pulseaudio" ,pulseaudio)
1378 ("qt" ,qt)
d4df2032 1379 ("v4l-utils" ,v4l-utils)
f464016d
DT		 1380 ("zlib" ,zlib)))
1381 (synopsis "Live streaming software")
1382 (description "Open Broadcaster Software provides a graphical interface for
1383video recording and live streaming. OBS supports capturing audio and video
1384from many input sources such as webcams, X11 (for screencasting), PulseAudio,
1385and JACK.")
1386 (home-page "https://obsproject.com")
1387 (license license:gpl2+)))
d5650f86
EF		 1388
1389(define-public libvdpau
1390 (package
1391 (name "libvdpau")
1392 (version "1.1.1")
1393 (source
1394 (origin
1395 (method url-fetch)
1396 (uri (string-append "https://secure.freedesktop.org/~aplattner/vdpau/"
1397 name "-" version ".tar.bz2"))
1398 (sha256
1399 (base32
1400 "0dnpb0yh7v6rvckx82kxg045rd9rbsw25wjv7ad5n8h94s9h2yl5"))))
1401 (build-system gnu-build-system)
1402 (native-inputs
1403 `(("pkg-config" ,pkg-config)))
1404 (inputs
1405 `(("dri2proto" ,dri2proto)
1406 ("libx11" ,libx11 "out")
1407 ("libxext" ,libxext)))
1408 (home-page "https://wiki.freedesktop.org/www/Software/VDPAU/")
1409 (synopsis "Video Decode and Presentation API")
1410 (description "VDPAU is the Video Decode and Presentation API for UNIX. It
1411provides an interface to video decode acceleration and presentation hardware
1412present in modern GPUs.")
1413 (license (license:x11-style "file://COPYING"))))
3161d32d
EF		 1414
1415(define-public vdpauinfo
1416 (package
1417 (name "vdpauinfo")
1418 (version "1.0")
1419 (source
1420 (origin
1421 (method url-fetch)
1422 (uri (string-append "https://secure.freedesktop.org/~aplattner/vdpau/"
1423 name "-" version ".tar.gz"))
1424 (sha256
1425 (base32
1426 "1i2b0k9h8r0lnxlrkgqzmrjakgaw3f1ygqqwzx8w6676g85rcm20"))))
1427 (build-system gnu-build-system)
1428 (native-inputs
1429 `(("pkg-config" ,pkg-config)
1430 ("libx11" ,libx11)))
1431 (propagated-inputs
1432 `(("libvdpau" ,libvdpau)))
1433 (home-page "https://wiki.freedesktop.org/www/Software/VDPAU/")
1434 (synopsis "Tool to query the capabilities of a VDPAU implementation")
1435 (description "Vdpauinfo is a tool to query the capabilities of a VDPAU
1436implementation.")
1437 (license (license:x11-style "file://COPYING"))))
a7d94b54
LC		 1438
1439(define-public recordmydesktop
1440 (package
1441 (name "recordmydesktop")
1442 (version "0.3.8.1")
1443 (source (origin
1444 (method url-fetch)
1445 (uri (string-append "mirror://sourceforge/" name "/" name "/"
1446 version "/recordmydesktop-" version ".tar.gz"))
1447 (sha256
1448 (base32
1449 "133kkl5j0r877d41bzj7kj0vf3xm8x80yyx2n8nqxrva304f58ik"))))
1450 (build-system gnu-build-system)
1451 (inputs `(("popt" ,popt)
1452 ("zlib" ,zlib)
1453 ("libx11" ,libx11)
1454 ("libice" ,libice)
1455 ("libsm" ,libsm)
1456 ("libxfixes" ,libxfixes)
1457 ("libxdamage" ,libxdamage)
1458 ("libxext" ,libxext)
1459 ("libvorbis" ,libvorbis)
1460 ("libtheora" ,libtheora)))
1461 (home-page "http://recordmydesktop.sourceforge.net/")
1462 (synopsis "Desktop session video recorder")
1463 (description
1464 "recordMyDesktop is a command-line tool that captures the activity in
1465your graphical desktop and encodes it as a video. This is a useful tool for
1466making @dfn{screencasts}.")
1467 (license license:gpl2+)))
jackhill's copy of GNU Guix: https://guix.gnu.org/