2013-10-31 23:15:46 +01:00
|
|
|
|
;;; GNU Guix --- Functional package management for GNU
|
2016-02-05 14:42:13 +01:00
|
|
|
|
;;; Copyright © 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr>
|
2016-01-20 04:11:16 +01:00
|
|
|
|
;;; Copyright © 2014, 2015, 2016 David Thompson <davet@gnu.org>
|
2016-01-16 00:13:13 +01:00
|
|
|
|
;;; Copyright © 2014, 2015, 2016 Mark H Weaver <mhw@netris.org>
|
2015-03-06 10:17:19 +01:00
|
|
|
|
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
|
2017-01-02 13:18:36 +01:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
|
2015-10-29 03:42:42 +01:00
|
|
|
|
;;; Copyright © 2015 Andy Patterson <ajpatter@uwaterloo.ca>
|
2015-11-16 18:28:59 +01:00
|
|
|
|
;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
|
2016-09-09 18:06:26 +02:00
|
|
|
|
;;; Copyright © 2015, 2016 Alex Vong <alexvong1995@gmail.com>
|
2017-01-07 16:22:47 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 Alex Griffin <a@ajgrf.com>
|
2016-07-29 23:01:51 +02:00
|
|
|
|
;;; Copyright © 2016 Kei Kebreau <kei@openmailbox.org>
|
2016-08-02 22:11:46 +02:00
|
|
|
|
;;; Copyright © 2016 Dmitry Nikolaev <cameltheman@gmail.com>
|
2016-09-09 21:52:24 +02:00
|
|
|
|
;;; Copyright © 2016 Andy Patterson <ajpatter@uwaterloo.ca>
|
2017-02-09 14:37:00 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 ng0 <contact.ng0@cryptolab.net>
|
2015-12-26 03:29:09 +01:00
|
|
|
|
;;; Copyright © 2016 Eric Bavier <bavier@member.fsf.org>
|
2016-06-18 22:40:51 +02:00
|
|
|
|
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
|
2013-10-31 23:15:46 +01:00
|
|
|
|
;;;
|
|
|
|
|
;;; This file is part of GNU Guix.
|
|
|
|
|
;;;
|
|
|
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
|
|
|
;;; under the terms of the GNU General Public License as published by
|
|
|
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
|
|
|
;;; your option) any later version.
|
|
|
|
|
;;;
|
|
|
|
|
;;; GNU Guix is distributed in the hope that it will be useful, but
|
|
|
|
|
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
;;; GNU General Public License for more details.
|
|
|
|
|
;;;
|
|
|
|
|
;;; You should have received a copy of the GNU General Public License
|
|
|
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
|
|
|
|
|
(define-module (gnu packages video)
|
2014-08-04 05:27:24 +02:00
|
|
|
|
#:use-module (ice-9 match)
|
2016-07-12 16:45:13 +02:00
|
|
|
|
#:use-module (srfi srfi-1)
|
|
|
|
|
#:use-module (srfi srfi-26)
|
2015-04-02 19:16:04 +02:00
|
|
|
|
#:use-module ((guix licenses) #:prefix license:)
|
2015-03-30 03:35:34 +02:00
|
|
|
|
#:use-module (guix utils)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (guix packages)
|
|
|
|
|
#:use-module (guix download)
|
2015-03-04 16:29:08 +01:00
|
|
|
|
#:use-module (guix git-download)
|
2016-07-29 23:01:51 +02:00
|
|
|
|
#:use-module (guix svn-download)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
#:use-module (guix build-system cmake)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (guix build-system gnu)
|
2016-07-07 01:58:17 +02:00
|
|
|
|
#:use-module (guix build-system glib-or-gtk)
|
2014-07-03 22:21:53 +02:00
|
|
|
|
#:use-module (guix build-system python)
|
2015-03-19 23:46:21 +01:00
|
|
|
|
#:use-module (guix build-system waf)
|
2015-02-02 06:22:51 +01:00
|
|
|
|
#:use-module (gnu packages)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (gnu packages algebra)
|
2015-02-23 20:42:41 +01:00
|
|
|
|
#:use-module (gnu packages audio)
|
2015-03-06 17:07:55 +01:00
|
|
|
|
#:use-module (gnu packages autotools)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages avahi)
|
2015-03-04 16:29:08 +01:00
|
|
|
|
#:use-module (gnu packages base)
|
2016-09-09 21:52:25 +02:00
|
|
|
|
#:use-module (gnu packages bison)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages cdrom)
|
2015-12-26 03:29:09 +01:00
|
|
|
|
#:use-module (gnu packages cmake)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (gnu packages compression)
|
2015-12-17 19:36:42 +01:00
|
|
|
|
#:use-module (gnu packages curl)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
#:use-module (gnu packages databases)
|
2017-02-09 14:37:00 +01:00
|
|
|
|
#:use-module (gnu packages dejagnu)
|
2013-12-17 21:19:41 +01:00
|
|
|
|
#:use-module (gnu packages elf)
|
2016-09-09 21:52:25 +02:00
|
|
|
|
#:use-module (gnu packages flex)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (gnu packages fontutils)
|
2016-08-20 21:39:42 +02:00
|
|
|
|
#:use-module (gnu packages freedesktop)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
#:use-module (gnu packages fribidi)
|
|
|
|
|
#:use-module (gnu packages gettext)
|
2015-03-04 16:29:08 +01:00
|
|
|
|
#:use-module (gnu packages ghostscript)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages gl)
|
|
|
|
|
#:use-module (gnu packages glib)
|
2015-02-07 23:17:39 +01:00
|
|
|
|
#:use-module (gnu packages guile)
|
2015-12-26 03:29:09 +01:00
|
|
|
|
#:use-module (gnu packages gnome)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages gnupg)
|
2015-12-26 03:29:09 +01:00
|
|
|
|
#:use-module (gnu packages gstreamer)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
#:use-module (gnu packages gtk)
|
gnu: Consolidate libjpeg, libpng, and libtiff into one module.
* gnu/packages/image.scm: New file.
* gnu-system.am (GNU_SYSTEM_MODULES): Add image.scm and remove libjpeg.scm,
libpng.scm, and libtiff.scm.
* gnu/packages/libjpeg.scm, gnu/packages/libpng.scm, gnu/packages/libtiff.scm:
Delete files.
* gnu/packages/emacs.scm gnu/packages/games.scm, gnu/packages/gd.scm,
gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/gimp.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnustep.scm, gnu/packages/gnuzilla.scm,
gnu/packages/graphviz.scm, gnu/packages/gtk.scm,
gnu/packages/imagemagick.scm, gnu/packages/inkscape.scm,
gnu/packages/netpbm.scm, gnu/packages/pdf.scm, gnu/packages/plotutils.scm,
gnu/packages/qemu.scm, gnu/packages/qt.scm, gnu/packages/scheme.scm,
gnu/packages/sdl.scm, gnu/packages/slim.scm, gnu/packages/tcl.scm,
gnu/packages/texlive.scm, gnu/packages/video.scm, gnu/packages/xiph.scm,
gnu/packages/xorg.scm: Use (gnu packages image) module.
2014-06-25 14:39:02 +02:00
|
|
|
|
#:use-module (gnu packages image)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages linux)
|
|
|
|
|
#:use-module (gnu packages lua)
|
2015-12-26 03:29:09 +01:00
|
|
|
|
#:use-module (gnu packages m4)
|
2017-02-09 14:37:00 +01:00
|
|
|
|
#:use-module (gnu packages man)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages mp3)
|
2015-03-05 15:56:58 +01:00
|
|
|
|
#:use-module (gnu packages ncurses)
|
2015-03-21 23:09:11 +01:00
|
|
|
|
#:use-module (gnu packages ocr)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (gnu packages perl)
|
|
|
|
|
#:use-module (gnu packages pkg-config)
|
2016-04-17 17:36:43 +02:00
|
|
|
|
#:use-module (gnu packages popt)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages pulseaudio)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
#:use-module (gnu packages python)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages qt)
|
|
|
|
|
#:use-module (gnu packages sdl)
|
|
|
|
|
#:use-module (gnu packages ssh)
|
2015-04-04 17:08:52 +02:00
|
|
|
|
#:use-module (gnu packages texinfo)
|
2015-03-04 22:37:08 +01:00
|
|
|
|
#:use-module (gnu packages textutils)
|
gnu: Rename module gnutls to tls.
* gnu/packages/gnutls.scm: Rename to...
* gnu/packages/tls.scm: ... this. Change module name accordingly.
* gnu/packages/{admin.scm, cups.scm, curl.scm, dc.scm, dns.scm, emacs.scm,
ftp.scm, gnome.scm, gnunet.scm, gnupg.scm, gsasl.scm, lynx.scm,
mail.scm, messaging.scm, package-management.scm, shishi.scm,
task-management.scm, version-control.scm, video.scm, vpn.scm,
webkit.scm, weechat.scm, wget.scm, wine.scm, xml.scm}: Adapt module
import to new name.
* gnu-system.am (GNU_SYSTEM_MODULES): Rename gnutls module to tls.
2015-07-03 21:41:22 +02:00
|
|
|
|
#:use-module (gnu packages tls)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages version-control)
|
2015-03-07 12:18:32 +01:00
|
|
|
|
#:use-module (gnu packages web)
|
2015-12-26 03:29:09 +01:00
|
|
|
|
#:use-module (gnu packages webkit)
|
2015-03-20 15:52:52 +01:00
|
|
|
|
#:use-module (gnu packages xdisorg)
|
2014-01-23 19:05:09 +01:00
|
|
|
|
#:use-module (gnu packages xiph)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
#:use-module (gnu packages xml)
|
|
|
|
|
#:use-module (gnu packages xorg)
|
2016-06-27 09:30:01 +02:00
|
|
|
|
#:use-module (gnu packages assembly)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
#:use-module (gnu packages zip))
|
2013-10-31 23:15:46 +01:00
|
|
|
|
|
2015-04-04 17:08:52 +02:00
|
|
|
|
(define-public aalib
|
|
|
|
|
(package
|
|
|
|
|
(name "aalib")
|
|
|
|
|
(version "1.4rc5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/aa-project/aa-lib/"
|
|
|
|
|
version "/" name "-" version ".tar.gz"))
|
2015-04-04 17:08:52 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1vkh19gb76agvh4h87ysbrgy82hrw88lnsvhynjf4vng629dmpgv"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("makeinfo" ,texinfo)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ncurses" ,ncurses)))
|
|
|
|
|
(arguments
|
2016-08-17 19:55:05 +02:00
|
|
|
|
`(#:phases
|
2015-04-04 17:08:52 +02:00
|
|
|
|
(modify-phases %standard-phases
|
2015-04-10 11:35:50 +02:00
|
|
|
|
(replace 'configure
|
2015-08-08 05:57:08 +02:00
|
|
|
|
(lambda* (#:key build inputs outputs #:allow-other-keys)
|
2015-04-04 17:08:52 +02:00
|
|
|
|
;; This old `configure' script doesn't support
|
|
|
|
|
;; variables passed as arguments.
|
|
|
|
|
(let ((out (assoc-ref outputs "out"))
|
|
|
|
|
(ncurses (assoc-ref inputs "ncurses")))
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "bash"))
|
|
|
|
|
(zero? (system* "./configure"
|
|
|
|
|
(string-append "--prefix=" out)
|
2015-08-08 05:57:08 +02:00
|
|
|
|
(string-append "--build=" build)
|
2016-08-17 19:55:05 +02:00
|
|
|
|
;; The ancient config.guess is unable to
|
|
|
|
|
;; guess the host triplet on mips64el.
|
|
|
|
|
,@(if (string=? "mips64el-linux"
|
|
|
|
|
(%current-system))
|
|
|
|
|
'("--host=mips64el-unknown-linux-gnu")
|
|
|
|
|
'())
|
2017-02-21 19:56:45 +01:00
|
|
|
|
;; The same is also true with aarch64.
|
|
|
|
|
,@(if (string=? "aarch64-linux"
|
|
|
|
|
(%current-system))
|
|
|
|
|
'("--host=aarch64-unknown-linux-gnu")
|
|
|
|
|
'())
|
2015-04-04 17:08:52 +02:00
|
|
|
|
(string-append "--with-ncurses="
|
|
|
|
|
ncurses)))))))))
|
|
|
|
|
(home-page "http://aa-project.sourceforge.net/aalib/")
|
|
|
|
|
(synopsis "ASCII-art library")
|
|
|
|
|
(description
|
|
|
|
|
"AA-lib is a low level gfx library which does not require graphics device.
|
|
|
|
|
In fact, there is no graphical output possible. AA-lib replaces those
|
|
|
|
|
old-fashioned output methods with powerful ascii-art renderer.")
|
|
|
|
|
(license license:lgpl2.0+)))
|
|
|
|
|
|
2015-03-06 10:17:19 +01:00
|
|
|
|
(define-public liba52
|
|
|
|
|
(package
|
|
|
|
|
(name "liba52")
|
|
|
|
|
(version "0.7.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2015-03-18 10:52:37 +01:00
|
|
|
|
(uri (string-append
|
|
|
|
|
;; A mirror://sourceforge URI doesn't work, presumably
|
|
|
|
|
;; because the SourceForge project is misconfigured.
|
|
|
|
|
"http://liba52.sourceforge.net/files/a52dec-" version
|
|
|
|
|
".tar.gz"))
|
2015-03-06 10:17:19 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-07-07 08:30:25 +02:00
|
|
|
|
"0czccp4fcpf2ykp16xcrzdfmnircz1ynhls334q374xknd5747d2"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "liba52-enable-pic.patch"
|
|
|
|
|
"liba52-set-soname.patch"
|
|
|
|
|
"liba52-use-mtune-not-mcpu.patch"
|
|
|
|
|
"liba52-link-with-libm.patch"))))
|
2015-03-06 10:17:19 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2015-07-07 08:30:25 +02:00
|
|
|
|
;; XXX We need to run ./bootstrap because of the build system fixes above.
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)))
|
2015-07-14 01:04:27 +02:00
|
|
|
|
(arguments `(#:configure-flags '("--enable-shared")
|
2015-07-07 08:30:25 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; XXX We need to run ./bootstrap because of the build
|
|
|
|
|
;; system fixes above.
|
|
|
|
|
(add-after
|
|
|
|
|
'unpack 'bootstrap
|
|
|
|
|
(lambda _ (zero? (system* "sh" "bootstrap")))))))
|
2015-03-06 10:17:19 +01:00
|
|
|
|
(home-page "http://liba52.sourceforge.net/")
|
|
|
|
|
(synopsis "ATSC A/52 stream decoder")
|
|
|
|
|
(description "liba52 is a library for decoding ATSC A/52 streams. The
|
|
|
|
|
A/52 standard is used in a variety of applications, including digital
|
|
|
|
|
television and DVD. It is also known as AC-3.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-03-06 10:17:19 +01:00
|
|
|
|
|
2015-07-07 19:06:00 +02:00
|
|
|
|
(define-public libmpeg2
|
|
|
|
|
(package
|
|
|
|
|
(name "libmpeg2")
|
|
|
|
|
(version "0.5.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
;; A mirror://sourceforge URI doesn't work, presumably
|
|
|
|
|
;; because the SourceForge project is misconfigured.
|
|
|
|
|
(uri (string-append "http://libmpeg2.sourceforge.net/files/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1m3i322n2fwgrvbs1yck7g5md1dbg22bhq5xdqmjpz5m7j4jxqny"))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxv" ,libxv)
|
|
|
|
|
("libsm" ,libsm)
|
|
|
|
|
("libice" ,libice)
|
|
|
|
|
("sdl" ,sdl)))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://libmpeg2.sourceforge.net/")
|
|
|
|
|
(synopsis "MPEG1 and MPEG2 video decoder library")
|
|
|
|
|
(description
|
|
|
|
|
"libmpeg2 is a library which can decode MPEG1 and MPEG2 video streams.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-07-07 20:48:28 +02:00
|
|
|
|
(define-public libx264
|
|
|
|
|
(package
|
|
|
|
|
(name "libx264")
|
2017-03-17 20:28:36 +01:00
|
|
|
|
(version "20170316-2245")
|
2015-07-07 20:48:28 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-12-06 21:43:31 +01:00
|
|
|
|
(uri (string-append "https://download.videolan.org/pub/x264/snapshots/"
|
2015-07-07 20:48:28 +02:00
|
|
|
|
"x264-snapshot-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-17 20:28:36 +01:00
|
|
|
|
"1s1nnvl3axz38sv4g09skijl6k9mbbngbb1nsh26w4dr2w2gyzad"))))
|
2015-07-07 20:48:28 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("yasm" ,yasm)))
|
|
|
|
|
;; TODO: Add gpac input
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;no check target
|
|
|
|
|
#:configure-flags '("--enable-shared"
|
|
|
|
|
;; Don't build the command-line program. If we
|
|
|
|
|
;; want it later, we should do so in a different
|
|
|
|
|
;; package to avoid a circular dependency (the x264
|
|
|
|
|
;; program depends on ffmpeg and ffmpeg depends on
|
|
|
|
|
;; libx264).
|
2016-08-16 06:38:49 +02:00
|
|
|
|
"--disable-cli"
|
|
|
|
|
|
|
|
|
|
;; On MIPS, we must pass "--disable-asm" or else
|
|
|
|
|
;; configure fails after printing: "You specified a
|
|
|
|
|
;; pre-MSA CPU in your CFLAGS. If you really want
|
|
|
|
|
;; to run on such a CPU, configure with
|
|
|
|
|
;; --disable-asm."
|
|
|
|
|
,@(if (string-prefix? "mips"
|
|
|
|
|
(or (%current-target-system)
|
|
|
|
|
(%current-system)))
|
|
|
|
|
'("--disable-asm")
|
|
|
|
|
'()))))
|
2016-12-06 21:43:31 +01:00
|
|
|
|
(home-page "https://www.videolan.org/developers/x264.html")
|
2015-07-07 20:48:28 +02:00
|
|
|
|
(synopsis "H.264 video coding library")
|
|
|
|
|
(description "libx264 is an advanced encoding library for creating
|
|
|
|
|
H.264 (MPEG-4 AVC) video streams.")
|
|
|
|
|
(license (list license:gpl2+ ;most files
|
|
|
|
|
license:isc ;common/x86/x86inc.asm
|
|
|
|
|
license:lgpl2.1+ ;extras/getopt.c
|
|
|
|
|
license:bsd-3 ;extras/inttypes.h
|
|
|
|
|
(license:non-copyleft ;extras/cl*.h
|
|
|
|
|
"file://extras/cl.h"
|
|
|
|
|
"See extras/cl.h in the distribution.")))))
|
|
|
|
|
|
2016-10-24 21:34:04 +02:00
|
|
|
|
(define-public x265
|
|
|
|
|
(package
|
|
|
|
|
(name "x265")
|
2017-02-25 12:48:59 +01:00
|
|
|
|
(version "2.3")
|
2016-10-24 21:34:04 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://download.videolan.org/videolan/x265/"
|
|
|
|
|
"x265_" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-02-25 12:48:59 +01:00
|
|
|
|
"07z4ydxg0lk6j43h0wlh2xddb91cy4y4mny2ln71d4278b1hllj7"))
|
2016-10-24 21:34:04 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(delete-file-recursively "source/compat/getopt"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; tests are skipped if cpu-optimized code isn't built
|
2017-03-21 17:01:05 +01:00
|
|
|
|
;; Currently the source code doesn't check for aarch64
|
|
|
|
|
,@(if (string-prefix? "aarch64" (or (%current-target-system) (%current-system)))
|
|
|
|
|
'(#:configure-flags '("-DENABLE_PIC=TRUE"))
|
|
|
|
|
'())
|
2016-10-24 21:34:04 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'configure 'prepare-build
|
|
|
|
|
(lambda _
|
|
|
|
|
(delete-file-recursively "build")
|
|
|
|
|
(chdir "source")
|
|
|
|
|
#t)))))
|
|
|
|
|
(home-page "http://x265.org/")
|
|
|
|
|
(synopsis "Library for encoding h.265/HEVC video streams")
|
|
|
|
|
(description "x265 is a H.265 / HEVC video encoder application library,
|
|
|
|
|
designed to encode video or images into an H.265 / HEVC encoded bitstream.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-03-04 22:37:08 +01:00
|
|
|
|
(define-public libass
|
|
|
|
|
(package
|
|
|
|
|
(name "libass")
|
2017-02-22 06:26:33 +01:00
|
|
|
|
(version "0.13.6")
|
2015-03-04 22:37:08 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/libass/libass/releases/download/"
|
|
|
|
|
version "/libass-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-02-22 06:26:33 +01:00
|
|
|
|
"0b9cj5xfsa7zwlk5m146fhv102v51iqs3rapq0n2xrz30k8p9a7q"))))
|
2015-03-04 22:37:08 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("yasm" ,yasm)))
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("freetype" ,freetype)
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("harfbuzz" ,harfbuzz)
|
|
|
|
|
("enca" ,enca)))
|
|
|
|
|
(home-page "https://github.com/libass/libass")
|
|
|
|
|
(synopsis "Subtitle rendering library for the ASS/SSA format")
|
|
|
|
|
(description "libass is a subtitle rendering library for the
|
|
|
|
|
ASS/SSA (Advanced Substation Alpha/SubStation Alpha) subtitle format.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:isc)))
|
2015-03-04 22:37:08 +01:00
|
|
|
|
|
2015-03-05 15:56:58 +01:00
|
|
|
|
(define-public libcaca
|
|
|
|
|
(package
|
|
|
|
|
(name "libcaca")
|
|
|
|
|
(version "0.99.beta19")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://caca.zoy.org/files/libcaca/libcaca-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1x3j6yfyxl52adgnabycr0n38j9hx2j74la0hz0n8cnh9ry4d2qj"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("freeglut" ,freeglut)
|
|
|
|
|
("ftgl" ,ftgl)
|
2016-08-13 22:16:00 +02:00
|
|
|
|
("imlib2" ,imlib2)
|
2015-03-05 15:56:58 +01:00
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(home-page "http://caca.zoy.org/wiki/libcaca")
|
|
|
|
|
(synopsis "Colour ASCII-art library")
|
|
|
|
|
(description "libcaca is a graphics library that outputs text instead of
|
|
|
|
|
pixels, so that it can work on older video cards or text terminals. It
|
|
|
|
|
supports Unicode, 2048 colors, dithering of color images, and advanced text
|
|
|
|
|
canvas operations.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license (license:fsf-free "file://COPYING")))) ;WTFPL version 2
|
2015-03-05 15:56:58 +01:00
|
|
|
|
|
2015-03-06 10:17:35 +01:00
|
|
|
|
(define-public libdca
|
|
|
|
|
(package
|
|
|
|
|
(name "libdca")
|
|
|
|
|
(version "0.0.5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://download.videolan.org/pub/videolan/libdca/"
|
|
|
|
|
version "/libdca-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0hh6a7l8vvccsd5i1fkv9av2gzv9fy8m0b8jpsn5p6hh4bh2586v"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.videolan.org/developers/libdca.html")
|
|
|
|
|
(synopsis "DTS Coherent Acoustics decoder")
|
|
|
|
|
(description "libdca is a library for decoding DTS Coherent Acoustics
|
|
|
|
|
streams.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-03-06 10:17:35 +01:00
|
|
|
|
|
2015-03-06 11:50:14 +01:00
|
|
|
|
(define-public libdv
|
|
|
|
|
(package
|
|
|
|
|
(name "libdv")
|
|
|
|
|
(version "1.0.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-07-21 08:35:30 +02:00
|
|
|
|
"mirror://sourceforge/" name "/" name "/"
|
|
|
|
|
version "/" name "-" version ".tar.gz"))
|
2015-03-06 11:50:14 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1fl96f2xh2slkv1i1ix7kqk576a0ak1d33cylm0mbhm96d0761d3"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs `(("libxv" ,libxv)))
|
|
|
|
|
(home-page "http://libdv.sourceforge.net/")
|
|
|
|
|
(synopsis "DV video (IEC 61834 and SMPTE 314M) codec")
|
|
|
|
|
(description "The Quasar DV codec (libdv) is a software codec for DV
|
|
|
|
|
video, the encoding format used by most digital camcorders, typically those
|
|
|
|
|
that support the IEEE 1394 (a.k.a. FireWire or i.Link) interface. Libdv was
|
|
|
|
|
developed according to the official standards for DV video: IEC 61834 and
|
|
|
|
|
SMPTE 314M.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:lgpl2.1+)))
|
2015-03-06 11:50:14 +01:00
|
|
|
|
|
2015-03-20 15:52:52 +01:00
|
|
|
|
(define-public libva
|
|
|
|
|
(package
|
|
|
|
|
(name "libva")
|
2017-04-03 16:21:51 +02:00
|
|
|
|
(version "1.8.0")
|
2015-03-20 15:52:52 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-02-19 14:23:38 +01:00
|
|
|
|
"https://www.freedesktop.org/software/vaapi/releases/libva/libva-"
|
2015-03-20 15:52:52 +01:00
|
|
|
|
version".tar.bz2"))
|
|
|
|
|
(sha256
|
2017-04-03 16:21:51 +02:00
|
|
|
|
(base32 "0n6ncbsx2x1iy92kfb3vqw9i2dii7ck7g0rlflsxz09rpvfg74pb"))))
|
2015-03-20 15:52:52 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libdrm" ,libdrm)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxfixes" ,libxfixes)
|
|
|
|
|
("mesa" ,mesa)))
|
2015-04-28 17:48:24 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'build 'fix-dlopen-paths
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(substitute* "va/drm/va_drm_auth_x11.c"
|
|
|
|
|
(("\"libva-x11\\.so\\.%d\"")
|
|
|
|
|
(string-append "\"" out "/lib/libva-x11.so.%d\"")))))))
|
|
|
|
|
;; Most drivers are in mesa's $prefix/lib/dri, so use that. (Can be
|
|
|
|
|
;; overridden at run-time via LIBVA_DRIVERS_PATH.)
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list (string-append "--with-drivers-path="
|
|
|
|
|
(assoc-ref %build-inputs "mesa") "/lib/dri"))
|
|
|
|
|
;; However, we can't write to mesa's store directory, so override the
|
|
|
|
|
;; following make variable to install the dummy driver to libva's
|
|
|
|
|
;; $prefix/lib/dri directory.
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list (string-append "dummy_drv_video_ladir="
|
|
|
|
|
(assoc-ref %outputs "out") "/lib/dri"))))
|
2016-05-09 10:04:29 +02:00
|
|
|
|
(home-page "https://www.freedesktop.org/wiki/Software/vaapi/")
|
2015-03-20 15:52:52 +01:00
|
|
|
|
(synopsis "Video acceleration library")
|
|
|
|
|
(description "The main motivation for VA-API (Video Acceleration API) is
|
|
|
|
|
to enable hardware accelerated video decode/encode at various
|
|
|
|
|
entry-points (VLD, IDCT, Motion Compensation etc.) for prevailing coding
|
|
|
|
|
standards (MPEG-2, MPEG-4 ASP/H.263, MPEG-4 AVC/H.264, and VC-1/VMW3).")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:expat)))
|
2015-03-20 15:52:52 +01:00
|
|
|
|
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(define-public ffmpeg
|
|
|
|
|
(package
|
|
|
|
|
(name "ffmpeg")
|
2017-02-12 07:13:03 +01:00
|
|
|
|
(version "3.2.4")
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2015-09-10 09:44:25 +02:00
|
|
|
|
(uri (string-append "https://ffmpeg.org/releases/ffmpeg-"
|
|
|
|
|
version ".tar.xz"))
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-02-12 07:13:03 +01:00
|
|
|
|
"0ymg1mkg1n0770gmjfqp79p5ijxq04smfrsrrxc8pjc0y0agyf3f"))))
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
gnu: Move numerous "inputs" which should be "native-inputs".
* gnu/packages/avahi.scm, gnu/packages/cdrom.scm, gnu/packages/cryptsetup.scm,
gnu/packages/curl.scm, gnu/packages/emacs.scm, gnu/packages/fontutils.scm,
gnu/packages/gdb.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/glib.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm, gnu/packages/graphviz.scm,
gnu/packages/groff.scm, gnu/packages/gstreamer.scm, gnu/packages/gtk.scm,
gnu/packages/gv.scm, gnu/packages/imagemagick.scm, gnu/packages/irssi.scm,
gnu/packages/kde.scm, gnu/packages/libcanberra.scm, gnu/packages/libtiff.scm,
gnu/packages/linux.scm, gnu/packages/lvm.scm, gnu/packages/mp3.scm,
gnu/packages/netpbm.scm, gnu/packages/parted.scm, gnu/packages/pdf.scm,
gnu/packages/pulseaudio.scm, gnu/packages/qemu.scm, gnu/packages/qt.scm,
gnu/packages/ratpoison.scm, gnu/packages/rdf.scm, gnu/packages/slim.scm,
gnu/packages/texlive.scm, gnu/packages/version-control.scm,
gnu/packages/video.scm, gnu/packages/vpn.scm, gnu/packages/w3m.scm,
gnu/packages/xml.scm, gnu/packages/xnee.scm, gnu/packages/xorg.scm,
gnu/packages/zip.scm: Move some build-time dependencies from `inputs' to
`native-inputs'.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
2013-12-15 12:01:56 +01:00
|
|
|
|
`(("fontconfig" ,fontconfig)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
("freetype" ,freetype)
|
2015-10-29 23:59:18 +01:00
|
|
|
|
("gnutls" ,gnutls)
|
2014-01-24 22:22:42 +01:00
|
|
|
|
("opus" ,opus)
|
2015-03-05 19:54:25 +01:00
|
|
|
|
("ladspa" ,ladspa)
|
2015-02-09 16:05:39 +01:00
|
|
|
|
("lame" ,lame)
|
2015-03-04 22:37:08 +01:00
|
|
|
|
("libass" ,libass)
|
2015-03-05 21:40:36 +01:00
|
|
|
|
("libbluray" ,libbluray)
|
2015-03-05 15:56:58 +01:00
|
|
|
|
("libcaca" ,libcaca)
|
2015-03-05 20:44:00 +01:00
|
|
|
|
("libcdio-paranoia" ,libcdio-paranoia)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
("libtheora" ,libtheora)
|
2016-01-28 17:11:49 +01:00
|
|
|
|
("libvdpau" ,libvdpau)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
("libvorbis" ,libvorbis)
|
2014-06-27 00:07:29 +02:00
|
|
|
|
("libvpx" ,libvpx)
|
2016-01-28 17:11:49 +01:00
|
|
|
|
("libx11" ,libx11)
|
2015-07-09 09:06:34 +02:00
|
|
|
|
("libx264" ,libx264)
|
2016-01-28 17:11:49 +01:00
|
|
|
|
("mesa" ,mesa)
|
2015-03-05 19:54:25 +01:00
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
2017-02-11 17:22:18 +01:00
|
|
|
|
("sdl" ,sdl2)
|
2015-02-23 20:42:41 +01:00
|
|
|
|
("soxr" ,soxr)
|
gnu: Move numerous "inputs" which should be "native-inputs".
* gnu/packages/avahi.scm, gnu/packages/cdrom.scm, gnu/packages/cryptsetup.scm,
gnu/packages/curl.scm, gnu/packages/emacs.scm, gnu/packages/fontutils.scm,
gnu/packages/gdb.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/glib.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm, gnu/packages/graphviz.scm,
gnu/packages/groff.scm, gnu/packages/gstreamer.scm, gnu/packages/gtk.scm,
gnu/packages/gv.scm, gnu/packages/imagemagick.scm, gnu/packages/irssi.scm,
gnu/packages/kde.scm, gnu/packages/libcanberra.scm, gnu/packages/libtiff.scm,
gnu/packages/linux.scm, gnu/packages/lvm.scm, gnu/packages/mp3.scm,
gnu/packages/netpbm.scm, gnu/packages/parted.scm, gnu/packages/pdf.scm,
gnu/packages/pulseaudio.scm, gnu/packages/qemu.scm, gnu/packages/qt.scm,
gnu/packages/ratpoison.scm, gnu/packages/rdf.scm, gnu/packages/slim.scm,
gnu/packages/texlive.scm, gnu/packages/version-control.scm,
gnu/packages/video.scm, gnu/packages/vpn.scm, gnu/packages/w3m.scm,
gnu/packages/xml.scm, gnu/packages/xnee.scm, gnu/packages/xorg.scm,
gnu/packages/zip.scm: Move some build-time dependencies from `inputs' to
`native-inputs'.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
2013-12-15 12:01:56 +01:00
|
|
|
|
("speex" ,speex)
|
2015-02-23 20:42:41 +01:00
|
|
|
|
("twolame" ,twolame)
|
2016-10-24 21:49:33 +02:00
|
|
|
|
("x265" ,x265)
|
2015-03-06 11:50:40 +01:00
|
|
|
|
("xvid" ,xvid)
|
gnu: Fix misplaced commas (unquote).
Fix many occurrences of comma (unquote) being placed immediately after the
previous list item, e.g. ("ncurses", ncurses) in the inputs.
* gnu/packages/base.scm (patch, gnu-make),
gnu/packages/bioinformatics.scm (hmmer),
gnu/packages/bittorrent.scm (aria2),
gnu/packages/compression.scm (pbzip2),
gnu/packages/databases.scm (recutils),
gnu/packages/fonts.scm (font-terminus),
gnu/packages/freedesktop.scm (xdg-utils, elogind),
gnu/packages/games.scm (gnujump),
gnu/packages/gnome.scm (libidl, gnumeric, eog, gedit),
gnu/packages/gnunet.scm (gnunet),
gnu/packages/gnuzilla.scm (mozjs, nspr),
gnu/packages/gtk.scm (gtksourceview, gdk-pixbuf),
gnu/packages/lua.scm (lua),
gnu/packages/openstack.scm (python-swiftclient),
gnu/packages/perl.scm (perl-json-any),
gnu/packages/polkit.scm (polkit-qt),
gnu/packages/python.scm (wrap-python3, python-oauthlib)
(python-mccabe-0.2.1, python-contextlib2, python2-rauth),
gnu/packages/qt.scm (qtkeychain),
gnu/packages/ruby.scm (ruby-nokogiri),
gnu/packages/screen.scm (screen),
gnu/packages/ssh.scm (libssh),
gnu/packages/video.scm (ffmpeg, mplayer),
gnu/packages/vim.scm (vim),
gnu/packages/xdisorg.scm (redshift),
gnu/packages/xfce.scm (xfce4-panel, xfce4-settings),
gnu/packages/xnee.scm (xnee),
gnu/packages/xorg.scm (font-adobe100dpi, font-adobe75dpi),
gnu/packages/zsh.scm (zsh): Fix misplaced commas (unquote).
2016-02-27 14:37:28 +01:00
|
|
|
|
("zlib" ,zlib)))
|
gnu: Move numerous "inputs" which should be "native-inputs".
* gnu/packages/avahi.scm, gnu/packages/cdrom.scm, gnu/packages/cryptsetup.scm,
gnu/packages/curl.scm, gnu/packages/emacs.scm, gnu/packages/fontutils.scm,
gnu/packages/gdb.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/glib.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm, gnu/packages/graphviz.scm,
gnu/packages/groff.scm, gnu/packages/gstreamer.scm, gnu/packages/gtk.scm,
gnu/packages/gv.scm, gnu/packages/imagemagick.scm, gnu/packages/irssi.scm,
gnu/packages/kde.scm, gnu/packages/libcanberra.scm, gnu/packages/libtiff.scm,
gnu/packages/linux.scm, gnu/packages/lvm.scm, gnu/packages/mp3.scm,
gnu/packages/netpbm.scm, gnu/packages/parted.scm, gnu/packages/pdf.scm,
gnu/packages/pulseaudio.scm, gnu/packages/qemu.scm, gnu/packages/qt.scm,
gnu/packages/ratpoison.scm, gnu/packages/rdf.scm, gnu/packages/slim.scm,
gnu/packages/texlive.scm, gnu/packages/version-control.scm,
gnu/packages/video.scm, gnu/packages/vpn.scm, gnu/packages/w3m.scm,
gnu/packages/xml.scm, gnu/packages/xnee.scm, gnu/packages/xorg.scm,
gnu/packages/zip.scm: Move some build-time dependencies from `inputs' to
`native-inputs'.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
2013-12-15 12:01:56 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bc" ,bc)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
2015-06-16 03:07:21 +02:00
|
|
|
|
("texinfo" ,texinfo)
|
2013-10-31 23:15:46 +01:00
|
|
|
|
("python" ,python-2) ; scripts use interpreter python2
|
|
|
|
|
("speex" ,speex)
|
gnu: Move numerous "inputs" which should be "native-inputs".
* gnu/packages/avahi.scm, gnu/packages/cdrom.scm, gnu/packages/cryptsetup.scm,
gnu/packages/curl.scm, gnu/packages/emacs.scm, gnu/packages/fontutils.scm,
gnu/packages/gdb.scm, gnu/packages/geeqie.scm, gnu/packages/ghostscript.scm,
gnu/packages/glib.scm, gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm, gnu/packages/graphviz.scm,
gnu/packages/groff.scm, gnu/packages/gstreamer.scm, gnu/packages/gtk.scm,
gnu/packages/gv.scm, gnu/packages/imagemagick.scm, gnu/packages/irssi.scm,
gnu/packages/kde.scm, gnu/packages/libcanberra.scm, gnu/packages/libtiff.scm,
gnu/packages/linux.scm, gnu/packages/lvm.scm, gnu/packages/mp3.scm,
gnu/packages/netpbm.scm, gnu/packages/parted.scm, gnu/packages/pdf.scm,
gnu/packages/pulseaudio.scm, gnu/packages/qemu.scm, gnu/packages/qt.scm,
gnu/packages/ratpoison.scm, gnu/packages/rdf.scm, gnu/packages/slim.scm,
gnu/packages/texlive.scm, gnu/packages/version-control.scm,
gnu/packages/video.scm, gnu/packages/vpn.scm, gnu/packages/w3m.scm,
gnu/packages/xml.scm, gnu/packages/xnee.scm, gnu/packages/xorg.scm,
gnu/packages/zip.scm: Move some build-time dependencies from `inputs' to
`native-inputs'.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
2013-12-15 12:01:56 +01:00
|
|
|
|
("yasm" ,yasm)))
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(arguments
|
2013-12-13 11:32:25 +01:00
|
|
|
|
`(#:test-target "fate"
|
2015-10-29 03:42:42 +01:00
|
|
|
|
#:configure-flags
|
|
|
|
|
;; possible additional inputs:
|
|
|
|
|
;; --enable-avisynth enable reading of AviSynth script
|
|
|
|
|
;; files [no]
|
|
|
|
|
;; --enable-frei0r enable frei0r video filtering
|
|
|
|
|
;; --enable-libaacplus enable AAC+ encoding via libaacplus [no]
|
|
|
|
|
;; --enable-libcelt enable CELT decoding via libcelt [no]
|
|
|
|
|
;; --enable-libdc1394 enable IIDC-1394 grabbing using libdc1394
|
|
|
|
|
;; and libraw1394 [no]
|
|
|
|
|
;; --enable-libfaac enable AAC encoding via libfaac [no]
|
|
|
|
|
;; --enable-libfdk-aac enable AAC de/encoding via libfdk-aac [no]
|
|
|
|
|
;; --enable-libflite enable flite (voice synthesis) support via
|
|
|
|
|
;; libflite [no]
|
|
|
|
|
;; --enable-libgme enable Game Music Emu via libgme [no]
|
|
|
|
|
;; --enable-libgsm enable GSM de/encoding via libgsm [no]
|
|
|
|
|
;; --enable-libiec61883 enable iec61883 via libiec61883 [no]
|
|
|
|
|
;; --enable-libilbc enable iLBC de/encoding via libilbc [no]
|
|
|
|
|
;; --enable-libmodplug enable ModPlug via libmodplug [no]
|
|
|
|
|
;; --enable-libnut enable NUT (de)muxing via libnut,
|
|
|
|
|
;; native (de)muxer exists [no]
|
|
|
|
|
;; --enable-libopencore-amrnb enable AMR-NB de/encoding via
|
|
|
|
|
;; libopencore-amrnb [no]
|
|
|
|
|
;; --enable-libopencore-amrwb enable AMR-WB decoding via
|
|
|
|
|
;; libopencore-amrwb [no]
|
|
|
|
|
;; --enable-libopencv enable video filtering via libopencv [no]
|
|
|
|
|
;; --enable-libopenjpeg enable JPEG 2000 de/encoding via
|
|
|
|
|
;; OpenJPEG [no]
|
|
|
|
|
;; --enable-librtmp enable RTMP[E] support via librtmp [no]
|
|
|
|
|
;; --enable-libschroedinger enable Dirac de/encoding via
|
|
|
|
|
;; libschroedinger [no]
|
|
|
|
|
;; --enable-libshine enable fixed-point MP3 encoding via
|
|
|
|
|
;; libshine [no]
|
|
|
|
|
;; --enable-libssh enable SFTP protocol via libssh [no]
|
|
|
|
|
;; (libssh2 does not work)
|
|
|
|
|
;; --enable-libstagefright-h264 enable H.264 decoding via
|
|
|
|
|
;; libstagefright [no]
|
|
|
|
|
;; --enable-libutvideo enable Ut Video encoding and decoding via
|
|
|
|
|
;; libutvideo [no]
|
|
|
|
|
;; --enable-libv4l2 enable libv4l2/v4l-utils [no]
|
|
|
|
|
;; --enable-libvidstab enable video stabilization using
|
|
|
|
|
;; vid.stab [no]
|
|
|
|
|
;; --enable-libvo-aacenc enable AAC encoding via libvo-aacenc [no]
|
|
|
|
|
;; --enable-libvo-amrwbenc enable AMR-WB encoding via
|
|
|
|
|
;; libvo-amrwbenc [no]
|
|
|
|
|
;; --enable-libwavpack enable wavpack encoding via libwavpack [no]
|
|
|
|
|
;; --enable-libxavs enable AVS encoding via xavs [no]
|
|
|
|
|
;; --enable-libzmq enable message passing via libzmq [no]
|
|
|
|
|
;; --enable-libzvbi enable teletext support via libzvbi [no]
|
|
|
|
|
;; --enable-opencl enable OpenCL code
|
|
|
|
|
'("--enable-avresample"
|
|
|
|
|
"--enable-gpl" ; enable optional gpl licensed parts
|
|
|
|
|
"--enable-shared"
|
|
|
|
|
"--enable-fontconfig"
|
2015-10-29 23:59:18 +01:00
|
|
|
|
"--enable-gnutls"
|
2015-10-29 03:42:42 +01:00
|
|
|
|
"--enable-ladspa"
|
|
|
|
|
"--enable-libass"
|
|
|
|
|
"--enable-libbluray"
|
|
|
|
|
"--enable-libcaca"
|
|
|
|
|
"--enable-libcdio"
|
|
|
|
|
"--enable-libfreetype"
|
|
|
|
|
"--enable-libmp3lame"
|
|
|
|
|
"--enable-libopus"
|
|
|
|
|
"--enable-libpulse"
|
|
|
|
|
"--enable-libsoxr"
|
|
|
|
|
"--enable-libspeex"
|
|
|
|
|
"--enable-libtheora"
|
|
|
|
|
"--enable-libtwolame"
|
|
|
|
|
"--enable-libvorbis"
|
|
|
|
|
"--enable-libvpx"
|
|
|
|
|
"--enable-libxvid"
|
|
|
|
|
"--enable-libx264"
|
2016-10-24 21:49:33 +02:00
|
|
|
|
"--enable-libx265"
|
2015-10-29 03:42:42 +01:00
|
|
|
|
"--enable-openal"
|
2016-01-28 17:11:49 +01:00
|
|
|
|
"--enable-opengl"
|
|
|
|
|
"--enable-x11grab"
|
2015-10-29 03:42:42 +01:00
|
|
|
|
|
|
|
|
|
"--enable-runtime-cpudetect"
|
|
|
|
|
|
|
|
|
|
;; Runtime cpu detection is not implemented on
|
|
|
|
|
;; MIPS, so we disable some features.
|
|
|
|
|
"--disable-mips32r2"
|
2016-03-24 17:24:03 +01:00
|
|
|
|
"--disable-mipsdsp"
|
2015-10-29 03:42:42 +01:00
|
|
|
|
"--disable-mipsdspr2"
|
|
|
|
|
"--disable-mipsfpu")
|
2013-12-13 11:32:25 +01:00
|
|
|
|
#:phases
|
2015-04-16 10:35:33 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace
|
2013-10-31 23:15:46 +01:00
|
|
|
|
'configure
|
|
|
|
|
;; configure does not work followed by "SHELL=..." and
|
|
|
|
|
;; "CONFIG_SHELL=..."; set environment variables instead
|
|
|
|
|
(lambda* (#:key outputs configure-flags #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(substitute* "configure"
|
2017-01-23 22:53:41 +01:00
|
|
|
|
(("#! /bin/sh") (string-append "#!" (which "sh"))))
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(setenv "SHELL" (which "bash"))
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "bash"))
|
2015-10-29 03:42:42 +01:00
|
|
|
|
(zero? (apply system*
|
|
|
|
|
"./configure"
|
|
|
|
|
(string-append "--prefix=" out)
|
|
|
|
|
;; Add $libdir to the RUNPATH of all the binaries.
|
|
|
|
|
(string-append "--extra-ldflags=-Wl,-rpath="
|
|
|
|
|
out "/lib")
|
|
|
|
|
configure-flags)))))
|
2015-04-16 10:54:07 +02:00
|
|
|
|
(add-before
|
|
|
|
|
'check 'set-ld-library-path
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Allow $(top_builddir)/ffmpeg to find its dependencies when
|
|
|
|
|
;; running tests.
|
|
|
|
|
(let* ((dso (find-files "." "\\.so$"))
|
|
|
|
|
(path (string-join (map dirname dso) ":")))
|
|
|
|
|
(format #t "setting LD_LIBRARY_PATH to ~s~%" path)
|
|
|
|
|
(setenv "LD_LIBRARY_PATH" path)
|
2015-04-27 09:02:45 +02:00
|
|
|
|
#t))))))
|
2016-05-09 11:02:49 +02:00
|
|
|
|
(home-page "https://www.ffmpeg.org/")
|
2013-10-31 23:15:46 +01:00
|
|
|
|
(synopsis "Audio and video framework")
|
|
|
|
|
(description "FFmpeg is a complete, cross-platform solution to record,
|
|
|
|
|
convert and stream audio and video. It includes the libavcodec
|
|
|
|
|
audio/video codec library.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2014-04-16 17:46:42 +02:00
|
|
|
|
|
2016-04-18 11:26:30 +02:00
|
|
|
|
(define-public ffmpeg-2.8
|
|
|
|
|
(package
|
|
|
|
|
(inherit ffmpeg)
|
2017-02-12 08:14:25 +01:00
|
|
|
|
(version "2.8.11")
|
2016-04-18 11:26:30 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://ffmpeg.org/releases/ffmpeg-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-02-12 08:14:25 +01:00
|
|
|
|
"1rhz7rhmhhh8bjcj3dc82haisn3qjbzqlr7k6d6v7064jgn3maiq"))))
|
2016-04-18 11:26:30 +02:00
|
|
|
|
(arguments
|
|
|
|
|
(substitute-keyword-arguments (package-arguments ffmpeg)
|
|
|
|
|
((#:configure-flags flags)
|
|
|
|
|
`(map (lambda (flag)
|
|
|
|
|
(if (string=? flag "--disable-mipsdsp")
|
|
|
|
|
"--disable-mipsdspr1"
|
|
|
|
|
flag))
|
|
|
|
|
,flags))))))
|
|
|
|
|
|
2014-04-16 17:46:42 +02:00
|
|
|
|
(define-public vlc
|
|
|
|
|
(package
|
|
|
|
|
(name "vlc")
|
2016-06-08 16:11:06 +02:00
|
|
|
|
(version "2.2.4")
|
2014-04-16 17:46:42 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-06-08 16:11:06 +02:00
|
|
|
|
"https://download.videolan.org/pub/videolan/vlc/"
|
2014-04-16 17:46:42 +02:00
|
|
|
|
version "/vlc-" version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-06-08 16:11:06 +02:00
|
|
|
|
"1gjkrwlg8ab3skzl67cxb9qzg4187ifckd1z9kpy11q058fyjchn"))
|
2016-04-18 12:08:31 +02:00
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; There are two occurrences where __DATE__ and __TIME__ are
|
|
|
|
|
;; used to capture the build time and show it to the user.
|
|
|
|
|
'(substitute* (find-files "." "help\\.c(pp)?$")
|
|
|
|
|
(("__DATE__") "\"2016\"")
|
|
|
|
|
(("__TIME__") "\"00:00\"")))))
|
2014-04-16 17:46:42 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("git" ,git) ; needed for a test
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
;; FIXME: Add optional inputs once available.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("avahi" ,avahi)
|
|
|
|
|
("dbus" ,dbus)
|
|
|
|
|
("flac" ,flac)
|
2016-04-18 11:58:15 +02:00
|
|
|
|
("ffmpeg" ,ffmpeg-2.8) ;fails to build against ffmpeg 3.0
|
2014-04-16 17:46:42 +02:00
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("gnutls" ,gnutls)
|
2016-09-09 18:06:26 +02:00
|
|
|
|
("liba52" ,liba52)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
("libcddb" ,libcddb)
|
|
|
|
|
("libgcrypt" ,libgcrypt)
|
|
|
|
|
("libkate" ,libkate)
|
|
|
|
|
("libmad" ,libmad)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("libssh2" ,libssh2)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libtheora" ,libtheora)
|
|
|
|
|
("libxext" ,libxext)
|
2016-08-20 21:39:42 +02:00
|
|
|
|
("libxi" ,libxi)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
("libxinerama" ,libxinerama)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("libxpm" ,libxpm)
|
|
|
|
|
("lua" ,lua-5.1)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("opus" ,opus)
|
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
|
|
|
|
("python" ,python-wrapper)
|
2016-08-20 21:39:42 +02:00
|
|
|
|
("qt" ,qt) ; FIXME: reenable modular qt after update - requires building
|
|
|
|
|
;("qtbase" ,qtbase) with -std=gnu++11.
|
2016-06-08 16:11:06 +02:00
|
|
|
|
;("qtx11extras" ,qtx11extras)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("sdl-image" ,sdl-image)
|
|
|
|
|
("speex" ,speex)
|
2016-10-24 21:54:48 +02:00
|
|
|
|
("x265" ,x265)
|
2014-04-16 17:46:42 +02:00
|
|
|
|
("xcb-util-keysyms" ,xcb-util-keysyms)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
2016-09-09 18:06:26 +02:00
|
|
|
|
`(;; Gross workaround for <https://trac.videolan.org/vlc/ticket/16907>.
|
2016-07-28 13:55:03 +02:00
|
|
|
|
;; In our case, this led to a test failure:
|
|
|
|
|
;; test_libvlc_equalizer: libvlc/equalizer.c:122: test_equalizer: Assertion `isnan(libvlc_audio_equalizer_get_amp_at_index (equalizer, u_bands))' failed.
|
|
|
|
|
"ac_cv_c_fast_math=no"
|
|
|
|
|
|
2014-04-16 17:46:42 +02:00
|
|
|
|
,(string-append "LDFLAGS=-Wl,-rpath -Wl,"
|
|
|
|
|
(assoc-ref %build-inputs "ffmpeg")
|
2016-04-18 15:39:43 +02:00
|
|
|
|
"/lib")) ;needed for the tests
|
|
|
|
|
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2016-06-08 16:11:06 +02:00
|
|
|
|
(add-before 'configure 'remove-visual-tests
|
|
|
|
|
;; Some of the tests require using the display to test out VLC,
|
|
|
|
|
;; which fails in our sandboxed build system
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "test/run_vlc.sh"
|
|
|
|
|
(("./vlc --ignore-config") "echo"))
|
|
|
|
|
#t))
|
2016-04-18 15:39:43 +02:00
|
|
|
|
(add-after 'install 'regenerate-plugin-cache
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; The 'install-exec-hook' rule in the top-level Makefile.am
|
|
|
|
|
;; generates 'lib/vlc/plugins/plugins.dat', a plugin cache, using
|
|
|
|
|
;; 'vlc-cache-gen'. This file includes the mtime of the plugins
|
|
|
|
|
;; it references. Thus, we first reset the timestamps of all
|
|
|
|
|
;; these files, and then regenerate the cache such that the
|
|
|
|
|
;; mtimes it includes are always zero instead of being dependent
|
|
|
|
|
;; on the build time.
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(pkglibdir (string-append out "/lib/vlc"))
|
|
|
|
|
(plugindir (string-append pkglibdir "/plugins"))
|
|
|
|
|
(cachegen (string-append pkglibdir "/vlc-cache-gen")))
|
|
|
|
|
;; TODO: Factorize 'reset-timestamps'.
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(let ((s (lstat file)))
|
|
|
|
|
(unless (eq? (stat:type s) 'symlink)
|
|
|
|
|
(utime file 0 0 0 0))))
|
|
|
|
|
(find-files plugindir))
|
|
|
|
|
(zero? (system* cachegen plugindir))))))))
|
2014-04-16 17:46:42 +02:00
|
|
|
|
(home-page "https://www.videolan.org/")
|
|
|
|
|
(synopsis "Audio and video framework")
|
|
|
|
|
(description "VLC is a cross-platform multimedia player and framework
|
|
|
|
|
that plays most multimedia files as well as DVD, Audio CD, VCD, and various
|
|
|
|
|
treaming protocols.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2014-04-17 18:57:46 +02:00
|
|
|
|
|
|
|
|
|
(define-public mplayer
|
|
|
|
|
(package
|
|
|
|
|
(name "mplayer")
|
2016-04-04 22:20:11 +02:00
|
|
|
|
(version "1.3.0")
|
2014-04-17 18:57:46 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-02-24 09:20:52 +01:00
|
|
|
|
"https://www.mplayerhq.hu/MPlayer/releases/MPlayer-"
|
2014-04-17 18:57:46 +02:00
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-04-04 22:20:11 +02:00
|
|
|
|
"0hwqn04bdknb2ic88xd75smffxx63scvz0zvwvjb56nqj9n89l1s"))))
|
2014-04-17 18:57:46 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
;; FIXME: Add additional inputs once available.
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("cdparanoia" ,cdparanoia)
|
gnu: Fix misplaced commas (unquote).
Fix many occurrences of comma (unquote) being placed immediately after the
previous list item, e.g. ("ncurses", ncurses) in the inputs.
* gnu/packages/base.scm (patch, gnu-make),
gnu/packages/bioinformatics.scm (hmmer),
gnu/packages/bittorrent.scm (aria2),
gnu/packages/compression.scm (pbzip2),
gnu/packages/databases.scm (recutils),
gnu/packages/fonts.scm (font-terminus),
gnu/packages/freedesktop.scm (xdg-utils, elogind),
gnu/packages/games.scm (gnujump),
gnu/packages/gnome.scm (libidl, gnumeric, eog, gedit),
gnu/packages/gnunet.scm (gnunet),
gnu/packages/gnuzilla.scm (mozjs, nspr),
gnu/packages/gtk.scm (gtksourceview, gdk-pixbuf),
gnu/packages/lua.scm (lua),
gnu/packages/openstack.scm (python-swiftclient),
gnu/packages/perl.scm (perl-json-any),
gnu/packages/polkit.scm (polkit-qt),
gnu/packages/python.scm (wrap-python3, python-oauthlib)
(python-mccabe-0.2.1, python-contextlib2, python2-rauth),
gnu/packages/qt.scm (qtkeychain),
gnu/packages/ruby.scm (ruby-nokogiri),
gnu/packages/screen.scm (screen),
gnu/packages/ssh.scm (libssh),
gnu/packages/video.scm (ffmpeg, mplayer),
gnu/packages/vim.scm (vim),
gnu/packages/xdisorg.scm (redshift),
gnu/packages/xfce.scm (xfce4-panel, xfce4-settings),
gnu/packages/xnee.scm (xnee),
gnu/packages/xorg.scm (font-adobe100dpi, font-adobe75dpi),
gnu/packages/zsh.scm (zsh): Fix misplaced commas (unquote).
2016-02-27 14:37:28 +01:00
|
|
|
|
("ffmpeg" ,ffmpeg)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("fontconfig" ,fontconfig)
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("freetype" ,freetype)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
;; ("giflib" ,giflib) ; uses QuantizeBuffer, requires version >= 5
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("lame" ,lame)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("libass" ,libass)
|
gnu: Fix misplaced commas (unquote).
Fix many occurrences of comma (unquote) being placed immediately after the
previous list item, e.g. ("ncurses", ncurses) in the inputs.
* gnu/packages/base.scm (patch, gnu-make),
gnu/packages/bioinformatics.scm (hmmer),
gnu/packages/bittorrent.scm (aria2),
gnu/packages/compression.scm (pbzip2),
gnu/packages/databases.scm (recutils),
gnu/packages/fonts.scm (font-terminus),
gnu/packages/freedesktop.scm (xdg-utils, elogind),
gnu/packages/games.scm (gnujump),
gnu/packages/gnome.scm (libidl, gnumeric, eog, gedit),
gnu/packages/gnunet.scm (gnunet),
gnu/packages/gnuzilla.scm (mozjs, nspr),
gnu/packages/gtk.scm (gtksourceview, gdk-pixbuf),
gnu/packages/lua.scm (lua),
gnu/packages/openstack.scm (python-swiftclient),
gnu/packages/perl.scm (perl-json-any),
gnu/packages/polkit.scm (polkit-qt),
gnu/packages/python.scm (wrap-python3, python-oauthlib)
(python-mccabe-0.2.1, python-contextlib2, python2-rauth),
gnu/packages/qt.scm (qtkeychain),
gnu/packages/ruby.scm (ruby-nokogiri),
gnu/packages/screen.scm (screen),
gnu/packages/ssh.scm (libssh),
gnu/packages/video.scm (ffmpeg, mplayer),
gnu/packages/vim.scm (vim),
gnu/packages/xdisorg.scm (redshift),
gnu/packages/xfce.scm (xfce4-panel, xfce4-settings),
gnu/packages/xnee.scm (xnee),
gnu/packages/xorg.scm (font-adobe100dpi, font-adobe75dpi),
gnu/packages/zsh.scm (zsh): Fix misplaced commas (unquote).
2016-02-27 14:37:28 +01:00
|
|
|
|
("libdvdcss" ,libdvdcss)
|
|
|
|
|
("libdvdnav" ,libdvdnav)
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("libjpeg" ,libjpeg)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("libmpeg2" ,libmpeg2)
|
|
|
|
|
("libmpg123" ,mpg123) ; audio codec for MP3
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libtheora" ,libtheora)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("libvdpau" ,libvdpau)
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libx11" ,libx11)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("libx264" ,libx264)
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("libxinerama" ,libxinerama)
|
|
|
|
|
("libxv" ,libxv)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("libxxf86dga" ,libxxf86dga)
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("mesa" ,mesa)
|
2016-02-18 13:33:43 +01:00
|
|
|
|
("opus" ,opus)
|
2014-04-17 18:57:46 +02:00
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
|
|
|
|
("python" ,python-wrapper)
|
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("speex" ,speex)
|
|
|
|
|
("yasm" ,yasm)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no test target
|
|
|
|
|
#:phases
|
2016-02-24 09:20:52 +01:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
2014-04-17 18:57:46 +02:00
|
|
|
|
;; configure does not work followed by "SHELL=..." and
|
|
|
|
|
;; "CONFIG_SHELL=..."; set environment variables instead
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let ((out (assoc-ref outputs "out"))
|
|
|
|
|
(libx11 (assoc-ref inputs "libx11")))
|
|
|
|
|
(substitute* "configure"
|
2017-01-23 22:55:42 +01:00
|
|
|
|
(("#! /bin/sh") (string-append "#!" (which "sh"))))
|
2014-04-17 18:57:46 +02:00
|
|
|
|
(setenv "SHELL" (which "bash"))
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "bash"))
|
|
|
|
|
(zero? (system*
|
|
|
|
|
"./configure"
|
|
|
|
|
(string-append "--extra-cflags=-I"
|
|
|
|
|
libx11 "/include") ; to detect libx11
|
2016-02-24 09:20:52 +01:00
|
|
|
|
"--disable-ffmpeg_a" ; disables bundled ffmpeg
|
2014-04-17 18:57:46 +02:00
|
|
|
|
(string-append "--prefix=" out)
|
2014-08-04 05:27:24 +02:00
|
|
|
|
;; Enable runtime cpu detection where supported,
|
|
|
|
|
;; and choose a suitable target.
|
|
|
|
|
,@(match (or (%current-target-system)
|
|
|
|
|
(%current-system))
|
|
|
|
|
("x86_64-linux"
|
|
|
|
|
'("--enable-runtime-cpudetection"
|
|
|
|
|
"--target=x86_64-linux"))
|
|
|
|
|
("i686-linux"
|
|
|
|
|
'("--enable-runtime-cpudetection"
|
|
|
|
|
"--target=i686-linux"))
|
|
|
|
|
("mips64el-linux"
|
2015-04-22 04:47:59 +02:00
|
|
|
|
'("--target=mips3-linux"))
|
|
|
|
|
(_ (list (string-append
|
|
|
|
|
"--target="
|
|
|
|
|
(or (%current-target-system)
|
|
|
|
|
(nix-system->gnu-triplet
|
|
|
|
|
(%current-system)))))))
|
2016-02-24 09:20:52 +01:00
|
|
|
|
"--disable-iwmmxt"))))))))
|
|
|
|
|
(home-page "https://www.mplayerhq.hu/design7/news.html")
|
2014-04-17 18:57:46 +02:00
|
|
|
|
(synopsis "Audio and video player")
|
|
|
|
|
(description "MPlayer is a movie player. It plays most MPEG/VOB, AVI,
|
|
|
|
|
Ogg/OGM, VIVO, ASF/WMA/WMV, QT/MOV/MP4, RealMedia, Matroska, NUT,
|
|
|
|
|
NuppelVideo, FLI, YUV4MPEG, FILM, RoQ, PVA files. One can watch VideoCD,
|
|
|
|
|
SVCD, DVD, 3ivx, DivX 3/4/5, WMV and H.264 movies.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2)))
|
2014-06-26 14:16:07 +02:00
|
|
|
|
|
2015-03-19 23:46:21 +01:00
|
|
|
|
(define-public mpv
|
|
|
|
|
(package
|
|
|
|
|
(name "mpv")
|
2017-02-22 06:04:02 +01:00
|
|
|
|
(version "0.24.0")
|
2015-03-19 23:46:21 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/mpv-player/mpv/archive/v" version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-02-22 06:04:02 +01:00
|
|
|
|
"059zblcj98fhrns1rwa66mf4km68czpam4nnk8q9qny31bx58654"))
|
2015-03-19 23:46:21 +01:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))))
|
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(native-inputs
|
2017-01-02 18:11:31 +01:00
|
|
|
|
`(("perl" ,perl) ; for zsh completion file
|
2015-03-19 23:46:21 +01:00
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("python-docutils" ,python-docutils)))
|
2015-12-29 11:36:01 +01:00
|
|
|
|
;; Missing features: libguess, Wayland, V4L2
|
2015-03-19 23:46:21 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("enca" ,enca)
|
|
|
|
|
("ffmpeg" ,ffmpeg)
|
2015-08-27 10:13:54 +02:00
|
|
|
|
("jack" ,jack-1)
|
2015-03-19 23:46:21 +01:00
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("lcms" ,lcms)
|
|
|
|
|
("libass" ,libass)
|
|
|
|
|
("libbluray" ,libbluray)
|
|
|
|
|
("libcaca" ,libcaca)
|
|
|
|
|
("libbs2b" ,libbs2b)
|
|
|
|
|
("libcdio-paranoia" ,libcdio-paranoia)
|
|
|
|
|
("libdvdread" ,libdvdread)
|
|
|
|
|
("libdvdnav" ,libdvdnav)
|
|
|
|
|
("libjpeg" ,libjpeg)
|
|
|
|
|
("libva" ,libva)
|
2015-12-29 11:36:01 +01:00
|
|
|
|
("libvdpau" ,libvdpau)
|
2015-03-19 23:46:21 +01:00
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxinerama" ,libxinerama)
|
|
|
|
|
("libxrandr" ,libxrandr)
|
|
|
|
|
("libxscrnsaver" ,libxscrnsaver)
|
|
|
|
|
("libxv" ,libxv)
|
2016-11-14 04:09:49 +01:00
|
|
|
|
;; XXX: lua > 5.2 is not currently supported; see
|
|
|
|
|
;; waftools/checks/custom.py
|
|
|
|
|
("lua" ,lua-5.2)
|
2015-03-19 23:46:21 +01:00
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("mpg123" ,mpg123)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
|
|
|
|
("rsound" ,rsound)
|
2016-07-24 09:23:28 +02:00
|
|
|
|
("waf" ,python-waf)
|
2015-03-19 23:46:21 +01:00
|
|
|
|
("youtube-dl" ,youtube-dl)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
utils: 'modify-phases' no longer introduces quotes.
Suggested by Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>.
* guix/build/utils.scm (%modify-phases): Remove quotes.
* guix/build/cmake-build-system.scm (%standard-phases): Adjust
accordingly.
* guix/build/glib-or-gtk-build-system.scm (%standard-phases): Likewise.
* guix/build/gnu-dist.scm (%dist-phases): Likewise.
* guix/build/perl-build-system.scm (%standard-phases): Likewise.
* guix/build/python-build-system.scm (%standard-phases): Likewise.
* guix/build/ruby-build-system.scm (%standard-phases): Likewise.
* guix/build/waf-build-system.scm (%standard-phases): Likewise.
* gnu/packages/bash.scm, gnu/packages/code.scm, gnu/packages/gl.scm,
gnu/packages/gnome.scm, gnu/packages/graphics.scm,
gnu/packages/image.scm, gnu/packages/key-mon.scm,
gnu/packages/ocr.scm, gnu/packages/plotutils.scm,
gnu/packages/search.scm, gnu/packages/video.scm: Likewise.
2015-03-31 22:43:01 +02:00
|
|
|
|
'configure 'setup-waf
|
2015-03-19 23:46:21 +01:00
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(copy-file (assoc-ref inputs "waf") "waf")
|
2015-12-19 05:15:59 +01:00
|
|
|
|
(setenv "CC" "gcc"))))
|
2017-02-09 11:15:05 +01:00
|
|
|
|
#:configure-flags (list "--enable-libmpv-shared"
|
|
|
|
|
"--enable-zsh-comp"
|
|
|
|
|
"--disable-build-date")
|
2015-03-19 23:46:21 +01:00
|
|
|
|
;; No check function defined.
|
|
|
|
|
#:tests? #f))
|
2016-03-03 21:53:37 +01:00
|
|
|
|
(home-page "https://mpv.io/")
|
2015-03-19 23:46:21 +01:00
|
|
|
|
(synopsis "Audio and video player")
|
|
|
|
|
(description "mpv is a general-purpose audio and video player. It is a
|
|
|
|
|
fork of mplayer2 and MPlayer. It shares some features with the former
|
|
|
|
|
projects while introducing many more.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-03-19 23:46:21 +01:00
|
|
|
|
|
2016-07-07 01:58:17 +02:00
|
|
|
|
(define-public gnome-mpv
|
|
|
|
|
(package
|
|
|
|
|
(name "gnome-mpv")
|
2017-01-07 16:22:47 +01:00
|
|
|
|
(version "0.11")
|
2016-07-07 01:58:17 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/gnome-mpv/gnome-mpv/releases"
|
|
|
|
|
"/download/v" version "/gnome-mpv-" version
|
|
|
|
|
".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-01-07 16:22:47 +01:00
|
|
|
|
"1hn3mpsxbrwf2m0nz4vzji4i6i896y8kqjb9kijqpk04cnrs3fgz"))))
|
2016-07-07 01:58:17 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("intltool" ,intltool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("gtk+" ,gtk+)
|
|
|
|
|
("libepoxy" ,libepoxy)
|
|
|
|
|
("mpv" ,mpv)))
|
|
|
|
|
(build-system glib-or-gtk-build-system)
|
|
|
|
|
(home-page "https://github.com/gnome-mpv/gnome-mpv")
|
|
|
|
|
(synopsis "GTK+ frontend for the mpv media player")
|
|
|
|
|
(description "GNOME MPV is a simple GTK+ frontend for the mpv media player.
|
|
|
|
|
GNOME MPV interacts with mpv via the client API exported by libmpv, allowing
|
|
|
|
|
access to mpv's powerful playback capabilities.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2014-06-26 14:16:07 +02:00
|
|
|
|
(define-public libvpx
|
|
|
|
|
(package
|
|
|
|
|
(name "libvpx")
|
2017-02-09 14:58:54 +01:00
|
|
|
|
(version "1.6.1")
|
2014-06-26 14:16:07 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2015-07-07 03:11:47 +02:00
|
|
|
|
(uri (string-append "http://storage.googleapis.com/"
|
|
|
|
|
"downloads.webmproject.org/releases/webm/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
2014-06-26 14:16:07 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-02-09 14:58:54 +01:00
|
|
|
|
"06d8hqjkfs6wl45qf4pwh1kpbvkx6cwywd5y8d4lgagvjwm0qb0w"))
|
2016-06-08 15:53:56 +02:00
|
|
|
|
(patches (search-patches "libvpx-CVE-2016-2818.patch"))))
|
2014-06-26 14:16:07 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2016-01-19 06:24:28 +01:00
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "bash"))
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(setenv "LDFLAGS"
|
|
|
|
|
(string-append "-Wl,-rpath=" out "/lib"))
|
|
|
|
|
(zero? (system* "./configure"
|
|
|
|
|
"--enable-shared"
|
|
|
|
|
"--as=yasm"
|
|
|
|
|
;; Limit size to avoid CVE-2015-1258
|
|
|
|
|
"--size-limit=16384x16384"
|
|
|
|
|
(string-append "--prefix=" out)))))))
|
2015-11-12 18:59:42 +01:00
|
|
|
|
#:tests? #f)) ; no check target
|
2014-06-26 14:16:07 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl" ,perl)
|
|
|
|
|
("yasm" ,yasm)))
|
|
|
|
|
(synopsis "VP8/VP9 video codec")
|
|
|
|
|
(description "libvpx is a codec for the VP8/VP9 video compression format.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:bsd-3)
|
2014-06-26 14:16:07 +02:00
|
|
|
|
(home-page "http://www.webmproject.org/")))
|
2014-07-03 22:21:53 +02:00
|
|
|
|
|
|
|
|
|
(define-public youtube-dl
|
|
|
|
|
(package
|
|
|
|
|
(name "youtube-dl")
|
2017-03-26 22:29:07 +02:00
|
|
|
|
(version "2017.03.26")
|
2014-07-03 22:21:53 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-01-10 22:14:18 +01:00
|
|
|
|
(uri (string-append "https://yt-dl.org/downloads/"
|
2014-07-03 22:21:53 +02:00
|
|
|
|
version "/youtube-dl-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-26 22:29:07 +02:00
|
|
|
|
"00ysv18p4rqg7sswbpjpmmvaih6nm135bpllqdlj4ns8kjqmh59j"))))
|
2014-07-03 22:21:53 +02:00
|
|
|
|
(build-system python-build-system)
|
2015-12-14 13:20:55 +01:00
|
|
|
|
(arguments
|
|
|
|
|
;; The problem here is that the directory for the man page and completion
|
|
|
|
|
;; files is relative, and for some reason, setup.py uses the
|
|
|
|
|
;; auto-detected sys.prefix instead of the user-defined "--prefix=FOO".
|
|
|
|
|
;; So, we need pass the prefix directly. In addition, make sure the Bash
|
|
|
|
|
;; completion file is called 'youtube-dl' rather than
|
|
|
|
|
;; 'youtube-dl.bash-completion'.
|
2016-10-16 03:12:22 +02:00
|
|
|
|
`(#:tests? #f ; Many tests fail. The test suite can be run with pytest.
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
2015-12-14 13:20:55 +01:00
|
|
|
|
(add-before 'install 'fix-the-data-directories
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((prefix (assoc-ref outputs "out")))
|
|
|
|
|
(mkdir "bash-completion")
|
|
|
|
|
(rename-file "youtube-dl.bash-completion"
|
|
|
|
|
"bash-completion/youtube-dl")
|
|
|
|
|
(substitute* "setup.py"
|
|
|
|
|
(("youtube-dl\\.bash-completion")
|
|
|
|
|
"bash-completion/youtube-dl")
|
|
|
|
|
(("'etc/")
|
|
|
|
|
(string-append "'" prefix "/etc/"))
|
|
|
|
|
(("'share/")
|
|
|
|
|
(string-append "'" prefix "/share/")))))))))
|
2014-07-03 22:21:53 +02:00
|
|
|
|
(synopsis "Download videos from YouTube.com and other sites")
|
|
|
|
|
(description
|
2015-11-01 18:56:33 +01:00
|
|
|
|
"Youtube-dl is a small command-line program to download videos from
|
2014-07-03 22:21:53 +02:00
|
|
|
|
YouTube.com and a few more sites.")
|
2017-01-10 22:14:18 +01:00
|
|
|
|
(home-page "https://yt-dl.org")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:public-domain)))
|
2015-01-24 17:59:22 +01:00
|
|
|
|
|
2015-03-05 21:40:36 +01:00
|
|
|
|
(define-public libbluray
|
|
|
|
|
(package
|
|
|
|
|
(name "libbluray")
|
2017-03-17 20:34:48 +01:00
|
|
|
|
(version "1.0.0")
|
2015-03-05 21:40:36 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-10 20:00:33 +02:00
|
|
|
|
(uri (string-append "https://download.videolan.org/videolan/"
|
2015-03-05 21:40:36 +01:00
|
|
|
|
name "/" version "/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-17 20:34:48 +01:00
|
|
|
|
"1k3lag4lxi2jjd3zh4wcb5l3hadzm54j5kagh92yzfy76p9svqzp"))))
|
2015-03-05 21:40:36 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2016-09-09 21:52:26 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags '("--disable-bdjava")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'build 'fix-dlopen-paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(let ((libaacs (assoc-ref inputs "libaacs"))
|
|
|
|
|
(libbdplus (assoc-ref inputs "libbdplus")))
|
|
|
|
|
(substitute* "src/libbluray/disc/aacs.c"
|
|
|
|
|
(("\"libaacs\"")
|
|
|
|
|
(string-append "\"" libaacs "/lib/libaacs\"")))
|
|
|
|
|
(substitute* "src/libbluray/disc/bdplus.c"
|
|
|
|
|
(("\"libbdplus\"")
|
|
|
|
|
(string-append "\"" libbdplus "/lib/libbdplus\"")))
|
|
|
|
|
#t))))))
|
2015-10-06 19:22:09 +02:00
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
2015-03-05 21:40:36 +01:00
|
|
|
|
(inputs
|
2016-02-05 14:42:13 +01:00
|
|
|
|
`(("fontconfig" ,fontconfig)
|
2015-03-05 21:40:36 +01:00
|
|
|
|
("freetype" ,freetype)
|
2016-09-09 21:52:26 +02:00
|
|
|
|
("libaacs" ,libaacs)
|
|
|
|
|
("libbdplus" ,libbdplus)
|
2016-02-05 14:42:13 +01:00
|
|
|
|
("libxml2" ,libxml2)))
|
2016-07-10 20:00:33 +02:00
|
|
|
|
(home-page "https://www.videolan.org/developers/libbluray.html")
|
2015-03-05 21:40:36 +01:00
|
|
|
|
(synopsis "Blu-Ray Disc playback library")
|
|
|
|
|
(description
|
|
|
|
|
"libbluray is a library designed for Blu-Ray Disc playback for media
|
|
|
|
|
players, like VLC or MPlayer.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:lgpl2.1+)))
|
2015-03-05 21:40:36 +01:00
|
|
|
|
|
2015-01-24 17:59:22 +01:00
|
|
|
|
(define-public libdvdread
|
|
|
|
|
(package
|
|
|
|
|
(name "libdvdread")
|
2015-07-07 19:24:39 +02:00
|
|
|
|
(version "5.0.3")
|
2015-01-24 17:59:22 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://download.videolan.org/videolan/"
|
|
|
|
|
name "/" version "/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-07-07 19:24:39 +02:00
|
|
|
|
"0ayqiq0psq18rcp6f5pz82sxsq66v0kwv0y55dbrcg68plnxy71j"))))
|
2015-01-24 17:59:22 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://dvdnav.mplayerhq.hu/")
|
|
|
|
|
(synopsis "Library for reading video DVDs")
|
|
|
|
|
(description
|
|
|
|
|
"Libdvdread provides a simple foundation for reading DVD video
|
|
|
|
|
disks. It provides the functionality that is required to access many
|
|
|
|
|
DVDs. It parses IFO files, reads NAV-blocks, and performs CSS
|
|
|
|
|
authentication and descrambling (if an external libdvdcss library is
|
|
|
|
|
installed).")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-01-24 18:05:03 +01:00
|
|
|
|
|
|
|
|
|
(define-public libdvdnav
|
|
|
|
|
(package
|
|
|
|
|
(name "libdvdnav")
|
2015-07-07 19:25:42 +02:00
|
|
|
|
(version "5.0.3")
|
2015-01-24 18:05:03 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://download.videolan.org/videolan/"
|
|
|
|
|
name "/" version "/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-07-07 19:25:42 +02:00
|
|
|
|
"0v8byv5z598k06rqzdmj7739vc86xq3zf79zfr698dib7lz055sh"))))
|
2015-01-24 18:05:03 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libdvdread" ,libdvdread)))
|
|
|
|
|
(home-page "http://dvdnav.mplayerhq.hu/")
|
|
|
|
|
(synopsis "Library for video DVD navigation features")
|
|
|
|
|
(description
|
|
|
|
|
"Libdvdnav is a library for developers of multimedia
|
|
|
|
|
applications. It allows easy use of sophisticated DVD navigation features
|
|
|
|
|
such as DVD menus, multiangle playback and even interactive DVD games. All
|
|
|
|
|
this functionality is provided through a simple API which provides the DVD
|
|
|
|
|
playback as a single logical stream of blocks, intermitted by special
|
|
|
|
|
dvdnav events to report certain conditions. The main usage of libdvdnav is
|
|
|
|
|
a loop regularly calling a function to get the next block, surrounded by
|
|
|
|
|
additional calls to tell the library of user interaction. The whole
|
|
|
|
|
DVD virtual machine and internal playback states are completely
|
|
|
|
|
encapsulated.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-02-07 23:17:39 +01:00
|
|
|
|
|
2015-03-06 17:07:55 +01:00
|
|
|
|
(define-public libdvdnav-4
|
|
|
|
|
(package
|
|
|
|
|
(inherit libdvdnav)
|
|
|
|
|
(version "4.2.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append
|
|
|
|
|
"http://download.videolan.org/videolan/libdvdnav/libdvdnav-"
|
|
|
|
|
version ".tar.xz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0wi3gy408c8xj0ism0hckv5jbfh3lg4pmgxv87gbch9jrhp2gjkz"))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(alist-cons-after
|
|
|
|
|
'unpack 'autoreconf
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "autoreconf" "-vif")))
|
|
|
|
|
%standard-phases)))))
|
|
|
|
|
|
2015-03-06 10:39:10 +01:00
|
|
|
|
(define-public libdvdcss
|
|
|
|
|
(package
|
|
|
|
|
(name "libdvdcss")
|
2016-02-03 21:04:17 +01:00
|
|
|
|
(version "1.4.0")
|
2015-03-06 10:39:10 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-02-03 21:04:17 +01:00
|
|
|
|
(uri (string-append "http://download.videolan.org/pub/"
|
2015-03-06 10:39:10 +01:00
|
|
|
|
name "/" version "/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-02-03 21:04:17 +01:00
|
|
|
|
"0nl45ifc4xcb196snv9d6hinfw614cqpzcqp92dg43c0hickg290"))))
|
2015-03-06 10:39:10 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.videolan.org/developers/libdvdcss.html")
|
|
|
|
|
(synopsis "Library for accessing DVDs as block devices")
|
|
|
|
|
(description
|
|
|
|
|
"libdvdcss is a simple library designed for accessing DVDs like a block
|
|
|
|
|
device without having to bother about the decryption.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-03-06 10:39:10 +01:00
|
|
|
|
|
2015-02-07 23:17:39 +01:00
|
|
|
|
(define-public srt2vtt
|
|
|
|
|
(package
|
|
|
|
|
(name "srt2vtt")
|
|
|
|
|
(version "0.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://dthompson.us/releases/srt2vtt/srt2vtt-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"16b377znjm6qlga5yb8aj7b7bcisa1ghcnj2lrb1d30lvxp4liif"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("guile" ,guile-2.0)))
|
|
|
|
|
(synopsis "SubRip to WebVTT subtitle converter")
|
|
|
|
|
(description "srt2vtt converts SubRip formatted subtitles to WebVTT format
|
|
|
|
|
for use with HTML5 video.")
|
|
|
|
|
(home-page "http://dthompson.us/pages/software/srt2vtt")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl3+)))
|
2015-02-23 22:59:20 +01:00
|
|
|
|
|
|
|
|
|
(define-public avidemux
|
|
|
|
|
(package
|
|
|
|
|
(name "avidemux")
|
2016-06-15 21:59:26 +02:00
|
|
|
|
(version "2.6.12")
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-07-21 08:35:30 +02:00
|
|
|
|
"mirror://sourceforge/" name "/" name "/" version "/"
|
|
|
|
|
name "_" version ".tar.gz"))
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-06-15 21:59:26 +02:00
|
|
|
|
"0nz52yih8sff53inndkh2dba759xjzsh4b8xjww419lcpk0qp6kn"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "avidemux-install-to-lib.patch"))))
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
;; FIXME: Once packaged, add libraries not found during the build.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("fribidi" ,fribidi)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("lame" ,lame)
|
2016-06-16 14:42:16 +02:00
|
|
|
|
("libva" ,libva)
|
|
|
|
|
("libvdpau" ,libvdpau)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libvpx" ,libvpx)
|
|
|
|
|
("libxv" ,libxv)
|
|
|
|
|
("perl" ,perl)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
|
|
|
|
("python" ,python-wrapper)
|
2016-08-20 21:40:13 +02:00
|
|
|
|
("qt" ,qt) ; FIXME: reenable modular qt after update - requires building
|
|
|
|
|
;("qtbase" ,qtbase) with -std=gnu++11.
|
|
|
|
|
;("qttools" ,qttools)
|
2015-02-23 22:59:20 +01:00
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("sqlite" ,sqlite)
|
|
|
|
|
("yasm" ,yasm)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
;; Make sure files inside the included ffmpeg tarball are
|
|
|
|
|
;; patch-shebanged.
|
2016-06-16 14:53:32 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'patch-source-shebangs 'unpack-ffmpeg
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(lambda _
|
|
|
|
|
(with-directory-excursion "avidemux_core/ffmpeg_package"
|
2016-06-16 14:53:32 +02:00
|
|
|
|
(system* "tar" "xf" "ffmpeg-2.7.6.tar.bz2")
|
|
|
|
|
(delete-file "ffmpeg-2.7.6.tar.bz2"))))
|
|
|
|
|
(add-after 'patch-source-shebangs 'repack-ffmpeg
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(lambda _
|
|
|
|
|
(with-directory-excursion "avidemux_core/ffmpeg_package"
|
2016-06-15 21:59:26 +02:00
|
|
|
|
(substitute* "ffmpeg-2.7.6/configure"
|
2017-01-23 22:32:39 +01:00
|
|
|
|
(("#! /bin/sh") (string-append "#!" (which "sh"))))
|
2016-06-15 21:59:26 +02:00
|
|
|
|
(system* "tar" "cjf" "ffmpeg-2.7.6.tar.bz2" "ffmpeg-2.7.6"
|
2015-07-15 01:44:38 +02:00
|
|
|
|
;; avoid non-determinism in the archive
|
2015-09-03 18:51:47 +02:00
|
|
|
|
"--sort=name" "--mtime=@0"
|
|
|
|
|
"--owner=root:0" "--group=root:0")
|
2016-06-16 14:53:32 +02:00
|
|
|
|
(delete-file-recursively "ffmpeg-2.7.6"))))
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Copy-paste settings from the cmake build system.
|
|
|
|
|
(setenv "CMAKE_LIBRARY_PATH" (getenv "LIBRARY_PATH"))
|
|
|
|
|
(setenv "CMAKE_INCLUDE_PATH" (getenv "C_INCLUDE_PATH"))))
|
|
|
|
|
(replace 'build
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
(let*
|
|
|
|
|
((out (assoc-ref outputs "out"))
|
|
|
|
|
(lib (string-append out "/lib"))
|
|
|
|
|
(top (getcwd))
|
|
|
|
|
(sdl (assoc-ref inputs "sdl"))
|
|
|
|
|
(build_component
|
|
|
|
|
(lambda* (component srcdir #:optional (args '()))
|
|
|
|
|
(let ((builddir (string-append "build_" component)))
|
|
|
|
|
(mkdir builddir)
|
|
|
|
|
(with-directory-excursion builddir
|
|
|
|
|
(zero?
|
|
|
|
|
(and
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(apply system* "cmake"
|
|
|
|
|
"-DCMAKE_INSTALL_RPATH_USE_LINK_PATH=TRUE"
|
|
|
|
|
(string-append "-DCMAKE_INSTALL_PREFIX=" out)
|
|
|
|
|
(string-append "-DCMAKE_INSTALL_RPATH=" lib)
|
2015-05-31 23:30:05 +02:00
|
|
|
|
(string-append "-DCMAKE_SHARED_LINKER_FLAGS="
|
|
|
|
|
"\"-Wl,-rpath=" lib "\"")
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(string-append "-DAVIDEMUX_SOURCE_DIR=" top)
|
|
|
|
|
(string-append "-DSDL_INCLUDE_DIR="
|
|
|
|
|
sdl "/include/SDL")
|
|
|
|
|
(string-append "../" srcdir)
|
2015-09-27 00:06:30 +02:00
|
|
|
|
"-DENABLE_QT5=True"
|
2015-02-23 22:59:20 +01:00
|
|
|
|
args)
|
2016-06-16 14:53:32 +02:00
|
|
|
|
(system* "make" "-j"
|
|
|
|
|
(number->string (parallel-job-count)))
|
|
|
|
|
(system* "make" "install"))))))))
|
|
|
|
|
(mkdir out)
|
|
|
|
|
(and (build_component "core" "avidemux_core")
|
|
|
|
|
(build_component "cli" "avidemux/cli")
|
|
|
|
|
(build_component "qt4" "avidemux/qt4")
|
|
|
|
|
(build_component "plugins_common" "avidemux_plugins"
|
|
|
|
|
'("-DPLUGIN_UI=COMMON"))
|
|
|
|
|
(build_component "plugins_cli" "avidemux_plugins"
|
|
|
|
|
'("-DPLUGIN_UI=CLI"))
|
|
|
|
|
(build_component "plugins_qt4" "avidemux_plugins"
|
|
|
|
|
'("-DPLUGIN_UI=QT4"))
|
|
|
|
|
(build_component "plugins_settings" "avidemux_plugins"
|
|
|
|
|
'("-DPLUGIN_UI=SETTINGS")))
|
|
|
|
|
;; Remove .exe and .dll file.
|
|
|
|
|
(delete-file-recursively
|
|
|
|
|
(string-append out "/share/ADM6_addons")))))
|
|
|
|
|
(delete 'install))))
|
2015-02-23 22:59:20 +01:00
|
|
|
|
(home-page "http://fixounet.free.fr/avidemux/")
|
|
|
|
|
(synopsis "Video editor")
|
|
|
|
|
(description "Avidemux is a video editor designed for simple cutting,
|
|
|
|
|
filtering and encoding tasks. It supports many file types, including AVI,
|
|
|
|
|
DVD compatible MPEG files, MP4 and ASF, using a variety of codecs. Tasks
|
|
|
|
|
can be automated using projects, job queue and powerful scripting
|
|
|
|
|
capabilities.")
|
|
|
|
|
;; Software with various licenses is included, see License.txt.
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-02-23 22:59:20 +01:00
|
|
|
|
|
2015-03-21 23:09:11 +01:00
|
|
|
|
(define-public vapoursynth
|
|
|
|
|
(package
|
|
|
|
|
(name "vapoursynth")
|
2017-03-21 21:36:33 +01:00
|
|
|
|
(version "37")
|
2015-03-21 23:09:11 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/vapoursynth/vapoursynth/archive/R"
|
|
|
|
|
version ".tar.gz"))
|
2016-10-29 19:45:29 +02:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2015-03-21 23:09:11 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-21 21:36:33 +01:00
|
|
|
|
"1g3hc079jw4mz1cmkv2y28pdb556wqc8ql7iravgh1rg8j3f1zi5"))))
|
2015-03-21 23:09:11 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("cython" ,python-cython)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("python" ,python)
|
|
|
|
|
("yasm" ,yasm)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ffmpeg" ,ffmpeg)
|
|
|
|
|
("libass" ,libass)
|
2016-05-29 13:52:15 +02:00
|
|
|
|
("tesseract-ocr" ,tesseract-ocr)
|
|
|
|
|
("zimg" ,zimg)))
|
2015-03-21 23:09:11 +01:00
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after
|
utils: 'modify-phases' no longer introduces quotes.
Suggested by Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>.
* guix/build/utils.scm (%modify-phases): Remove quotes.
* guix/build/cmake-build-system.scm (%standard-phases): Adjust
accordingly.
* guix/build/glib-or-gtk-build-system.scm (%standard-phases): Likewise.
* guix/build/gnu-dist.scm (%dist-phases): Likewise.
* guix/build/perl-build-system.scm (%standard-phases): Likewise.
* guix/build/python-build-system.scm (%standard-phases): Likewise.
* guix/build/ruby-build-system.scm (%standard-phases): Likewise.
* guix/build/waf-build-system.scm (%standard-phases): Likewise.
* gnu/packages/bash.scm, gnu/packages/code.scm, gnu/packages/gl.scm,
gnu/packages/gnome.scm, gnu/packages/graphics.scm,
gnu/packages/image.scm, gnu/packages/key-mon.scm,
gnu/packages/ocr.scm, gnu/packages/plotutils.scm,
gnu/packages/search.scm, gnu/packages/video.scm: Likewise.
2015-03-31 22:43:01 +02:00
|
|
|
|
'unpack 'autogen
|
2015-03-21 23:09:11 +01:00
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "sh" "autogen.sh")))))))
|
|
|
|
|
(home-page "http://www.vapoursynth.com/")
|
|
|
|
|
(synopsis "Video processing framework")
|
|
|
|
|
(description "VapourSynth is a C++ library and Python module for video
|
|
|
|
|
manipulation. It aims to be a modern rewrite of Avisynth, supporting
|
|
|
|
|
multithreading, generalized colorspaces, per frame properties, and videos with
|
|
|
|
|
format changes.")
|
2016-09-12 21:29:35 +02:00
|
|
|
|
;; src/core/cpufeatures only allows x86, ARM or PPC
|
|
|
|
|
(supported-systems (delete "mips64el-linux" %supported-systems))
|
2015-03-21 23:09:11 +01:00
|
|
|
|
;; As seen from the source files.
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:lgpl2.1+)))
|
2015-03-21 23:09:11 +01:00
|
|
|
|
|
2015-03-06 11:50:40 +01:00
|
|
|
|
(define-public xvid
|
|
|
|
|
(package
|
|
|
|
|
(name "xvid")
|
2016-02-21 09:55:07 +01:00
|
|
|
|
(version "1.3.4")
|
2015-03-06 11:50:40 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://downloads.xvid.org/downloads/xvidcore-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-02-21 09:55:07 +01:00
|
|
|
|
"1xwbmp9wqshc0ckm970zdpi0yvgqxlqg0s8bkz98mnr8p2067bsz"))))
|
2015-03-06 11:50:40 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("yasm" ,yasm)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
2016-02-21 09:56:50 +01:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'configure 'pre-configure
|
|
|
|
|
(lambda _
|
|
|
|
|
(chdir "build/generic")
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("#! /bin/sh") (string-append "#!" (which "sh")))))))
|
2015-03-06 11:50:40 +01:00
|
|
|
|
;; No 'check' target.
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(home-page "https://www.xvid.com/")
|
|
|
|
|
(synopsis "MPEG-4 Part 2 Advanced Simple Profile video codec")
|
|
|
|
|
(description "Xvid is an MPEG-4 Part 2 Advanced Simple Profile (ASP) video
|
|
|
|
|
codec library. It uses ASP features such as b-frames, global and quarter
|
|
|
|
|
pixel motion compensation, lumi masking, trellis quantization, and H.263, MPEG
|
|
|
|
|
and custom quantization matrices.")
|
2015-04-02 19:16:04 +02:00
|
|
|
|
(license license:gpl2+)))
|
2015-04-04 19:18:40 +02:00
|
|
|
|
|
|
|
|
|
(define-public livestreamer
|
|
|
|
|
(package
|
|
|
|
|
(name "livestreamer")
|
2015-06-30 19:44:02 +02:00
|
|
|
|
(version "1.12.2")
|
2015-04-04 19:18:40 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/chrippa/livestreamer/archive/v"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(file-name (string-append "livestreamer-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-06-30 19:44:02 +02:00
|
|
|
|
"1fp3d3z2grb1ls97smjkraazpxnvajda2d1g1378s6gzmda2jvjd"))))
|
2015-04-04 19:18:40 +02:00
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:tests? #f)) ; tests rely on external web servers
|
|
|
|
|
(propagated-inputs
|
2016-04-10 09:33:59 +02:00
|
|
|
|
`(("python-requests" ,python-requests)))
|
2015-04-04 19:18:40 +02:00
|
|
|
|
(synopsis "Internet video stream viewer")
|
|
|
|
|
(description "Livestreamer is a command-line utility that extracts streams
|
|
|
|
|
from various services and pipes them into a video playing application.")
|
|
|
|
|
(home-page "http://livestreamer.io/")
|
|
|
|
|
(license license:bsd-2)))
|
2015-11-16 18:28:59 +01:00
|
|
|
|
|
|
|
|
|
(define-public mlt
|
|
|
|
|
(package
|
|
|
|
|
(name "mlt")
|
2016-12-20 18:03:17 +01:00
|
|
|
|
(version "6.4.1")
|
2015-11-16 18:28:59 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-05-09 01:26:12 +02:00
|
|
|
|
(uri (string-append "https://github.com/mltframework/mlt/"
|
|
|
|
|
"archive/v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2015-11-16 18:28:59 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-12-20 18:03:17 +01:00
|
|
|
|
"10m3ry0b2pvqx3bk34qh5dq337nn8pkc2gzfyhsj4nv9abskln47"))))
|
2015-11-16 18:28:59 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no tests
|
|
|
|
|
#:make-flags '("CC=gcc")
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list "--enable-gpl3"
|
|
|
|
|
"--enable-gpl")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after
|
|
|
|
|
'configure 'override-LDFLAGS
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "config.mak"
|
|
|
|
|
(("LDFLAGS\\+=")
|
|
|
|
|
(string-append "LDFLAGS+=-Wl,-rpath="
|
|
|
|
|
(assoc-ref outputs "out")
|
|
|
|
|
"/lib ")))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("fftw" ,fftw)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
2016-05-09 01:26:12 +02:00
|
|
|
|
("pulseaudio" ,pulseaudio)
|
2015-11-16 18:28:59 +01:00
|
|
|
|
("sdl" ,sdl)
|
|
|
|
|
("sox" ,sox)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2016-05-09 01:26:12 +02:00
|
|
|
|
(home-page "https://www.mltframework.org/")
|
2015-11-16 18:28:59 +01:00
|
|
|
|
(synopsis "Author, manage, and run multitrack audio/video compositions")
|
|
|
|
|
(description
|
|
|
|
|
"MLT is a multimedia framework, designed and developed for television
|
|
|
|
|
broadcasting. It provides a toolkit for broadcasters, video editors, media
|
|
|
|
|
players, transcoders, web streamers and many more types of applications. The
|
|
|
|
|
functionality of the system is provided via an assortment of ready to use
|
|
|
|
|
tools, XML authoring components, and an extensible plug-in based API.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2015-12-17 19:36:42 +01:00
|
|
|
|
|
2016-01-20 04:11:16 +01:00
|
|
|
|
(define-public v4l-utils
|
|
|
|
|
(package
|
|
|
|
|
(name "v4l-utils")
|
2016-06-16 05:37:18 +02:00
|
|
|
|
(version "1.10.1")
|
2016-01-20 04:11:16 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-05-09 01:10:32 +02:00
|
|
|
|
(uri (string-append "https://linuxtv.org/downloads/v4l-utils"
|
2016-01-20 04:11:16 +01:00
|
|
|
|
"/v4l-utils-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-06-16 05:37:18 +02:00
|
|
|
|
"1h1nhg5cmmzlbipak526nk4bm6d0yb217mll75f3rpg7kz1cqiv1"))))
|
2016-01-20 04:11:16 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(list (string-append "--with-udevdir="
|
|
|
|
|
(assoc-ref %outputs "out")
|
2016-08-20 21:37:34 +02:00
|
|
|
|
"/lib/udev")
|
|
|
|
|
"CXXFLAGS=-std=gnu++11")))
|
2016-01-20 04:11:16 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("glu" ,glu)
|
|
|
|
|
("libjpeg" ,libjpeg)
|
|
|
|
|
("libx11" ,libx11)
|
2016-06-16 05:17:52 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
2016-01-20 04:11:16 +01:00
|
|
|
|
("eudev" ,eudev)))
|
|
|
|
|
(synopsis "Realtime video capture utilities for Linux")
|
|
|
|
|
(description "The v4l-utils provide a series of libraries and utilities to
|
|
|
|
|
be used for realtime video capture via Linux-specific APIs.")
|
|
|
|
|
(home-page "https://linuxtv.org/wiki/index.php/V4l-utils")
|
|
|
|
|
;; libv4l2 is LGPL2.1+, while utilities are GPL2 only.
|
|
|
|
|
(license (list license:lgpl2.1+ license:gpl2))))
|
|
|
|
|
|
2015-12-17 19:36:42 +01:00
|
|
|
|
(define-public obs
|
|
|
|
|
(package
|
|
|
|
|
(name "obs")
|
2017-03-14 22:27:30 +01:00
|
|
|
|
(version "18.0.1")
|
2015-12-17 19:36:42 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/jp9000/obs-studio"
|
|
|
|
|
"/archive/" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-03-14 22:27:30 +01:00
|
|
|
|
"043f8mfdh4ll0hpivpyg3iniirckwsgri0gzamyrba1yhf2c2ibr"))))
|
2015-12-17 19:36:42 +01:00
|
|
|
|
(build-system cmake-build-system)
|
2016-07-12 16:45:13 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no tests
|
|
|
|
|
,@(if (any (cute string-prefix? <> (or (%current-target-system)
|
|
|
|
|
(%current-system)))
|
|
|
|
|
'("arm" "mips"))
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'remove-architecture-specific-instructions
|
|
|
|
|
;; non-Intel platforms fail to build with the architecture
|
|
|
|
|
;; specific compiler flags included by default.
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "libobs/CMakeLists.txt"
|
|
|
|
|
(("if\\(NOT MSVC\\)") "if(MSVC)"))
|
|
|
|
|
#t))))
|
|
|
|
|
'())))
|
2015-12-17 19:36:42 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
2017-01-19 21:54:25 +01:00
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("curl" ,curl)
|
2015-12-17 19:36:42 +01:00
|
|
|
|
("eudev" ,eudev)
|
|
|
|
|
("ffmpeg" ,ffmpeg)
|
2017-01-19 21:54:25 +01:00
|
|
|
|
("fontconfig" ,fontconfig)
|
2015-12-17 19:36:42 +01:00
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("jansson" ,jansson)
|
|
|
|
|
("libx264" ,libx264)
|
|
|
|
|
("libxcomposite" ,libxcomposite)
|
|
|
|
|
("mesa" ,mesa)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
2016-06-16 04:36:09 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qtx11extras" ,qtx11extras)
|
2017-01-19 21:54:25 +01:00
|
|
|
|
("speex" ,speex)
|
2016-01-20 04:11:35 +01:00
|
|
|
|
("v4l-utils" ,v4l-utils)
|
2015-12-17 19:36:42 +01:00
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(synopsis "Live streaming software")
|
|
|
|
|
(description "Open Broadcaster Software provides a graphical interface for
|
|
|
|
|
video recording and live streaming. OBS supports capturing audio and video
|
|
|
|
|
from many input sources such as webcams, X11 (for screencasting), PulseAudio,
|
|
|
|
|
and JACK.")
|
|
|
|
|
(home-page "https://obsproject.com")
|
|
|
|
|
(license license:gpl2+)))
|
2015-12-21 14:53:59 +01:00
|
|
|
|
|
|
|
|
|
(define-public libvdpau
|
|
|
|
|
(package
|
|
|
|
|
(name "libvdpau")
|
|
|
|
|
(version "1.1.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://secure.freedesktop.org/~aplattner/vdpau/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0dnpb0yh7v6rvckx82kxg045rd9rbsw25wjv7ad5n8h94s9h2yl5"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("dri2proto" ,dri2proto)
|
|
|
|
|
("libx11" ,libx11 "out")
|
|
|
|
|
("libxext" ,libxext)))
|
|
|
|
|
(home-page "https://wiki.freedesktop.org/www/Software/VDPAU/")
|
|
|
|
|
(synopsis "Video Decode and Presentation API")
|
|
|
|
|
(description "VDPAU is the Video Decode and Presentation API for UNIX. It
|
|
|
|
|
provides an interface to video decode acceleration and presentation hardware
|
|
|
|
|
present in modern GPUs.")
|
|
|
|
|
(license (license:x11-style "file://COPYING"))))
|
2015-12-21 15:06:30 +01:00
|
|
|
|
|
|
|
|
|
(define-public vdpauinfo
|
|
|
|
|
(package
|
|
|
|
|
(name "vdpauinfo")
|
|
|
|
|
(version "1.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://secure.freedesktop.org/~aplattner/vdpau/"
|
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1i2b0k9h8r0lnxlrkgqzmrjakgaw3f1ygqqwzx8w6676g85rcm20"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("libx11" ,libx11)))
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("libvdpau" ,libvdpau)))
|
|
|
|
|
(home-page "https://wiki.freedesktop.org/www/Software/VDPAU/")
|
|
|
|
|
(synopsis "Tool to query the capabilities of a VDPAU implementation")
|
|
|
|
|
(description "Vdpauinfo is a tool to query the capabilities of a VDPAU
|
|
|
|
|
implementation.")
|
|
|
|
|
(license (license:x11-style "file://COPYING"))))
|
2016-04-17 17:36:43 +02:00
|
|
|
|
|
|
|
|
|
(define-public recordmydesktop
|
|
|
|
|
(package
|
|
|
|
|
(name "recordmydesktop")
|
|
|
|
|
(version "0.3.8.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/" name "/" name "/"
|
|
|
|
|
version "/recordmydesktop-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"133kkl5j0r877d41bzj7kj0vf3xm8x80yyx2n8nqxrva304f58ik"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("popt" ,popt)
|
|
|
|
|
("zlib" ,zlib)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libice" ,libice)
|
|
|
|
|
("libsm" ,libsm)
|
|
|
|
|
("libxfixes" ,libxfixes)
|
|
|
|
|
("libxdamage" ,libxdamage)
|
|
|
|
|
("libxext" ,libxext)
|
2016-08-02 22:11:46 +02:00
|
|
|
|
("alsa-lib" ,alsa-lib)
|
2016-04-17 17:36:43 +02:00
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libtheora" ,libtheora)))
|
|
|
|
|
(home-page "http://recordmydesktop.sourceforge.net/")
|
|
|
|
|
(synopsis "Desktop session video recorder")
|
|
|
|
|
(description
|
|
|
|
|
"recordMyDesktop is a command-line tool that captures the activity in
|
|
|
|
|
your graphical desktop and encodes it as a video. This is a useful tool for
|
|
|
|
|
making @dfn{screencasts}.")
|
|
|
|
|
(license license:gpl2+)))
|
2016-07-29 23:01:51 +02:00
|
|
|
|
|
|
|
|
|
(define-public libsmpeg
|
|
|
|
|
(package
|
|
|
|
|
(name "libsmpeg")
|
|
|
|
|
(version "0.4.5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method svn-fetch)
|
|
|
|
|
(uri (svn-reference
|
|
|
|
|
(url "svn://svn.icculus.org/smpeg/trunk/")
|
|
|
|
|
(revision 401))) ; last revision before smpeg2 (for SDL 2.0)
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"18yfkr70lr1x1hc8snn2ldnbzdcc7b64xmkqrfk8w59gpg7sl1xn"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases (modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'autogen.sh
|
|
|
|
|
(lambda _
|
|
|
|
|
(zero? (system* "sh" "autogen.sh")))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("sdl" ,sdl2)))
|
|
|
|
|
(home-page "http://icculus.org/smpeg/")
|
|
|
|
|
(synopsis "SDL MPEG decoding library")
|
|
|
|
|
(description
|
|
|
|
|
"SMPEG (SDL MPEG Player Library) is a free MPEG1 video player library
|
|
|
|
|
with sound support. Video playback is based on the ubiquitous Berkeley MPEG
|
|
|
|
|
player, mpeg_play v2.2. Audio is played through a slightly modified mpegsound
|
|
|
|
|
library, part of splay v0.8.2. SMPEG supports MPEG audio (MP3), MPEG-1 video,
|
|
|
|
|
and MPEG system streams.")
|
|
|
|
|
(license (list license:expat
|
|
|
|
|
license:lgpl2.1
|
|
|
|
|
license:lgpl2.1+
|
|
|
|
|
license:gpl2))))
|
2016-09-09 21:52:24 +02:00
|
|
|
|
|
|
|
|
|
(define-public libbdplus
|
|
|
|
|
(package
|
|
|
|
|
(name "libbdplus")
|
|
|
|
|
(version "0.1.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "ftp://ftp.videolan.org/pub/videolan/libbdplus/"
|
|
|
|
|
version "/" name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32 "02n87lysqn4kg2qk7d1ffrp96c44zkdlxdj0n16hbgrlrpiwlcd6"))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libgcrypt" ,libgcrypt)))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.videolan.org/developers/libbdplus.html")
|
|
|
|
|
(synopsis "Library for decrypting certain Blu-Ray discs")
|
|
|
|
|
(description "libbdplus is a library which implements the BD+ System
|
|
|
|
|
specifications.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2016-09-09 21:52:25 +02:00
|
|
|
|
|
|
|
|
|
(define-public libaacs
|
|
|
|
|
(package
|
|
|
|
|
(name "libaacs")
|
|
|
|
|
(version "0.8.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "ftp://ftp.videolan.org/pub/videolan/libaacs/"
|
|
|
|
|
version "/" name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32 "1s5v075hnbs57995r6lljm79wgrip3gnyf55a0y7bja75jh49hwm"))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libgcrypt" ,libgcrypt)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bison" ,bison)
|
|
|
|
|
("flex" ,flex)))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.videolan.org/developers/libaacs.html")
|
|
|
|
|
(synopsis "Library for decrypting certain Blu-Ray discs")
|
|
|
|
|
(description "libaacs is a library which implements the Advanced Access
|
|
|
|
|
Content System specification.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2016-11-04 20:23:02 +01:00
|
|
|
|
|
|
|
|
|
(define-public mps-youtube
|
|
|
|
|
(package
|
|
|
|
|
(name "mps-youtube")
|
|
|
|
|
(version "0.2.7.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/mps-youtube/mps-youtube/"
|
|
|
|
|
"archive/v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1s7h35yx6f0szf8mm8612ic913w3v05m2kwphjfcxnpq0ammhyci"))))
|
|
|
|
|
(build-system python-build-system)
|
2016-11-16 13:27:57 +01:00
|
|
|
|
(arguments
|
|
|
|
|
;; Tests need to be disabled until #556 upstream is fixed. It reads as if the
|
|
|
|
|
;; test suite results differ depending on the country and also introduce
|
|
|
|
|
;; non-determinism in the tests.
|
|
|
|
|
;; https://github.com/mps-youtube/mps-youtube/issues/556
|
|
|
|
|
`(#:tests? #f))
|
2016-11-04 20:23:02 +01:00
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("python-pafy" ,python-pafy)
|
|
|
|
|
("python-pygobject" ,python-pygobject))) ; For mpris2 support
|
|
|
|
|
(home-page "https://github.com/mps-youtube/mps-youtube")
|
|
|
|
|
(synopsis "Terminal based YouTube player and downloader")
|
|
|
|
|
(description
|
|
|
|
|
"@code{mps-youtube} is based on mps, a terminal based program to
|
|
|
|
|
search, stream and download music. This implementation uses YouTube as
|
|
|
|
|
a source of content and can play and download video as well as audio.
|
|
|
|
|
It can use either mpv or mplayer for playback, and for conversion of
|
|
|
|
|
formats ffmpeg or libav is used. Users should install one of the
|
|
|
|
|
supported players in addition to this package.")
|
|
|
|
|
(license license:gpl3+)))
|
2015-12-26 03:29:09 +01:00
|
|
|
|
|
|
|
|
|
(define-public handbrake
|
|
|
|
|
(package
|
|
|
|
|
(name "handbrake")
|
|
|
|
|
(version "0.10.5")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://handbrake.fr/rotation.php?file="
|
|
|
|
|
"HandBrake-" version ".tar.bz2"))
|
|
|
|
|
(file-name (string-append "handbrake-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1w720y3bplkz187wgvy4a4xm0vpppg45mlni55l6yi8v2bfk14pv"))
|
|
|
|
|
(patches (search-patches "handbrake-pkg-config-path.patch"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; Remove bundled libraries and source not necessary for
|
|
|
|
|
;; running under a GNU environment.
|
|
|
|
|
'(begin
|
|
|
|
|
(for-each delete-file-recursively '("contrib" "macosx" "win"))
|
|
|
|
|
#t))))
|
|
|
|
|
(build-system glib-or-gtk-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("automake" ,automake) ;gui subpackage must be bootstrapped
|
|
|
|
|
("autoconf" ,autoconf)
|
|
|
|
|
("curl" ,curl) ;not actually used, but tested for
|
|
|
|
|
("intltool" ,intltool)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("python" ,python-2))) ;for configuration
|
|
|
|
|
(inputs
|
|
|
|
|
`(("bzip2" ,bzip2)
|
|
|
|
|
("dbus-glib" ,dbus-glib)
|
|
|
|
|
("ffmpeg" ,ffmpeg)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("gstreamer" ,gstreamer)
|
|
|
|
|
("gst-plugins-base" ,gst-plugins-base)
|
|
|
|
|
("gtk+" ,gtk+)
|
|
|
|
|
("lame" ,lame)
|
|
|
|
|
("libass" ,libass)
|
|
|
|
|
("libbluray" ,libbluray)
|
|
|
|
|
("libdvdnav" ,libdvdnav)
|
|
|
|
|
("libdvdread" ,libdvdread)
|
|
|
|
|
("libgudev" ,libgudev)
|
|
|
|
|
("libmpeg2" ,libmpeg2)
|
|
|
|
|
("libnotify" ,libnotify)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("libtheora" ,libtheora)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("libvpx" ,libvpx)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("libx264" ,libx264)
|
|
|
|
|
("x265" ,x265)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;tests require Ruby and claim to be unsupported
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'patch-source-shebangs 'bootstrap-gtk
|
|
|
|
|
;; Run bootstrap ahead of time so that shebangs get patched.
|
|
|
|
|
(lambda _
|
|
|
|
|
(setenv "CONFIG_SHELL" (which "sh"))
|
|
|
|
|
(setenv "NOCONFIGURE" "1")
|
|
|
|
|
;; Patch the Makefile so that it doesn't bootstrap again.
|
|
|
|
|
(substitute* "gtk/module.rules"
|
|
|
|
|
((".*autogen\\.sh.*") ""))
|
|
|
|
|
(zero? (system* "sh" "./gtk/autogen.sh"))))
|
|
|
|
|
(add-before 'configure 'disable-contrib
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "make/include/main.defs"
|
|
|
|
|
;; Disable unconditional inclusion of some "contrib"
|
|
|
|
|
;; libraries (ffmpeg, libvpx, libdvdread, libdvdnav,
|
|
|
|
|
;; and libbluray), which would lead to fetching and
|
|
|
|
|
;; building of these libraries. Use our own instead.
|
|
|
|
|
(("MODULES \\+= contrib") "# MODULES += contrib"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'configure 'fix-x265-linking
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "test/module.defs"
|
|
|
|
|
;; Fix missing library during linking error
|
|
|
|
|
(("TEST.GCC.l =") "TEST.GCC.l = x265"))
|
|
|
|
|
#t))
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs configure-flags #:allow-other-keys)
|
|
|
|
|
;; 'configure' is not an autoconf-generated script, and
|
|
|
|
|
;; errors on unrecognized arguments,
|
|
|
|
|
;; e.g. --enable-fast-install
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(zero? (apply system* "./configure"
|
|
|
|
|
(string-append "--prefix=" out)
|
|
|
|
|
(or configure-flags '()))))))
|
|
|
|
|
(add-after 'configure 'chdir-build
|
|
|
|
|
(lambda _ (chdir "./build") #t)))))
|
|
|
|
|
(home-page "https://handbrake.fr")
|
|
|
|
|
(synopsis "Video transcoder")
|
|
|
|
|
(description
|
|
|
|
|
"HandBrake is a tool for converting video from any format to a selection
|
|
|
|
|
of modern, widely supported codecs.")
|
|
|
|
|
;; Most under GPL version 2 or later, and portions under BSD 3 Clause
|
|
|
|
|
(license (list license:gpl2+ license:bsd-3))))
|
2016-06-18 22:40:51 +02:00
|
|
|
|
|
|
|
|
|
(define-public openh264
|
|
|
|
|
(package
|
|
|
|
|
(name "openh264")
|
|
|
|
|
(version "1.6.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/cisco/"
|
|
|
|
|
name "/archive/v" version ".tar.gz"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1ix2fhk62i4q4kbnkl0gfk4x53vxqavsn0pck1pashr566zhglv5"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("nasm" ,nasm)
|
|
|
|
|
("python" ,python)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:test-target "test"
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(home-page "http://www.openh264.org/")
|
|
|
|
|
(synopsis "H264 decoder library")
|
|
|
|
|
(description
|
|
|
|
|
"Openh264 is a library which can decode H264 video streams.")
|
|
|
|
|
(license license:bsd-2)))
|
2017-02-09 14:37:00 +01:00
|
|
|
|
|
|
|
|
|
(define-public libmp4v2
|
|
|
|
|
(package
|
|
|
|
|
(name "libmp4v2")
|
|
|
|
|
(version "2.0.0")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
;; XXX: The new location of upstream is uncertain and will become relevant the
|
|
|
|
|
;; moment when the googlecode archive shuts down. It is past the date it
|
|
|
|
|
;; should've been turned off. I tried to communicate with upstream, but this
|
|
|
|
|
;; wasn't very responsive and not very helpful. The short summary is, it is
|
|
|
|
|
;; chaos when it comes to the amount of forks and only time will tell where
|
|
|
|
|
;; the new upstream location is.
|
|
|
|
|
(uri (string-append "https://storage.googleapis.com/google-"
|
|
|
|
|
"code-archive-downloads/v2/"
|
|
|
|
|
"code.google.com/mp4v2/mp4v2-" version ".tar.bz2"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0f438bimimsvxjbdp4vsr8hjw2nwggmhaxgcw07g2z361fkbj683"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(outputs '("out"
|
|
|
|
|
"static")) ; 3.7MiB .a file
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'remove-dates
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Make the build reproducible.
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("PROJECT_build=\"`date`\"") "PROJECT_build=\"\"")
|
|
|
|
|
(("ac_abs_top_builddir=$ac_pwd") "ac_abs_top_builddir=\"\""))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'move-static-libraries
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; Move static libraries to the "static" output.
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(lib (string-append out "/lib"))
|
|
|
|
|
(static (assoc-ref outputs "static"))
|
|
|
|
|
(slib (string-append static "/lib")))
|
|
|
|
|
(mkdir-p slib)
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file slib)
|
|
|
|
|
(delete-file file))
|
|
|
|
|
(find-files lib "\\.a$"))
|
|
|
|
|
#t))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("help2man" ,help2man)
|
|
|
|
|
("dejagnu" ,dejagnu)))
|
|
|
|
|
(home-page "https://code.google.com/archive/p/mp4v2/")
|
|
|
|
|
(synopsis "API to create and modify mp4 files")
|
|
|
|
|
(description
|
|
|
|
|
"The MP4v2 library provides an API to create and modify mp4 files as defined by
|
|
|
|
|
ISO-IEC:14496-1:2001 MPEG-4 Systems. This file format is derived from Apple's QuickTime
|
|
|
|
|
file format that has been used as a multimedia file format in a variety of platforms and
|
|
|
|
|
applications. It is a very powerful and extensible format that can accommodate
|
|
|
|
|
practically any type of media.")
|
|
|
|
|
(license license:mpl1.1)))
|