From mboxrd@z Thu Jan 1 00:00:00 1970 From: ng0 Subject: [PATCH] gnu: Add alsa-plugins. Date: Sat, 29 Oct 2016 14:43:31 +0000 Message-ID: <20161029144331.29451-2-ng0@we.make.ritual.n0.is> References: <20161029144331.29451-1-ng0@we.make.ritual.n0.is> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:47999) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1c0UrJ-0005Hk-Oc for guix-devel@gnu.org; Sat, 29 Oct 2016 10:43:47 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1c0UrI-0003o0-6q for guix-devel@gnu.org; Sat, 29 Oct 2016 10:43:45 -0400 Received: from aibo.runbox.com ([91.220.196.211]:42984) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1c0UrH-0003nq-W8 for guix-devel@gnu.org; Sat, 29 Oct 2016 10:43:44 -0400 Received: from [10.9.9.210] (helo=mailfront10.runbox.com) by bars.runbox.com with esmtp (Exim 4.71) (envelope-from ) id 1c0UrH-0003V5-02 for guix-devel@gnu.org; Sat, 29 Oct 2016 16:43:43 +0200 In-Reply-To: <20161029144331.29451-1-ng0@we.make.ritual.n0.is> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org * gnu/packages/linux.scm (alsa-plugins): New variable. --- gnu/packages/linux.scm | 79 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 79 insertions(+) diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 934a67f..2448250 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -15,6 +15,7 @@ ;;; Copyright © 2016 Ricardo Wurmus ;;; Copyright © 2016 David Craven ;;; Copyright © 2016 John Darrington +;;; Copyright © 2016 ng0 ;;; ;;; This file is part of GNU Guix. ;;; @@ -69,6 +70,8 @@ #:use-module (gnu packages slang) #:use-module (gnu packages texinfo) #:use-module (gnu packages tls) + #:use-module (gnu packages video) + #:use-module (gnu packages xiph) #:use-module (gnu packages xml) #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) @@ -867,6 +870,82 @@ MIDI functionality to the Linux-based operating system.") ;; GPLv2-only. (license license:gpl2))) +(define-public alsa-plugins + (package + (name "alsa-plugins") + (version "1.1.1") + (source (origin + (method url-fetch) + (uri (string-append "ftp://ftp.alsa-project.org/pub/plugins/" + name "-" version ".tar.bz2")) + (sha256 + (base32 + "1w81z5jlwqhd1l2m7qrq69lc4k9dnrg1wn52jsl2hrf3hbhd394f")))) + (build-system gnu-build-system) + ;; TODO: Split libavcodec and speex if possible. It looks like they can not + ;; be split, there are references to both in files. + (outputs '("out" "pulseaudio")) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-after 'install 'split + (lambda* (#:key inputs outputs #:allow-other-keys) + ;; Split the binaries to the various outputs. + (let* ((out (assoc-ref outputs "out")) + (pua (assoc-ref outputs "pulseaudio"))) + (mkdir-p (string-append pua "/share/alsa/alsa.conf.d/")) + (mkdir-p (string-append pua "/lib/alsa-lib")) + (rename-file (string-append out "/share/alsa/alsa.conf.d/" + "50-pulseaudio.conf") + (string-append pua "/share/alsa/alsa.conf.d/" + "50-pulseaudio.conf")) + (rename-file (string-append out "/share/alsa/alsa.conf.d/" + "99-pulseaudio-default.conf.example") + (string-append pua "/share/alsa/alsa.conf.d/" + "99-pulseaudio-default.conf.example")) + (rename-file (string-append out "/lib/alsa-lib/" + "libasound_module_conf_pulse.la") + (string-append pua "/lib/alsa-lib/" + "libasound_module_conf_pulse.la")) + (rename-file (string-append out "/lib/alsa-lib/" + "libasound_module_conf_pulse.so") + (string-append pua "/lib/alsa-lib/" + "libasound_module_conf_pulse.so")) + (rename-file (string-append out "/lib/alsa-lib/" + "libasound_module_ctl_pulse.la") + (string-append pua "/lib/alsa-lib/" + "libasound_module_ctl_pulse.la")) + (rename-file (string-append out "/lib/alsa-lib/" + "libasound_module_ctl_pulse.so") + (string-append pua "/lib/alsa-lib/" + "libasound_module_ctl_pulse.so")) + (rename-file (string-append out "/lib/alsa-lib/" + "libasound_module_pcm_pulse.la") + (string-append pua "/lib/alsa-lib/" + "libasound_module_pcm_pulse.la")) + (rename-file (string-append out "/lib/alsa-lib/" + "libasound_module_pcm_pulse.so") + (string-append pua "/lib/alsa-lib/" + "libasound_module_pcm_pulse.so")) + (delete-file-recursively (string-append out "/share")))))))) + (inputs + `(("alsa-lib" ,alsa-lib) + ("speex" ,speex) ; libspeexdsp resampling plugin + ("libsamplerate" ,libsamplerate) ; libsamplerate resampling plugin + ("ffmpeg" ,ffmpeg) ; libavcodec resampling plugin, a52 plugin + ("pulseaudio" ,pulseaudio))) ; PulseAudio plugin + (native-inputs + `(("pkg-config" ,pkg-config))) + (home-page "http://www.alsa-project.org/") + (synopsis "Utilities for the Advanced Linux Sound Architecture (ALSA)") + (description + "The Advanced Linux Sound Architecture (ALSA) provides audio and +MIDI functionality to the Linux-based operating system. This package provides +additional plugins.") + (license (list license:gpl2+ + ;; `rate/rate_samplerate.c': LGPL v2.1 or later. + license:lgpl2.1+)))) + (define-public iptables (package (name "iptables") -- 2.10.1