[jackhill/guix/guix.git] / gnu / packages / mpd.scm

;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014, 2015 David Thompson <dthompson2@worcester.edu>
;;; Copyright © 2014 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2014 Cyrill Schenkel <cyrill.schenkel@gmail.com>
;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org>
;;; Copyright © 2016, 2018 Leo Famulari <leo@famulari.name>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; 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 mpd)
  #:use-module (gnu packages)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix utils)
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system meson)
  #:use-module (guix build-system python)
  #:use-module (gnu packages avahi)
  #:use-module (gnu packages boost)
  #:use-module (gnu packages gettext)
  #:use-module (gnu packages gnome)
  #:use-module (gnu packages gtk)
  #:use-module (gnu packages icu4c)
  #:use-module (gnu packages readline)
  #:use-module (gnu packages check)
  #:use-module (gnu packages compression)
  #:use-module (gnu packages curl)
  #:use-module (gnu packages documentation)
  #:use-module (gnu packages glib)
  #:use-module (gnu packages linux)
  #:use-module (gnu packages mp3)
  #:use-module (gnu packages ncurses)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages python)
  #:use-module (gnu packages pulseaudio)
  #:use-module (gnu packages databases)
  #:use-module (gnu packages video)
  #:use-module (gnu packages xiph))

(define-public libmpdclient
  (package
    (name "libmpdclient")
    (version "2.14")
    (source (origin
              (method url-fetch)
              (uri
               (string-append "https://musicpd.org/download/libmpdclient/"
                              (car (string-split version #\.))
                              "/libmpdclient-" version ".tar.xz"))
              (sha256
               (base32
                "0whk0qw0lsd3kaimdznz0c45bfym0p4885zf4b7pfc7y3dwy510a"))))
    (build-system meson-build-system)
    (native-inputs
     `(("pkg-config" ,pkg-config)

       ;; For building HTML documentation.
       ("doxygen" ,doxygen)

       ;; For tests.
       ("check" ,check)))
    (arguments
     `(#:configure-flags
       (list "-Ddocumentation=true"
             "-Dtest=true")))
    (synopsis "Music Player Daemon client library")
    (description "A stable, documented, asynchronous API library for
interfacing MPD in the C, C++ & Objective C languages.")
    (home-page "https://www.musicpd.org/libs/libmpdclient/")
    (license license:bsd-3)))

(define-public mpd
  (package
    (name "mpd")
    (version "0.20.21")
    (source (origin
              (method url-fetch)
              (uri
               (string-append "https://musicpd.org/download/mpd/"
                              (version-major+minor version)
                              "/mpd-" version ".tar.xz"))
              (sha256
               (base32
                "1p2qrhdb1gzfv3y5dvvbc9s2wwmhg3azvzf8r02hzhk5q96pc8l3"))))
    (build-system gnu-build-system)
    (arguments
     `(#:phases
       (modify-phases %standard-phases
         (add-after 'install 'install-service-files
           (lambda* (#:key outputs #:allow-other-keys)
             (let* ((out (assoc-ref outputs "out"))
                    (systemd (string-append out "/etc/systemd/system"))
                    (systemd-user (string-append out "/etc/systemd/user")))
               (install-file "systemd/system/mpd.service" systemd)
               (install-file "systemd/user/mpd.service" systemd-user)
               #t))))))
    (inputs `(("ao" ,ao)
              ("alsa-lib" ,alsa-lib)
              ("avahi" ,avahi)
              ("boost" ,boost)
              ("curl" ,curl)
              ("ffmpeg" ,ffmpeg)
              ("flac" ,flac)
              ("glib" ,glib)
              ("icu4c" ,icu4c)
              ;; The LAME decoder comes from FFmpeg, but is added here so that
              ;; configure picks up the LAME encoder.
              ("lame" ,lame)
              ("libid3tag" ,libid3tag)
              ("libmpdclient" ,libmpdclient)
              ("libsamplerate" ,libsamplerate)
              ("libsndfile" ,libsndfile)
              ("libvorbis" ,libvorbis)
              ("opus" ,opus)
              ("pulseaudio" ,pulseaudio)
              ("sqlite" ,sqlite)
              ("zlib" ,zlib)))
    (native-inputs `(("pkg-config" ,pkg-config)))
    ;; Missing optional inputs:
    ;;   libyajl
    ;;   libcdio_paranoia
    ;;   libmms
    ;;   libadplug
    ;;   libaudiofile
    ;;   faad2
    ;;   fluidsynth
    ;;   libgme
    ;;   libshout
    ;;   libmpg123
    ;;   libmodplug
    ;;   libmpcdec
    ;;   libsidplay2
    ;;   libwavpack
    ;;   libwildmidi
    ;;   libtwolame
    ;;   libroar
    ;;   libjack
    ;;   OpenAL
    (synopsis "Music Player Daemon")
    (description "Music Player Daemon (MPD) is a flexible, powerful,
server-side application for playing music.  Through plugins and libraries it
can play a variety of sound files while being controlled by its network
protocol.")
    (home-page "https://www.musicpd.org/")
    (license license:gpl2)))

(define-public mpd-mpc
  (package
    (name "mpd-mpc")
    (version "0.30")
    (source (origin
              (method url-fetch)
              (uri
               (string-append "https://www.musicpd.org/download/mpc/"
                              (car (string-split version #\.))
                              "/mpc-" version ".tar.xz"))
              (sha256
               (base32
                "1kkzhrypkp0v6xv4d6db415pd0h6jqki29kfpsnfkvrhhh55pz35"))))
    (build-system meson-build-system)
    (inputs `(("libmpdclient" ,libmpdclient)))
    (native-inputs `(("pkg-config" ,pkg-config)))
    (synopsis "Music Player Daemon client")
    (description "MPC is a minimalist command line interface to MPD, the music
player daemon.")
    (home-page "https://www.musicpd.org/clients/mpc/")
    (license license:gpl2)))

(define-public ncmpc
  (package
    (name "ncmpc")
    (version "0.27")
    (source (origin
              (method url-fetch)
              (uri
               (string-append "http://musicpd.org/download/ncmpc/"
                              (car (string-split version #\.))
                              "/ncmpc-" version ".tar.xz"))
              (sha256
               (base32
                "1n8m7syhpgx24hfipixv66h2izn229jkxsmh2q5dzkv9r0znm8pr"))))
    (build-system gnu-build-system)
    (inputs `(("glib" ,glib)
              ("libmpdclient" ,libmpdclient)
              ("ncurses" ,ncurses)))
    (native-inputs `(("pkg-config" ,pkg-config)))
    (synopsis "Curses Music Player Daemon client")
    (description "ncmpc is a fully featured MPD client, which runs in a
terminal using ncurses.")
    (home-page "https://www.musicpd.org/clients/ncmpc/")
    (license license:gpl2)))

(define-public ncmpcpp
  (package
    (name "ncmpcpp")
    (version "0.8.2")
    (source (origin
              (method url-fetch)
              (uri
               (string-append "https://ncmpcpp.rybczak.net/stable/ncmpcpp-"
                              version ".tar.bz2"))
              (sha256
               (base32
                "0m0mjb049sl62vx13h9waavysa30mk0rphacksnvf94n13la62v5"))))
    (build-system gnu-build-system)
    (inputs `(("libmpdclient" ,libmpdclient)
              ("boost"  ,boost)
              ("readline" ,readline)
              ("ncurses" ,ncurses)
              ("taglib" ,taglib)
              ("icu4c" ,icu4c)
              ("curl" ,curl)))
    (native-inputs
     `(("pkg-config" ,pkg-config)))
    (arguments
     '(#:configure-flags
       '("BOOST_LIB_SUFFIX=" "--with-taglib")))
    (synopsis "Featureful ncurses based MPD client inspired by ncmpc")
    (description "Ncmpcpp is an mpd client with a UI very similar to ncmpc,
but it provides new useful features such as support for regular expressions
for library searches, extended song format, items filtering, the ability to
sort playlists, and a local file system browser.")
    (home-page "https://ncmpcpp.rybczak.net/")
    (license license:gpl2+)))

(define-public mpdscribble
  (package
    (name "mpdscribble")
    (version "0.22")
    (source (origin
              (method url-fetch)
              (uri (string-append "http://www.musicpd.org/download/mpdscribble/"
                                  version "/mpdscribble-" version ".tar.gz"))
              (sha256
               (base32
                "0f0ybx380x2z2g1qvdndpvcrhkrgsfqckhz3ryydq2w3pl12v27z"))))
    (build-system gnu-build-system)
    (inputs `(("libmpdclient" ,libmpdclient)
              ("curl" ,curl)
              ("glib" ,glib)))
    (native-inputs `(("pkg-config" ,pkg-config)))
    (synopsis "MPD client for track scrobbling")
    (description "mpdscribble is a Music Player Daemon client which submits
information about tracks being played to a scrobbler, such as Libre.FM.")
    (home-page "https://www.musicpd.org/clients/mpdscribble/")
    (license license:gpl2+)))

(define-public python-mpd2
  (package
    (name "python-mpd2")
    (version "0.5.5")
    (source (origin
              (method url-fetch)
              (uri (pypi-uri "python-mpd2" version))
              (sha256
               (base32
                "0laypd7h1j14b4vrmiayqlzdsh2j5hc3zv4l0fqvbrbw9y6763ii"))))
    (build-system python-build-system)
    (arguments
     '(#:phases
       (modify-phases %standard-phases
         (replace 'check
           (lambda _ (invoke "python" "mpd_test.py"))))))
    (native-inputs `(("python-mock" ,python-mock)))
    (home-page "https://github.com/Mic92/python-mpd2")
    (synopsis "Python MPD client library")
    (description "Python-mpd2 is a Python library which provides a client
interface for the Music Player Daemon.")
    (license license:lgpl3+)))

(define-public python2-mpd2
  (package-with-python2 python-mpd2))

(define-public sonata
  (package
    (name "sonata")
    (version "1.7b1")
    (source (origin
              (method url-fetch)
              (uri
               (string-append "https://github.com/multani/sonata/archive/v"
                              version ".tar.gz"))
              (file-name (string-append name "-" version ".tar.gz"))
              (sha256
               (base32
                "07gq2nxqwxs0qyxjbay7k5j25zd386bn7wdr2dl1gk53diwnn7s0"))))
    (build-system python-build-system)
    (arguments
     `(#:modules ((guix build gnu-build-system)
                  (guix build python-build-system)
                  ((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
                  (guix build utils))
       #:imported-modules (,@%gnu-build-system-modules
                           (guix build python-build-system)
                           (guix build glib-or-gtk-build-system))
       #:phases
       (modify-phases %standard-phases
         (add-after 'install 'glib-or-gtk-wrap
           (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))
         (add-after 'install 'wrap-sonata
           (lambda* (#:key outputs #:allow-other-keys)
             (let ((out               (assoc-ref outputs "out"))
                   (gi-typelib-path   (getenv "GI_TYPELIB_PATH")))
               (wrap-program (string-append out "/bin/sonata")
                 `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path))))
             #t)))))
    (native-inputs
     `(("gettext" ,gettext-minimal)))
    (inputs
     `(("python-mpd2" ,python-mpd2)
       ("gtk+" ,gtk+)
       ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
       ("gobject-introspection" ,gobject-introspection)
       ("adwaita-icon-theme" ,adwaita-icon-theme)
       ("python-pygobject" ,python-pygobject)))
    (synopsis "Elegant client for the Music Player Daemon")
    (description "Sonata is an elegant graphical client for the Music Player
Daemon (MPD).  It supports playlists, multiple profiles (connecting to different
MPD servers, search and multimedia key support.")
    (home-page "https://www.nongnu.org/sonata/")
    (license license:gpl3+)))
Commit	Line	Data
892d8a81	1	;;; GNU Guix --- Functional package management for GNU
927ff2c3	2	;;; Copyright © 2014, 2015 David Thompson <dthompson2@worcester.edu>
b0193286	3	;;; Copyright © 2014 Andreas Enge <andreas@enge.fr>
009c5b5c	4	;;; Copyright © 2014 Cyrill Schenkel <cyrill.schenkel@gmail.com>
29a7c98a	5	;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
e42dc624	6	;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org>
c59ea46f	7	;;; Copyright © 2016, 2018 Leo Famulari <leo@famulari.name>
7da9e792	8	;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
892d8a81 DT	9	;;;
	10	;;; This file is part of GNU Guix.
	11	;;;
	12	;;; GNU Guix is free software; you can redistribute it and/or modify it
	13	;;; under the terms of the GNU General Public License as published by
	14	;;; the Free Software Foundation; either version 3 of the License, or (at
	15	;;; your option) any later version.
	16	;;;
	17	;;; GNU Guix is distributed in the hope that it will be useful, but
	18	;;; WITHOUT ANY WARRANTY; without even the implied warranty of
	19	;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	20	;;; GNU General Public License for more details.
	21	;;;
	22	;;; You should have received a copy of the GNU General Public License
	23	;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
	24
	25	(define-module (gnu packages mpd)
	26	#:use-module (gnu packages)
7dc68701	27	#:use-module ((guix licenses) #:prefix license:)
892d8a81 DT	28	#:use-module (guix packages)
892d8a81 DT	29	#:use-module (guix download)
29a7c98a	30	#:use-module (guix utils)
892d8a81	31	#:use-module (guix build-system gnu)
7da9e792	32	#:use-module (guix build-system meson)
efe0b143	33	#:use-module (guix build-system python)
7dc68701	34	#:use-module (gnu packages avahi)
e42dc624	35	#:use-module (gnu packages boost)
6c86cef5 CB	36	#:use-module (gnu packages gettext)
	37	#:use-module (gnu packages gnome)
	38	#:use-module (gnu packages gtk)
58acabc3	39	#:use-module (gnu packages icu4c)
e42dc624	40	#:use-module (gnu packages readline)
ac257f12	41	#:use-module (gnu packages check)
7dc68701 DT	42	#:use-module (gnu packages compression)
7dc68701 DT	43	#:use-module (gnu packages curl)
99828fa7	44	#:use-module (gnu packages documentation)
7dc68701 DT	45	#:use-module (gnu packages glib)
	46	#:use-module (gnu packages linux)
	47	#:use-module (gnu packages mp3)
4d01bd3c	48	#:use-module (gnu packages ncurses)
7dc68701	49	#:use-module (gnu packages pkg-config)
efe0b143	50	#:use-module (gnu packages python)
7dc68701	51	#:use-module (gnu packages pulseaudio)
5f96f303	52	#:use-module (gnu packages databases)
7dc68701	53	#:use-module (gnu packages video)
654b27e5	54	#:use-module (gnu packages xiph))
892d8a81	55
654b27e5	56	(define-public libmpdclient
892d8a81 DT	57	(package
892d8a81 DT	58	(name "libmpdclient")
c59ea46f	59	(version "2.14")
892d8a81 DT	60	(source (origin
	61	(method url-fetch)
	62	(uri
c59ea46f	63	(string-append "https://musicpd.org/download/libmpdclient/"
892d8a81	64	(car (string-split version #\.))
a53a925f	65	"/libmpdclient-" version ".tar.xz"))
892d8a81 DT	66	(sha256
892d8a81 DT	67	(base32
c59ea46f	68	"0whk0qw0lsd3kaimdznz0c45bfym0p4885zf4b7pfc7y3dwy510a"))))
7da9e792 TGR	69	(build-system meson-build-system)
	70	(native-inputs
	71	`(("pkg-config" ,pkg-config)
	72
	73	;; For building HTML documentation.
	74	("doxygen" ,doxygen)
	75
	76	;; For tests.
	77	("check" ,check)))
	78	(arguments
	79	`(#:configure-flags
	80	(list "-Ddocumentation=true"
	81	"-Dtest=true")))
892d8a81 DT	82	(synopsis "Music Player Daemon client library")
	83	(description "A stable, documented, asynchronous API library for
	84	interfacing MPD in the C, C++ & Objective C languages.")
e9aa6b5e	85	(home-page "https://www.musicpd.org/libs/libmpdclient/")
7dc68701 DT	86	(license license:bsd-3)))
7dc68701 DT	87
654b27e5	88	(define-public mpd
7dc68701 DT	89	(package
7dc68701 DT	90	(name "mpd")
567f0235	91	(version "0.20.21")
7dc68701 DT	92	(source (origin
	93	(method url-fetch)
	94	(uri
943100f6	95	(string-append "https://musicpd.org/download/mpd/"
29a7c98a	96	(version-major+minor version)
58acabc3	97	"/mpd-" version ".tar.xz"))
7dc68701 DT	98	(sha256
7dc68701 DT	99	(base32
567f0235	100	"1p2qrhdb1gzfv3y5dvvbc9s2wwmhg3azvzf8r02hzhk5q96pc8l3"))))
7dc68701	101	(build-system gnu-build-system)
87b52095 LF	102	(arguments
	103	`(#:phases
	104	(modify-phases %standard-phases
	105	(add-after 'install 'install-service-files
	106	(lambda* (#:key outputs #:allow-other-keys)
	107	(let* ((out (assoc-ref outputs "out"))
	108	(systemd (string-append out "/etc/systemd/system"))
	109	(systemd-user (string-append out "/etc/systemd/user")))
	110	(install-file "systemd/system/mpd.service" systemd)
	111	(install-file "systemd/user/mpd.service" systemd-user)
	112	#t))))))
7dc68701 DT	113	(inputs `(("ao" ,ao)
	114	("alsa-lib" ,alsa-lib)
	115	("avahi" ,avahi)
58acabc3	116	("boost" ,boost)
7dc68701 DT	117	("curl" ,curl)
	118	("ffmpeg" ,ffmpeg)
	119	("flac" ,flac)
	120	("glib" ,glib)
58acabc3	121	("icu4c" ,icu4c)
241caa62 LF	122	;; The LAME decoder comes from FFmpeg, but is added here so that
241caa62 LF	123	;; configure picks up the LAME encoder.
7dc68701 DT	124	("lame" ,lame)
7dc68701 DT	125	("libid3tag" ,libid3tag)
7dc68701 DT	126	("libmpdclient" ,libmpdclient)
	127	("libsamplerate" ,libsamplerate)
	128	("libsndfile" ,libsndfile)
	129	("libvorbis" ,libvorbis)
	130	("opus" ,opus)
7dc68701 DT	131	("pulseaudio" ,pulseaudio)
	132	("sqlite" ,sqlite)
	133	("zlib" ,zlib)))
7641266b	134	(native-inputs `(("pkg-config" ,pkg-config)))
7dc68701 DT	135	;; Missing optional inputs:
	136	;; libyajl
	137	;; libcdio_paranoia
	138	;; libmms
	139	;; libadplug
	140	;; libaudiofile
	141	;; faad2
	142	;; fluidsynth
	143	;; libgme
	144	;; libshout
	145	;; libmpg123
	146	;; libmodplug
	147	;; libmpcdec
	148	;; libsidplay2
	149	;; libwavpack
	150	;; libwildmidi
	151	;; libtwolame
	152	;; libroar
	153	;; libjack
	154	;; OpenAL
	155	(synopsis "Music Player Daemon")
	156	(description "Music Player Daemon (MPD) is a flexible, powerful,
	157	server-side application for playing music. Through plugins and libraries it
	158	can play a variety of sound files while being controlled by its network
	159	protocol.")
e9aa6b5e	160	(home-page "https://www.musicpd.org/")
7dc68701	161	(license license:gpl2)))
4d01bd3c	162
654b27e5	163	(define-public mpd-mpc
773b2792 PW	164	(package
773b2792 PW	165	(name "mpd-mpc")
021469bc	166	(version "0.30")
773b2792 PW	167	(source (origin
	168	(method url-fetch)
	169	(uri
62d14d24	170	(string-append "https://www.musicpd.org/download/mpc/"
773b2792 PW	171	(car (string-split version #\.))
	172	"/mpc-" version ".tar.xz"))
	173	(sha256
	174	(base32
021469bc	175	"1kkzhrypkp0v6xv4d6db415pd0h6jqki29kfpsnfkvrhhh55pz35"))))
62d14d24	176	(build-system meson-build-system)
773b2792 PW	177	(inputs `(("libmpdclient" ,libmpdclient)))
	178	(native-inputs `(("pkg-config" ,pkg-config)))
	179	(synopsis "Music Player Daemon client")
	180	(description "MPC is a minimalist command line interface to MPD, the music
	181	player daemon.")
e9aa6b5e	182	(home-page "https://www.musicpd.org/clients/mpc/")
773b2792 PW	183	(license license:gpl2)))
773b2792 PW	184
654b27e5	185	(define-public ncmpc
4d01bd3c DT	186	(package
4d01bd3c DT	187	(name "ncmpc")
2f64f444	188	(version "0.27")
4d01bd3c DT	189	(source (origin
	190	(method url-fetch)
	191	(uri
	192	(string-append "http://musicpd.org/download/ncmpc/"
	193	(car (string-split version #\.))
3efee6a4	194	"/ncmpc-" version ".tar.xz"))
4d01bd3c DT	195	(sha256
4d01bd3c DT	196	(base32
2f64f444	197	"1n8m7syhpgx24hfipixv66h2izn229jkxsmh2q5dzkv9r0znm8pr"))))
4d01bd3c DT	198	(build-system gnu-build-system)
	199	(inputs `(("glib" ,glib)
	200	("libmpdclient" ,libmpdclient)
	201	("ncurses" ,ncurses)))
	202	(native-inputs `(("pkg-config" ,pkg-config)))
9e771e3b	203	(synopsis "Curses Music Player Daemon client")
4d01bd3c DT	204	(description "ncmpc is a fully featured MPD client, which runs in a
4d01bd3c DT	205	terminal using ncurses.")
e9aa6b5e	206	(home-page "https://www.musicpd.org/clients/ncmpc/")
4d01bd3c	207	(license license:gpl2)))
009c5b5c	208
654b27e5	209	(define-public ncmpcpp
009c5b5c CS	210	(package
009c5b5c CS	211	(name "ncmpcpp")
93cbcc26	212	(version "0.8.2")
009c5b5c CS	213	(source (origin
	214	(method url-fetch)
	215	(uri
a708fea4	216	(string-append "https://ncmpcpp.rybczak.net/stable/ncmpcpp-"
009c5b5c CS	217	version ".tar.bz2"))
	218	(sha256
	219	(base32
93cbcc26	220	"0m0mjb049sl62vx13h9waavysa30mk0rphacksnvf94n13la62v5"))))
009c5b5c CS	221	(build-system gnu-build-system)
009c5b5c CS	222	(inputs `(("libmpdclient" ,libmpdclient)
e42dc624 PW	223	("boost" ,boost)
e42dc624 PW	224	("readline" ,readline)
a22722c1	225	("ncurses" ,ncurses)
a4c7c57c	226	("taglib" ,taglib)
a708fea4 LF	227	("icu4c" ,icu4c)
a708fea4 LF	228	("curl" ,curl)))
e42dc624	229	(native-inputs
c7794307	230	`(("pkg-config" ,pkg-config)))
e42dc624 PW	231	(arguments
e42dc624 PW	232	'(#:configure-flags
c7794307	233	'("BOOST_LIB_SUFFIX=" "--with-taglib")))
009c5b5c CS	234	(synopsis "Featureful ncurses based MPD client inspired by ncmpc")
	235	(description "Ncmpcpp is an mpd client with a UI very similar to ncmpc,
	236	but it provides new useful features such as support for regular expressions
	237	for library searches, extended song format, items filtering, the ability to
8f65585b	238	sort playlists, and a local file system browser.")
a708fea4	239	(home-page "https://ncmpcpp.rybczak.net/")
009c5b5c	240	(license license:gpl2+)))
927ff2c3 DT	241
	242	(define-public mpdscribble
	243	(package
	244	(name "mpdscribble")
	245	(version "0.22")
	246	(source (origin
	247	(method url-fetch)
	248	(uri (string-append "http://www.musicpd.org/download/mpdscribble/"
	249	version "/mpdscribble-" version ".tar.gz"))
	250	(sha256
	251	(base32
	252	"0f0ybx380x2z2g1qvdndpvcrhkrgsfqckhz3ryydq2w3pl12v27z"))))
	253	(build-system gnu-build-system)
	254	(inputs `(("libmpdclient" ,libmpdclient)
	255	("curl" ,curl)
	256	("glib" ,glib)))
	257	(native-inputs `(("pkg-config" ,pkg-config)))
	258	(synopsis "MPD client for track scrobbling")
	259	(description "mpdscribble is a Music Player Daemon client which submits
	260	information about tracks being played to a scrobbler, such as Libre.FM.")
fc2847b1	261	(home-page "https://www.musicpd.org/clients/mpdscribble/")
927ff2c3	262	(license license:gpl2+)))
efe0b143 LF	263
	264	(define-public python-mpd2
	265	(package
	266	(name "python-mpd2")
	267	(version "0.5.5")
	268	(source (origin
	269	(method url-fetch)
	270	(uri (pypi-uri "python-mpd2" version))
	271	(sha256
	272	(base32
	273	"0laypd7h1j14b4vrmiayqlzdsh2j5hc3zv4l0fqvbrbw9y6763ii"))))
	274	(build-system python-build-system)
	275	(arguments
	276	'(#:phases
	277	(modify-phases %standard-phases
	278	(replace 'check
e8e3c357	279	(lambda _ (invoke "python" "mpd_test.py"))))))
efe0b143 LF	280	(native-inputs `(("python-mock" ,python-mock)))
	281	(home-page "https://github.com/Mic92/python-mpd2")
	282	(synopsis "Python MPD client library")
	283	(description "Python-mpd2 is a Python library which provides a client
	284	interface for the Music Player Daemon.")
5c31f4aa	285	(license license:lgpl3+)))
efe0b143 LF	286
efe0b143 LF	287	(define-public python2-mpd2
5c31f4aa	288	(package-with-python2 python-mpd2))
6c86cef5 CB	289
	290	(define-public sonata
	291	(package
	292	(name "sonata")
	293	(version "1.7b1")
	294	(source (origin
	295	(method url-fetch)
	296	(uri
	297	(string-append "https://github.com/multani/sonata/archive/v"
	298	version ".tar.gz"))
	299	(file-name (string-append name "-" version ".tar.gz"))
	300	(sha256
	301	(base32
	302	"07gq2nxqwxs0qyxjbay7k5j25zd386bn7wdr2dl1gk53diwnn7s0"))))
	303	(build-system python-build-system)
	304	(arguments
	305	`(#:modules ((guix build gnu-build-system)
	306	(guix build python-build-system)
	307	((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
	308	(guix build utils))
	309	#:imported-modules (,@%gnu-build-system-modules
	310	(guix build python-build-system)
	311	(guix build glib-or-gtk-build-system))
	312	#:phases
	313	(modify-phases %standard-phases
	314	(add-after 'install 'glib-or-gtk-wrap
	315	(assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))
	316	(add-after 'install 'wrap-sonata
	317	(lambda* (#:key outputs #:allow-other-keys)
	318	(let ((out (assoc-ref outputs "out"))
	319	(gi-typelib-path (getenv "GI_TYPELIB_PATH")))
	320	(wrap-program (string-append out "/bin/sonata")
	321	`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path))))
	322	#t)))))
	323	(native-inputs
7c90d0f4	324	`(("gettext" ,gettext-minimal)))
6c86cef5 CB	325	(inputs
	326	`(("python-mpd2" ,python-mpd2)
	327	("gtk+" ,gtk+)
	328	("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
	329	("gobject-introspection" ,gobject-introspection)
	330	("adwaita-icon-theme" ,adwaita-icon-theme)
	331	("python-pygobject" ,python-pygobject)))
	332	(synopsis "Elegant client for the Music Player Daemon")
	333	(description "Sonata is an elegant graphical client for the Music Player
	334	Daemon (MPD). It supports playlists, multiple profiles (connecting to different
	335	MPD servers, search and multimedia key support.")
340978d7	336	(home-page "https://www.nongnu.org/sonata/")
6c86cef5	337	(license license:gpl3+)))