;;; Copyright © 2013 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
+;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
#:use-module (gnu packages autotools)
#:use-module (gnu packages base)
#:use-module (gnu packages gcc)
+ #:use-module (gnu packages boost)
#:use-module (gnu packages cdrom)
#:use-module (gnu packages compression)
#:use-module (gnu packages gettext)
#:use-module (gnu packages gtk)
#:use-module (gnu packages pcre)
#:use-module (gnu packages pkg-config)
+ #:use-module (gnu packages python)
#:use-module (gnu packages xiph)
#:use-module (gnu packages pulseaudio)
#:use-module (gnu packages linux) ;alsa-lib
+ #:use-module (gnu packages video) ;ffmpeg
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix build-system gnu)
+ #:use-module (guix build-system python)
#:use-module (guix build-system cmake))
(define-public libmad
(sha256
(base32
"14460zhacxhswnzb36qfpd1f2wbk10qvksvm6wyq5hpvdgnw7ymv"))
- (patches (map search-patch '("libmad-armv7-thumb-pt1.patch"
- "libmad-armv7-thumb-pt2.patch"
- "libmad-frame-length.patch"
- "libmad-mips-newgcc.patch")))))
+ (patches (search-patches "libmad-armv7-thumb-pt1.patch"
+ "libmad-armv7-thumb-pt2.patch"
+ "libmad-frame-length.patch"
+ "libmad-mips-newgcc.patch"))))
(build-system gnu-build-system)
(arguments
`(#:phases
(source (origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/id3lib/id3lib/"
- version "/id3lib-"
- version ".tar.gz"))
+ version "/id3lib-" version ".tar.gz"))
(sha256
(base32
- "0yfhqwk0w8q2hyv1jib1008jvzmwlpsxvc8qjllhna6p1hycqj97"))))
+ "0yfhqwk0w8q2hyv1jib1008jvzmwlpsxvc8qjllhna6p1hycqj97"))
+ (patches (search-patches "id3lib-CVE-2007-4460.patch"))))
(build-system gnu-build-system)
(arguments
`(#:phases
(source (origin
(method url-fetch)
(uri (string-append
- "ftp://ftp.ibiblio.org/pub/linux/apps/sound/mp3-utils/mp3info/mp3info-"
+ "http://ibiblio.org"
+ "/pub/linux/apps/sound/mp3-utils/mp3info/mp3info-"
version ".tgz"))
(sha256
(base32
(version "1.22.4")
(source (origin
(method url-fetch)
- (uri (string-append "mirror://sourceforge/mpg123/mpg123-"
- version ".tar.bz2"))
+ (uri (string-append "mirror://sourceforge/mpg123/mpg123/" version
+ "/mpg123-" version ".tar.bz2"))
(sha256
(base32
"1lj0xv0b6sgqsbhx10dg60cnzgz98i76gxy51kqh11hka0pf0sah"))))
(version "0.3.1")
(source (origin
(method url-fetch)
- (uri (string-append "mirror://sourceforge/mpg321/"
+ (uri (string-append "mirror://sourceforge/mpg321/mpg321/"
version "/mpg321-" version ".tar.gz"))
(sha256
(base32
(sha256
(base32
"1ss3c1a5hx6c99q1cryxg0jhbnbdj6ga9xyz0dzlz9qhzg5qswfs"))
- (patches
- (list (search-patch "ripperx-missing-file.patch")))))
+ (patches (search-patches "ripperx-missing-file.patch"))))
(build-system gnu-build-system)
(propagated-inputs
`(("gs-fonts" ,gs-fonts)
(version "0.2.4")
(source (origin
(method url-fetch)
- (uri (string-append "mirror://sourceforge/mpc123/version%20"
- version "/mpc123-" version ".tar.gz"))
+ (uri (list (string-append "mirror://sourceforge/mpc123/version%20"
+ version "/mpc123-" version ".tar.gz")
+ (string-append "mirror://debian/pool/main/m/" name
+ "/" name "_" version ".orig.tar.gz")))
(sha256
(base32
"0sf4pns0245009z6mbxpx7kqy4kwl69bc95wz9v23wgappsvxgy1"))
- (patches (list (search-patch "mpc123-initialize-ao.patch")))))
+ (patches (search-patches "mpc123-initialize-ao.patch"))))
(build-system gnu-build-system)
(arguments
- '(#:phases (alist-replace
- 'configure
- (lambda _
- (substitute* "Makefile"
- (("CC[[:blank:]]*:=.*")
- "CC := gcc\n")))
- (alist-replace
- 'install
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (bin (string-append out "/bin")))
- (mkdir-p bin)
- (install-file "mpc123" bin)))
- %standard-phases))
+ '(#:phases
+ (modify-phases %standard-phases
+ (replace 'configure
+ (lambda _
+ (substitute* "Makefile"
+ (("CC[[:blank:]]*:=.*")
+ "CC := gcc\n"))))
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (bin (string-append out "/bin")))
+ (mkdir-p bin)
+ (install-file "mpc123" bin)))))
#:tests? #f))
-
(native-inputs
`(("gettext" ,gnu-gettext)))
(inputs
`(("libao" ,ao)
("libmpcdec" ,libmpcdec)))
- (home-page "http://mpc123.sourceforge.net/")
+ (home-page "https://github.com/bucciarati/mpc123")
(synopsis "Audio player for Musepack-formatted files")
(description
"Mpc123 is a command-line player for files in the Musepack audio
compression format (.mpc files).")
(license license:gpl2+)))
+
+(define-public eyed3
+ (package
+ (name "eyed3")
+ (version "0.7.9")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append
+ "http://eyed3.nicfit.net/releases/eyeD3-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "08mzhqg3k63d244cgwd0y1xrb8x9m6b99ykyskpnwyxl4wxrgrzp"))))
+ (build-system python-build-system)
+ (arguments
+ `(#:python ,python-2))
+ (native-inputs
+ `(("python2-setuptools" ,python2-setuptools)
+ ("python2-nose" ,python2-nose)
+ ("python2-sphinx" ,python2-sphinx)
+ ("python2-coverage" ,python2-coverage)))
+ (synopsis "MP3 tag ID3 metadata editor")
+ (description "eyeD3 is a Python tool for working with audio files,
+specifically mp3 files containing ID3 metadata (i.e. song info). It provides a
+command-line tool (eyeD3) and a Python library (import eyed3) that can be used
+to write your own applications or plugins that are callable from the
+command-line tool.")
+ (home-page "http://eyed3.nicfit.net/")
+ (license license:gpl2+)))
+
+(define-public chromaprint
+ (package
+ (name "chromaprint")
+ (version "1.3.2")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append
+ "https://bitbucket.org/acoustid/chromaprint/downloads/"
+ "chromaprint-" version ".tar.gz"))
+ (sha256
+ (base32 "0lln8dh33gslb9cbmd1hcv33pr6jxdwipd8m8gbsyhksiq6r1by3"))))
+ (build-system cmake-build-system)
+ (arguments
+ `(#:tests? #f ; tests require googletest *sources*
+ ;;#:configure-flags '("-DBUILD_TESTS=ON") ; for building the tests
+ #:test-target "check"))
+ (inputs
+ ;; requires one of FFmpeg (prefered), FFTW3 or vDSP
+ ;; use the same ffmpeg version as for acoustid-fingerprinter
+ `(("ffmpeg" ,ffmpeg)
+ ("boots" ,boost)))
+ (home-page "https://acoustid.org/chromaprint")
+ (synopsis "Audio fingerprinting library")
+ (description "Chromaprint is a library for calculating audio
+fingerprints which are used by the Acoustid service. Its main purpose
+is to provide an accurate identifier for record tracks.")
+ (license license:lgpl2.1+)))