2015-01-26 09:59:56 +01:00
|
|
|
|
;;; GNU Guix --- Functional package management for GNU
|
2018-01-05 20:36:34 +01:00
|
|
|
|
;;; Copyright © 2015, 2016, 2017, 2018 Ricardo Wurmus <rekado@elephly.net>
|
2015-02-20 21:42:48 +01:00
|
|
|
|
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
|
2015-05-17 10:04:37 +02:00
|
|
|
|
;;; Copyright © 2015 Andreas Enge <andreas@enge.fr>
|
2015-07-13 18:15:07 +02:00
|
|
|
|
;;; Copyright © 2015 Alex Kost <alezost@gmail.com>
|
2016-01-21 06:43:44 +01:00
|
|
|
|
;;; Copyright © 2015, 2016 Mark H Weaver <mhw@netris.org>
|
2018-05-01 18:01:20 +02:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Efraim Flashner <efraim@flashner.co.il>
|
2017-01-03 17:46:59 +01:00
|
|
|
|
;;; Copyright © 2016, 2017 Alex Griffin <a@ajgrf.com>
|
Correct name and Email for ng0.
* .mailmap: Correct name and Email for ng0.
* Makefile.am, doc/guix.texi, etc/completion/fish/guix.fish
gnu/packages/accessibility.scm, gnu/packages/admin.scm,
gnu/packages/audio.scm, gnu/packages/autotools.scm,
gnu/packages/cdrom.scm, gnu/packages/check.scm,
gnu/packages/cinnamon.scm, gnu/packages/compression.scm,
gnu/packages/crypto.scm, gnu/packages/databases.scm,
gnu/packages/django.scm, gnu/packages/dns.scm,
gnu/packages/emacs.scm, gnu/packages/enlightenment.scm,
gnu/packages/fonts.scm, gnu/packages/fontutils.scm,
gnu/packages/forth.scm, gnu/packages/fvwm.scm,
gnu/packages/games.scm, gnu/packages/gl.scm,
gnu/packages/gnome.scm, gnu/packages/gnunet.scm,
gnu/packages/gnupg.scm, gnu/packages/gnuzilla.scm,
gnu/packages/gtk.scm, gnu/packages/guile-wm.scm,
gnu/packages/guile.scm, gnu/packages/haskell-check.scm,
gnu/packages/haskell-crypto.scm, gnu/packages/haskell.scm,
gnu/packages/image-viewers.scm, gnu/packages/image.scm,
gnu/packages/irc.scm, gnu/packages/language.scm,
gnu/packages/libcanberra.scm, gnu/packages/linux.scm,
gnu/packages/lisp.scm, gnu/packages/lolcode.scm,
gnu/packages/lxde.scm, gnu/packages/lxqt.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm,
gnu/packages/mate.scm, gnu/packages/maths.scm,
gnu/packages/mc.scm, gnu/packages/messaging.scm,
gnu/packages/music.scm, gnu/packages/ncurses.scm,
gnu/packages/networking.scm, gnu/packages/nickle.scm,
gnu/packages/openbox.scm, gnu/packages/pdf.scm,
gnu/packages/perl-check.scm, gnu/packages/perl.scm,
gnu/packages/python-crypto.scm, gnu/packages/python-web.scm,
gnu/packages/python.scm, gnu/packages/qt.scm,
gnu/packages/ruby.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/serialization.scm,
gnu/packages/shells.scm, gnu/packages/ssh.scm,
gnu/packages/suckless.scm, gnu/packages/tbb.scm,
gnu/packages/telephony.scm, gnu/packages/text-editors.scm,
gnu/packages/textutils.scm, gnu/packages/time.scm,
gnu/packages/tls.scm, gnu/packages/tor.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vim.scm, gnu/packages/web.scm,
gnu/packages/wm.scm, gnu/packages/xdisorg.scm,
gnu/packages/xfce.scm, gnu/packages/xml.scm,
gnu/packages/xorg.scm, gnu/services/certbot.scm,
gnu/services/desktop.scm, gnu/services/version-control.scm,
gnu/services/web.scm, guix/import/hackage.scm,
guix/licenses.scm: Likewise.
Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
2018-03-20 16:39:45 +01:00
|
|
|
|
;;; Copyright © 2016 Nils Gillmann <ng0@n0.is>
|
2016-08-09 23:43:36 +02:00
|
|
|
|
;;; Copyright © 2016 Lukas Gradl <lgradl@openmailbox.org>
|
2018-01-13 20:05:34 +01:00
|
|
|
|
;;; Copyright © 2016, 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
2018-01-25 20:42:53 +01:00
|
|
|
|
;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
|
2018-01-17 00:08:23 +01:00
|
|
|
|
;;; Copyright © 2018 okapi <okapi@firemail.cc>
|
2018-03-05 05:03:26 +01:00
|
|
|
|
;;; Copyright © 2018 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
2018-05-28 15:02:28 +02:00
|
|
|
|
;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org>
|
2018-10-14 03:37:34 +02:00
|
|
|
|
;;; Copyright © 2018 Brett Gilio <brettg@posteo.net>
|
2018-10-21 17:47:35 +02:00
|
|
|
|
;;; Copyright © 2018 Marius Bakke <mbakke@fastmail.com>
|
2015-01-26 09:59:56 +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 audio)
|
|
|
|
|
#:use-module (guix packages)
|
|
|
|
|
#:use-module (guix download)
|
|
|
|
|
#:use-module (guix git-download)
|
2015-05-11 20:24:59 +02:00
|
|
|
|
#:use-module (guix utils)
|
2015-01-26 09:59:56 +01:00
|
|
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
|
|
|
#:use-module (guix build-system gnu)
|
2015-01-29 10:00:56 +01:00
|
|
|
|
#:use-module (guix build-system waf)
|
2015-02-19 16:56:39 +01:00
|
|
|
|
#:use-module (guix build-system trivial)
|
2015-02-20 21:49:03 +01:00
|
|
|
|
#:use-module (guix build-system cmake)
|
2016-02-25 09:45:05 +01:00
|
|
|
|
#:use-module (guix build-system python)
|
2017-10-03 05:13:05 +02:00
|
|
|
|
#:use-module (guix build-system glib-or-gtk)
|
2015-01-26 09:59:56 +01:00
|
|
|
|
#:use-module (gnu packages)
|
2015-02-05 22:40:01 +01:00
|
|
|
|
#:use-module (gnu packages algebra)
|
2015-02-20 21:42:48 +01:00
|
|
|
|
#:use-module (gnu packages autotools)
|
2015-06-23 18:52:26 +02:00
|
|
|
|
#:use-module (gnu packages avahi)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
#:use-module (gnu packages boost)
|
2016-10-09 18:52:24 +02:00
|
|
|
|
#:use-module (gnu packages backup)
|
2015-02-19 16:56:39 +01:00
|
|
|
|
#:use-module (gnu packages base)
|
2015-03-31 22:28:08 +02:00
|
|
|
|
#:use-module (gnu packages bison)
|
2016-08-14 13:18:19 +02:00
|
|
|
|
#:use-module (gnu packages check)
|
2015-02-19 16:56:39 +01:00
|
|
|
|
#:use-module (gnu packages compression)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
#:use-module (gnu packages curl)
|
2015-01-26 09:59:56 +01:00
|
|
|
|
#:use-module (gnu packages databases)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
#:use-module (gnu packages emacs)
|
2015-02-20 21:44:57 +01:00
|
|
|
|
#:use-module (gnu packages file)
|
2015-03-31 22:28:08 +02:00
|
|
|
|
#:use-module (gnu packages flex)
|
2015-11-22 16:45:18 +01:00
|
|
|
|
#:use-module (gnu packages fltk)
|
|
|
|
|
#:use-module (gnu packages fontutils)
|
2015-03-31 22:28:08 +02:00
|
|
|
|
#:use-module (gnu packages gettext)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
#:use-module (gnu packages glib)
|
2015-02-05 22:40:35 +01:00
|
|
|
|
#:use-module (gnu packages gtk)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
#:use-module (gnu packages gnome)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
#:use-module (gnu packages gnunet) ; libmicrohttpd
|
2015-06-23 18:52:26 +02:00
|
|
|
|
#:use-module (gnu packages gperf)
|
2018-03-05 05:03:26 +01:00
|
|
|
|
#:use-module (gnu packages icu4c)
|
2015-07-13 18:15:07 +02:00
|
|
|
|
#:use-module (gnu packages image)
|
2015-02-19 16:57:33 +01:00
|
|
|
|
#:use-module (gnu packages ncurses)
|
2015-02-05 22:40:35 +01:00
|
|
|
|
#:use-module (gnu packages qt)
|
2017-12-04 12:41:27 +01:00
|
|
|
|
#:use-module (gnu packages libbsd)
|
2015-01-29 10:00:56 +01:00
|
|
|
|
#:use-module (gnu packages linux)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
#:use-module (gnu packages llvm)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
#:use-module (gnu packages mp3) ;taglib
|
|
|
|
|
#:use-module (gnu packages perl)
|
2015-01-29 10:00:56 +01:00
|
|
|
|
#:use-module (gnu packages pkg-config)
|
|
|
|
|
#:use-module (gnu packages pulseaudio) ;libsndfile, libsamplerate
|
2015-02-05 22:40:01 +01:00
|
|
|
|
#:use-module (gnu packages python)
|
2015-02-10 10:21:30 +01:00
|
|
|
|
#:use-module (gnu packages rdf)
|
2015-01-29 10:00:56 +01:00
|
|
|
|
#:use-module (gnu packages readline)
|
2018-03-05 05:03:26 +01:00
|
|
|
|
#:use-module (gnu packages serialization)
|
2017-12-04 12:41:27 +01:00
|
|
|
|
#:use-module (gnu packages telephony)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
#:use-module (gnu packages tls)
|
2016-08-03 22:02:04 +02:00
|
|
|
|
#:use-module (gnu packages video)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
#:use-module (gnu packages vim) ;xxd
|
2015-11-19 17:11:46 +01:00
|
|
|
|
#:use-module (gnu packages webkit)
|
2017-04-04 22:08:15 +02:00
|
|
|
|
#:use-module (gnu packages wxwidgets)
|
2015-01-29 10:00:56 +01:00
|
|
|
|
#:use-module (gnu packages xiph)
|
2015-02-13 23:20:00 +01:00
|
|
|
|
#:use-module (gnu packages xml)
|
2015-09-19 13:16:38 +02:00
|
|
|
|
#:use-module (gnu packages xorg)
|
2017-10-03 05:13:05 +02:00
|
|
|
|
#:use-module (gnu packages maths)
|
|
|
|
|
#:use-module (gnu packages multiprecision)
|
2017-11-18 14:49:29 +01:00
|
|
|
|
#:use-module (gnu packages music)
|
2017-11-19 21:06:53 +01:00
|
|
|
|
#:use-module (srfi srfi-1)
|
|
|
|
|
#:use-module (srfi srfi-26))
|
2015-01-26 09:59:56 +01:00
|
|
|
|
|
2015-02-21 21:53:02 +01:00
|
|
|
|
(define-public alsa-modular-synth
|
|
|
|
|
(package
|
|
|
|
|
(name "alsa-modular-synth")
|
2016-01-25 17:07:39 +01:00
|
|
|
|
(version "2.1.2")
|
2015-02-21 21:53:02 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/alsamodular/alsamodular"
|
|
|
|
|
"/" version "/ams-" version ".tar.bz2"))
|
2015-02-21 21:53:02 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-01-25 17:07:39 +01:00
|
|
|
|
"1azbrhpfk4nnybr7kgmc7w6al6xnzppg853vas8gmkh185kk11l0"))))
|
2015-02-21 21:53:02 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2016-03-06 21:10:20 +01:00
|
|
|
|
(arguments
|
2016-08-20 21:33:45 +02:00
|
|
|
|
`(#:configure-flags
|
|
|
|
|
'("--enable-qt5"
|
|
|
|
|
"CXXFLAGS=-std=gnu++11")
|
2016-03-06 21:11:37 +01:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; Insert an extra space between linker flags.
|
|
|
|
|
(add-before 'configure 'add-missing-space
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
(("LIBS\\+=\\$LIBSsave") "LIBS+=\" $LIBSsave\"")
|
|
|
|
|
(("CFLAGS\\+=\\$CFLAGSsave") "CFLAGS+=\" $CFLAGSsave\""))
|
|
|
|
|
#t)))))
|
2015-02-21 21:53:02 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
;; We cannot use zita-alsa-pcmi (the successor of clalsadrv) due to
|
|
|
|
|
;; license incompatibility.
|
|
|
|
|
("clalsadrv" ,clalsadrv)
|
|
|
|
|
("fftw" ,fftw)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("liblo" ,liblo)
|
2016-06-16 11:23:43 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qttools" ,qttools)))
|
2015-02-21 21:53:02 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://alsamodular.sourceforge.net/")
|
|
|
|
|
(synopsis "Realtime modular synthesizer and effect processor")
|
|
|
|
|
(description
|
|
|
|
|
"AlsaModularSynth is a digital implementation of a classical analog
|
|
|
|
|
modular synthesizer system. It uses virtual control voltages to control the
|
|
|
|
|
parameters of the modules. The control voltages which control the frequency
|
|
|
|
|
e.g. of the VCO (Voltage Controlled Oscillator) and VCF (Voltage Controlled
|
|
|
|
|
Filter) modules follow the convention of 1V / Octave.")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2015-02-05 22:40:01 +01:00
|
|
|
|
(define-public aubio
|
|
|
|
|
(package
|
|
|
|
|
(name "aubio")
|
2018-08-14 21:12:10 +02:00
|
|
|
|
(version "0.4.6")
|
2015-02-05 22:40:01 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2018-08-15 01:09:05 +02:00
|
|
|
|
"https://aubio.org/pub/aubio-" version ".tar.bz2"))
|
2015-02-05 22:40:01 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-14 21:12:10 +02:00
|
|
|
|
"1yvwskahx1bf3x2fvi6cwah1ay11iarh79fjlqz8s887y3hkpixx"))))
|
2015-02-05 22:40:01 +01:00
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:configure-flags
|
2018-08-14 21:12:10 +02:00
|
|
|
|
(list
|
|
|
|
|
(string-append "LDFLAGS=-Wl,-rpath=" (assoc-ref %outputs "out") "/lib")
|
|
|
|
|
"--enable-fftw3f"
|
|
|
|
|
"--enable-jack"
|
|
|
|
|
"--enable-sndfile"
|
|
|
|
|
"--enable-samplerate"
|
|
|
|
|
;; TODO: enable compilation with avcodec once available.
|
|
|
|
|
"--disable-avcodec")
|
2015-02-05 22:40:01 +01:00
|
|
|
|
#:python ,python-2))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("jack" ,jack-1)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("fftwf" ,fftwf)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2018-08-15 01:09:05 +02:00
|
|
|
|
(home-page "https://aubio.org/")
|
gnu: Adjust formatting as recommended by 'guix lint'.
* gnu/packages/aidc.scm (barcode, qrencode),
gnu/packages/bash.scm (bash, bash-completion),
gnu/packages/busybox.scm (busybox),
gnu/packages/cdrom.scm (cdparanoia),
gnu/packages/cmake.scm (cmake),
gnu/packages/conkeror.scm (conkeror),
gnu/packages/cook.scm (cook),
gnu/packages/curl.scm (curl),
gnu/packages/docbook.scm (docbook-xsl),
gnu/packages/enlightenment.scm (enlightenment),
gnu/packages/games.scm (abbaye),
gnu/packages/geeqie.scm (exiv2),
gnu/packages/gimp.scm (gegl),
gnu/packages/gl.scm (glu, freeglut, ftgl),
gnu/packages/glib.scm (glib),
gnu/packages/gnome.scm (orbit2, gconf, geocode-glib),
gnu/packages/gstreamer.scm (gstreamer, gst-plugins-base),
gnu/packages/linux.scm (util-linux),
gnu/packages/lisp.scm (gcl, ecl),
gnu/packages/maths.scm (gnuplot, hdf5),
gnu/packages/ssh.scm (dropbear),
gnu/packages/web.scm (json-c): Remove tabulations and trailing
white spaces or reformat to fit within 80 columns.
* gnu/packages/audio.scm (aubio),
gnu/packages/emacs.scm (emacs-s),
gnu/packages/engineering.scm (geda-gaf),
gnu/packages/games.scm (dosbox),
gnu/packages/gnome.scm (gusb),
gnu/packages/gtk.scm (gtk+),
gnu/packages/guile.scm (guile-wisp),
gnu/packages/hurd.scm (hurd-headers),
gnu/packages/wm.scm (i3-wm): Adjust synopsis or description.
2015-11-13 15:50:36 +01:00
|
|
|
|
(synopsis "Library for audio labelling")
|
2015-02-05 22:40:01 +01:00
|
|
|
|
(description
|
|
|
|
|
"aubio is a tool designed for the extraction of annotations from audio
|
|
|
|
|
signals. Its features include segmenting a sound file before each of its
|
|
|
|
|
attacks, performing pitch detection, tapping the beat and producing MIDI
|
|
|
|
|
streams from live audio.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-05-11 20:24:59 +02:00
|
|
|
|
(define (ardour-rpath-phase major-version)
|
|
|
|
|
`(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let ((libdir (string-append (assoc-ref outputs "out")
|
|
|
|
|
"/lib/ardour" ,major-version)))
|
|
|
|
|
(substitute* "wscript"
|
|
|
|
|
(("linker_flags = \\[\\]")
|
|
|
|
|
(string-append "linker_flags = [\""
|
|
|
|
|
"-Wl,-rpath="
|
|
|
|
|
libdir ":"
|
|
|
|
|
libdir "/backends" ":"
|
|
|
|
|
libdir "/engines" ":"
|
|
|
|
|
libdir "/panners" ":"
|
|
|
|
|
libdir "/surfaces" ":"
|
|
|
|
|
libdir "/vamp" "\"]"))))
|
|
|
|
|
#t))
|
|
|
|
|
|
2015-10-29 23:34:09 +01:00
|
|
|
|
(define-public ardour
|
2015-02-10 10:26:17 +01:00
|
|
|
|
(package
|
|
|
|
|
(name "ardour")
|
2017-10-10 08:17:20 +02:00
|
|
|
|
(version "5.12")
|
2015-02-10 10:26:17 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
2017-07-23 00:50:29 +02:00
|
|
|
|
(url "https://git.ardour.org/ardour/ardour.git")
|
2015-02-10 10:26:17 +01:00
|
|
|
|
(commit version)))
|
|
|
|
|
(snippet
|
2016-02-25 09:09:23 +01:00
|
|
|
|
;; Ardour expects this file to exist at build time. The revision
|
|
|
|
|
;; is the output of
|
|
|
|
|
;; git describe HEAD | sed 's/^[A-Za-z]*+//'
|
2016-12-01 18:08:33 +01:00
|
|
|
|
`(call-with-output-file
|
2015-02-10 10:26:17 +01:00
|
|
|
|
"libs/ardour/revision.cc"
|
|
|
|
|
(lambda (port)
|
2016-12-01 18:08:33 +01:00
|
|
|
|
(format port ,(string-append "#include \"ardour/revision.h\"
|
gnu: All snippets report errors using exceptions, else return #t.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm,
gnu/packages/bioinformatics.scm, gnu/packages/cdrom.scm,
gnu/packages/chez.scm, gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/cross-base.scm, gnu/packages/crypto.scm, gnu/packages/cups.scm,
gnu/packages/databases.scm, gnu/packages/dns.scm, gnu/packages/emacs.scm,
gnu/packages/emulators.scm, gnu/packages/engineering.scm,
gnu/packages/enlightenment.scm, gnu/packages/fpga.scm,
gnu/packages/freedesktop.scm, gnu/packages/ftp.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/geo.scm, gnu/packages/ghostscript.scm,
gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm,
gnu/packages/gnuzilla.scm, gnu/packages/graphics.scm, gnu/packages/gtk.scm,
gnu/packages/guile.scm, gnu/packages/irc.scm, gnu/packages/java.scm,
gnu/packages/kerberos.scm, gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/lxde.scm, gnu/packages/machine-learning.scm,
gnu/packages/mail.scm, gnu/packages/maths.scm, gnu/packages/messaging.scm,
gnu/packages/monitoring.scm, gnu/packages/mp3.scm, gnu/packages/music.scm,
gnu/packages/netpbm.scm, gnu/packages/networking.scm, gnu/packages/node.scm,
gnu/packages/nvi.scm, gnu/packages/ocaml.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/php.scm, gnu/packages/plotutils.scm,
gnu/packages/pretty-print.scm, gnu/packages/profiling.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python-crypto.scm,
gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/robotics.scm,
gnu/packages/sawfish.scm, gnu/packages/scanner.scm, gnu/packages/scheme.scm,
gnu/packages/scribus.scm, gnu/packages/sdl.scm,
gnu/packages/serialization.scm, gnu/packages/shells.scm,
gnu/packages/slang.scm, gnu/packages/smalltalk.scm, gnu/packages/ssh.scm,
gnu/packages/sync.scm, gnu/packages/syncthing.scm, gnu/packages/tbb.scm,
gnu/packages/terminals.scm, gnu/packages/texinfo.scm,
gnu/packages/text-editors.scm, gnu/packages/textutils.scm,
gnu/packages/tls.scm, gnu/packages/unrtf.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wm.scm,
gnu/packages/wxwidgets.scm, gnu/packages/xdisorg.scm, gnu/packages/xorg.scm:
In all snippets, report errors using exceptions, or else return #t.
2018-03-16 12:47:34 +01:00
|
|
|
|
namespace ARDOUR { const char* revision = \"" version "\" ; }"))
|
|
|
|
|
#t)))
|
2015-02-10 10:26:17 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-10-10 08:17:20 +02:00
|
|
|
|
"0mla5lm51ryikc2rrk53max2m7a5ds6i1ai921l2h95wrha45nkr"))
|
2015-02-10 10:26:17 +01:00
|
|
|
|
(file-name (string-append name "-" version))))
|
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
2016-09-09 07:55:00 +02:00
|
|
|
|
`(#:configure-flags '("--cxx11" ; required by gtkmm
|
2017-03-05 11:34:38 +01:00
|
|
|
|
"--no-phone-home" ; don't contact ardour.org
|
2017-03-05 19:42:52 +01:00
|
|
|
|
"--freedesktop" ; install .desktop file
|
|
|
|
|
"--test") ; build unit tests
|
2015-10-25 10:40:14 +01:00
|
|
|
|
#:phases
|
2015-05-05 06:24:41 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after
|
|
|
|
|
'unpack 'set-rpath-in-LDFLAGS
|
2017-12-01 08:58:24 +01:00
|
|
|
|
,(ardour-rpath-phase (version-major version))))
|
2017-03-05 19:42:52 +01:00
|
|
|
|
#:test-target "test"
|
2015-02-10 10:26:17 +01:00
|
|
|
|
#:python ,python-2))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("aubio" ,aubio)
|
|
|
|
|
("lrdf" ,lrdf)
|
|
|
|
|
("boost" ,boost)
|
|
|
|
|
("atkmm" ,atkmm)
|
|
|
|
|
("cairomm" ,cairomm)
|
2017-01-07 18:58:21 +01:00
|
|
|
|
("eudev" ,eudev)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
("gtkmm" ,gtkmm-2)
|
|
|
|
|
("glibmm" ,glibmm)
|
|
|
|
|
("libart-lgpl" ,libart-lgpl)
|
|
|
|
|
("libgnomecanvasmm" ,libgnomecanvasmm)
|
|
|
|
|
("pangomm" ,pangomm)
|
|
|
|
|
("liblo" ,liblo)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("libxml2" ,libxml2)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("flac" ,flac)
|
|
|
|
|
("lv2" ,lv2)
|
|
|
|
|
("vamp" ,vamp)
|
|
|
|
|
("curl" ,curl)
|
2017-01-07 18:56:10 +01:00
|
|
|
|
("fftw" ,fftw)
|
|
|
|
|
("fftwf" ,fftwf)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("serd" ,serd)
|
|
|
|
|
("sord" ,sord)
|
|
|
|
|
("sratom" ,sratom)
|
|
|
|
|
("suil" ,suil)
|
|
|
|
|
("lilv" ,lilv)
|
2016-08-14 13:18:19 +02:00
|
|
|
|
("readline" ,readline)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
("redland" ,redland)
|
|
|
|
|
("rubberband" ,rubberband)
|
2016-10-09 18:52:24 +02:00
|
|
|
|
("libarchive" ,libarchive)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
("taglib" ,taglib)
|
|
|
|
|
("python-rdflib" ,python-rdflib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl" ,perl)
|
2016-08-14 13:18:19 +02:00
|
|
|
|
("cppunit" ,cppunit)
|
2017-03-05 11:34:38 +01:00
|
|
|
|
("itstool" ,itstool)
|
|
|
|
|
("gettext" ,gettext-minimal)
|
2015-02-10 10:26:17 +01:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://ardour.org")
|
|
|
|
|
(synopsis "Digital audio workstation")
|
|
|
|
|
(description
|
|
|
|
|
"Ardour is a multi-channel digital audio workstation, allowing users to
|
|
|
|
|
record, edit, mix and master audio and MIDI projects. It is targeted at audio
|
|
|
|
|
engineers, musicians, soundtrack editors and composers.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(define-public audacity
|
|
|
|
|
(package
|
|
|
|
|
(name "audacity")
|
2018-04-22 19:30:16 +02:00
|
|
|
|
(version "2.2.2")
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-10-04 22:16:36 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/audacity/audacity.git")
|
|
|
|
|
(commit (string-append "Audacity-" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(sha256
|
2018-04-22 19:30:16 +02:00
|
|
|
|
(base32
|
2018-10-04 22:16:36 +02:00
|
|
|
|
"10maxmjxbmjybj7n4m7a9bbm7g8xxw8f8vbsf7c9ih5j2gr15ihs"))
|
2017-11-18 14:49:29 +01:00
|
|
|
|
(patches (search-patches "audacity-build-with-system-portaudio.patch"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; Remove bundled libraries.
|
|
|
|
|
'(begin
|
|
|
|
|
(for-each
|
|
|
|
|
(lambda (dir)
|
|
|
|
|
(delete-file-recursively (string-append "lib-src/" dir)))
|
|
|
|
|
'("expat" "ffmpeg" "libflac" "libid3tag" "libmad" "libogg"
|
|
|
|
|
"libsndfile" "libsoxr" "libvamp" "libvorbis" "lv2"
|
|
|
|
|
"portaudio-v19" "portmidi" "soundtouch" "twolame"
|
|
|
|
|
;; FIXME: these libraries have not been packaged yet:
|
|
|
|
|
;; "libnyquist"
|
|
|
|
|
;; "libscorealign"
|
|
|
|
|
;; "libwidgetextra"
|
|
|
|
|
;; "portburn"
|
|
|
|
|
;; "portsmf"
|
|
|
|
|
;; "portmixer"
|
|
|
|
|
|
|
|
|
|
;; FIXME: we have this library, but it differs in that the Slide
|
|
|
|
|
;; class does not have a member "getInverseStretchedTime".
|
|
|
|
|
;; "sbsms"
|
|
|
|
|
))
|
|
|
|
|
#t))))
|
2018-09-30 18:59:01 +02:00
|
|
|
|
(build-system glib-or-gtk-build-system)
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(inputs
|
2017-11-18 14:49:29 +01:00
|
|
|
|
`(("wxwidgets" ,wxwidgets)
|
2018-08-30 01:47:12 +02:00
|
|
|
|
("gtk+" ,gtk+)
|
2017-04-04 22:08:15 +02:00
|
|
|
|
("alsa-lib" ,alsa-lib)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("expat" ,expat)
|
|
|
|
|
("ffmpeg" ,ffmpeg)
|
|
|
|
|
("lame" ,lame)
|
|
|
|
|
("flac" ,flac)
|
|
|
|
|
("libid3tag" ,libid3tag)
|
|
|
|
|
("libmad" ,libmad)
|
2017-11-18 14:49:29 +01:00
|
|
|
|
;;("libsbsms" ,libsbsms) ;bundled version is modified
|
2017-04-04 22:08:15 +02:00
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("soundtouch" ,soundtouch)
|
|
|
|
|
("soxr" ,soxr) ;replaces libsamplerate
|
|
|
|
|
("twolame" ,twolame)
|
|
|
|
|
("vamp" ,vamp)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("lv2" ,lv2)
|
2017-11-18 14:49:29 +01:00
|
|
|
|
("lilv" ,lilv) ;for lv2
|
|
|
|
|
("suil" ,suil) ;for lv2
|
|
|
|
|
("portaudio" ,portaudio)
|
|
|
|
|
("portmidi" ,portmidi)))
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("gettext" ,gettext-minimal) ;for msgfmt
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)
|
|
|
|
|
("python" ,python-2)
|
|
|
|
|
("which" ,which)))
|
|
|
|
|
(arguments
|
2017-11-19 21:06:53 +01:00
|
|
|
|
`(#:configure-flags
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(let ((libid3tag (assoc-ref %build-inputs "libid3tag"))
|
2017-11-18 14:49:29 +01:00
|
|
|
|
(libmad (assoc-ref %build-inputs "libmad"))
|
|
|
|
|
(portmidi (assoc-ref %build-inputs "portmidi")))
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(list
|
|
|
|
|
;; Loading FFmpeg dynamically is problematic.
|
|
|
|
|
"--disable-dynamic-loading"
|
2017-11-19 21:06:53 +01:00
|
|
|
|
;; SSE instructions are available on Intel systems only.
|
|
|
|
|
,@(if (any (cute string-prefix? <> (or (%current-target-system)
|
|
|
|
|
(%current-system)))
|
|
|
|
|
'("x64_64" "i686"))
|
|
|
|
|
'()
|
|
|
|
|
'("--enable-sse=no"))
|
2017-11-18 14:49:29 +01:00
|
|
|
|
;; portmidi, libid3tag and libmad provide no .pc files, so
|
|
|
|
|
;; pkg-config fails to find them. Force their inclusion.
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(string-append "ID3TAG_CFLAGS=-I" libid3tag "/include")
|
|
|
|
|
(string-append "ID3TAG_LIBS=-L" libid3tag "/lib -lid3tag -lz")
|
|
|
|
|
(string-append "LIBMAD_CFLAGS=-I" libmad "/include")
|
2017-11-18 14:49:29 +01:00
|
|
|
|
(string-append "LIBMAD_LIBS=-L" libmad "/lib -lmad")
|
|
|
|
|
(string-append "PORTMIDI_CFLAGS=-I" portmidi "/include")
|
|
|
|
|
(string-append "PORTMIDI_LIBS=-L" portmidi "/lib -lportmidi")
|
|
|
|
|
"EXPAT_USE_SYSTEM=yes"
|
|
|
|
|
"FFMPEG_USE_SYSTEM=yes"
|
|
|
|
|
"LAME_USE_SYSTEM=yes"
|
|
|
|
|
"LIBFLAC_USE_SYSTEM=yes"
|
|
|
|
|
"LIBID3TAG_USE_SYSTEM=yes"
|
|
|
|
|
"LIBMAD_USE_SYSTEM=yes"
|
|
|
|
|
"USE_LOCAL_LIBNYQUIST=" ;not packaged yet
|
|
|
|
|
;;"LIBSBSMS_USE_SYSTEM=yes" ;bundled version is patched
|
|
|
|
|
"LIBSNDFILE_USE_SYSTEM=yes"
|
|
|
|
|
"LIBSOUNDTOUCH_USE_SYSTEM=yes"
|
|
|
|
|
"LIBSOXR_USE_SYSTEM=yes"
|
|
|
|
|
"LIBTWOLAME_USE_SYSTEM=yes"
|
|
|
|
|
"LIBVAMP_USE_SYSTEM=yes"
|
|
|
|
|
"LIBVORBIS_USE_SYSTEM=yes"
|
|
|
|
|
"LV2_USE_SYSTEM=yes"
|
|
|
|
|
"PORTAUDIO_USE_SYSTEM=yes"))
|
2017-04-04 22:08:15 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2017-11-18 14:49:29 +01:00
|
|
|
|
(add-after 'unpack 'fix-sbsms-check
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(lambda _
|
2017-11-18 14:49:29 +01:00
|
|
|
|
;; This check is wrong: there is no 2.2.0 release; not even the
|
|
|
|
|
;; bundled sources match this release string.
|
|
|
|
|
(substitute* '("m4/audacity_checklib_libsbsms.m4"
|
|
|
|
|
"configure")
|
|
|
|
|
(("sbsms >= 2.2.0") "sbsms >= 2.0.0"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'use-upstream-headers
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* '("src/NoteTrack.cpp"
|
|
|
|
|
"src/AudioIO.cpp"
|
|
|
|
|
"src/AudioIO.h")
|
|
|
|
|
(("../lib-src/portmidi/pm_common/portmidi.h") "portmidi.h")
|
|
|
|
|
(("../lib-src/portmidi/porttime/porttime.h") "porttime.h"))
|
|
|
|
|
(substitute* "src/prefs/MidiIOPrefs.cpp"
|
|
|
|
|
(("../../lib-src/portmidi/pm_common/portmidi.h") "portmidi.h"))
|
|
|
|
|
#t)))
|
2017-04-04 22:08:15 +02:00
|
|
|
|
;; The test suite is not "well exercised" according to the developers,
|
|
|
|
|
;; and fails with various errors. See
|
|
|
|
|
;; <http://sourceforge.net/p/audacity/mailman/message/33524292/>.
|
|
|
|
|
#:tests? #f))
|
2018-10-04 22:32:14 +02:00
|
|
|
|
(home-page "https://www.audacityteam.org/")
|
2017-04-04 22:08:15 +02:00
|
|
|
|
(synopsis "Software for recording and editing sounds")
|
|
|
|
|
(description
|
|
|
|
|
"Audacity is a multi-track audio editor designed for recording, playing
|
|
|
|
|
and editing digital audio. It features digital effects and spectrum analysis
|
|
|
|
|
tools.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-02-15 20:53:26 +01:00
|
|
|
|
(define-public azr3
|
|
|
|
|
(package
|
|
|
|
|
(name "azr3")
|
|
|
|
|
(version "1.2.3")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://savannah/ll-plugins/azr3-jack-"
|
|
|
|
|
version
|
|
|
|
|
".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-09-26 10:47:58 +02:00
|
|
|
|
"18mdw6nc0vgj6k9rsy0x8w64wvzld0frqshrxxbxfj9qi9843vlc"))
|
|
|
|
|
(patches (search-patches "azr3.patch"))))
|
2015-02-15 20:53:26 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list "LV2PEG=ttl2c"
|
2016-09-26 10:47:58 +02:00
|
|
|
|
"CXXFLAGS=-std=gnu++11"
|
|
|
|
|
"CFLAGS=-std=gnu++11"
|
2015-02-15 20:53:26 +01:00
|
|
|
|
(string-append "prefix=" %output)
|
2018-10-03 23:04:32 +02:00
|
|
|
|
(string-append "pkgdatadir=" %output "/share/azr3-jack"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'install 'fix-timestamp
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((early-1980 315619200)) ; 1980-01-02 UTC
|
|
|
|
|
(utime "azr3.1" early-1980 early-1980))
|
|
|
|
|
#t)))))
|
2015-02-15 20:53:26 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("gtkmm" ,gtkmm-2)
|
|
|
|
|
("lvtk" ,lvtk)
|
|
|
|
|
("jack" ,jack-1)
|
2015-02-18 17:54:40 +01:00
|
|
|
|
("lash" ,lash)))
|
2015-02-15 20:53:26 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://ll-plugins.nongnu.org/azr3/")
|
|
|
|
|
(synopsis "Tonewheel organ synthesizer")
|
|
|
|
|
(description
|
|
|
|
|
"AZR-3 is a port of the free VST plugin AZR-3. It is a tonewheel organ
|
|
|
|
|
with drawbars, distortion and rotating speakers. The organ has three
|
|
|
|
|
sections, two polyphonic sections with nine drawbars each and one monophonic
|
|
|
|
|
bass section with five drawbars. A standalone JACK application and LV2
|
|
|
|
|
plugins are provided.")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2015-04-26 10:44:14 +02:00
|
|
|
|
(define-public calf
|
|
|
|
|
(package
|
|
|
|
|
(name "calf")
|
2018-08-14 14:42:29 +02:00
|
|
|
|
(version "0.90.1")
|
2015-04-26 10:44:14 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2018-08-14 14:42:29 +02:00
|
|
|
|
(uri (string-append "https://calf-studio-gear.org/files/calf-"
|
2015-11-14 09:44:32 +01:00
|
|
|
|
version ".tar.gz"))
|
2015-04-26 10:44:14 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-14 14:42:29 +02:00
|
|
|
|
"0znwx5gidr5n503gya9n8gagr8cfym6cwlbiv2r6iksji7jc4fpb"))))
|
2015-04-26 10:44:14 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("fluidsynth" ,fluidsynth)
|
|
|
|
|
("expat" ,expat)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("gtk" ,gtk+-2)
|
|
|
|
|
("cairo" ,cairo)
|
|
|
|
|
("lash" ,lash)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("lv2" ,lv2)
|
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("fftw" ,fftw)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "LV2_PATH")
|
|
|
|
|
(files '("lib/lv2")))))
|
|
|
|
|
(home-page "http://calf.sourceforge.net/")
|
|
|
|
|
(synopsis "Audio plug-in pack for LV2 and JACK environments")
|
|
|
|
|
(description
|
|
|
|
|
"Calf Studio Gear is an audio plug-in pack for LV2 and JACK environments.
|
|
|
|
|
The suite contains lots of effects (delay, modulation, signal processing,
|
|
|
|
|
filters, equalizers, dynamics, distortion and mastering effects),
|
|
|
|
|
instruments (SF2 player, organ simulator and a monophonic synthesizer) and
|
|
|
|
|
tools (analyzer, mono/stereo tools, crossovers).")
|
|
|
|
|
;; calfjackhost is released under GPLv2+
|
|
|
|
|
;; The plugins are released under LGPLv2.1+
|
|
|
|
|
(license (list license:lgpl2.1+ license:gpl2+))))
|
|
|
|
|
|
2016-11-22 17:23:55 +01:00
|
|
|
|
(define-public espeak
|
|
|
|
|
(package
|
|
|
|
|
(name "espeak")
|
|
|
|
|
(version "1.48.04")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/espeak/espeak/"
|
|
|
|
|
"espeak-" (version-major+minor version)
|
|
|
|
|
"/espeak-" version "-source.zip"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0n86gwh9pw0jqqpdz7mxggllfr8k0r7pc67ayy7w5z6z79kig6mz"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
;; remove prebuilt binaries
|
gnu: All snippets report errors using exceptions, else return #t.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm,
gnu/packages/bioinformatics.scm, gnu/packages/cdrom.scm,
gnu/packages/chez.scm, gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/cross-base.scm, gnu/packages/crypto.scm, gnu/packages/cups.scm,
gnu/packages/databases.scm, gnu/packages/dns.scm, gnu/packages/emacs.scm,
gnu/packages/emulators.scm, gnu/packages/engineering.scm,
gnu/packages/enlightenment.scm, gnu/packages/fpga.scm,
gnu/packages/freedesktop.scm, gnu/packages/ftp.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/geo.scm, gnu/packages/ghostscript.scm,
gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm,
gnu/packages/gnuzilla.scm, gnu/packages/graphics.scm, gnu/packages/gtk.scm,
gnu/packages/guile.scm, gnu/packages/irc.scm, gnu/packages/java.scm,
gnu/packages/kerberos.scm, gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/lxde.scm, gnu/packages/machine-learning.scm,
gnu/packages/mail.scm, gnu/packages/maths.scm, gnu/packages/messaging.scm,
gnu/packages/monitoring.scm, gnu/packages/mp3.scm, gnu/packages/music.scm,
gnu/packages/netpbm.scm, gnu/packages/networking.scm, gnu/packages/node.scm,
gnu/packages/nvi.scm, gnu/packages/ocaml.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/php.scm, gnu/packages/plotutils.scm,
gnu/packages/pretty-print.scm, gnu/packages/profiling.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python-crypto.scm,
gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/robotics.scm,
gnu/packages/sawfish.scm, gnu/packages/scanner.scm, gnu/packages/scheme.scm,
gnu/packages/scribus.scm, gnu/packages/sdl.scm,
gnu/packages/serialization.scm, gnu/packages/shells.scm,
gnu/packages/slang.scm, gnu/packages/smalltalk.scm, gnu/packages/ssh.scm,
gnu/packages/sync.scm, gnu/packages/syncthing.scm, gnu/packages/tbb.scm,
gnu/packages/terminals.scm, gnu/packages/texinfo.scm,
gnu/packages/text-editors.scm, gnu/packages/textutils.scm,
gnu/packages/tls.scm, gnu/packages/unrtf.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wm.scm,
gnu/packages/wxwidgets.scm, gnu/packages/xdisorg.scm, gnu/packages/xorg.scm:
In all snippets, report errors using exceptions, or else return #t.
2018-03-16 12:47:34 +01:00
|
|
|
|
'(begin
|
|
|
|
|
(delete-file-recursively "linux_32bit")
|
|
|
|
|
#t))))
|
2016-11-22 17:23:55 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
|
|
|
|
|
(string-append "DATADIR="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/share/espeak-data")
|
|
|
|
|
(string-append "LDFLAGS=-Wl,-rpath="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/lib")
|
|
|
|
|
"AUDIO=pulseaudio")
|
|
|
|
|
#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda _
|
|
|
|
|
(chdir "src")
|
|
|
|
|
;; We use version 19 of the PortAudio library, so we must copy the
|
|
|
|
|
;; corresponding file to be sure that espeak compiles correctly.
|
|
|
|
|
(copy-file "portaudio19.h" "portaudio.h")
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/bin/ln") "ln"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("portaudio" ,portaudio)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(native-inputs `(("unzip" ,unzip)))
|
|
|
|
|
(home-page "http://espeak.sourceforge.net/")
|
|
|
|
|
(synopsis "Software speech synthesizer")
|
|
|
|
|
(description "eSpeak is a software speech synthesizer for English and
|
|
|
|
|
other languages. eSpeak uses a \"formant synthesis\" method. This allows many
|
|
|
|
|
languages to be provided in a small size. The speech is clear, and can be used
|
|
|
|
|
at high speeds, but is not as natural or smooth as larger synthesizers which are
|
|
|
|
|
based on human speech recordings.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2016-10-10 09:01:22 +02:00
|
|
|
|
(define-public infamous-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "infamous-plugins")
|
2018-04-27 05:10:27 +02:00
|
|
|
|
(version "0.2.04")
|
2016-10-10 09:01:22 +02:00
|
|
|
|
(source (origin
|
2018-11-10 22:55:48 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/ssj71/infamousPlugins.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2016-10-10 09:01:22 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 22:55:48 +01:00
|
|
|
|
"0hmqk80w4qxq09iag7b7srf2g0wigkyhzq0ywxvhz2iz0hq9k0dh"))))
|
2016-10-10 09:01:22 +02:00
|
|
|
|
(build-system cmake-build-system)
|
2016-10-22 21:36:11 +02:00
|
|
|
|
(arguments
|
2018-04-27 05:10:27 +02:00
|
|
|
|
`(#:tests? #f ; there are no tests
|
2016-10-22 21:36:11 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'remove-compiler-flags
|
|
|
|
|
(lambda _
|
2018-05-01 18:01:20 +02:00
|
|
|
|
(substitute* (find-files "." "CMakeLists.txt")
|
2018-04-27 05:10:27 +02:00
|
|
|
|
(("-msse2 -mfpmath=sse") ""))
|
2016-10-22 21:36:11 +02:00
|
|
|
|
#t)))))
|
2016-10-10 09:01:22 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("cairo" ,cairo)
|
|
|
|
|
("fftwf" ,fftwf)
|
|
|
|
|
("lv2" ,lv2)
|
|
|
|
|
("ntk" ,ntk)
|
|
|
|
|
("zita-resampler" ,zita-resampler)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2018-04-27 05:08:41 +02:00
|
|
|
|
(home-page "https://ssj71.github.io/infamousPlugins")
|
2016-10-10 09:01:22 +02:00
|
|
|
|
(synopsis "LV2 plugins for live use")
|
|
|
|
|
(description
|
|
|
|
|
"The infamous plugins are a collection of LV2 audio plugins for live
|
|
|
|
|
performances. The plugins include a cellular automaton synthesizer, an
|
|
|
|
|
envelope follower, distortion effects, tape effects and more.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-12-10 15:13:36 +01:00
|
|
|
|
(define-public swh-plugins-lv2
|
|
|
|
|
(package
|
|
|
|
|
(name "swh-plugins-lv2")
|
|
|
|
|
(version "1.0.16")
|
|
|
|
|
(source (origin
|
2018-11-10 22:49:57 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/swh/lv2.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-12-10 15:13:36 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 22:49:57 +01:00
|
|
|
|
"0y7nnww864mm4k6ayy2lhcws3wlbhb2gkyjbrwk921fvc18qk9mz"))))
|
2015-12-10 15:13:36 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:make-flags (list "CC=gcc"
|
|
|
|
|
(string-append "PREFIX="
|
|
|
|
|
(assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-after 'unpack 'patch-makefile-and-enter-directory
|
|
|
|
|
;; The default install target doesn't install, but the
|
|
|
|
|
;; "install-system" target does.
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("install:") "install: install-system"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("lv2" ,lv2)
|
|
|
|
|
("fftwf" ,fftwf)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("libxslt" ,libxslt)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://plugin.org.uk")
|
|
|
|
|
(synopsis "SWH plugins in LV2 format")
|
|
|
|
|
(description
|
|
|
|
|
"Swh-plugins-lv2 is a collection of audio plugins in LV2 format. Plugin
|
|
|
|
|
classes include: dynamics (compressor, limiter), time (delay, chorus,
|
|
|
|
|
flanger), ringmodulator, distortion, filters, pitchshift, oscillators,
|
|
|
|
|
emulation (valve, tape), bit fiddling (decimator, pointer-cast), etc.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-03-31 22:28:08 +02:00
|
|
|
|
(define-public csound
|
|
|
|
|
(package
|
|
|
|
|
(name "csound")
|
2018-10-14 03:37:34 +02:00
|
|
|
|
(version "6.11.0")
|
2015-03-31 22:28:08 +02:00
|
|
|
|
(source (origin
|
2018-11-10 22:47:17 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/csound/csound.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-03-31 22:28:08 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 22:47:17 +01:00
|
|
|
|
"1hlkrnv3gghx4v382nl6v6k2k1dzm5ddk35m5g3q6pzc959726s7"))))
|
2015-03-31 22:28:08 +02:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("boost" ,boost)
|
|
|
|
|
("pulseaudio" ,pulseaudio)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("liblo" ,liblo)
|
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("jack" ,jack-1)
|
2016-09-25 09:33:02 +02:00
|
|
|
|
("gettext" ,gettext-minimal)))
|
2015-03-31 22:28:08 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("bison" ,bison)
|
|
|
|
|
("flex" ,flex)
|
|
|
|
|
("zlib" ,zlib)))
|
2018-10-14 03:37:34 +02:00
|
|
|
|
(home-page "https://csound.com/")
|
2015-03-31 22:28:08 +02:00
|
|
|
|
(synopsis "Sound and music computing system")
|
|
|
|
|
(description
|
|
|
|
|
"Csound is a user-programmable and user-extensible sound processing
|
|
|
|
|
language and software synthesizer.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
|
|
|
|
|
2015-03-01 13:35:06 +01:00
|
|
|
|
(define-public clalsadrv
|
|
|
|
|
(package
|
|
|
|
|
(name "clalsadrv")
|
|
|
|
|
(version "2.0.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/clalsadrv-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-03-04 11:52:07 +01:00
|
|
|
|
"0bsacx3l9065gk8g4137qmz2ij7s9x06aldvacinzlcslw7bd1kq"))))
|
2015-03-01 13:35:06 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-makefile-and-enter-directory
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "libs/Makefile"
|
|
|
|
|
(("/sbin/ldconfig") "true")
|
|
|
|
|
(("^LIBDIR =.*") "LIBDIR = lib\n"))
|
|
|
|
|
(chdir "libs")
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'install-symlink
|
|
|
|
|
(lambda _
|
|
|
|
|
(symlink "libclalsadrv.so"
|
|
|
|
|
(string-append (assoc-ref %outputs "out")
|
2017-09-24 19:26:34 +02:00
|
|
|
|
"/lib/libclalsadrv.so.2"))))
|
2015-03-01 13:35:06 +01:00
|
|
|
|
;; no configure script
|
2017-09-24 19:26:34 +02:00
|
|
|
|
(delete 'configure))))
|
2015-03-01 13:35:06 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("fftw" ,fftw)))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2015-03-01 13:35:06 +01:00
|
|
|
|
(synopsis "C++ wrapper around the ALSA API")
|
|
|
|
|
(description
|
|
|
|
|
"clalsadrv is a C++ wrapper around the ALSA API simplifying access to
|
|
|
|
|
ALSA PCM devices.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-10 09:16:07 +01:00
|
|
|
|
(define-public amb-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "amb-plugins")
|
|
|
|
|
(version "0.8.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/AMB-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0x4blm4visjqj0ndqr0cg776v3b7lvplpc8cgi9n51llhavn0jpl"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory-and-tool-paths
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr/lib/ladspa")
|
|
|
|
|
(string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
(("/usr/bin/install") (which "install"))
|
|
|
|
|
(("/bin/rm") "#"))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-10 09:16:07 +01:00
|
|
|
|
(synopsis "LADSPA ambisonics plugins")
|
|
|
|
|
(description
|
|
|
|
|
"The AMB plugins are a set of LADSPA ambisonics plugins, mainly to be
|
|
|
|
|
used within Ardour. Features include: mono and stereo to B-format panning,
|
|
|
|
|
horizontal rotator, square, hexagon and cube decoders.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-07 20:47:04 +01:00
|
|
|
|
(define-public mcp-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "mcp-plugins")
|
|
|
|
|
(version "0.4.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/MCP-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"06a9r1l85jmg7l1cvc3788mk8ra0xagjfy1rmhw3b80y4n0vlnvc"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-07 20:47:04 +01:00
|
|
|
|
(synopsis "Chorus, phaser, and vintage high-pass and low-pass filters")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides various LADSPA plugins. @code{cs_chorus} and
|
|
|
|
|
@code{cs_phaser} provide chorus and phaser effects, respectively;
|
|
|
|
|
@code{mvclpf24} provides four implementations of the low-pass filter used in
|
|
|
|
|
vintage Moog synthesizers; @code{mvchpf24} is based on the voltage-controlled
|
|
|
|
|
high-pass filter by Robert Moog. The filters attempt to accurately emulate
|
|
|
|
|
the non-linear circuit elements of their original analog counterparts.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-10 09:16:36 +01:00
|
|
|
|
(define-public rev-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "rev-plugins")
|
|
|
|
|
(version "0.7.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/REV-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1ikpinxm00pkfi259bnkzhsy3miagrjgdihaaf5x4v7zac29j3g7"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-10 09:16:36 +01:00
|
|
|
|
(synopsis "LADSPA reverb plugin")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides a stereo reverb LADSPA plugin based on the
|
|
|
|
|
well-known greverb.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-10 09:16:58 +01:00
|
|
|
|
(define-public fil-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "fil-plugins")
|
|
|
|
|
(version "0.3.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/FIL-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1scfv9j7jrp50r565haa4rvxn1vk2ss86xssl5qgcr8r45qz42qw"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-10 09:16:58 +01:00
|
|
|
|
(synopsis "LADSPA four-band parametric equalizer plugin")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides a LADSPA plugin for a four-band parametric
|
|
|
|
|
equalizer. Each section has an active/bypass switch, frequency, bandwidth and
|
|
|
|
|
gain controls. There is also a global bypass switch and gain control.
|
|
|
|
|
|
|
|
|
|
The 2nd order resonant filters are implemented using a Mitra-Regalia style
|
|
|
|
|
lattice filter, which is stable even while parameters are being changed.
|
|
|
|
|
|
|
|
|
|
All switches and controls are internally smoothed, so they can be used 'live'
|
|
|
|
|
without any clicks or zipper noises. This makes this plugin suitable for use
|
|
|
|
|
in systems that allow automation of plugin control ports, such as Ardour, or
|
|
|
|
|
for stage use.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-10 09:19:38 +01:00
|
|
|
|
(define-public ste-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "ste-plugins")
|
|
|
|
|
(version "0.0.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/STE-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0s3c9w5xihs87cnd1lh9xgj3maabjdyh6bl766qp5lhkg3ax8zy6"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-10 09:19:38 +01:00
|
|
|
|
(synopsis "LADSPA stereo width plugin")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides a LADSPA plugin to manipulate the stereo width of
|
|
|
|
|
audio signals.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-07 20:47:42 +01:00
|
|
|
|
(define-public vco-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "vco-plugins")
|
|
|
|
|
(version "0.3.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/VCO-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1xzqdg3b07r7zww05y9bb737l9dxvfkv28m3fyak1aazaci3rsgl"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out"))
|
|
|
|
|
(("/bin/cp") (which "cp")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-07 20:47:42 +01:00
|
|
|
|
(synopsis "LADSPA plugin for synthesizer oscillators")
|
|
|
|
|
(description
|
|
|
|
|
"The @code{blvco} LADSPA plugin provides three anti-aliased oscillators:
|
|
|
|
|
|
|
|
|
|
@enumerate
|
|
|
|
|
@item Pulse-VCO, a dirac pulse oscillator with flat amplitude spectrum
|
|
|
|
|
@item Saw-VCO, a sawtooth oscillator with 1/F amplitude spectrum
|
|
|
|
|
@item Rec-VCO, a square / rectange oscillator
|
|
|
|
|
@end enumerate\n
|
|
|
|
|
|
|
|
|
|
All oscillators are low-pass filtered to provide waveforms similar to the
|
|
|
|
|
output of analog synthesizers such as the Moog Voyager.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-10 09:20:41 +01:00
|
|
|
|
(define-public wah-plugins
|
|
|
|
|
(package
|
|
|
|
|
(name "wah-plugins")
|
|
|
|
|
(version "0.1.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/WAH-plugins-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1wkbjarxdhjixkh7d5abralj11dj2xxg644fz3ycd7qyfgfvjfgd"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-10 09:20:41 +01:00
|
|
|
|
(synopsis "LADSPA Autowah effect plugin")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides a LADSPA plugin for a Wah effect with envelope
|
|
|
|
|
follower.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-03-07 20:48:10 +01:00
|
|
|
|
(define-public g2reverb
|
|
|
|
|
(package
|
|
|
|
|
(name "g2reverb")
|
|
|
|
|
(version "0.7.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/g2reverb-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"18wb8vj1kky5glr76s34awbi8qzplsmf3wjbd7a12hfv4j0bkwrj"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure)
|
|
|
|
|
(add-before 'install 'prepare-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib/ladspa"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'unpack 'override-target-directory
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/usr") (assoc-ref outputs "out")))
|
|
|
|
|
#t)))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2016-03-07 20:48:10 +01:00
|
|
|
|
(synopsis "LADSPA stereo reverb plugin")
|
|
|
|
|
(description
|
|
|
|
|
"This package provides a LADSPA plugin for a stereo reverb effect.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-04-25 21:35:48 +02:00
|
|
|
|
(define-public fluidsynth
|
|
|
|
|
(package
|
|
|
|
|
(name "fluidsynth")
|
2018-10-21 17:47:35 +02:00
|
|
|
|
(version "2.0.1")
|
2015-04-25 21:35:48 +02:00
|
|
|
|
(source (origin
|
2017-10-15 10:43:38 +02:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/FluidSynth/fluidsynth.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
2015-04-25 21:35:48 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-10-21 17:47:35 +02:00
|
|
|
|
"1mqyym5qkh8xd1rqj3yhfxbw5dxjcrljb6nkfqzvcarlv4h6rjn7"))))
|
2017-10-15 10:43:38 +02:00
|
|
|
|
(build-system cmake-build-system)
|
2015-04-25 21:35:48 +02:00
|
|
|
|
(arguments
|
2018-02-26 22:44:24 +01:00
|
|
|
|
'(#:tests? #f ; no check target
|
2017-10-15 10:43:38 +02:00
|
|
|
|
#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
2017-10-15 10:43:38 +02:00
|
|
|
|
(add-after 'unpack 'fix-libdir
|
|
|
|
|
(lambda _
|
2018-02-26 22:44:24 +01:00
|
|
|
|
;; Install libraries to /lib, not /lib64.
|
2017-10-15 10:43:38 +02:00
|
|
|
|
(substitute* "CMakeLists.txt"
|
|
|
|
|
(("LIB_SUFFIX \\$\\{_init_lib_suffix\\}")
|
|
|
|
|
"LIB_SUFFIX \"\""))
|
|
|
|
|
#t)))))
|
2015-04-25 21:35:48 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("libsndfile" ,libsndfile)
|
|
|
|
|
("alsa-lib" ,alsa-lib)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("lash" ,lash)
|
|
|
|
|
("readline" ,readline)
|
|
|
|
|
("glib" ,glib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://www.fluidsynth.org/")
|
|
|
|
|
(synopsis "SoundFont synthesizer")
|
|
|
|
|
(description
|
|
|
|
|
"FluidSynth is a real-time software synthesizer based on the SoundFont 2
|
|
|
|
|
specifications. FluidSynth reads and handles MIDI events from the MIDI input
|
gnu packages: Clean up synopses and descriptions.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm, gnu/packages/bittorrent.scm,
gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/databases.scm, gnu/packages/enchant.scm,
gnu/packages/firmware.scm, gnu/packages/fonts.scm,
gnu/packages/freedesktop.scm, gnu/packages/games.scm, gnu/packages/gd.scm,
gnu/packages/gl.scm, gnu/packages/gnome.scm, gnu/packages/gsasl.scm,
gnu/packages/gstreamer.scm, gnu/packages/gtk.scm, gnu/packages/guile.scm,
gnu/packages/haskell.scm, gnu/packages/language.scm,
gnu/packages/lesstif.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/llvm.scm, gnu/packages/maths.scm,
gnu/packages/mcrypt.scm, gnu/packages/mit-krb5.scm, gnu/packages/mp3.scm,
gnu/packages/ncdu.scm, gnu/packages/networking.scm, gnu/packages/ntp.scm,
gnu/packages/ocaml.scm, gnu/packages/openbox.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/pretty-print.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python.scm,
gnu/packages/rdesktop.scm, gnu/packages/rdf.scm, gnu/packages/ruby.scm,
gnu/packages/slang.scm, gnu/packages/slim.scm, gnu/packages/telephony.scm,
gnu/packages/tls.scm, gnu/packages/tmux.scm, gnu/packages/tre.scm,
gnu/packages/unrtf.scm, gnu/packages/version-control.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wget.scm,
gnu/packages/xdisorg.scm, gnu/packages/xfce.scm, gnu/packages/xiph.scm:
Fix typos. Trim long lines. Add missing periods in the end of sentences.
Use double spaces between sentences. Remove trailing whitespaces.
2015-07-17 14:16:07 +02:00
|
|
|
|
device. It is the software analogue of a MIDI synthesizer. FluidSynth can
|
2015-04-25 21:35:48 +02:00
|
|
|
|
also play midifiles using a Soundfont.")
|
2017-10-15 10:43:38 +02:00
|
|
|
|
(license license:lgpl2.1+)))
|
2015-04-25 21:35:48 +02:00
|
|
|
|
|
2018-10-21 17:47:35 +02:00
|
|
|
|
;; gzdoom@3.3.0 and lmms@1.1.3 requires this version. Remove once no longer
|
|
|
|
|
;; needed.
|
|
|
|
|
(define-public fluidsynth-1
|
|
|
|
|
(package
|
|
|
|
|
(inherit fluidsynth)
|
|
|
|
|
(version "1.1.11")
|
|
|
|
|
(source (origin
|
|
|
|
|
(inherit (package-source fluidsynth))
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/FluidSynth/fluidsynth")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name "fluidsynth" version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0n75jq3xgq46hfmjkaaxz3gic77shs4fzajq40c8gk043i84xbdh"))))))
|
|
|
|
|
|
2015-03-05 15:46:14 +01:00
|
|
|
|
(define-public faad2
|
|
|
|
|
(package
|
|
|
|
|
(name "faad2")
|
|
|
|
|
(version "2.7")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/faac/faad2-src/faad2-"
|
|
|
|
|
version "/faad2-" version ".zip"))
|
2015-03-05 15:46:14 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"16f3l16c00sg0wkrkm3vzv0gy3g97x309vw788igs0cap2x1ak3z"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("unzip" ,unzip)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
2018-03-11 21:46:30 +01:00
|
|
|
|
(replace 'bootstrap
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "bootstrap" (("\r\n") "\n"))
|
2018-03-23 07:02:49 +01:00
|
|
|
|
(invoke "sh" "bootstrap"))))))
|
2015-03-05 15:46:14 +01:00
|
|
|
|
(home-page "http://www.audiocoding.com/faad2.html")
|
|
|
|
|
(synopsis "MPEG-4 and MPEG-2 AAC decoder")
|
|
|
|
|
(description
|
|
|
|
|
"FAAD2 is an MPEG-4 and MPEG-2 AAC decoder supporting LC, Main, LTP, SBR,
|
|
|
|
|
PS, and DAB+.")
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2015-06-14 15:00:37 +02:00
|
|
|
|
(define-public faust
|
|
|
|
|
(package
|
|
|
|
|
(name "faust")
|
2017-12-03 17:21:43 +01:00
|
|
|
|
(version "0.9.90")
|
2015-06-14 15:00:37 +02:00
|
|
|
|
(source (origin
|
2017-12-03 17:21:43 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/grame-cncm/faust.git")
|
|
|
|
|
(commit (string-append "v"
|
|
|
|
|
(string-map (lambda (c)
|
|
|
|
|
(if (char=? c #\.) #\- c))
|
|
|
|
|
version)))))
|
|
|
|
|
(file-name (string-append "faust-" version "-checkout"))
|
2015-06-14 15:00:37 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-12-03 17:21:43 +01:00
|
|
|
|
"0qc6iwjd3i80jdyjc186c6ywipmjzl8wlsp4050pbr56q4rlkd4z"))))
|
2015-06-14 15:00:37 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list (string-append "prefix=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:tests? #f
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2015-06-23 18:52:55 +02:00
|
|
|
|
;; no "configure" script
|
2017-12-03 17:21:43 +01:00
|
|
|
|
(delete 'configure)
|
|
|
|
|
;; Files appear under $out/share/faust that are read-only. The
|
|
|
|
|
;; install phase tries to overwrite them and fails, so we change
|
|
|
|
|
;; the permissions first.
|
|
|
|
|
(add-before 'install 'fix-permissions
|
|
|
|
|
(lambda _
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(chmod file #o644))
|
|
|
|
|
(find-files "architecture/max-msp" ".*"))
|
|
|
|
|
#t)))))
|
2015-06-14 15:00:37 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("unzip" ,unzip)))
|
|
|
|
|
(home-page "http://faust.grame.fr/")
|
|
|
|
|
(synopsis "Signal processing language")
|
|
|
|
|
(description
|
|
|
|
|
"Faust is a programming language for realtime audio signal processing.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-06-12 11:14:02 +02:00
|
|
|
|
(define-public faust-2
|
|
|
|
|
(package
|
|
|
|
|
(inherit faust)
|
2018-11-11 16:18:24 +01:00
|
|
|
|
(version "2.5.23")
|
2016-06-12 11:14:02 +02:00
|
|
|
|
(source (origin
|
2018-11-11 16:18:24 +01:00
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "https://github.com/grame-cncm/faust/"
|
|
|
|
|
"releases/download/" version
|
|
|
|
|
"/faust-" version ".tar.gz"))
|
2016-06-12 11:14:02 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-11 16:18:24 +01:00
|
|
|
|
"1yz5jnr76hh7rmxkpdi7gyrw1wp4gyqfpq8zyl97qdi5ga5gjznq"))))
|
2016-06-12 11:14:02 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
(substitute-keyword-arguments (package-arguments faust)
|
|
|
|
|
((#:make-flags flags)
|
|
|
|
|
`(list (string-append "prefix=" (assoc-ref %outputs "out"))
|
2017-12-03 17:22:41 +01:00
|
|
|
|
"world"))))
|
2016-06-12 11:14:02 +02:00
|
|
|
|
(native-inputs
|
2018-11-11 16:18:24 +01:00
|
|
|
|
`(("llvm" ,llvm-3.8-with-rtti)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
("which" ,which)
|
2017-09-22 12:14:58 +02:00
|
|
|
|
("xxd" ,xxd)
|
2016-06-12 11:14:02 +02:00
|
|
|
|
("ctags" ,emacs-minimal) ; for ctags
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libsndfile" ,libsndfile)
|
|
|
|
|
("libmicrohttpd" ,libmicrohttpd)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("openssl" ,openssl)
|
|
|
|
|
("zlib" ,zlib)))))
|
|
|
|
|
|
2015-02-19 16:56:39 +01:00
|
|
|
|
(define-public freepats
|
|
|
|
|
(package
|
|
|
|
|
(name "freepats")
|
|
|
|
|
(version "20060219")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://freepats.zenvoid.org/freepats-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"12iw36rd94zirll96cd5k0va7p5hxmf2shvjlhzihcmjaw8flq82"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder (begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let ((out (string-append %output "/share/freepats")))
|
|
|
|
|
(setenv "PATH" (string-append
|
|
|
|
|
(assoc-ref %build-inputs "bzip2") "/bin:"
|
|
|
|
|
(assoc-ref %build-inputs "tar") "/bin"))
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(invoke "tar" "xvf" (assoc-ref %build-inputs "source"))
|
2015-02-19 16:56:39 +01:00
|
|
|
|
(chdir "freepats")
|
|
|
|
|
;; Use absolute pattern references
|
|
|
|
|
(substitute* "freepats.cfg"
|
|
|
|
|
(("Tone_000") (string-append out "/Tone_000"))
|
|
|
|
|
(("Drum_000") (string-append out "/Drum_000")))
|
|
|
|
|
(mkdir-p out)
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(copy-recursively "." out)
|
|
|
|
|
#t))))
|
2015-02-19 16:56:39 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("tar" ,tar)
|
|
|
|
|
("bzip2" ,bzip2)))
|
|
|
|
|
(home-page "http://freepats.zenvoid.org")
|
|
|
|
|
(synopsis "GUS compatible patches for MIDI players")
|
|
|
|
|
(description
|
|
|
|
|
"FreePats is a project to create a free and open set of GUS compatible
|
|
|
|
|
patches that can be used with softsynths such as Timidity and WildMidi.")
|
|
|
|
|
;; GPLv2+ with exception for compositions using these patches.
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-06-23 18:52:26 +02:00
|
|
|
|
(define-public guitarix
|
|
|
|
|
(package
|
|
|
|
|
(name "guitarix")
|
2018-09-10 23:57:41 +02:00
|
|
|
|
(version "0.37.3")
|
2015-06-23 18:52:26 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-07-21 08:35:30 +02:00
|
|
|
|
"mirror://sourceforge/guitarix/guitarix/guitarix2-"
|
2016-05-01 18:10:38 +02:00
|
|
|
|
version ".tar.xz"))
|
2015-06-23 18:52:26 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-09-10 23:57:41 +02:00
|
|
|
|
"1wfm8wrwrnqpb4ihy75n7l9i6vml536jlq9pdx2pblbc4ba3paac"))))
|
2015-06-23 18:52:26 +02:00
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:python ,python-2
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list
|
|
|
|
|
;; Add the output lib directory to the RUNPATH.
|
2015-10-31 13:17:23 +01:00
|
|
|
|
(string-append "--ldflags=-Wl,-rpath=" %output "/lib")
|
|
|
|
|
"--cxxflags=-std=c++11")))
|
2015-06-23 18:52:26 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("libsndfile" ,libsndfile)
|
|
|
|
|
("boost" ,boost)
|
2018-09-10 23:57:41 +02:00
|
|
|
|
("curl" ,curl)
|
2015-06-23 18:52:26 +02:00
|
|
|
|
("avahi" ,avahi)
|
|
|
|
|
("eigen" ,eigen)
|
|
|
|
|
("lv2" ,lv2)
|
|
|
|
|
("lilv" ,lilv)
|
|
|
|
|
("ladspa" ,ladspa)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("gtkmm" ,gtkmm-2)
|
|
|
|
|
("gtk+" ,gtk+-2)
|
|
|
|
|
("fftwf" ,fftwf)
|
|
|
|
|
("lrdf" ,lrdf)
|
|
|
|
|
("zita-resampler" ,zita-resampler)
|
|
|
|
|
("zita-convolver" ,zita-convolver)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("gperf" ,gperf)
|
2015-08-16 07:50:47 +02:00
|
|
|
|
("faust" ,faust)
|
2015-06-23 18:52:26 +02:00
|
|
|
|
("intltool" ,intltool)
|
2016-09-25 09:33:02 +02:00
|
|
|
|
("gettext" ,gettext-minimal)
|
2015-06-23 18:52:26 +02:00
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "LV2_PATH")
|
|
|
|
|
(files '("lib/lv2")))))
|
|
|
|
|
(home-page "http://guitarix.org/")
|
|
|
|
|
(synopsis "Virtual guitar amplifier")
|
|
|
|
|
(description "Guitarix is a virtual guitar amplifier running JACK.
|
|
|
|
|
Guitarix takes the signal from your guitar as a mono-signal from your sound
|
|
|
|
|
card. The input is processed by a main amp and a rack-section. Both can be
|
|
|
|
|
routed separately and deliver a processed stereo-signal via JACK. You may
|
|
|
|
|
fill the rack with effects from more than 25 built-in modules including stuff
|
|
|
|
|
from a simple noise gate to modulation effects like flanger, phaser or
|
|
|
|
|
auto-wah.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-10-15 09:21:25 +02:00
|
|
|
|
(define-public guitarix-lv2
|
|
|
|
|
(package (inherit guitarix)
|
|
|
|
|
(name "guitarix-lv2")
|
|
|
|
|
(arguments
|
|
|
|
|
(substitute-keyword-arguments (package-arguments guitarix)
|
|
|
|
|
((#:configure-flags flags)
|
2018-09-10 23:56:11 +02:00
|
|
|
|
`(cons "--no-standalone" ,flags))))))
|
2016-10-15 09:21:25 +02:00
|
|
|
|
|
2015-11-22 16:45:18 +01:00
|
|
|
|
(define-public rakarrack
|
|
|
|
|
(package
|
|
|
|
|
(name "rakarrack")
|
|
|
|
|
(version "0.6.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/rakarrack/rakarrack/"
|
|
|
|
|
"rakarrack-" version "/rakarrack-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1rpf63pdn54c4yg13k7cb1w1c7zsvl97c4qxcpz41c8l91xd55kn"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
(substitute* '("src/process.C"
|
|
|
|
|
"src/global.h")
|
|
|
|
|
(("#include <Fl/") "#include <FL/"))
|
|
|
|
|
#t))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-utils" ,alsa-utils)
|
|
|
|
|
("fltk" ,fltk)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxext" ,libxext)
|
|
|
|
|
("libxfixes" ,libxfixes)
|
|
|
|
|
("libxft" ,libxft)
|
|
|
|
|
("libxrender" ,libxrender)
|
|
|
|
|
("libxpm" ,libxpm)
|
|
|
|
|
("fontconfig" ,fontconfig)
|
|
|
|
|
("freetype" ,freetype)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("alsa-lib" ,alsa-lib)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("zlib" ,zlib)))
|
|
|
|
|
(home-page "http://rakarrack.sourceforge.net/")
|
|
|
|
|
(synopsis "Audio effects processor")
|
|
|
|
|
(description
|
|
|
|
|
"Rakarrack is a richly featured multi-effects processor emulating a
|
|
|
|
|
guitar effects pedalboard. Effects include compressor, expander, noise gate,
|
|
|
|
|
equalizers, exciter, flangers, chorus, various delay and reverb effects,
|
|
|
|
|
distortion modules and many more. Most of the effects engine is built from
|
|
|
|
|
modules found in the excellent software synthesizer ZynAddSubFX. Presets and
|
|
|
|
|
user interface are optimized for guitar, but Rakarrack processes signals in
|
|
|
|
|
stereo while it does not apply internal band-limiting filtering, and thus is
|
|
|
|
|
well suited to all musical instruments and vocals.")
|
|
|
|
|
;; The code is explicitly licensed under the GPL version 2 only.
|
|
|
|
|
(license license:gpl2)))
|
|
|
|
|
|
2015-04-25 20:46:13 +02:00
|
|
|
|
(define-public ir
|
|
|
|
|
(package
|
|
|
|
|
(name "ir")
|
|
|
|
|
(version "1.3.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-11-24 06:33:46 +01:00
|
|
|
|
;; The original home-page is gone. Download the tarball from an
|
|
|
|
|
;; archive mirror instead.
|
|
|
|
|
(uri (list (string-append
|
|
|
|
|
"https://web.archive.org/web/20150803095032/"
|
|
|
|
|
"http://factorial.hu/system/files/ir.lv2-"
|
|
|
|
|
version ".tar.gz")
|
|
|
|
|
(string-append
|
|
|
|
|
"https://mirrors.kernel.org/gentoo/distfiles/ir.lv2-"
|
|
|
|
|
version ".tar.gz")))
|
2015-04-25 20:46:13 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1jh2z01l9m4ar7yz0n911df07dygc7n4cl59p7qdjbh0nvkm747g"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2016-11-24 06:29:31 +01:00
|
|
|
|
`(#:tests? #f ; no tests
|
2015-04-25 20:46:13 +02:00
|
|
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
2016-11-24 06:29:31 +01:00
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(delete 'configure)))) ; no configure script
|
2015-04-25 20:46:13 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("libsndfile" ,libsndfile)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("lv2" ,lv2)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("gtk+" ,gtk+-2)
|
|
|
|
|
("zita-convolver" ,zita-convolver)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "LV2_PATH")
|
|
|
|
|
(files '("lib/lv2")))))
|
2016-11-24 06:33:46 +01:00
|
|
|
|
;; Link to an archived copy of the home-page since the original is gone.
|
|
|
|
|
(home-page (string-append "https://web.archive.org/web/20150803095032/"
|
|
|
|
|
"http://factorial.hu/plugins/lv2/ir"))
|
2015-04-25 20:46:13 +02:00
|
|
|
|
(synopsis "LV2 convolution reverb")
|
|
|
|
|
(description
|
|
|
|
|
"IR is a low-latency, real-time, high performance signal convolver
|
|
|
|
|
especially for creating reverb effects. It supports impulse responses with 1,
|
|
|
|
|
2 or 4 channels, in any soundfile format supported by libsndfile.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-01-26 09:59:56 +01:00
|
|
|
|
(define-public jack-1
|
|
|
|
|
(package
|
|
|
|
|
(name "jack")
|
2017-04-10 14:50:18 +02:00
|
|
|
|
(version "0.125.0")
|
2015-01-26 09:59:56 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://jackaudio.org/downloads/jack-audio-connection-kit-"
|
|
|
|
|
version
|
|
|
|
|
".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-04-10 14:50:18 +02:00
|
|
|
|
"0i6l25dmfk2ji2lrakqq9icnwjxklgcjzzk65dmsff91z2zva5rm"))))
|
2015-01-26 09:59:56 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2018-07-15 15:00:11 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases (modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-configure
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "configure"
|
|
|
|
|
;; Install to <out/lib> regardless of platform.
|
|
|
|
|
(("libnn=lib64") "libnn=lib"))
|
|
|
|
|
#t)))))
|
2015-01-26 09:59:56 +01:00
|
|
|
|
(inputs
|
2015-02-13 23:14:58 +01:00
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
2015-02-18 17:54:04 +01:00
|
|
|
|
("readline" ,readline)))
|
|
|
|
|
;; uuid.h is included in the JACK type headers
|
2015-07-18 22:07:45 +02:00
|
|
|
|
;; db.h is included in the libjack metadata headers
|
2015-02-18 17:54:04 +01:00
|
|
|
|
(propagated-inputs
|
2015-07-18 22:07:45 +02:00
|
|
|
|
`(("libuuid" ,util-linux)
|
|
|
|
|
("bdb" ,bdb)))
|
2015-02-13 23:14:58 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2015-01-26 09:59:56 +01:00
|
|
|
|
(home-page "http://jackaudio.org/")
|
|
|
|
|
(synopsis "JACK audio connection kit")
|
|
|
|
|
(description
|
|
|
|
|
"JACK is a low-latency audio server. It can connect a number of
|
|
|
|
|
different applications to an audio device, as well as allowing them to share
|
|
|
|
|
audio between themselves. JACK is different from other audio server efforts
|
|
|
|
|
in that it has been designed from the ground up to be suitable for
|
|
|
|
|
professional audio work. This means that it focuses on two key areas:
|
|
|
|
|
synchronous execution of all clients, and low latency operation.")
|
|
|
|
|
;; Most files are licensed under the GPL. However, the libjack/ tree is
|
|
|
|
|
;; licensed under the LGPL in order to allow for proprietary usage.
|
2015-01-30 01:19:08 +01:00
|
|
|
|
(license (list license:gpl2+ license:lgpl2.1+))))
|
2015-01-29 10:00:56 +01:00
|
|
|
|
|
2015-07-18 22:09:13 +02:00
|
|
|
|
;; Packages depending on JACK should always prefer jack-1. Both jack-1 and
|
|
|
|
|
;; jack-2 implement the same API. JACK2 is provided primarily as a client
|
|
|
|
|
;; program for users who might benefit from the D-BUS features.
|
2015-01-29 10:00:56 +01:00
|
|
|
|
(define-public jack-2
|
|
|
|
|
(package (inherit jack-1)
|
2015-02-13 23:16:46 +01:00
|
|
|
|
(name "jack2")
|
2017-12-25 07:28:15 +01:00
|
|
|
|
(version "1.9.12")
|
2015-01-29 10:00:56 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-12-03 17:53:52 +01:00
|
|
|
|
(uri (string-append "https://github.com/jackaudio/jack2/releases/"
|
|
|
|
|
"download/v" version "/jack2-"
|
|
|
|
|
version ".tar.gz"))
|
gnu: Add 'file-name' fields for github source tarballs without a name.
* gnu/packages/aarddict.scm (aarddict), gnu/packages/algebra.scm (arb),
gnu/packages/audio.scm (jack-2, lvtk),
gnu/packages/bioinformatics.scm (bedops, bedtools, bowtie),
gnu/packages/game-development.scm (tiled),
gnu/packages/games.scm (minetest-data, minetest, retroarch),
gnu/packages/jrnl.scm (jrnl), gnu/packages/kde.scm (qjson),
gnu/packages/libevent.scm (libuv), gnu/packages/linux.scm (pflask),
gnu/packages/mail.scm (offlineimap, libetpan),
gnu/packages/maths.scm (arpack-ng), gnu/packages/ninja.scm (ninja),
gnu/packages/nutrition.scm (gourmet),
gnu/packages/python.scm (python-cairocffi), gnu/packages/rdf.scm (lrdf),
gnu/packages/ruby.scm (ruby-i18n), gnu/packages/sxiv.scm (sxiv): Add
'file-name' field to origin.
2015-02-27 18:23:27 +01:00
|
|
|
|
(file-name (string-append name "-" version ".tar.gz"))
|
2015-01-29 10:00:56 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-12-25 07:28:15 +01:00
|
|
|
|
"0crf4y9a5j9miw8r5ji4l3w5w0y2frrf7xyfsfdgacnw6vwy5vyy"))))
|
2015-01-29 10:00:56 +01:00
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
2015-11-19 16:07:56 +01:00
|
|
|
|
`(#:python ,python-2
|
|
|
|
|
#:tests? #f ; no check target
|
2015-01-29 10:00:56 +01:00
|
|
|
|
#:configure-flags '("--dbus"
|
2015-04-29 18:03:10 +02:00
|
|
|
|
"--alsa")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'configure 'set-linkflags
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Add $libdir to the RUNPATH of all the binaries.
|
|
|
|
|
(substitute* "wscript"
|
|
|
|
|
((".*CFLAGS.*-Wall.*" m)
|
|
|
|
|
(string-append m
|
|
|
|
|
" conf.env.append_unique('LINKFLAGS',"
|
2015-11-19 16:07:56 +01:00
|
|
|
|
"'-Wl,-rpath=" %output "/lib')\n")))))
|
|
|
|
|
(add-after 'install 'wrap-python-scripts
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
|
|
|
;; Make sure 'jack_control' runs with the correct PYTHONPATH.
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
|
|
|
(path (getenv "PYTHONPATH")))
|
|
|
|
|
(wrap-program (string-append out "/bin/jack_control")
|
|
|
|
|
`("PYTHONPATH" ":" prefix (,path))))
|
|
|
|
|
#t)))))
|
2015-01-29 10:00:56 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("dbus" ,dbus)
|
|
|
|
|
("expat" ,expat)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("opus" ,opus)
|
2015-11-19 16:07:56 +01:00
|
|
|
|
("python2-dbus" ,python2-dbus)
|
2015-01-29 10:00:56 +01:00
|
|
|
|
("readline" ,readline)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
;; Most files are under GPLv2+, but some headers are under LGPLv2.1+
|
|
|
|
|
(license (list license:gpl2+ license:lgpl2.1+))))
|
2015-01-31 09:22:04 +01:00
|
|
|
|
|
2015-02-20 22:05:37 +01:00
|
|
|
|
(define-public jalv
|
|
|
|
|
(package
|
|
|
|
|
(name "jalv")
|
2017-04-10 18:45:40 +02:00
|
|
|
|
(version "1.6.0")
|
2015-02-20 22:05:37 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(uri (string-append "https://download.drobilla.net/jalv-"
|
2015-02-20 22:05:37 +01:00
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-04-10 18:45:40 +02:00
|
|
|
|
"1x2wpzzx2cgvz3dgdcgsj8dr0w3zsasy62mvl199bsdj5fbjaili"))))
|
2015-02-20 22:05:37 +01:00
|
|
|
|
(build-system waf-build-system)
|
2015-10-27 13:01:35 +01:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'configure 'set-flags
|
|
|
|
|
(lambda _
|
|
|
|
|
;; Compile with C++11, required by gtkmm.
|
|
|
|
|
(setenv "CXXFLAGS" "-std=c++11")
|
|
|
|
|
#t)))))
|
2015-02-20 22:05:37 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("lv2" ,lv2)
|
|
|
|
|
("lilv" ,lilv)
|
|
|
|
|
("suil" ,suil)
|
2017-04-10 18:45:40 +02:00
|
|
|
|
("gtk" ,gtk+)
|
|
|
|
|
("gtkmm" ,gtkmm)
|
2015-02-20 22:05:37 +01:00
|
|
|
|
("jack" ,jack-1)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(home-page "https://drobilla.net/software/jalv/")
|
2015-02-20 22:05:37 +01:00
|
|
|
|
(synopsis "Simple LV2 host for JACK")
|
|
|
|
|
(description
|
|
|
|
|
"Jalv is a simple but fully featured LV2 host for JACK. It runs LV2
|
|
|
|
|
plugins and exposes their ports as JACK ports, essentially making any LV2
|
|
|
|
|
plugin function as a JACK application.")
|
|
|
|
|
(license license:isc)))
|
|
|
|
|
|
2015-02-05 22:40:45 +01:00
|
|
|
|
(define-public ladspa
|
|
|
|
|
(package
|
|
|
|
|
(name "ladspa")
|
|
|
|
|
(version "1.13")
|
2015-11-11 18:19:44 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
;; Since the official link is dead,
|
|
|
|
|
;; we download the tarball from Debian or Internet Archive.
|
|
|
|
|
(uri (list (string-append "http://http.debian.net"
|
|
|
|
|
"/debian/pool/main/l/ladspa-sdk/ladspa-sdk_"
|
|
|
|
|
version ".orig.tar.gz")
|
|
|
|
|
(string-append "https://web.archive.org/web/20140717172251/"
|
|
|
|
|
"http://www.ladspa.org/download/ladspa_sdk_"
|
|
|
|
|
version ".tgz")))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0srh5n2l63354bc0srcrv58rzjkn4gv8qjqzg8dnq3rs4m7kzvdm"))))
|
2015-02-05 22:40:45 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; the "test" target is a listening test only
|
|
|
|
|
#:phases
|
|
|
|
|
(alist-replace
|
|
|
|
|
'configure
|
|
|
|
|
(lambda* (#:key inputs outputs #:allow-other-keys #:rest args)
|
|
|
|
|
(chdir "src")
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(substitute* "makefile"
|
|
|
|
|
(("/usr/lib/ladspa/") (string-append out "/lib/ladspa/"))
|
|
|
|
|
(("/usr/include/") (string-append out "/include/"))
|
|
|
|
|
(("/usr/bin/") (string-append out "/bin/"))
|
|
|
|
|
(("-mkdirhier") "mkdir -p")
|
|
|
|
|
(("^CC.*") "CC = gcc\n")
|
|
|
|
|
(("^CPP.*") "CPP = g++\n"))))
|
|
|
|
|
(alist-delete 'build %standard-phases))))
|
2015-11-11 18:19:44 +01:00
|
|
|
|
;; Since the home page is gone, we provide a link to the archived version.
|
|
|
|
|
(home-page
|
|
|
|
|
"https://web.archive.org/web/20140729190945/http://www.ladspa.org/")
|
2015-02-05 22:40:45 +01:00
|
|
|
|
(synopsis "Linux Audio Developer's Simple Plugin API (LADSPA)")
|
|
|
|
|
(description
|
|
|
|
|
"LADSPA is a standard that allows software audio processors and effects
|
|
|
|
|
to be plugged into a wide range of audio synthesis and recording packages.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
|
|
|
|
|
2015-02-13 23:20:00 +01:00
|
|
|
|
(define-public lash
|
|
|
|
|
(package
|
|
|
|
|
(name "lash")
|
|
|
|
|
(version "0.6.0-rc2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
;; The tilde is not permitted in the builder name, but is used
|
|
|
|
|
;; in the tarball.
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"mirror://savannah/lash/lash-"
|
|
|
|
|
(string-join (string-split version #\-) "~")
|
|
|
|
|
".tar.bz2"))
|
|
|
|
|
(file-name (string-append name "-" version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"12z1vx3krrzsfccpah9xjs68900xvr7bw92wx8np5871i2yv47iw"))))
|
|
|
|
|
(build-system gnu-build-system)
|
2017-11-12 10:55:56 +01:00
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; lashd embeds an ancient version of sigsegv so we just skip it
|
|
|
|
|
(add-after 'unpack 'skip-lashd
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* '("Makefile.am" "Makefile.in")
|
|
|
|
|
(("lashd ") ""))
|
2017-11-12 10:56:57 +01:00
|
|
|
|
#t)))
|
|
|
|
|
#:configure-flags '("--disable-static")))
|
2015-02-13 23:20:00 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("bdb" ,bdb)
|
|
|
|
|
("gtk" ,gtk+-2)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("readline" ,readline)
|
|
|
|
|
("python" ,python-2)))
|
|
|
|
|
;; According to pkg-config, packages depending on lash also need to have
|
|
|
|
|
;; at least the following packages declared as inputs.
|
|
|
|
|
(propagated-inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("dbus" ,dbus)
|
|
|
|
|
("libxml2" ,libxml2)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for supported nongnu.org home pages.
* gnu/packages/acl.scm (acl)[home-page]: Use HTTPS.
* gnu/packages/admin.scm (dmidecode)[home-page]: Likewise.
* gnu/packages/attr.scm (attr)[home-page]: Likewise.
* gnu/packages/audio.scm (lash)[home-page]: Likewise.
* gnu/packages/avr.scm (avr-libc)[home-page]: Likewise.
* gnu/packages/backup.scm (rdiff-backup, libchop)[home-page]: Likewise.
* gnu/packages/compression.scm (fastjar, lzip, lziprecover, atool)
(lunzip, clzip, lzlib, plzip)[home-page]: Likewise.
* gnu/packages/emacs.scm (geiser, bbdb, m17n-lib, m17n-lib)[home-page]:
Likewise.
* gnu/packages/flashing-tools.scm (avrdude)[home-page]: Likewise.
* gnu/packages/fontutils.scm (libotf)[home-page]: Likewise.
* gnu/packages/game-development.scm (gzochi)[home-page]: Likewise.
* gnu/packages/games.scm (enigma)[home-page]: Likewise.
* gnu/packages/gsasl.scm (libntlm)[home-page]: Likewise.
* gnu/packages/gtk.scm (guile-cairo)[home-page]: Likewise.
* gnu/packages/guile.scm (guile-reader, guile-lib, guile-json)
(guile-redis, g-wrap)[home-page]: Likewise.
* gnu/packages/libunwind.scm (libunwind)[home-page]: Likewise.
* gnu/packages/lout.scm (lout)[home-page]: Likewise.
* gnu/packages/mpd.scm (sonata)[home-page]: Likewise.
* gnu/packages/networking.scm (quagga)[home-page]: Likewise.
* gnu/packages/ratpoison.scm (ratpoison)[home-page]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[home-page]: Likewise.
* gnu/packages/telephony.scm (exosip)[home-page]: Likewise.
* gnu/packages/texinfo.scm (texi2html)[home-page]: Likewise.
* gnu/packages/xdisorg.scm (xbindkeys)[home-page]: Likewise.
2018-02-16 04:20:44 +01:00
|
|
|
|
(home-page "https://www.nongnu.org/lash/")
|
2015-02-13 23:20:00 +01:00
|
|
|
|
(synopsis "Audio application session manager")
|
|
|
|
|
(description
|
|
|
|
|
"LASH is a session management system for audio applications. It allows
|
|
|
|
|
you to save and restore audio sessions consisting of multiple interconneced
|
|
|
|
|
applications, restoring program state (i.e. loaded patches) and the
|
|
|
|
|
connections between them.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-03-05 15:45:35 +01:00
|
|
|
|
(define-public libbs2b
|
|
|
|
|
(package
|
|
|
|
|
(name "libbs2b")
|
|
|
|
|
(version "3.1.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/bs2b/libbs2b/" version
|
|
|
|
|
"/libbs2b-" version ".tar.lzma"))
|
2015-03-05 15:45:35 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1mcc4gjkmphczjybnsrip3gq1f974knzys7x49bv197xk3fn8wdr"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs `(("libsndfile" ,libsndfile)))
|
gnu: Use HTTPS for all sourceforge.net home pages.
* gnu/packages/admin.scm (mingetty, clusterssh)[home-page]: Use HTTPS.
* gnu/packages/audio.scm (libbs2b, soxr)[home-page]: Likewise.
* gnu/packages/bioinformatics.scm (bless)[home-page]: Likewise.
* gnu/packages/display-managers.scm (slim)[home-page]: Likewise.
* gnu/packages/games.scm (extremetuxracer)[home-page]: Likewise.
* gnu/packages/ghostscript.scm (gs-fonts)[home-page]: Likewise.
* gnu/packages/haskell.scm (ghc-regex-base, ghc-regex-posix,
ghc-regex-compat)[home-page]: Likewise.
* gnu/packages/image.scm (imlib2)[home-page]: Likewise.
* gnu/packages/libreoffice.scm (librevenge, libcmis, libodfgen, libmwaw)
[home-page]: Likewise.
* gnu/packages/linux.scm (hdparm, acpid, libavc1394, rng-tools)
[home-page]: Likewise.
* gnu/packages/mail.scm (esmtp)[home-page]: Likewise.
* gnu/packages/mp3.scm (ripperx)[home-page]: Likewise.
* gnu/packages/onc-rpc.scm (libtirpc)[home-page]: Likewise.
* gnu/packages/perl.scm (perl-czplib)[home-page]: Likewise.
* gnu/packages/python.scm (python-pyasn1-modules)[home-page]: Likewise.
* gnu/packages/xdisorg.scm (xosd)[home-page]: Likewise.
2017-01-04 01:30:46 +01:00
|
|
|
|
(home-page "https://sourceforge.net/projects/bs2b/")
|
2015-03-05 15:45:35 +01:00
|
|
|
|
(synopsis "Bauer stereophonic-to-binaural DSP")
|
|
|
|
|
(description
|
|
|
|
|
"The Bauer stereophonic-to-binaural DSP (bs2b) library and plugins is
|
|
|
|
|
designed to improve headphone listening of stereo audio records. Recommended
|
|
|
|
|
for headphone prolonged listening to disable superstereo fatigue without
|
|
|
|
|
essential distortions.")
|
|
|
|
|
(license license:expat)))
|
|
|
|
|
|
2015-01-31 09:22:04 +01:00
|
|
|
|
(define-public liblo
|
|
|
|
|
(package
|
|
|
|
|
(name "liblo")
|
2018-03-01 06:50:39 +01:00
|
|
|
|
(version "0.29")
|
2015-01-31 09:22:04 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/liblo/liblo/" version
|
|
|
|
|
"/liblo-" version ".tar.gz"))
|
2015-01-31 09:22:04 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-01 06:50:39 +01:00
|
|
|
|
"0sn0ckc1d0845mhsaa62wf7f9v0c0ykiq796a30ja5096kib9qdc"))))
|
2015-01-31 09:22:04 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(;; liblo test FAILED
|
|
|
|
|
;; liblo server error 19 in setsockopt(IP_ADD_MEMBERSHIP): No such device
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(home-page "http://liblo.sourceforge.net")
|
|
|
|
|
(synopsis "Implementation of the Open Sound Control protocol")
|
|
|
|
|
(description
|
|
|
|
|
"liblo is a lightweight library that provides an easy to use
|
2018-03-03 23:17:04 +01:00
|
|
|
|
implementation of the Open Sound Control (@dfn{OSC}) protocol.")
|
2015-01-31 09:22:04 +01:00
|
|
|
|
(license license:lgpl2.1+)))
|
2015-02-05 22:40:06 +01:00
|
|
|
|
|
2018-01-31 14:06:43 +01:00
|
|
|
|
(define-public python-pyaudio
|
|
|
|
|
(package
|
|
|
|
|
(name "python-pyaudio")
|
|
|
|
|
(version "0.2.11")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append
|
|
|
|
|
"https://pypi.python.org/packages/ab/42/"
|
|
|
|
|
"b4f04721c5c5bfc196ce156b3c768998ef8c0ae3654ed29ea5020c749a6b"
|
|
|
|
|
"/PyAudio-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0x7vdsigm7xgvyg3shd3lj113m8zqj2pxmrgdyj66kmnw0qdxgwk"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("portaudio" ,portaudio)))
|
|
|
|
|
(home-page "https://people.csail.mit.edu/hubert/pyaudio/")
|
|
|
|
|
(synopsis "Bindings for PortAudio v19")
|
|
|
|
|
(description "This package provides bindings for PortAudio v19, the
|
|
|
|
|
cross-platform audio input/output stream library.")
|
|
|
|
|
(license license:expat)))
|
|
|
|
|
|
|
|
|
|
(define-public python2-pyaudio
|
|
|
|
|
(package-with-python2 python-pyaudio))
|
|
|
|
|
|
2016-02-25 09:45:05 +01:00
|
|
|
|
(define-public python-pyliblo
|
|
|
|
|
(package
|
|
|
|
|
(name "python-pyliblo")
|
|
|
|
|
(version "0.10.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://das.nasophon.de/download/pyliblo-"
|
|
|
|
|
version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"13vry6xhxm7adnbyj28w1kpwrh0kf7nw83cz1yq74wl21faz2rzw"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(arguments `(#:tests? #f)) ;no tests
|
2016-10-13 14:33:55 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("python-cython" ,python-cython)))
|
2016-02-25 09:45:05 +01:00
|
|
|
|
(inputs
|
2016-10-13 14:33:55 +02:00
|
|
|
|
`(("liblo" ,liblo)))
|
2016-02-25 09:45:05 +01:00
|
|
|
|
(home-page "http://das.nasophon.de/pyliblo/")
|
|
|
|
|
(synopsis "Python bindings for liblo")
|
|
|
|
|
(description
|
|
|
|
|
"Pyliblo is a Python wrapper for the liblo Open Sound Control (OSC)
|
|
|
|
|
library. It supports almost the complete functionality of liblo, allowing you
|
|
|
|
|
to send and receive OSC messages using a nice and simple Python API. Also
|
|
|
|
|
included are the command line utilities @code{send_osc} and @code{dump_osc}.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
|
|
|
|
|
|
|
|
|
(define-public python2-pyliblo
|
|
|
|
|
(package-with-python2 python-pyliblo))
|
|
|
|
|
|
2015-02-05 22:40:30 +01:00
|
|
|
|
(define-public lilv
|
|
|
|
|
(package
|
|
|
|
|
(name "lilv")
|
2018-08-16 16:05:20 +02:00
|
|
|
|
(version "0.24.4")
|
2015-02-05 22:40:30 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(uri (string-append "https://download.drobilla.net/lilv-"
|
2017-04-10 18:43:07 +02:00
|
|
|
|
version ".tar.bz2"))
|
2015-02-05 22:40:30 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-16 16:05:20 +02:00
|
|
|
|
"0f24cd7wkk5l969857g2ydz2kjjrkvvddg1g87xzzs78lsvq8fy3"))))
|
2015-02-05 22:40:30 +01:00
|
|
|
|
(build-system waf-build-system)
|
2015-04-30 16:33:06 +02:00
|
|
|
|
(arguments
|
2018-08-14 17:55:45 +02:00
|
|
|
|
`(#:tests? #f ; no check target
|
2015-04-30 16:33:06 +02:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'configure 'set-ldflags
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(setenv "LDFLAGS"
|
|
|
|
|
(string-append "-Wl,-rpath="
|
2018-04-12 09:38:04 +02:00
|
|
|
|
(assoc-ref outputs "out") "/lib"))
|
|
|
|
|
#t)))))
|
2018-08-14 17:55:45 +02:00
|
|
|
|
;; Required by lilv-0.pc.
|
2015-02-20 21:56:51 +01:00
|
|
|
|
(propagated-inputs
|
2018-08-29 21:41:18 +02:00
|
|
|
|
`(("lv2" ,lv2)
|
|
|
|
|
("serd" ,serd)
|
2015-02-05 22:40:30 +01:00
|
|
|
|
("sord" ,sord)
|
|
|
|
|
("sratom" ,sratom)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(home-page "https://drobilla.net/software/lilv/")
|
2015-02-05 22:40:30 +01:00
|
|
|
|
(synopsis "Library to simplify use of LV2 plugins in applications")
|
|
|
|
|
(description
|
|
|
|
|
"Lilv is a C library to make the use of LV2 plugins as simple as possible
|
|
|
|
|
for applications. Lilv is the successor to SLV2, rewritten to be
|
|
|
|
|
significantly faster and have minimal dependencies.")
|
|
|
|
|
(license license:isc)))
|
|
|
|
|
|
2015-02-05 22:40:06 +01:00
|
|
|
|
(define-public lv2
|
|
|
|
|
(package
|
|
|
|
|
(name "lv2")
|
2016-11-27 23:33:33 +01:00
|
|
|
|
(version "1.14.0")
|
2015-02-05 22:40:06 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://lv2plug.in/spec/lv2-"
|
2016-11-27 23:33:33 +01:00
|
|
|
|
version ".tar.bz2"))
|
2015-02-05 22:40:06 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-11-27 23:33:33 +01:00
|
|
|
|
"0chxwys3vnn3nxc9x2vchm74s9sx0vfra6y893byy12ci61jc1dq"))))
|
2015-02-05 22:40:06 +01:00
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
2015-06-14 10:04:50 +02:00
|
|
|
|
#:configure-flags '("--no-plugins")))
|
2015-02-05 22:40:06 +01:00
|
|
|
|
(inputs
|
|
|
|
|
;; Leaving off cairo and gtk+-2.0 which are needed for example plugins
|
|
|
|
|
`(("libsndfile" ,libsndfile)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://lv2plug.in/")
|
|
|
|
|
(synopsis "LV2 audio plugin specification")
|
|
|
|
|
(description
|
|
|
|
|
"LV2 is an open specification for audio plugins and host applications.
|
|
|
|
|
At its core, LV2 is a simple stable interface, accompanied by extensions which
|
|
|
|
|
add functionality to support the needs of increasingly powerful audio
|
|
|
|
|
software.")
|
|
|
|
|
(license license:isc)))
|
2015-02-10 10:21:30 +01:00
|
|
|
|
|
2017-10-22 11:57:56 +02:00
|
|
|
|
(define-public lv2-devel
|
|
|
|
|
(let ((commit "39c7c726cd52b2863fcea356cafe1bcab2ba7f37")
|
|
|
|
|
(revision "1"))
|
|
|
|
|
(package (inherit lv2)
|
|
|
|
|
(name "lv2-devel")
|
|
|
|
|
(version (string-append "1.15.3-" revision "." (string-take commit 7)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "http://lv2plug.in/git/lv2.git")
|
|
|
|
|
(commit commit)))
|
2018-03-04 08:54:51 +01:00
|
|
|
|
(file-name (git-file-name name version))
|
2017-10-22 11:57:56 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1gp2rd99dfmpibvpixrqn115mrhybzf3if3h8bssf6siyi13f29r")))))))
|
|
|
|
|
|
2015-02-11 23:30:50 +01:00
|
|
|
|
(define-public lv2-mda-piano
|
|
|
|
|
(package
|
|
|
|
|
(name "lv2-mda-piano")
|
|
|
|
|
(version "0.0.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
2015-03-20 22:45:35 +01:00
|
|
|
|
(url "http://git.elephly.net/software/lv2-mdametapiano.git")
|
2015-02-11 23:30:50 +01:00
|
|
|
|
(commit version)))
|
2018-03-04 08:53:55 +01:00
|
|
|
|
(file-name (git-file-name name version))
|
2015-02-11 23:30:50 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"07lywf6lpfpndg3i9w752mmlg2hgn1bwp23h8b0mdj6awh67abqd"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list
|
|
|
|
|
"TYPE=mdaPiano"
|
|
|
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:tests? #f ; no check target
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
#:phases (modify-phases %standard-phases (delete 'configure))))
|
2015-02-11 23:30:50 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("lv2" ,lv2)
|
|
|
|
|
("lvtk" ,lvtk)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(native-search-paths
|
|
|
|
|
(list (search-path-specification
|
|
|
|
|
(variable "LV2_PATH")
|
|
|
|
|
(files '("lib/lv2")))))
|
|
|
|
|
(home-page "http://elephly.net/lv2/mdapiano.html")
|
|
|
|
|
(synopsis "LV2 port of the mda Piano plugin")
|
|
|
|
|
(description "An LV2 port of the mda Piano VSTi.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-02-11 23:31:37 +01:00
|
|
|
|
(define-public lv2-mda-epiano
|
|
|
|
|
(package (inherit lv2-mda-piano)
|
|
|
|
|
(name "lv2-mda-epiano")
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags (list
|
|
|
|
|
"TYPE=mdaEPiano"
|
|
|
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:tests? #f ; no check target
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
#:phases (modify-phases %standard-phases (delete 'configure))))
|
2015-02-11 23:31:37 +01:00
|
|
|
|
(home-page "http://elephly.net/lv2/mdaepiano.html")
|
|
|
|
|
(synopsis "LV2 port of the mda EPiano plugin")
|
|
|
|
|
(description "An LV2 port of the mda EPiano VSTi.")))
|
|
|
|
|
|
2015-02-11 21:11:53 +01:00
|
|
|
|
(define-public lvtk
|
|
|
|
|
(package
|
|
|
|
|
(name "lvtk")
|
|
|
|
|
(version "1.2.0")
|
|
|
|
|
(source (origin
|
2018-11-10 22:44:57 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/lvtk/lvtk.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-02-11 21:11:53 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 22:44:57 +01:00
|
|
|
|
"1b01zvzl70ana6l1kn8fgyr7msnn3c7x61cgw7fdpp50322352p8"))))
|
2015-02-11 21:11:53 +01:00
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:python ,python-2
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(list (string-append "--boost-includes="
|
|
|
|
|
(assoc-ref %build-inputs "boost")
|
2016-01-05 23:09:27 +01:00
|
|
|
|
"/include"))
|
|
|
|
|
#:phases (modify-phases %standard-phases
|
|
|
|
|
(add-before
|
|
|
|
|
'configure 'set-flags
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
;; See e.g. https://github.com/lvtk/lvtk/issues/21
|
|
|
|
|
(setenv "LDFLAGS"
|
|
|
|
|
(string-append
|
|
|
|
|
"-L" (assoc-ref inputs "boost") "/lib "
|
2016-12-03 20:37:52 +01:00
|
|
|
|
"-lboost_system"))
|
|
|
|
|
;; Needed for gtkmm
|
|
|
|
|
(substitute* '("src/wscript_build"
|
|
|
|
|
"examples/wscript_build")
|
|
|
|
|
(("cxxflags.*= \\[" line)
|
|
|
|
|
(string-append line "\"-std=c++11\", ")))
|
|
|
|
|
#t)))))
|
2015-02-11 21:11:53 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("boost" ,boost)
|
2016-12-03 20:37:52 +01:00
|
|
|
|
("gtkmm" ,gtkmm-2)
|
2015-02-11 21:11:53 +01:00
|
|
|
|
("lv2" ,lv2)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://github.com/lvtk/lvtk")
|
|
|
|
|
(synopsis "C++ libraries for LV2 plugins")
|
|
|
|
|
(description
|
|
|
|
|
"The LV2 Toolkit (LVTK) contains libraries that wrap the LV2 C API and
|
|
|
|
|
extensions into easy to use C++ classes. It is the successor of
|
|
|
|
|
lv2-c++-tools.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-03-05 19:51:02 +01:00
|
|
|
|
(define-public openal
|
|
|
|
|
(package
|
|
|
|
|
(name "openal")
|
2018-10-20 17:23:45 +02:00
|
|
|
|
(version "1.19.1")
|
2015-03-05 19:51:02 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2018-10-10 14:30:39 +02:00
|
|
|
|
"http://openal-soft.org/openal-releases/openal-soft-"
|
2015-03-05 19:51:02 +01:00
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-10-20 17:23:45 +02:00
|
|
|
|
"1sdjhkz2gd6lbnwphi1b6aw3br4wv2lik5vnqh6mxfc8a7zqfbsw"))))
|
2015-03-05 19:51:02 +01:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
2015-09-20 13:03:38 +02:00
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after
|
|
|
|
|
'unpack 'use-full-library-paths
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
(substitute* "Alc/backends/pulseaudio.c"
|
|
|
|
|
(("#define PALIB \"libpulse\\.so\\.0\"")
|
|
|
|
|
(string-append "#define PALIB \""
|
|
|
|
|
(assoc-ref inputs "pulseaudio")
|
|
|
|
|
"/lib/libpulse.so.0"
|
|
|
|
|
"\"")))
|
|
|
|
|
(substitute* "Alc/backends/alsa.c"
|
|
|
|
|
(("LoadLib\\(\"libasound\\.so\\.2\"\\)")
|
|
|
|
|
(string-append "LoadLib(\""
|
|
|
|
|
(assoc-ref inputs "alsa-lib")
|
|
|
|
|
"/lib/libasound.so.2"
|
|
|
|
|
"\")")))
|
|
|
|
|
#t)))))
|
2015-03-05 19:51:02 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(synopsis "3D audio API")
|
|
|
|
|
(description
|
|
|
|
|
"OpenAL provides capabilities for playing audio in a virtual 3D
|
|
|
|
|
environment. Distance attenuation, doppler shift, and directional sound
|
|
|
|
|
emitters are among the features handled by the API. More advanced effects,
|
|
|
|
|
including air absorption, occlusion, and environmental reverb, are available
|
|
|
|
|
through the EFX extension. It also facilitates streaming audio, multi-channel
|
|
|
|
|
buffers, and audio capture.")
|
2018-10-10 14:30:39 +02:00
|
|
|
|
(home-page "http://openal-soft.org/")
|
2015-03-05 19:51:02 +01:00
|
|
|
|
(license license:lgpl2.0+)))
|
|
|
|
|
|
2016-08-21 04:17:27 +02:00
|
|
|
|
(define-public freealut
|
|
|
|
|
(package
|
|
|
|
|
(name "freealut")
|
|
|
|
|
(version "1.1.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
;; Upstream url is unclear, many systems use Fedora, there is also
|
|
|
|
|
;; https://github.com/vancegroup/freealut though the status of it
|
|
|
|
|
;; (official? unofficial?) is not clear.
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://pkgs.fedoraproject.org/repo/pkgs/" name "/" name "-"
|
|
|
|
|
version ".tar.gz" "/e089b28a0267faabdb6c079ee173664a/" name
|
|
|
|
|
"-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0kzlil6112x2429nw6mycmif8y6bxr2cwjcvp18vh6s7g63ymlb0"))))
|
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f)) ; no check target
|
|
|
|
|
(inputs
|
|
|
|
|
`(("openal" ,openal)))
|
|
|
|
|
(synopsis "Free implementation of OpenAL's ALUT standard")
|
|
|
|
|
(description "freealut is the OpenAL Utility Toolkit.")
|
|
|
|
|
(home-page "http://kcat.strangesoft.net/openal.html")
|
|
|
|
|
(license license:lgpl2.0)))
|
|
|
|
|
|
2015-02-15 21:43:01 +01:00
|
|
|
|
(define-public patchage
|
|
|
|
|
(package
|
|
|
|
|
(name "patchage")
|
|
|
|
|
(version "1.0.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(uri (string-append "https://download.drobilla.net/patchage-"
|
2015-02-15 21:43:01 +01:00
|
|
|
|
version
|
|
|
|
|
".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1agdpwwi42176l4mxj0c4fsvdiv1ig56bfnnx0msckxmy57df8bb"))))
|
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments `(#:tests? #f)) ; no check target
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("boost" ,boost)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("ganv" ,ganv)
|
|
|
|
|
("glibmm" ,glibmm)
|
|
|
|
|
("gtkmm" ,gtkmm-2)
|
|
|
|
|
("dbus-glib" ,dbus-glib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(home-page "https://drobilla.net/software/patchage/")
|
2015-02-15 21:43:01 +01:00
|
|
|
|
(synopsis "Modular patch bay for audio and MIDI systems")
|
|
|
|
|
(description
|
|
|
|
|
"Patchage is a modular patch bay for audio and MIDI systems based on JACK
|
|
|
|
|
and ALSA.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2017-04-03 19:58:49 +02:00
|
|
|
|
(define-public qjackctl
|
|
|
|
|
(package
|
|
|
|
|
(name "qjackctl")
|
2018-09-25 08:18:03 +02:00
|
|
|
|
(version "0.5.4")
|
2017-04-03 19:58:49 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2017-05-05 09:20:38 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/qjackctl/qjackctl/"
|
|
|
|
|
version "/qjackctl-" version ".tar.gz"))
|
2017-04-03 19:58:49 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-09-25 08:18:03 +02:00
|
|
|
|
"0qr71nb93gkz5q53nfcl5g168z173wc6s8w1yjs3rfn3m4hg0bcq"))))
|
2017-04-03 19:58:49 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2018-08-21 04:18:34 +02:00
|
|
|
|
'(#:tests? #f)) ; no check target
|
2017-04-03 19:58:49 +02:00
|
|
|
|
(inputs
|
2017-05-05 09:21:14 +02:00
|
|
|
|
`(("jack" ,jack-1)
|
2018-01-05 23:28:04 +01:00
|
|
|
|
("alsa-lib" ,alsa-lib)
|
2017-04-09 04:30:43 +02:00
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qtx11extras" ,qtx11extras)))
|
2017-04-03 19:58:49 +02:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)
|
|
|
|
|
("qttools" ,qttools)))
|
|
|
|
|
(home-page "https://qjackctl.sourceforge.io/")
|
|
|
|
|
(synopsis "Jack server control application")
|
|
|
|
|
(description "Control a Jack server. Allows you to plug various sources
|
|
|
|
|
into various outputs and to start, stop and configure jackd")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2017-12-16 23:42:54 +01:00
|
|
|
|
(define-public qjackrcd
|
|
|
|
|
(package
|
|
|
|
|
(name "qjackrcd")
|
2018-01-05 20:36:34 +01:00
|
|
|
|
(version "1.2.2")
|
2017-12-16 23:42:54 +01:00
|
|
|
|
(source (origin
|
2018-01-05 20:36:34 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/orouits/qjackrcd.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
2018-03-04 08:55:46 +01:00
|
|
|
|
(file-name (git-file-name name version))
|
2017-12-16 23:42:54 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-01-05 20:36:34 +01:00
|
|
|
|
"1l5iq2mkqd4gn9yr8xbh9qlpp1clcflazychl4vhdbz0bzq4c6al"))))
|
2017-12-16 23:42:54 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
2018-05-18 05:05:55 +02:00
|
|
|
|
(invoke "qmake"
|
|
|
|
|
(string-append "PREFIX="
|
|
|
|
|
(assoc-ref outputs "out"))))))))
|
2017-12-16 23:42:54 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("qtbase" ,qtbase))) ; for qmake
|
|
|
|
|
(inputs
|
|
|
|
|
`(("jack" ,jack-1)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("qtbase" ,qtbase)))
|
|
|
|
|
(home-page "https://sourceforge.net/projects/qjackrcd/")
|
|
|
|
|
(synopsis "Stereo audio recorder for JACK")
|
|
|
|
|
(description "QJackRcd is a simple graphical stereo recorder for JACK
|
|
|
|
|
supporting silence processing for automatic pause, file splitting, and
|
|
|
|
|
background file post-processing.")
|
|
|
|
|
(license license:gpl2+)))
|
2017-04-03 19:58:49 +02:00
|
|
|
|
|
2018-03-05 05:03:26 +01:00
|
|
|
|
(define-public supercollider
|
|
|
|
|
(package
|
|
|
|
|
(name "supercollider")
|
2018-03-27 03:06:17 +02:00
|
|
|
|
(version "3.9.2")
|
2018-03-05 05:03:26 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://github.com/supercollider/supercollider"
|
|
|
|
|
"/releases/download/Version-" version
|
|
|
|
|
"/SuperCollider-" version "-Source-linux.tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-03-27 03:06:17 +02:00
|
|
|
|
"0d3cb6dw8jz7ijriqn3rlwin24gffczp69hl17pzxj1d5w57yj44"))))
|
2018-03-05 05:03:26 +01:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags '("-DSYSTEM_BOOST=on" "-DSYSTEM_YAMLCPP=on"
|
2018-05-28 15:02:28 +02:00
|
|
|
|
"-DSC_QT=off"
|
2018-03-05 05:03:26 +01:00
|
|
|
|
"-DSC_EL=off") ;scel is packaged individually as
|
|
|
|
|
;emacs-scel.
|
|
|
|
|
#:modules ((guix build utils)
|
|
|
|
|
(guix build cmake-build-system)
|
|
|
|
|
(ice-9 ftw))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'rm-bundled-libs
|
|
|
|
|
(lambda _
|
|
|
|
|
;; The build system doesn't allow us to unbundle the following
|
|
|
|
|
;; libraries. hidapi is also heavily patched and upstream not
|
|
|
|
|
;; actively maintained.
|
|
|
|
|
(let ((keep-dirs '("nova-simd" "nova-tt" "hidapi" "TLSF-2.4.6"
|
|
|
|
|
"oscpack_1_1_0" "." "..")))
|
|
|
|
|
(with-directory-excursion "./external_libraries"
|
|
|
|
|
(for-each
|
|
|
|
|
delete-file-recursively
|
|
|
|
|
(scandir "."
|
|
|
|
|
(lambda (x)
|
|
|
|
|
(and (eq? (stat:type (stat x)) 'directory)
|
|
|
|
|
(not (member (basename x) keep-dirs))))))))
|
|
|
|
|
#t))
|
|
|
|
|
;; Some tests are broken (see:
|
|
|
|
|
;; https://github.com/supercollider/supercollider/issues/3555 and
|
|
|
|
|
;; https://github.com/supercollider/supercollider/issues/1736
|
|
|
|
|
(add-after 'rm-bundled-libs 'disable-broken-tests
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "testsuite/supernova/CMakeLists.txt"
|
|
|
|
|
(("server_test.cpp")
|
|
|
|
|
"")
|
|
|
|
|
(("perf_counter_test.cpp")
|
|
|
|
|
""))
|
|
|
|
|
(delete-file "testsuite/supernova/server_test.cpp")
|
|
|
|
|
(delete-file "testsuite/supernova/perf_counter_test.cpp")
|
|
|
|
|
(substitute* "testsuite/CMakeLists.txt"
|
|
|
|
|
(("add_subdirectory\\(sclang\\)")
|
|
|
|
|
""))
|
|
|
|
|
(delete-file "testsuite/sclang/CMakeLists.txt")
|
|
|
|
|
#t))
|
|
|
|
|
;; TODO: Remove after version 3.9.2 is released
|
|
|
|
|
;; (see: https://github.com/supercollider/supercollider/pull/3558).
|
|
|
|
|
(add-after 'disable-broken-tests 'apply-system-yaml-cpp-fix
|
|
|
|
|
(lambda _
|
|
|
|
|
;; cmake: correctly include yaml-cpp (commit f82cec5ae).
|
|
|
|
|
(substitute* "editors/sc-ide/CMakeLists.txt"
|
|
|
|
|
(("external_libraries/boost\\)$")
|
|
|
|
|
"external_libraries/boost)
|
|
|
|
|
include_directories(${YAMLCPP_INCLUDE_DIR})")
|
|
|
|
|
((" yaml")
|
|
|
|
|
" ${YAMLCPP_LIBRARY}"))
|
|
|
|
|
;; set YAMLCPP_LIBRARY and YAMLCPP_INCLUDE_DIR if not using
|
|
|
|
|
;; system (commit 031922987).
|
|
|
|
|
(substitute* "external_libraries/CMakeLists.txt"
|
|
|
|
|
(("set_property\\( TARGET yaml PROPERTY FOLDER 3rdparty \\)")
|
|
|
|
|
"set_property( TARGET yaml PROPERTY FOLDER 3rdparty )
|
|
|
|
|
set(YAMLCPP_LIBRARY yaml)
|
|
|
|
|
set(YAMLCPP_INCLUDE_DIR ${CMAKE_SOURCE_DIR}/\
|
|
|
|
|
external_libraries/yaml-cpp/include)"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(native-inputs
|
2018-05-28 15:02:28 +02:00
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2018-03-05 05:03:26 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("jack" ,jack-1)
|
|
|
|
|
("libsndfile" ,libsndfile)
|
|
|
|
|
("fftw" ,fftw)
|
|
|
|
|
("libxt" ,libxt)
|
|
|
|
|
("readline" ,readline) ;readline support for sclang's CLI
|
|
|
|
|
("alsa" ,alsa-lib) ;for sclang's MIDI interface
|
|
|
|
|
("eudev" ,eudev) ;for user interactions with devices
|
|
|
|
|
("avahi" ,avahi) ;zeroconf service discovery support
|
|
|
|
|
("icu4c" ,icu4c)
|
|
|
|
|
("boost" ,boost)
|
|
|
|
|
("boost-sync" ,boost-sync)
|
2018-05-28 15:02:28 +02:00
|
|
|
|
("yaml-cpp" ,yaml-cpp)))
|
2018-03-05 05:03:26 +01:00
|
|
|
|
(home-page "https://github.com/supercollider/supercollider")
|
|
|
|
|
(synopsis "Synthesis engine and programming language")
|
|
|
|
|
(description "SuperCollider is a synthesis engine (@code{scsynth} or
|
|
|
|
|
@code{supernova}) and programming language (@code{sclang}). It can be used
|
|
|
|
|
for experimenting with sound synthesis and algorithmic composition.
|
|
|
|
|
|
|
|
|
|
SuperCollider requires jackd to be installed in your user profile and your
|
|
|
|
|
user must be allowed to access the realtime features of the kernel. Search
|
|
|
|
|
for \"realtime\" in the index of the Guix manual to learn how to achieve this
|
|
|
|
|
using GuixSD.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-06-14 10:05:38 +02:00
|
|
|
|
(define-public raul
|
|
|
|
|
(package
|
|
|
|
|
(name "raul")
|
|
|
|
|
(version "0.8.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(uri (string-append "https://download.drobilla.net/raul-"
|
2015-06-14 10:05:38 +02:00
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"09ms40xc1x6qli6lxkwn5ibqh62nl9w7dq0b6jh1q2zvnrxwsd8b"))))
|
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:python ,python-2
|
|
|
|
|
#:tests? #f)) ; no check target
|
|
|
|
|
(inputs
|
|
|
|
|
`(("glib" ,glib)
|
|
|
|
|
("boost" ,boost)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(home-page "https://drobilla.net/software/raul/")
|
2015-06-14 10:05:38 +02:00
|
|
|
|
(synopsis "Real-time audio utility library")
|
|
|
|
|
(description
|
|
|
|
|
"Raul (Real-time Audio Utility Library) is a C++ utility library primarily
|
|
|
|
|
aimed at audio/musical applications.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2016-11-27 23:32:54 +01:00
|
|
|
|
(define-public raul-devel
|
2017-10-22 11:51:57 +02:00
|
|
|
|
(let ((commit "4db870b2b20b0a608ec0283139056b836c5b1624")
|
2016-11-27 23:32:54 +01:00
|
|
|
|
(revision "1"))
|
|
|
|
|
(package (inherit raul)
|
|
|
|
|
(name "raul")
|
2017-10-22 11:51:57 +02:00
|
|
|
|
(version (string-append "0.8.9-" revision "."
|
2016-11-27 23:32:54 +01:00
|
|
|
|
(string-take commit 9)))
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(url "https://git.drobilla.net/raul.git")
|
2016-11-27 23:32:54 +01:00
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-10-22 11:51:57 +02:00
|
|
|
|
"04fajrass3ymr72flx5js5vxc601ccrmx8ny8scp0rw7j0igyjdr")))))))
|
2016-11-27 23:32:54 +01:00
|
|
|
|
|
2015-02-10 10:22:37 +01:00
|
|
|
|
(define-public rubberband
|
|
|
|
|
(package
|
|
|
|
|
(name "rubberband")
|
|
|
|
|
(version "1.8.1")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append "https://bitbucket.org/breakfastquay/rubberband/get/v"
|
|
|
|
|
version
|
|
|
|
|
".tar.bz2"))
|
2018-03-04 08:57:24 +01:00
|
|
|
|
(file-name (string-append name "-" version ".tar.bz2"))
|
2015-02-10 10:22:37 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"05amrbrxx0da3w7m237q51799r8xgs4ffqabi2qv06hq8dpcj386"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments `(#:tests? #f)) ; no check target
|
|
|
|
|
(inputs
|
|
|
|
|
`(("ladspa" ,ladspa)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("vamp" ,vamp)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
2018-10-03 02:48:01 +02:00
|
|
|
|
(home-page "https://breakfastquay.com/rubberband/")
|
2015-02-10 10:22:37 +01:00
|
|
|
|
(synopsis "Audio time-stretching and pitch-shifting library")
|
|
|
|
|
(description
|
|
|
|
|
"Rubber Band is a library and utility program that permits changing the
|
|
|
|
|
tempo and pitch of an audio recording independently of one another.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-05-28 09:44:30 +02:00
|
|
|
|
(define-public rtmidi
|
|
|
|
|
(package
|
|
|
|
|
(name "rtmidi")
|
|
|
|
|
(version "2.1.0")
|
|
|
|
|
(source (origin
|
2018-11-10 22:57:28 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/powertab/rtmidi.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-05-28 09:44:30 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 22:57:28 +01:00
|
|
|
|
"106v177y3nrjv2l1yskch4phpqd8h97b67zj0jiq9pc3c69jr1ay"))))
|
2015-05-28 09:44:30 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ;no "check" target
|
2018-11-10 23:36:05 +01:00
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'build 'fix-makefile
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("/bin/ln") "ln")
|
|
|
|
|
(("RtMidi.h RtError.h") "RtMidi.h"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'install 'make-target-dirs
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((out (assoc-ref %outputs "out")))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
(mkdir (string-append out "/lib"))
|
|
|
|
|
(mkdir (string-append out "/include")))
|
|
|
|
|
#t)))))
|
2015-05-28 09:44:30 +02:00
|
|
|
|
(inputs
|
|
|
|
|
`(("jack" ,jack-1)
|
|
|
|
|
("alsa-lib" ,alsa-lib)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://github.com/powertab/rtmidi")
|
|
|
|
|
(synopsis "Cross-platform MIDI library for C++")
|
|
|
|
|
(description
|
|
|
|
|
"RtMidi is a set of C++ classes (RtMidiIn, RtMidiOut, and API specific
|
|
|
|
|
classes) that provide a common cross-platform API for realtime MIDI
|
|
|
|
|
input/output.")
|
|
|
|
|
(license license:expat)))
|
|
|
|
|
|
2015-02-10 10:21:30 +01:00
|
|
|
|
(define-public sratom
|
|
|
|
|
(package
|
|
|
|
|
(name "sratom")
|
2018-08-16 15:59:07 +02:00
|
|
|
|
(version "0.6.2")
|
2015-02-10 10:21:30 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(uri (string-append "https://download.drobilla.net/sratom-"
|
2017-04-10 18:36:38 +02:00
|
|
|
|
version ".tar.bz2"))
|
2015-02-10 10:21:30 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-08-16 15:59:07 +02:00
|
|
|
|
"0lz883ravxjf7r9wwbx2gx9m8vhyiavxrl9jdxfppjxnsralll8a"))))
|
2015-02-10 10:21:30 +01:00
|
|
|
|
(build-system waf-build-system)
|
|
|
|
|
(arguments `(#:tests? #f)) ; no check target
|
|
|
|
|
(inputs
|
|
|
|
|
`(("lv2" ,lv2)
|
|
|
|
|
("serd" ,serd)
|
|
|
|
|
("sord" ,sord)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(home-page "https://drobilla.net/software/sratom/")
|
2015-02-10 10:21:30 +01:00
|
|
|
|
(synopsis "Library for serialising LV2 atoms to/from RDF")
|
|
|
|
|
(description
|
|
|
|
|
"Sratom is a library for serialising LV2 atoms to/from RDF, particularly
|
|
|
|
|
the Turtle syntax.")
|
|
|
|
|
(license license:isc)))
|
2015-02-05 22:40:35 +01:00
|
|
|
|
|
|
|
|
|
(define-public suil
|
|
|
|
|
(package
|
|
|
|
|
(name "suil")
|
2017-10-22 12:03:30 +02:00
|
|
|
|
(version "0.10.0")
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(uri (string-append "https://download.drobilla.net/suil-"
|
2017-04-10 18:39:29 +02:00
|
|
|
|
version ".tar.bz2"))
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-10-22 12:03:30 +02:00
|
|
|
|
"0j489gm3fhnmwmbgw30bvd4byw1vsy4yazdlnji8jzhcz0qwb5cq"))))
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(build-system waf-build-system)
|
2017-05-24 22:46:44 +02:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:configure-flags
|
|
|
|
|
'("CXXFLAGS=-std=gnu++11")))
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("lv2" ,lv2)
|
2017-10-22 12:03:30 +02:00
|
|
|
|
("gtk+" ,gtk+-2)
|
|
|
|
|
("gtk+" ,gtk+)
|
2017-05-24 22:46:44 +02:00
|
|
|
|
("qt" ,qtbase)))
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
gnu: Use HTTPS for drobilla.net URIs.
* gnu/packages/audio.scm (jalv, lilv, patchage, raul, raul-devel)
(sratom, suil)[source, home-page]: Use HTTPS.
* gnu/packages/gtk.scm (ganv, ganv-devel)[source, home-page]: Likewise.
* gnu/packages/music.scm (ingen)[source, home-page]: Likewise.
* gnu/packages/rdf.scm (serd, sord)[source, home-page]: Likewise.
2018-06-22 19:59:45 +02:00
|
|
|
|
(home-page "https://drobilla.net/software/suil/")
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(synopsis "Library for loading and wrapping LV2 plugin UIs")
|
|
|
|
|
(description
|
|
|
|
|
"Suil is a lightweight C library for loading and wrapping LV2 plugin UIs.
|
|
|
|
|
|
|
|
|
|
Suil makes it possible to load a UI of a toolkit in a host using another
|
|
|
|
|
toolkit. The API is designed such that hosts do not need to explicitly
|
|
|
|
|
support specific toolkits – if Suil supports a particular toolkit, then UIs in
|
|
|
|
|
that toolkit will work in all hosts that use Suil automatically.
|
|
|
|
|
|
2017-10-22 12:03:30 +02:00
|
|
|
|
Suil currently supports every combination of Gtk, Qt, and X11.")
|
2015-02-05 22:40:35 +01:00
|
|
|
|
(license license:isc)))
|
2015-02-05 22:40:41 +01:00
|
|
|
|
|
2015-02-19 16:57:33 +01:00
|
|
|
|
(define-public timidity++
|
|
|
|
|
(package
|
|
|
|
|
(name "timidity++")
|
|
|
|
|
(version "2.14.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/timidity/TiMidity++"
|
|
|
|
|
"/TiMidity++-" version
|
|
|
|
|
"/TiMidity++-" version ".tar.bz2"))
|
2015-02-19 16:57:33 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0xk41w4qbk23z1fvqdyfblbz10mmxsllw0svxzjw5sa9y11vczzr"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
(list "--enable-audio=alsa,flac,jack,ao,vorbis,speex"
|
|
|
|
|
"--enable-ncurses"
|
|
|
|
|
"--enable-server"
|
|
|
|
|
"--enable-alsaseq"
|
|
|
|
|
(string-append "--with-default-path="
|
|
|
|
|
(assoc-ref %outputs "out") "/etc/timidity"))
|
|
|
|
|
#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'install 'install-config
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((out (string-append (assoc-ref %outputs "out")
|
|
|
|
|
"/etc/timidity")))
|
|
|
|
|
(mkdir-p out)
|
|
|
|
|
(call-with-output-file
|
|
|
|
|
(string-append out "/timidity.cfg")
|
|
|
|
|
(lambda (port)
|
|
|
|
|
(format port (string-append "source "
|
|
|
|
|
(assoc-ref %build-inputs "freepats")
|
|
|
|
|
"/share/freepats/freepats.cfg")))))
|
|
|
|
|
#t)))))
|
2015-02-19 16:57:33 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("ao" ,ao)
|
|
|
|
|
("flac" ,flac)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("libogg" ,libogg)
|
|
|
|
|
("speex" ,speex)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("freepats" ,freepats)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://timidity.sourceforge.net/")
|
|
|
|
|
(synopsis "Software synthesizer for playing MIDI files")
|
|
|
|
|
(description
|
|
|
|
|
"TiMidity++ is a software synthesizer. It can play MIDI files by
|
|
|
|
|
converting them into PCM waveform data; give it a MIDI data along with digital
|
|
|
|
|
instrument data files, then it synthesizes them in real-time, and plays. It
|
|
|
|
|
can not only play sounds, but also can save the generated waveforms into hard
|
|
|
|
|
disks as various audio file formats.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-02-05 22:40:41 +01:00
|
|
|
|
(define-public vamp
|
|
|
|
|
(package
|
|
|
|
|
(name "vamp")
|
2015-06-18 13:18:07 +02:00
|
|
|
|
(version "2.6")
|
2015-02-05 22:40:41 +01:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"https://code.soundsoftware.ac.uk"
|
2015-08-05 17:55:32 +02:00
|
|
|
|
"/attachments/download/1520/vamp-plugin-sdk-"
|
2015-06-18 13:18:07 +02:00
|
|
|
|
version ".tar.gz"))
|
2015-02-21 16:37:46 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-08-05 17:55:32 +02:00
|
|
|
|
"0pzq0yy2kdl3jgfc2aqmh5m55nk1ild0hq8mydiiw35c6y0mglyh"))))
|
2015-02-05 22:40:41 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2015-02-21 16:37:46 +01:00
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no check target
|
|
|
|
|
#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'install 'remove-libvamp-hostsdk.la
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
;; https://bugs.launchpad.net/ubuntu/+source/vamp-plugin-sdk/+bug/1253656
|
|
|
|
|
(for-each delete-file
|
|
|
|
|
(let ((out (assoc-ref outputs "out")))
|
|
|
|
|
(list (string-append out "/lib/libvamp-sdk.la")
|
|
|
|
|
(string-append out "/lib/libvamp-hostsdk.la"))))
|
2017-09-24 19:26:34 +02:00
|
|
|
|
#t)))))
|
2015-02-05 22:40:41 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("libsndfile" ,libsndfile)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "http://vamp-plugins.org")
|
|
|
|
|
(synopsis "Modular and extensible audio processing system")
|
|
|
|
|
(description
|
|
|
|
|
"Vamp is an audio processing plugin system for plugins that extract
|
|
|
|
|
descriptive information from audio data — typically referred to as audio
|
|
|
|
|
analysis plugins or audio feature extraction plugins.")
|
|
|
|
|
(license
|
|
|
|
|
(license:x11-style
|
|
|
|
|
"https://code.soundsoftware.ac.uk/projects/vamp-plugin-sdk/repository/entry/COPYING"))))
|
2015-02-20 21:42:48 +01:00
|
|
|
|
|
|
|
|
|
(define-public libsbsms
|
|
|
|
|
(package
|
|
|
|
|
(name "libsbsms")
|
|
|
|
|
(version "2.0.2")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/sbsms/sbsms/" version
|
|
|
|
|
"/libsbsms-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32 "1vmf84iy4dkwxv887grnlsfk43fmhd9gbg26gc2kgcv40sbkvayf"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs `(("automake" ,automake)))
|
|
|
|
|
(arguments
|
2015-07-21 22:35:43 +02:00
|
|
|
|
`(#:configure-flags
|
|
|
|
|
;; Disable the use of SSE unless on x86_64.
|
|
|
|
|
,(if (not (string-prefix? "x86_64" (or (%current-target-system)
|
|
|
|
|
(%current-system))))
|
|
|
|
|
''("--disable-sse")
|
|
|
|
|
''())
|
|
|
|
|
#:phases
|
2015-07-21 22:35:02 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after
|
|
|
|
|
'unpack 'fix-ar-lib-path
|
|
|
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
|
|
|
;; Originally a symlink to '/usr/local/share/automake-1.12/ar-lib'.
|
|
|
|
|
(delete-file "ar-lib")
|
|
|
|
|
(symlink
|
|
|
|
|
(string-append (assoc-ref inputs "automake") "/share/automake-"
|
|
|
|
|
,(package-version automake) "/ar-lib")
|
|
|
|
|
"ar-lib"))))))
|
2015-02-20 21:42:48 +01:00
|
|
|
|
(home-page "http://sbsms.sourceforge.net/")
|
|
|
|
|
(synopsis "Library for time stretching and pitch scaling of audio")
|
|
|
|
|
(description
|
|
|
|
|
"SBSMS (Subband Sinusoidal Modeling Synthesis) is software for time
|
|
|
|
|
stretching and pitch scaling of audio. This package contains the library.")
|
|
|
|
|
;; There is no explicit declaration of a license, but a COPYING file
|
|
|
|
|
;; containing gpl2.
|
|
|
|
|
(license license:gpl2)))
|
2015-02-20 21:44:57 +01:00
|
|
|
|
|
2015-04-05 04:36:05 +02:00
|
|
|
|
(define-public wavpack
|
|
|
|
|
(package
|
|
|
|
|
(name "wavpack")
|
2017-01-23 19:54:08 +01:00
|
|
|
|
(version "5.1.0")
|
2015-04-05 04:36:05 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://www.wavpack.com/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
2018-02-28 20:29:46 +01:00
|
|
|
|
(patches (search-patches "wavpack-CVE-2018-6767.patch"
|
|
|
|
|
"wavpack-CVE-2018-7253.patch"
|
2018-02-23 13:07:51 +01:00
|
|
|
|
"wavpack-CVE-2018-7254.patch"))
|
2015-04-05 04:36:05 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2017-01-23 19:54:08 +01:00
|
|
|
|
"0i19c6krc0p9krwrqy9s5xahaafigqzxcn31piidmlaqadyn4f8r"))))
|
2015-04-05 04:36:05 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://www.wavpack.com/")
|
|
|
|
|
(synopsis "Hybrid lossless audio codec")
|
|
|
|
|
(description
|
|
|
|
|
"WavPack is an audio compression format with lossless, lossy and hybrid
|
|
|
|
|
compression modes. This package contains command-line programs and library to
|
|
|
|
|
encode and decode wavpack files.")
|
|
|
|
|
(license license:bsd-3)))
|
|
|
|
|
|
2015-04-29 05:03:48 +02:00
|
|
|
|
(define-public libmodplug
|
|
|
|
|
(package
|
|
|
|
|
(name "libmodplug")
|
2018-07-14 11:42:56 +02:00
|
|
|
|
(version "0.8.9.0")
|
2015-04-29 05:03:48 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
2016-07-22 17:45:03 +02:00
|
|
|
|
"mirror://sourceforge/modplug-xmms/"
|
2015-04-29 05:03:48 +02:00
|
|
|
|
name "/" version "/" name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-07-14 11:42:56 +02:00
|
|
|
|
"1pnri98a603xk47smnxr551svbmgbzcw018mq1k6srbrq6kaaz25"))))
|
2015-04-29 05:03:48 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://modplug-xmms.sourceforge.net/")
|
|
|
|
|
(synopsis "Mod file playing library")
|
|
|
|
|
(description
|
|
|
|
|
"Libmodplug renders mod music files as raw audio data, for playing or
|
|
|
|
|
conversion. mod, .s3m, .it, .xm, and a number of lesser-known formats are
|
|
|
|
|
supported. Optional features include high-quality resampling, bass expansion,
|
|
|
|
|
surround and reverb.")
|
|
|
|
|
(license license:public-domain)))
|
|
|
|
|
|
2015-04-29 08:48:26 +02:00
|
|
|
|
(define-public libxmp
|
|
|
|
|
(package
|
|
|
|
|
(name "libxmp")
|
2016-11-04 13:20:54 +01:00
|
|
|
|
(version "4.4.1")
|
2015-04-29 08:48:26 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/xmp/libxmp/" version "/"
|
2015-04-29 08:48:26 +02:00
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-11-04 13:20:54 +01:00
|
|
|
|
"1kycz4jsyvmf7ny9227b497wc7y5ligydi6fvvldmkf8hk63ad9m"))))
|
2015-04-29 08:48:26 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(home-page "http://xmp.sourceforge.net/")
|
|
|
|
|
(synopsis "Module player library")
|
|
|
|
|
(description
|
|
|
|
|
"Libxmp is a library that renders module files to PCM data. It supports
|
|
|
|
|
over 90 mainstream and obscure module formats including Protracker (MOD),
|
|
|
|
|
Scream Tracker 3 (S3M), Fast Tracker II (XM), and Impulse Tracker (IT).")
|
|
|
|
|
(license license:lgpl2.1+)))
|
|
|
|
|
|
2015-04-29 08:48:55 +02:00
|
|
|
|
(define-public xmp
|
|
|
|
|
(package
|
|
|
|
|
(name "xmp")
|
2016-11-04 13:21:21 +01:00
|
|
|
|
(version "4.1.0")
|
2015-04-29 08:48:55 +02:00
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/xmp/xmp/" version "/"
|
2015-04-29 08:48:55 +02:00
|
|
|
|
name "-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2016-11-04 13:21:21 +01:00
|
|
|
|
"17i8fc7x7yn3z1x963xp9iv108gxfakxmdgmpv3mlm438w3n3g8x"))))
|
2015-04-29 08:48:55 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libxmp" ,libxmp)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(home-page "http://xmp.sourceforge.net/")
|
|
|
|
|
(synopsis "Extended module player")
|
|
|
|
|
(description
|
|
|
|
|
"Xmp is a portable module player that plays over 90 mainstream and
|
|
|
|
|
obscure module formats, including Protracker MOD, Fasttracker II XM, Scream
|
|
|
|
|
Tracker 3 S3M and Impulse Tracker IT files.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-02-20 21:44:57 +01:00
|
|
|
|
(define-public soundtouch
|
|
|
|
|
(package
|
|
|
|
|
(name "soundtouch")
|
2018-08-22 18:50:24 +02:00
|
|
|
|
(version "2.0.0")
|
2015-02-20 21:44:57 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append
|
|
|
|
|
"http://www.surina.net/soundtouch/soundtouch-" version ".tar.gz"))
|
2018-08-22 19:07:42 +02:00
|
|
|
|
(patches (search-patches "soundtouch-CVE-2018-14044-14045.patch"
|
|
|
|
|
"soundtouch-CVE-2018-1000223.patch"))
|
2015-02-20 21:44:57 +01:00
|
|
|
|
(sha256
|
2018-08-22 18:50:24 +02:00
|
|
|
|
(base32
|
|
|
|
|
"09cxr02mfyj2bg731bj0i9hh565x8l9p91aclxs8wpqv8b8zf96j"))))
|
2015-02-20 21:44:57 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("file" ,file)))
|
|
|
|
|
(home-page "http://www.surina.net/soundtouch/")
|
|
|
|
|
(synopsis
|
|
|
|
|
"Audio processing library for changing tempo, pitch and playback rate")
|
|
|
|
|
(description
|
|
|
|
|
"SoundTouch is an audio processing library for changing the tempo, pitch
|
|
|
|
|
and playback rates of audio streams or audio files. It is intended for
|
|
|
|
|
application developers writing sound processing tools that require tempo/pitch
|
|
|
|
|
control functionality, or just for playing around with the sound effects.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2015-02-20 21:49:03 +01:00
|
|
|
|
|
2015-07-13 18:15:07 +02:00
|
|
|
|
(define-public sox
|
|
|
|
|
(package
|
|
|
|
|
(name "sox")
|
|
|
|
|
(version "14.4.2")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/sox/sox/" version "/"
|
|
|
|
|
name "-" version ".tar.bz2"))
|
2015-07-13 18:15:07 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"170lx90r1nlnb2j6lg00524iwvqy72p48vii4xc5prrh8dnrb9l1"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:configure-flags
|
|
|
|
|
;; The upstream asks to identify the distribution to diagnose SoX
|
|
|
|
|
;; bug reports.
|
|
|
|
|
'("--with-distro=Guix System Distribution")))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("ao" ,ao)
|
|
|
|
|
("flac" ,flac)
|
|
|
|
|
("lame" ,lame)
|
|
|
|
|
("libid3tag" ,libid3tag)
|
|
|
|
|
("libltdl" ,libltdl)
|
|
|
|
|
("libmad" ,libmad)
|
|
|
|
|
("libpng" ,libpng)
|
|
|
|
|
("libvorbis" ,libvorbis)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(home-page "http://sox.sourceforge.net")
|
|
|
|
|
(synopsis "Sound processing utility")
|
|
|
|
|
(description
|
|
|
|
|
"SoX (Sound eXchange) is a command line utility that can convert
|
|
|
|
|
various formats of computer audio files to other formats. It can also
|
|
|
|
|
apply various effects to these sound files, and, as an added bonus, SoX
|
|
|
|
|
can play and record audio files.")
|
|
|
|
|
;; sox.c is distributed under GPL, while the files that make up
|
|
|
|
|
;; libsox are licensed under LGPL.
|
|
|
|
|
(license (list license:gpl2+ license:lgpl2.1+))))
|
|
|
|
|
|
2015-02-20 21:49:03 +01:00
|
|
|
|
(define-public soxr
|
|
|
|
|
(package
|
|
|
|
|
(name "soxr")
|
2018-02-26 22:25:32 +01:00
|
|
|
|
(version "0.1.3")
|
2015-02-20 21:49:03 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append "mirror://sourceforge/soxr/soxr-" version
|
|
|
|
|
"-Source.tar.xz"))
|
|
|
|
|
(sha256
|
2018-02-26 22:25:32 +01:00
|
|
|
|
(base32 "12aql6svkplxq5fjycar18863hcq84c5kx8g6f4rj0lcvigw24di"))))
|
2015-02-20 21:49:03 +01:00
|
|
|
|
(build-system cmake-build-system)
|
|
|
|
|
(arguments '(#:tests? #f)) ;no 'check' target
|
gnu: Use HTTPS for all sourceforge.net home pages.
* gnu/packages/admin.scm (mingetty, clusterssh)[home-page]: Use HTTPS.
* gnu/packages/audio.scm (libbs2b, soxr)[home-page]: Likewise.
* gnu/packages/bioinformatics.scm (bless)[home-page]: Likewise.
* gnu/packages/display-managers.scm (slim)[home-page]: Likewise.
* gnu/packages/games.scm (extremetuxracer)[home-page]: Likewise.
* gnu/packages/ghostscript.scm (gs-fonts)[home-page]: Likewise.
* gnu/packages/haskell.scm (ghc-regex-base, ghc-regex-posix,
ghc-regex-compat)[home-page]: Likewise.
* gnu/packages/image.scm (imlib2)[home-page]: Likewise.
* gnu/packages/libreoffice.scm (librevenge, libcmis, libodfgen, libmwaw)
[home-page]: Likewise.
* gnu/packages/linux.scm (hdparm, acpid, libavc1394, rng-tools)
[home-page]: Likewise.
* gnu/packages/mail.scm (esmtp)[home-page]: Likewise.
* gnu/packages/mp3.scm (ripperx)[home-page]: Likewise.
* gnu/packages/onc-rpc.scm (libtirpc)[home-page]: Likewise.
* gnu/packages/perl.scm (perl-czplib)[home-page]: Likewise.
* gnu/packages/python.scm (python-pyasn1-modules)[home-page]: Likewise.
* gnu/packages/xdisorg.scm (xosd)[home-page]: Likewise.
2017-01-04 01:30:46 +01:00
|
|
|
|
(home-page "https://sourceforge.net/p/soxr/wiki/Home/")
|
2015-02-20 21:49:03 +01:00
|
|
|
|
(synopsis "One-dimensional sample-rate conversion library")
|
|
|
|
|
(description
|
|
|
|
|
"The SoX Resampler library (libsoxr) performs one-dimensional sample-rate
|
|
|
|
|
conversion. It may be used, for example, to resample PCM-encoded audio.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2015-02-20 21:51:09 +01:00
|
|
|
|
|
|
|
|
|
(define-public twolame
|
|
|
|
|
(package
|
|
|
|
|
(name "twolame")
|
|
|
|
|
(version "0.3.13")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/twolame/twolame/" version
|
|
|
|
|
"/twolame-" version ".tar.gz"))
|
2015-02-20 21:51:09 +01:00
|
|
|
|
(sha256
|
2016-10-24 07:49:27 +02:00
|
|
|
|
(base32 "0ahiqqng5pidwhj1wzph4vxxgxxgcfa3gl0gywipzx2ii7s35wwq"))
|
|
|
|
|
(modules '((guix build utils)))
|
|
|
|
|
;; The tests break with Perl 5.24:
|
|
|
|
|
;; https://github.com/njh/twolame/issues/21
|
|
|
|
|
;; TODO: Remove this snippet when upgrading twolame.
|
|
|
|
|
(snippet
|
|
|
|
|
'(begin
|
|
|
|
|
(substitute* "tests/test.pl" (("\\(@_\\)") "($_[0])"))
|
|
|
|
|
#t))))
|
2015-02-20 21:51:09 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("libsndfile" ,libsndfile)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("perl" ,perl)
|
|
|
|
|
("which" ,which))) ;used in tests/test.pl
|
|
|
|
|
(home-page "http://www.twolame.org/")
|
|
|
|
|
(synopsis "MPEG Audio Layer 2 (MP2) encoder")
|
|
|
|
|
(description
|
|
|
|
|
"TwoLAME is an optimised MPEG Audio Layer 2 (MP2) encoder based on
|
|
|
|
|
tooLAME by Mike Cheng, which in turn is based upon the ISO dist10 code and
|
|
|
|
|
portions of LAME.")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2015-02-20 21:51:49 +01:00
|
|
|
|
|
|
|
|
|
(define-public portaudio
|
|
|
|
|
(package
|
|
|
|
|
(name "portaudio")
|
2017-04-21 14:44:07 +02:00
|
|
|
|
(version "190600.20161030")
|
2015-02-20 21:51:49 +01:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://www.portaudio.com/archives/pa_stable_v"
|
|
|
|
|
(string-map (lambda (c) (if (char=? c #\.) #\_ c)) version)
|
|
|
|
|
".tgz"))
|
|
|
|
|
(sha256
|
2017-04-21 14:44:07 +02:00
|
|
|
|
(base32 "04qmin6nj144b8qb9kkd9a52xfvm0qdgm8bg8jbl7s3frmyiv8pm"))
|
2016-04-08 14:18:13 +02:00
|
|
|
|
(patches (search-patches "portaudio-audacity-compat.patch"))))
|
2015-02-20 21:51:49 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
;; TODO: Add ASIHPI.
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
2015-07-18 22:09:13 +02:00
|
|
|
|
("jack" ,jack-1)))
|
2018-11-10 23:34:53 +01:00
|
|
|
|
;; Autoreconf is necessary because the audacity-compat patch modifies .in
|
|
|
|
|
;; files.
|
2015-02-20 21:51:49 +01:00
|
|
|
|
(native-inputs
|
2015-03-02 01:06:35 +01:00
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
2018-11-10 23:34:53 +01:00
|
|
|
|
(arguments '(#:tests? #f)) ;no 'check' target
|
2015-02-20 21:51:49 +01:00
|
|
|
|
(home-page "http://www.portaudio.com/")
|
|
|
|
|
(synopsis "Audio I/O library")
|
|
|
|
|
(description
|
|
|
|
|
"PortAudio is a portable C/C++ audio I/O library providing a simple API
|
|
|
|
|
to record and/or play sound using a callback function or a blocking read/write
|
|
|
|
|
interface.")
|
|
|
|
|
(license license:expat)))
|
2015-02-21 21:52:10 +01:00
|
|
|
|
|
2015-06-13 19:53:48 +02:00
|
|
|
|
(define-public qsynth
|
|
|
|
|
(package
|
|
|
|
|
(name "qsynth")
|
2018-10-19 21:58:48 +02:00
|
|
|
|
(version "0.5.3")
|
2015-06-13 19:53:48 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
2016-07-21 08:35:30 +02:00
|
|
|
|
(uri (string-append "mirror://sourceforge/qsynth/qsynth/" version
|
|
|
|
|
"/qsynth-" version ".tar.gz"))
|
2015-06-13 19:53:48 +02:00
|
|
|
|
(sha256
|
2017-05-05 09:23:27 +02:00
|
|
|
|
(base32
|
2018-10-19 21:58:48 +02:00
|
|
|
|
"1jghczmmva7cyavg1q0j8nr3hmjpzzglzi5ckg92ax4ji8gpks9c"))))
|
2015-06-13 19:53:48 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
2018-08-14 14:40:00 +02:00
|
|
|
|
`(#:tests? #f ; no "check" phase
|
2016-08-20 21:34:09 +02:00
|
|
|
|
#:configure-flags
|
|
|
|
|
'("CXXFLAGS=-std=gnu++11")))
|
2016-08-15 20:31:24 +02:00
|
|
|
|
(native-inputs
|
2016-11-19 01:19:16 +01:00
|
|
|
|
`(("qttools" ,qttools)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
2015-06-13 19:53:48 +02:00
|
|
|
|
(inputs
|
2016-08-15 20:31:24 +02:00
|
|
|
|
`(("fluidsynth" ,fluidsynth)
|
|
|
|
|
("qtbase" ,qtbase)
|
|
|
|
|
("qtx11extras" ,qtx11extras)))
|
2015-06-13 19:53:48 +02:00
|
|
|
|
(home-page "http://qsynth.sourceforge.net")
|
|
|
|
|
(synopsis "Graphical user interface for FluidSynth")
|
|
|
|
|
(description
|
|
|
|
|
"Qsynth is a GUI front-end application for the FluidSynth SoundFont
|
|
|
|
|
synthesizer written in C++.")
|
|
|
|
|
(license license:gpl2+)))
|
|
|
|
|
|
2015-03-05 19:52:26 +01:00
|
|
|
|
(define-public rsound
|
|
|
|
|
(package
|
|
|
|
|
(name "rsound")
|
|
|
|
|
(version "1.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-11-10 23:12:38 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/Themaister/RSound.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-03-05 19:52:26 +01:00
|
|
|
|
(sha256
|
2018-11-10 23:12:38 +01:00
|
|
|
|
(base32 "0gspmr3klwnq98h17p5hc6ifygya4p80g4g8r7a1qavm3mv19waf"))))
|
2015-03-05 19:52:26 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
2015-08-27 10:07:40 +02:00
|
|
|
|
("jack" ,jack-1)
|
2015-03-05 19:52:26 +01:00
|
|
|
|
("ao" ,ao)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("openal" ,openal)
|
|
|
|
|
("portaudio" ,portaudio)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(replace 'configure
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(setenv "CC" "gcc")
|
2018-06-24 20:31:14 +02:00
|
|
|
|
(invoke "./configure"
|
|
|
|
|
(string-append "--prefix=" (assoc-ref outputs "out"))))))
|
2015-03-05 19:52:26 +01:00
|
|
|
|
;; No 'check' target.
|
|
|
|
|
#:tests? #f))
|
|
|
|
|
(home-page "http://themaister.net/rsound.html")
|
|
|
|
|
(synopsis "Networked audio system")
|
|
|
|
|
(description
|
|
|
|
|
"RSound allows you to send audio from an application and transfer it
|
|
|
|
|
directly to a different computer on your LAN network. It is an audio daemon
|
|
|
|
|
with a much different focus than most other audio daemons.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-09-19 13:16:38 +02:00
|
|
|
|
(define-public xjackfreak
|
|
|
|
|
(package
|
|
|
|
|
(name "xjackfreak")
|
|
|
|
|
(version "1.0")
|
|
|
|
|
(source (origin
|
2018-11-10 23:15:41 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/johnhldavis/xjackfreak.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-09-19 13:16:38 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 23:15:41 +01:00
|
|
|
|
"18c546qidbrj0f5wfiq5llii2192xpln0ab3r4vpr7i3wybxqjfz"))))
|
2015-09-19 13:16:38 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags
|
|
|
|
|
(list (string-append "docdir=" (assoc-ref %outputs "out")
|
|
|
|
|
"/share/doc/xjackfreak"))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("jack" ,jack-1)
|
|
|
|
|
("libx11" ,libx11)
|
|
|
|
|
("libxt" ,libxt)
|
|
|
|
|
("libxext" ,libxext)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://github.com/johnhldavis/xjackfreak")
|
|
|
|
|
(synopsis "JACK audio frequency analyzer and display")
|
|
|
|
|
(description
|
|
|
|
|
"XJackFreak is an audio analysis and equalizing tool for the Jack Audio
|
|
|
|
|
Connection Kit. It can display the FFT of any input, modify it and output the
|
|
|
|
|
result.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-04-25 20:15:52 +02:00
|
|
|
|
(define-public zita-convolver
|
|
|
|
|
(package
|
|
|
|
|
(name "zita-convolver")
|
|
|
|
|
(version "3.1.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/zita-convolver-"
|
|
|
|
|
version ".tar.bz2"))
|
2016-01-06 16:23:26 +01:00
|
|
|
|
(snippet
|
|
|
|
|
;; Don't optimize for a specific processor architecture.
|
gnu: All snippets report errors using exceptions, else return #t.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm,
gnu/packages/bioinformatics.scm, gnu/packages/cdrom.scm,
gnu/packages/chez.scm, gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/cross-base.scm, gnu/packages/crypto.scm, gnu/packages/cups.scm,
gnu/packages/databases.scm, gnu/packages/dns.scm, gnu/packages/emacs.scm,
gnu/packages/emulators.scm, gnu/packages/engineering.scm,
gnu/packages/enlightenment.scm, gnu/packages/fpga.scm,
gnu/packages/freedesktop.scm, gnu/packages/ftp.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/geo.scm, gnu/packages/ghostscript.scm,
gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm,
gnu/packages/gnuzilla.scm, gnu/packages/graphics.scm, gnu/packages/gtk.scm,
gnu/packages/guile.scm, gnu/packages/irc.scm, gnu/packages/java.scm,
gnu/packages/kerberos.scm, gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/lxde.scm, gnu/packages/machine-learning.scm,
gnu/packages/mail.scm, gnu/packages/maths.scm, gnu/packages/messaging.scm,
gnu/packages/monitoring.scm, gnu/packages/mp3.scm, gnu/packages/music.scm,
gnu/packages/netpbm.scm, gnu/packages/networking.scm, gnu/packages/node.scm,
gnu/packages/nvi.scm, gnu/packages/ocaml.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/php.scm, gnu/packages/plotutils.scm,
gnu/packages/pretty-print.scm, gnu/packages/profiling.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python-crypto.scm,
gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/robotics.scm,
gnu/packages/sawfish.scm, gnu/packages/scanner.scm, gnu/packages/scheme.scm,
gnu/packages/scribus.scm, gnu/packages/sdl.scm,
gnu/packages/serialization.scm, gnu/packages/shells.scm,
gnu/packages/slang.scm, gnu/packages/smalltalk.scm, gnu/packages/ssh.scm,
gnu/packages/sync.scm, gnu/packages/syncthing.scm, gnu/packages/tbb.scm,
gnu/packages/terminals.scm, gnu/packages/texinfo.scm,
gnu/packages/text-editors.scm, gnu/packages/textutils.scm,
gnu/packages/tls.scm, gnu/packages/unrtf.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wm.scm,
gnu/packages/wxwidgets.scm, gnu/packages/xdisorg.scm, gnu/packages/xorg.scm:
In all snippets, report errors using exceptions, or else return #t.
2018-03-16 12:47:34 +01:00
|
|
|
|
'(begin
|
|
|
|
|
(substitute* "libs/Makefile"
|
|
|
|
|
(("^CXXFLAGS \\+= -march=native") ""))
|
|
|
|
|
#t))
|
2016-01-06 16:23:26 +01:00
|
|
|
|
(modules '((guix build utils)))
|
2015-04-25 20:15:52 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"14qrnczhp5mbwhky64il7kxc4hl1mmh495v60va7i2qnhasr6zmz"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-makefile-and-enter-directory
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "libs/Makefile"
|
|
|
|
|
(("ldconfig") "true")
|
|
|
|
|
(("^LIBDIR =.*") "LIBDIR = lib\n"))
|
2017-09-24 19:26:34 +02:00
|
|
|
|
(chdir "libs") #t))
|
|
|
|
|
(add-after 'install 'install-symlink
|
|
|
|
|
(lambda _
|
|
|
|
|
(symlink "libzita-convolver.so"
|
|
|
|
|
(string-append (assoc-ref %outputs "out")
|
|
|
|
|
"/lib/libzita-convolver.so.3"))))
|
2015-04-25 20:15:52 +02:00
|
|
|
|
;; no configure script
|
2017-09-24 19:26:34 +02:00
|
|
|
|
(delete 'configure))))
|
2015-04-25 20:15:52 +02:00
|
|
|
|
(inputs `(("fftwf" ,fftwf)))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2015-04-25 20:15:52 +02:00
|
|
|
|
(synopsis "Fast, partitioned convolution engine library")
|
|
|
|
|
(description
|
|
|
|
|
"Zita convolver is a C++ library providing a real-time convolution
|
|
|
|
|
engine.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-06-14 15:01:08 +02:00
|
|
|
|
(define-public zita-resampler
|
|
|
|
|
(package
|
|
|
|
|
(name "zita-resampler")
|
|
|
|
|
(version "1.3.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/zita-resampler-"
|
|
|
|
|
version ".tar.bz2"))
|
2016-01-06 16:04:14 +01:00
|
|
|
|
(snippet
|
|
|
|
|
;; Don't optimize for a specific processor architecture.
|
gnu: All snippets report errors using exceptions, else return #t.
* gnu/packages/admin.scm, gnu/packages/algebra.scm, gnu/packages/audio.scm,
gnu/packages/backup.scm, gnu/packages/base.scm,
gnu/packages/bioinformatics.scm, gnu/packages/cdrom.scm,
gnu/packages/chez.scm, gnu/packages/code.scm, gnu/packages/compression.scm,
gnu/packages/cross-base.scm, gnu/packages/crypto.scm, gnu/packages/cups.scm,
gnu/packages/databases.scm, gnu/packages/dns.scm, gnu/packages/emacs.scm,
gnu/packages/emulators.scm, gnu/packages/engineering.scm,
gnu/packages/enlightenment.scm, gnu/packages/fpga.scm,
gnu/packages/freedesktop.scm, gnu/packages/ftp.scm, gnu/packages/games.scm,
gnu/packages/gcc.scm, gnu/packages/geo.scm, gnu/packages/ghostscript.scm,
gnu/packages/gl.scm, gnu/packages/glib.scm, gnu/packages/gnome.scm,
gnu/packages/gnuzilla.scm, gnu/packages/graphics.scm, gnu/packages/gtk.scm,
gnu/packages/guile.scm, gnu/packages/irc.scm, gnu/packages/java.scm,
gnu/packages/kerberos.scm, gnu/packages/linux.scm, gnu/packages/lisp.scm,
gnu/packages/lxde.scm, gnu/packages/machine-learning.scm,
gnu/packages/mail.scm, gnu/packages/maths.scm, gnu/packages/messaging.scm,
gnu/packages/monitoring.scm, gnu/packages/mp3.scm, gnu/packages/music.scm,
gnu/packages/netpbm.scm, gnu/packages/networking.scm, gnu/packages/node.scm,
gnu/packages/nvi.scm, gnu/packages/ocaml.scm, gnu/packages/pdf.scm,
gnu/packages/perl.scm, gnu/packages/php.scm, gnu/packages/plotutils.scm,
gnu/packages/pretty-print.scm, gnu/packages/profiling.scm,
gnu/packages/pulseaudio.scm, gnu/packages/python-crypto.scm,
gnu/packages/python.scm, gnu/packages/qt.scm, gnu/packages/robotics.scm,
gnu/packages/sawfish.scm, gnu/packages/scanner.scm, gnu/packages/scheme.scm,
gnu/packages/scribus.scm, gnu/packages/sdl.scm,
gnu/packages/serialization.scm, gnu/packages/shells.scm,
gnu/packages/slang.scm, gnu/packages/smalltalk.scm, gnu/packages/ssh.scm,
gnu/packages/sync.scm, gnu/packages/syncthing.scm, gnu/packages/tbb.scm,
gnu/packages/terminals.scm, gnu/packages/texinfo.scm,
gnu/packages/text-editors.scm, gnu/packages/textutils.scm,
gnu/packages/tls.scm, gnu/packages/unrtf.scm,
gnu/packages/version-control.scm, gnu/packages/video.scm,
gnu/packages/vpn.scm, gnu/packages/web.scm, gnu/packages/wm.scm,
gnu/packages/wxwidgets.scm, gnu/packages/xdisorg.scm, gnu/packages/xorg.scm:
In all snippets, report errors using exceptions, or else return #t.
2018-03-16 12:47:34 +01:00
|
|
|
|
'(begin
|
|
|
|
|
(substitute* '("apps/Makefile" "libs/Makefile")
|
|
|
|
|
(("^CXXFLAGS \\+= -march=native") ""))
|
|
|
|
|
#t))
|
2016-01-06 16:04:14 +01:00
|
|
|
|
(modules '((guix build utils)))
|
2015-06-14 15:01:08 +02:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0r9ary5sc3y8vba5pad581ha7mgsrlyai83w7w4x2fmhfy64q0wq"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after
|
|
|
|
|
'unpack 'patch-makefile-and-enter-directory
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "libs/Makefile"
|
|
|
|
|
(("ldconfig") "true")
|
|
|
|
|
(("^LIBDIR =.*") "LIBDIR = lib\n"))
|
|
|
|
|
(chdir "libs")
|
|
|
|
|
#t))
|
|
|
|
|
(add-after
|
|
|
|
|
'install 'install-symlink
|
|
|
|
|
(lambda _
|
|
|
|
|
(symlink "libzita-resampler.so"
|
|
|
|
|
(string-append (assoc-ref %outputs "out")
|
|
|
|
|
"/lib/libzita-resampler.so.1"))))
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure))))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org/linuxaudio/zita-resampler/resampler.html")
|
2015-06-14 15:01:08 +02:00
|
|
|
|
(synopsis "C++ library for resampling audio signals")
|
|
|
|
|
(description
|
|
|
|
|
"Libzita-resampler is a C++ library for resampling audio signals. It is
|
|
|
|
|
designed to be used within a real-time processing context, to be fast, and to
|
|
|
|
|
provide high-quality sample rate conversion.")
|
|
|
|
|
(license license:gpl3+)))
|
|
|
|
|
|
2015-02-21 21:52:10 +01:00
|
|
|
|
(define-public zita-alsa-pcmi
|
|
|
|
|
(package
|
|
|
|
|
(name "zita-alsa-pcmi")
|
|
|
|
|
(version "0.2.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append
|
|
|
|
|
"http://kokkinizita.linuxaudio.org"
|
|
|
|
|
"/linuxaudio/downloads/zita-alsa-pcmi-"
|
|
|
|
|
version ".tar.bz2"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2015-03-04 11:50:26 +01:00
|
|
|
|
"1rgv332g82rrrlm4vdam6p2pyrisxbi7b3izfaa0pcjglafsy7j9"))))
|
2015-02-21 21:52:10 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f ; no "check" target
|
|
|
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:phases
|
gnu: Use 'modify-phases' syntax.
* gnu/packages/admin.scm (mingetty, clusterssh, wpa-supplicant-minimal,
wpa-supplicant, wakelan, acpica, tree, direvent, dstat)[arguments]: Use
'modify-phases' syntax.
* gnu/packages/algebra.scm (arb)[arguments]: Likewise.
* gnu/packages/apr.scm (apr-util)[arguments]: Likewise.
* gnu/packages/audio.scm (clalsadrv, fluidsynth, faad2, lv2-mda-piano,
lv2-mda-epiano, timidity++, vamp, soundtouch, portaudio, rsound,
zita-convolver, zita-alsa-pcmi)[arguments]: Likewise.
* gnu/packages/backup.scm (rdup, btar)[arguments]: Likewise.
* gnu/packages/bioinformatics.scm (bedops, bwa, crossmap, express,
flexbar, grit, hisat, ngs-sdk, subread)[arguments]: Likewise.
* gnu/packages/bittorrent.scm (transmission)[arguments]: Likewise.
* gnu/packages/cdrom.scm (cd-discid)[arguments]: Likewise.
* gnu/packages/compression.scm (sharutils)[arguments]: Likewise.
* gnu/packages/conky.scm (conky)[arguments]: Likewise.
* gnu/packages/databases.scm (bdb, bdb-5.3)[arguments]: Likewise.
* gnu/packages/debug.scm (delta, c-reduce)[arguments]: Likewise.
* gnu/packages/display-managers.scm (slim)[arguments]: Likewise.
* gnu/packages/dns.scm (dnsmasq)[arguments]: Likewise.
* gnu/packages/emacs.scm (geiser, emacs-wget, bbdb)[arguments]: Likewise.
* gnu/packages/engineering.scm (pcb)[arguments]: Likewise.
* gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Likewise.
* gnu/packages/flashing-tools.scm (flashrom)[arguments]: Likewise.
* gnu/packages/fltk.scm (fltk)[arguments]: Likewise.
* gnu/packages/freedesktop.scm (python-pyxdg)[arguments]: Likewise.
* gnu/packages/gd.scm (perl-gd)[arguments]: Likewise.
* gnu/packages/gkrellm.scm (gkrellm)[arguments]: Likewise.
* gnu/packages/glib.scm (glibmm)[arguments]: Likewise.
* gnu/packages/gl.scm (glew)[arguments]: Likewise.
* gnu/packages/gnome.scm (icon-naming-utils, orbit2, libbonobo, gnome-vfs,
libgnome, libbonoboui, goffice-0.8, dconf)[arguments]: Likewise.
* gnu/packages/gprolog.scm (gprolog)[arguments]: Likewise.
* gnu/packages/gps.scm (gpscorrelate)[arguments]: Likewise.
* gnu/packages/graphics.scm (agg)[arguments]: Likewise.
* gnu/packages/gtk.scm (ganv, girara, gtksourceview-2, guile-present,
python2-pycairo)[arguments]: Likewise.
* gnu/packages/guile.scm (guile-1.8)[arguments]: Likewise.
* gnu/packages/guile-wm.scm (guile-wm)[arguments]: Likewise.
* gnu/packages/hugs.scm (hugs)[arguments]: Likewise.
* gnu/packages/hurd.scm (gnumach-headers, hurd-headers, hurd-minimal)
[arguments]: Likewise.
* gnu/packages/image-viewers.scm (feh, sxiv)[arguments]: Likewise.
* gnu/packages/libcanberra.scm (libcanberra)[arguments]: Likewise.
* gnu/packages/linux.scm (bridge-utils, iw, fuse, unionfs-fuse/static,
lm-sensors, i2c-tools, xsensors, perf, mdadm, libaio, module-init-tools)
[arguments]: Likewise.
* gnu/packages/lisp.scm (ccl)[arguments]: Likewise.
* gnu/packages/lout.scm (lout)[arguments]: Likewise.
* gnu/packages/lua.scm (luajit)[arguments]: Likewise.
* gnu/packages/machine-learning.scm (shogun)[arguments]: Likewise.
* gnu/packages/mail.scm (exim)[arguments]: Likewise.
* gnu/packages/man.scm (man-pages, txt2man)[arguments]: Likewise.
* gnu/packages/maths.scm (lapack, superlu-dist, openlibm, openspecfun)
[arguments]: Likewise.
* gnu/packages/messaging.scm (bitlbee)[arguments]: Likewise.
* gnu/packages/mp3.scm (libmad, id3lib, mp3info)[arguments]: Likewise.
* gnu/packages/music.scm (solfege)[arguments]: Likewise.
* gnu/packages/noweb.scm (noweb)[arguments]: Likewise.
* gnu/packages/patchutils.scm (patchutils, quilt, colordiff)[arguments]:
Likewise.
* gnu/packages/pdf.scm (xpdf, zathura-cb, zathura-ps, zathura-djvu,
zathura-pdf-poppler, zathura, podofo, fbida)[arguments]: Likewise.
* gnu/packages/perl.scm (perl-file-list, perl-test-harness)[arguments]:
Likewise.
* gnu/packages/photo.scm (gphoto2)[arguments]: Likewise.
* gnu/packages/popt.scm (popt)[arguments]: Likewise.
* gnu/packages/pretty-print.scm (source-highlight, astyle)[arguments]:
Likewise.
* gnu/packages/pumpio.scm (pumpa)[arguments]: Likewise.
* gnu/packages/python.scm (python-passlib, python-pycrypto, python2-empy,
python-sqlalchemy, python-docopt)[arguments]: Likewise.
* gnu/packages/rdf.scm (lrdf)[arguments]: Likewise.
* gnu/packages/regex.scm (tre)[arguments]: Likewise.
* gnu/packages/rrdtool.scm (rrdtool)[arguments]: Likewise.
* gnu/packages/ruby.scm (ruby-2.1, ruby-1.8)[arguments]: Likewise.
* gnu/packages/sawfish.scm (sawfish)[arguments]: Likewise.
* gnu/packages/scheme.scm (racket)[arguments]: Likewise.
* gnu/packages/sdl.scm (guile-sdl)[arguments]: Likewise.
* gnu/packages/serveez.scm (serveez)[arguments]: Likewise.
* gnu/packages/skribilo.scm (skribilo)[arguments]: Likewise.
* gnu/packages/smalltalk.scm (smalltalk)[arguments]: Likewise.
* gnu/packages/suckless.scm (dmenu, slock)[arguments]: Likewise.
* gnu/packages/tcl.scm (expect)[arguments]: Likewise.
* gnu/packages/telephony.scm (commoncpp)[arguments]: Likewise.
* gnu/packages/textutils.scm (recode, libgtextutils)[arguments]:
Likewise.
* gnu/packages/time.scm (time)[arguments]: Likewise.
* gnu/packages/tor.scm (privoxy)[arguments]: Likewise.
* gnu/packages/uucp.scm (uucp)[arguments]: Likewise.
* gnu/packages/video.scm (libdvdnav-4)[arguments]: Likewise.
* gnu/packages/web-browsers.scm (lynx)[arguments]: Likewise.
* gnu/packages/web.scm (tinyproxy)[arguments]: Likewise.
* gnu/packages/wicd.scm (wicd)[arguments]: Likewise.
* gnu/packages/wm.scm (bspwm)[arguments]: Likewise.
* gnu/packages/xdisorg.scm (sxhkd, xcape)[arguments]: Likewise.
* gnu/packages/xfce.scm (xfconf)[arguments]: Likewise.
* gnu/packages/xfig.scm (transfig)[arguments]: Likewise.
* gnu/packages/xorg.scm (imake)[arguments]: Likewise.
2017-07-29 17:28:42 +02:00
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'patch-makefile-and-enter-directory
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "libs/Makefile"
|
|
|
|
|
(("ldconfig") "true")
|
|
|
|
|
(("^LIBDIR =.*") "LIBDIR = lib\n"))
|
|
|
|
|
(chdir "libs")
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'install-symlink
|
|
|
|
|
(lambda _
|
|
|
|
|
(symlink "libzita-alsa-pcmi.so"
|
|
|
|
|
(string-append (assoc-ref %outputs "out")
|
|
|
|
|
"/lib/libzita-alsa-pcmi.so.0"))))
|
|
|
|
|
;; no configure script
|
|
|
|
|
(delete 'configure))))
|
2015-02-21 21:52:10 +01:00
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("fftw" ,fftw)))
|
2018-01-16 02:00:16 +01:00
|
|
|
|
(home-page "https://kokkinizita.linuxaudio.org")
|
2015-02-21 21:52:10 +01:00
|
|
|
|
(synopsis "C++ wrapper around the ALSA API")
|
|
|
|
|
(description
|
|
|
|
|
"Zita-alsa-pcmi is a C++ wrapper around the ALSA API. It provides easy
|
|
|
|
|
access to ALSA PCM devices, taking care of the many functions required to
|
|
|
|
|
open, initialise and use a hw: device in mmap mode, and providing floating
|
|
|
|
|
point audio data.")
|
|
|
|
|
(license license:gpl3+)))
|
2015-12-28 06:22:34 +01:00
|
|
|
|
|
|
|
|
|
(define-public cuetools
|
|
|
|
|
(package
|
|
|
|
|
(name "cuetools")
|
|
|
|
|
(version "1.4.1")
|
|
|
|
|
(source (origin
|
2018-11-10 23:21:37 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/svend/cuetools.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2015-12-28 06:22:34 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 23:21:37 +01:00
|
|
|
|
"02ksv1ahf1v4cr2xbclsfv5x17m9ivzbssb5r8xjm97yh8a7spa3"))))
|
2015-12-28 06:22:34 +01:00
|
|
|
|
(build-system gnu-build-system)
|
2018-11-10 23:21:37 +01:00
|
|
|
|
;; The source checkout is not bootstrapped.
|
2015-12-28 06:22:34 +01:00
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("flex" ,flex)
|
|
|
|
|
("bison" ,bison)))
|
|
|
|
|
(synopsis "Cue and toc file parsers and utilities")
|
|
|
|
|
(description "Cuetools is a set of programs that are useful for manipulating
|
|
|
|
|
and using CUE sheet (cue) files and Table of Contents (toc) files. CUE and TOC
|
|
|
|
|
files are a way to represent the layout of a data or audio CD in a
|
|
|
|
|
machine-readable ASCII format.")
|
|
|
|
|
(home-page "https://github.com/svend/cuetools")
|
|
|
|
|
(license license:gpl2+)))
|
2015-12-28 06:22:54 +01:00
|
|
|
|
|
|
|
|
|
(define-public shntool
|
|
|
|
|
(package
|
|
|
|
|
(name "shntool")
|
|
|
|
|
(version "3.0.10")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "http://etree.org/shnutils/shntool/dist/src/"
|
|
|
|
|
"shntool-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"00i1rbjaaws3drkhiczaign3lnbhr161b7rbnjr8z83w8yn2wc3l"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(synopsis "WAVE audio data processing tool")
|
|
|
|
|
(description "shntool is a multi-purpose WAVE data processing and reporting
|
|
|
|
|
utility. File formats are abstracted from its core, so it can process any file
|
|
|
|
|
that contains WAVE data, compressed or not---provided there exists a format
|
2017-07-16 02:49:51 +02:00
|
|
|
|
module to handle that particular file type. It can also generate CUE files, and
|
|
|
|
|
use them split WAVE data into multiple files.")
|
2015-12-28 06:22:54 +01:00
|
|
|
|
(home-page "http://etree.org/shnutils/shntool/")
|
2016-02-16 03:30:53 +01:00
|
|
|
|
;; 'install-sh' bears the x11 license
|
|
|
|
|
(license (list license:gpl2+ license:x11))))
|
2016-03-01 16:04:14 +01:00
|
|
|
|
|
|
|
|
|
(define-public dcadec
|
|
|
|
|
(package
|
|
|
|
|
(name "dcadec")
|
|
|
|
|
(version "0.2.0")
|
|
|
|
|
(source (origin
|
2018-11-10 23:26:18 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/foo86/dcadec.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
|
|
|
|
(file-name (git-file-name name version))
|
2016-03-01 16:04:14 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 23:26:18 +01:00
|
|
|
|
"07nd0ajizrp1w02bsyfcv18431r8m8rq8gjfmz9wmckpg7cxj2hs"))))
|
2016-03-01 16:04:14 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
;; Test files are missing: https://github.com/foo86/dcadec/issues/53
|
|
|
|
|
'(#:tests? #f
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list "CC=gcc"
|
|
|
|
|
;; Build shared library.
|
|
|
|
|
"CONFIG_SHARED=1"
|
|
|
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out"))
|
|
|
|
|
;; Set proper runpath.
|
|
|
|
|
(string-append "LDFLAGS=-Wl,-rpath="
|
|
|
|
|
(assoc-ref %outputs "out")
|
|
|
|
|
"/lib"))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; No configure script, just a hand-written Makefile.
|
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(synopsis "DTS Coherent Acoustics decoder")
|
|
|
|
|
(description "Dcadec is a DTS Coherent Acoustics surround sound decoder
|
|
|
|
|
with support for HD extensions.")
|
|
|
|
|
(home-page "https://github.com/foo86/dcadec")
|
|
|
|
|
(license license:lgpl2.1+)))
|
2016-08-03 22:02:04 +02:00
|
|
|
|
|
|
|
|
|
(define-public bs1770gain
|
|
|
|
|
(package
|
|
|
|
|
(name "bs1770gain")
|
2018-10-22 16:37:36 +02:00
|
|
|
|
(version "0.5.1")
|
2016-08-03 22:02:04 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "mirror://sourceforge/bs1770gain/bs1770gain/"
|
|
|
|
|
version "/bs1770gain-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-10-22 16:37:36 +02:00
|
|
|
|
"0r4fbajgfmnwgl63hcm56f1j8m5f135q6j5jkzdvrrhpcj39yx06"))))
|
2016-08-03 22:02:04 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(inputs `(("ffmpeg" ,ffmpeg)
|
|
|
|
|
("sox" ,sox)))
|
|
|
|
|
(home-page "http://bs1770gain.sourceforge.net/")
|
|
|
|
|
(synopsis "Tool to adjust loudness of media files")
|
|
|
|
|
(description
|
|
|
|
|
"BS1770GAIN is a loudness scanner compliant with ITU-R BS.1770 and its
|
|
|
|
|
flavors EBU R128, ATSC A/85, and ReplayGain 2.0. It helps normalizing the
|
|
|
|
|
loudness of audio and video files to the same level.")
|
|
|
|
|
(license license:gpl2+)))
|
2016-09-09 03:02:30 +02:00
|
|
|
|
|
|
|
|
|
(define-public filteraudio
|
|
|
|
|
(let ((revision "1")
|
|
|
|
|
(commit "2fc669581e2a0ff87fba8de85861b49133306094"))
|
|
|
|
|
(package
|
|
|
|
|
(name "filteraudio")
|
|
|
|
|
(version (string-append "0.0.0-" revision "."
|
|
|
|
|
(string-take commit 7)))
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/irungentoo/filter_audio.git")
|
|
|
|
|
(commit commit)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0hbb290n3wb23f2k692a6bhc23nnqmxqi9sc9j15pnya8wifw64g"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:make-flags (list (string-append "PREFIX=" %output)
|
|
|
|
|
"CC=gcc")
|
|
|
|
|
#:tests? #f ; No tests
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
;; No configure script
|
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(synopsis "Lightweight audio filtering library")
|
|
|
|
|
(description "An easy to use audio filtering library made from webrtc
|
|
|
|
|
code, used in @code{libtoxcore}.")
|
|
|
|
|
(home-page "https://github.com/irungentoo/filter_audio")
|
|
|
|
|
(license license:bsd-3))))
|
2016-08-09 23:43:36 +02:00
|
|
|
|
|
|
|
|
|
(define-public gsm
|
|
|
|
|
(package
|
|
|
|
|
(name "gsm")
|
2018-05-18 02:04:17 +02:00
|
|
|
|
(version "1.0.18")
|
2016-08-09 23:43:36 +02:00
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri
|
|
|
|
|
(string-append "http://www.quut.com/" name "/" name
|
|
|
|
|
"-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-05-18 02:04:17 +02:00
|
|
|
|
"041amvpz8cvxykl3pwqldrzxligmmzcg8ncdnxbg32rlqf3q1xh4"))))
|
2016-08-09 23:43:36 +02:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:test-target "tst"
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-before 'install 'pre-install
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((out (assoc-ref %outputs "out")))
|
|
|
|
|
(substitute* "Makefile"
|
|
|
|
|
(("INSTALL_ROOT\t=")
|
|
|
|
|
(string-append "INSTALL_ROOT\t=\t" out)))
|
|
|
|
|
(mkdir-p (string-append out "/inc"))
|
|
|
|
|
(mkdir-p (string-append out "/man"))
|
|
|
|
|
(mkdir-p (string-append out "/man/man1"))
|
|
|
|
|
(mkdir-p (string-append out "/man/man3"))
|
|
|
|
|
(mkdir-p (string-append out "/bin"))
|
|
|
|
|
(mkdir-p (string-append out "/lib")))))
|
|
|
|
|
(add-after 'install 'post-install
|
|
|
|
|
(lambda _
|
|
|
|
|
(let ((out (assoc-ref %outputs "out")))
|
|
|
|
|
(rename-file (string-append out "/inc")
|
|
|
|
|
(string-append out "/include"))
|
|
|
|
|
(mkdir-p (string-append out "/include/gsm"))
|
|
|
|
|
(copy-recursively "inc"
|
|
|
|
|
(string-append out "/include/gsm")))))
|
2018-05-18 02:04:17 +02:00
|
|
|
|
(delete 'configure)))) ; no configure script
|
2016-08-09 23:43:36 +02:00
|
|
|
|
(synopsis "GSM 06.10 lossy speech compression library")
|
|
|
|
|
(description "This C library provides an encoder and a decoder for the GSM
|
|
|
|
|
06.10 RPE-LTP lossy speech compression algorithm.")
|
|
|
|
|
(home-page "http://quut.com/gsm/")
|
|
|
|
|
(license (license:non-copyleft "file://COPYRIGHT"))))
|
2017-08-18 16:51:28 +02:00
|
|
|
|
|
|
|
|
|
(define-public python-pyalsaaudio
|
|
|
|
|
(package
|
|
|
|
|
(name "python-pyalsaaudio")
|
|
|
|
|
(version "0.8.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (pypi-uri "pyalsaaudio" version))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1180ypn9596rq4b7y7dyv627j1q0fqilmkkrckclnzsdakdgis44"))))
|
|
|
|
|
(build-system python-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:tests? #f)) ; tests require access to ALSA devices.
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)))
|
|
|
|
|
(home-page "http://larsimmisch.github.io/pyalsaaudio/")
|
|
|
|
|
(synopsis "ALSA wrappers for Python")
|
|
|
|
|
(description
|
|
|
|
|
"This package contains wrappers for accessing the ALSA API from Python.
|
|
|
|
|
It is currently fairly complete for PCM devices, and has some support for
|
|
|
|
|
mixers.")
|
|
|
|
|
(license license:psfl)))
|
|
|
|
|
|
|
|
|
|
(define-public python2-pyalsaaudio
|
|
|
|
|
(package-with-python2 python-pyalsaaudio))
|
2017-10-03 05:13:05 +02:00
|
|
|
|
|
2017-12-04 12:41:27 +01:00
|
|
|
|
(define-public bluez-alsa
|
|
|
|
|
(package
|
|
|
|
|
(name "bluez-alsa")
|
|
|
|
|
(version "1.2.0")
|
|
|
|
|
(source (origin
|
|
|
|
|
;; The tarballs are mere snapshots and don't contain a
|
|
|
|
|
;; bootstrapped build system.
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/Arkq/bluez-alsa.git")
|
|
|
|
|
(commit (string-append "v" version))))
|
2017-12-04 21:25:27 +01:00
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
2017-12-04 12:41:27 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1qinf41wl2ihx54zmmhanycihwjkn7dn1cicq6pp4rqbiv79b95x"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)
|
|
|
|
|
("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("bluez" ,bluez)
|
|
|
|
|
("glib" ,glib)
|
|
|
|
|
("libbsd" ,libbsd)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("ortp" ,ortp)
|
|
|
|
|
("sbc" ,sbc)))
|
|
|
|
|
(home-page "https://github.com/Arkq/bluez-alsa")
|
|
|
|
|
(synopsis "Bluetooth ALSA backend")
|
|
|
|
|
(description "This project is a rebirth of a direct integration between
|
|
|
|
|
Bluez and ALSA. Since Bluez >= 5, the build-in integration has been removed
|
|
|
|
|
in favor of 3rd party audio applications. From now on, Bluez acts as a
|
|
|
|
|
middleware between an audio application, which implements Bluetooth audio
|
|
|
|
|
profile, and a Bluetooth audio device. BlueALSA registers all known Bluetooth
|
|
|
|
|
audio profiles in Bluez, so in theory every Bluetooth device (with audio
|
|
|
|
|
capabilities) can be connected. In order to access the audio stream, one has
|
|
|
|
|
to connect to the ALSA PCM device called @code{bluealsa}. The device is based
|
|
|
|
|
on the ALSA software PCM plugin.")
|
|
|
|
|
(license license:expat)))
|
|
|
|
|
|
2017-10-03 05:13:05 +02:00
|
|
|
|
(define-public snd
|
|
|
|
|
(package
|
|
|
|
|
(name "snd")
|
|
|
|
|
(version "17.7")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
(uri (string-append "ftp://ccrma-ftp.stanford.edu/pub/Lisp/"
|
|
|
|
|
"snd-" version ".tar.gz"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1vm0dy5qlycqkima7y5ajzvazyjybifa803fabjcpncjz08c26vp"))))
|
|
|
|
|
(build-system glib-or-gtk-build-system)
|
|
|
|
|
(arguments
|
2018-05-01 15:40:36 +02:00
|
|
|
|
`(#:tests? #f ; no tests
|
2017-10-03 05:13:05 +02:00
|
|
|
|
#:out-of-source? #f ; for the 'install-doc' phase
|
|
|
|
|
#:configure-flags
|
|
|
|
|
(let* ((out (assoc-ref %outputs "out"))
|
|
|
|
|
(docdir (string-append out "/share/doc/snd")))
|
|
|
|
|
(list "--with-alsa" "--with-jack" "--with-gmp"
|
|
|
|
|
(string-append "--with-doc-dir=" docdir)))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'install 'install-doc
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(let* ((out (assoc-ref outputs "out"))
|
2018-05-01 15:40:36 +02:00
|
|
|
|
(doc (string-append out "/share/doc/"
|
|
|
|
|
,name "-" ,version)))
|
2017-10-03 05:13:05 +02:00
|
|
|
|
(for-each
|
|
|
|
|
(lambda (f)
|
2018-05-01 15:40:36 +02:00
|
|
|
|
(install-file f doc))
|
2017-10-03 05:13:05 +02:00
|
|
|
|
(find-files "." "\\.html$|COPYING"))
|
2018-05-01 15:40:36 +02:00
|
|
|
|
(copy-recursively "pix" (string-append doc "/pix"))
|
2017-10-03 05:13:05 +02:00
|
|
|
|
#t))))))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("alsa-lib" ,alsa-lib)
|
|
|
|
|
("fftw" ,fftw)
|
|
|
|
|
("flac" ,flac)
|
|
|
|
|
("gmp" ,gmp)
|
|
|
|
|
("gsl" ,gsl)
|
|
|
|
|
("gtk+" ,gtk+)
|
|
|
|
|
("jack" ,jack-1)
|
|
|
|
|
("libsamplerate" ,libsamplerate)
|
|
|
|
|
("mpc" ,mpc)
|
|
|
|
|
("mpfr" ,mpfr)
|
|
|
|
|
("mpg123" ,mpg123)
|
|
|
|
|
("speex" ,speex)
|
|
|
|
|
("timidity++" ,timidity++)
|
|
|
|
|
("vorbis-tools" ,vorbis-tools)
|
|
|
|
|
("wavpack" ,wavpack)))
|
|
|
|
|
(synopsis "Sound editor")
|
|
|
|
|
(home-page "https://ccrma.stanford.edu/software/snd/")
|
|
|
|
|
(description
|
|
|
|
|
"Snd is a sound editor modelled loosely after Emacs. It can be
|
|
|
|
|
customized and extended using either the s7 Scheme implementation (included in
|
|
|
|
|
the Snd sources), Ruby, or Forth.")
|
|
|
|
|
(license (license:non-copyleft "file://COPYING"))))
|
2017-12-02 20:03:13 +01:00
|
|
|
|
|
2017-12-17 12:24:43 +01:00
|
|
|
|
(define-public noise-repellent
|
|
|
|
|
(package
|
|
|
|
|
(name "noise-repellent")
|
|
|
|
|
(version "0.1.4")
|
|
|
|
|
(source (origin
|
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/lucianodato/noise-repellent.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (string-append name "-" version "-checkout"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"0rd3dlmk3vivjmcr6x2x860y0j1d49c2j95j6ny50v184mwvn11j"))))
|
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:make-flags
|
|
|
|
|
(list "CC=gcc"
|
|
|
|
|
(string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
|
|
|
#:tests? #f ; there are none
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(delete 'configure))))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("lv2" ,lv2)
|
|
|
|
|
("fftwf" ,fftwf)))
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("pkg-config" ,pkg-config)))
|
|
|
|
|
(home-page "https://github.com/lucianodato/noise-repellent")
|
|
|
|
|
(synopsis "LV2 plugin for broadband noise reduction")
|
|
|
|
|
(description "Noise Repellent is an LV2 plugin to reduce noise. It has
|
|
|
|
|
the following features:
|
|
|
|
|
|
|
|
|
|
@enumerate
|
|
|
|
|
@item Spectral gating and spectral subtraction suppression rule
|
|
|
|
|
@item Adaptive and manual noise thresholds estimation
|
|
|
|
|
@item Adjustable noise floor
|
|
|
|
|
@item Adjustable offset of thresholds to perform over-subtraction
|
|
|
|
|
@item Time smoothing and a masking estimation to reduce artifacts
|
|
|
|
|
@item Basic onset detector to avoid transients suppression
|
|
|
|
|
@item Whitening of the noise floor to mask artifacts and to recover higher
|
|
|
|
|
frequencies
|
|
|
|
|
@item Option to listen to the residual signal
|
|
|
|
|
@item Soft bypass
|
|
|
|
|
@item Noise profile saved with the session
|
|
|
|
|
@end enumerate
|
|
|
|
|
")
|
|
|
|
|
(license license:lgpl3+)))
|
|
|
|
|
|
2017-12-02 20:03:13 +01:00
|
|
|
|
(define-public cli-visualizer
|
|
|
|
|
(package
|
|
|
|
|
(name "cli-visualizer")
|
|
|
|
|
(version "1.6")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
2018-11-10 23:27:03 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/dpayne/cli-visualizer.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2017-12-02 20:03:13 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 23:27:03 +01:00
|
|
|
|
"0mirp8bk398di5xyq95iprmdyvplfghxqmrfj7jdnpy554vx7ppc"))))
|
2017-12-02 20:03:13 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("which" ,which)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("fftw" ,fftw)
|
|
|
|
|
("googletest" ,googletest)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(arguments
|
|
|
|
|
'(#:test-target "test"
|
|
|
|
|
#:make-flags
|
|
|
|
|
(list (string-append "PREFIX=" %output "/bin/") "ENABLE_PULSE=1")
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
|
|
|
|
(add-after 'unpack 'remove-sudo
|
|
|
|
|
(lambda _
|
|
|
|
|
(substitute* "install.sh" (("sudo") ""))
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'check 'set-check-environment
|
|
|
|
|
(lambda _
|
|
|
|
|
(setenv "CXX" "g++")
|
|
|
|
|
(setenv "CC" "gcc")
|
|
|
|
|
#t))
|
|
|
|
|
(add-before 'install 'make-prefix
|
|
|
|
|
(lambda _
|
|
|
|
|
(mkdir-p (string-append (assoc-ref %outputs "out") "/bin"))
|
|
|
|
|
#t))
|
|
|
|
|
(add-after 'install 'data
|
|
|
|
|
(lambda _
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file
|
|
|
|
|
(string-append (assoc-ref %outputs "out")
|
|
|
|
|
"/share/doc")))
|
|
|
|
|
(find-files "examples"))
|
|
|
|
|
#t)))))
|
|
|
|
|
(home-page "https://github.com/dpayne/cli-visualizer/")
|
|
|
|
|
(synopsis "Command-line audio visualizer")
|
|
|
|
|
(description "@code{cli-visualizer} displays fast-Fourier
|
|
|
|
|
transforms (FFTs) of the sound being played, as well as other graphical
|
|
|
|
|
representations.")
|
|
|
|
|
(license license:expat)))
|
2018-01-25 20:42:53 +01:00
|
|
|
|
|
|
|
|
|
(define-public cava
|
|
|
|
|
(package
|
|
|
|
|
(name "cava")
|
2018-05-18 02:05:18 +02:00
|
|
|
|
(version "0.6.1")
|
2018-01-25 20:42:53 +01:00
|
|
|
|
(source (origin
|
2018-11-10 23:27:50 +01:00
|
|
|
|
(method git-fetch)
|
|
|
|
|
(uri (git-reference
|
|
|
|
|
(url "https://github.com/karlstav/cava.git")
|
|
|
|
|
(commit version)))
|
|
|
|
|
(file-name (git-file-name name version))
|
2018-01-25 20:42:53 +01:00
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
2018-11-10 23:27:50 +01:00
|
|
|
|
"1kvhqgijs29909w3sq9m0bslx2zxxn4b3i07kdz4hb0dqkppxpjy"))))
|
2018-01-25 20:42:53 +01:00
|
|
|
|
(build-system gnu-build-system)
|
|
|
|
|
(native-inputs
|
|
|
|
|
`(("autoconf" ,autoconf)
|
|
|
|
|
("automake" ,automake)
|
|
|
|
|
("libtool" ,libtool)))
|
|
|
|
|
(inputs
|
|
|
|
|
`(("fftw" ,fftw)
|
|
|
|
|
("ncurses" ,ncurses)
|
|
|
|
|
("pulseaudio" ,pulseaudio)))
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:configure-flags
|
|
|
|
|
(list (string-append "PREFIX=" %output)
|
|
|
|
|
(string-append "FONT_DIR=" %output "/usr/share/consolefonts"))
|
|
|
|
|
#:make-flags
|
|
|
|
|
(let ((lib (string-append %output "/lib")))
|
|
|
|
|
(list (string-append "cava_LDFLAGS = -L" lib " -Wl,-rpath " lib)))
|
|
|
|
|
#:phases
|
|
|
|
|
(modify-phases %standard-phases
|
2018-03-11 21:46:30 +01:00
|
|
|
|
(replace 'bootstrap
|
2018-01-25 20:42:53 +01:00
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(setenv "HOME" (getcwd))
|
|
|
|
|
(invoke "sh" "autogen.sh")))
|
|
|
|
|
(add-before 'build 'make-cava-ldflags
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(mkdir-p (string-append (assoc-ref outputs "out") "/lib"))))
|
|
|
|
|
(add-after 'install 'data
|
|
|
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
|
|
|
(for-each (lambda (file)
|
|
|
|
|
(install-file file
|
|
|
|
|
(string-append (assoc-ref outputs "out")
|
|
|
|
|
"/share/doc/examples")))
|
|
|
|
|
(find-files "example_files")))))))
|
|
|
|
|
(home-page "https://karlstav.github.io/cava/")
|
|
|
|
|
(synopsis "Console audio visualizer for ALSA, MPD, and PulseAudio")
|
|
|
|
|
(description "C.A.V.A. is a bar audio spectrum visualizer for the terminal
|
|
|
|
|
using ALSA, MPD, PulseAudio, or a FIFO buffer as its input.")
|
|
|
|
|
(license license:expat)))
|
2018-01-17 00:08:23 +01:00
|
|
|
|
|
|
|
|
|
(define-public fluid-3
|
|
|
|
|
(let ((commit "871c8ce2002e8b3c198f532fdb4fbcce7914f951"))
|
|
|
|
|
(package
|
|
|
|
|
(name "fluid-3")
|
|
|
|
|
(version "2.1")
|
|
|
|
|
(source
|
|
|
|
|
(origin
|
|
|
|
|
(method url-fetch)
|
|
|
|
|
;; Only one file is required, but the release bundles the whole
|
|
|
|
|
;; software which is 50MiB as tar and 200MiB unpacked. The website
|
|
|
|
|
;; directly links the soundfont release to the github file download.
|
|
|
|
|
(uri (string-append "https://github.com/musescore/MuseScore/raw/"
|
|
|
|
|
commit "/share/sound/FluidR3Mono_GM.sf3"))
|
|
|
|
|
(file-name (string-append name "-" version ".sf3"))
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"1hjfg5i15bw9279007xs92zsggjgn4s4k9pc00s851l3kvc6dkfg"))))
|
|
|
|
|
(build-system trivial-build-system)
|
|
|
|
|
(arguments
|
|
|
|
|
`(#:modules ((guix build utils))
|
|
|
|
|
#:builder
|
|
|
|
|
(begin
|
|
|
|
|
(use-modules (guix build utils))
|
|
|
|
|
(let ((file (assoc-ref %build-inputs "source"))
|
|
|
|
|
(out (string-append %output "/share/soundfonts")))
|
|
|
|
|
(mkdir-p out)
|
gnu: Use invoke and return #t from all builders.
* gnu/packages/admin.scm, gnu/packages/android.scm, gnu/packages/audio.scm,
gnu/packages/avr.scm, gnu/packages/base.scm, gnu/packages/bioinformatics.scm,
gnu/packages/certs.scm, gnu/packages/check.scm, gnu/packages/code.scm,
gnu/packages/commencement.scm, gnu/packages/dictionaries.scm,
gnu/packages/docbook.scm, gnu/packages/emacs.scm, gnu/packages/embedded.scm,
gnu/packages/fonts.scm, gnu/packages/games.scm, gnu/packages/gnome.scm,
gnu/packages/gnu-doc.scm, gnu/packages/guile.scm, gnu/packages/hurd.scm,
gnu/packages/javascript.scm, gnu/packages/libreoffice.scm,
gnu/packages/linux.scm, gnu/packages/lisp.scm, gnu/packages/lxde.scm,
gnu/packages/mail.scm, gnu/packages/markup.scm, gnu/packages/mate.scm,
gnu/packages/pkg-config.scm, gnu/packages/qt.scm, gnu/packages/rust.scm,
gnu/packages/scheme.scm, gnu/packages/sdl.scm, gnu/packages/statistics.scm,
gnu/packages/syncthing.scm, gnu/packages/tex.scm, gnu/packages/web.scm,
gnu/packages/wine.scm, gnu/packages/xfce.scm: In the builders of packages
using 'trivial-build-system', use invoke where appropriate, raise exceptions
on errors, and otherwise return #t.
2018-03-28 02:14:05 +02:00
|
|
|
|
(copy-file file (string-append out "/FluidR3Mono_GM.sf3"))
|
|
|
|
|
#t))))
|
2018-01-17 00:08:23 +01:00
|
|
|
|
(home-page "https://github.com/musescore/MuseScore/tree/master/share/sound")
|
|
|
|
|
(synopsis "Pro-quality GM soundfont")
|
|
|
|
|
(description "Fluid-3 is Frank Wen's pro-quality GM soundfont.")
|
|
|
|
|
(license license:expat))))
|