hydrogen

hydrogen

[Efraim Flashner]

[-- Attachment #1.1: Type: text/plain, Size: 544 bytes --]

I was working on changing the packages that use qt-4 to using qt-5, and I
came across hydrogen. I've updated it from 0.9.5.1 to 0.9.7-beta1 and made
some changes. Considering I don't actually use hydrogen, I thought someone
who did could take a look at it first to make sure everything looked good
before I push it to master.

-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1.2: 0001-gnu-hydrogen-Update-to-0.9.7-beta1.patch --]
[-- Type: text/x-patch, Size: 5007 bytes --]

From a3ab16d92dc8f9d2bb47f03287b96235272a20ac Mon Sep 17 00:00:00 2001
From: Efraim Flashner <efraim@flashner.co.il>
Date: Tue, 16 Feb 2016 14:16:16 +0200
Subject: [PATCH] gnu: hydrogen: Update to 0.9.7-beta1.

* gnu/packages/music.scm (hydrogen): Update to 0.9.7-beta1.
[build-system]: Switch to cmake-build-system.
[arguments]: Enable configure and tests, remove custom phases.
[native-inputs]: Remove python-2, scons. Add cppunit.
[inputs]: Add ladspa, libarchive, lrdf, pulseaudio.
---
 gnu/packages/music.scm | 65 ++++++++++++++------------------------------------
 1 file changed, 18 insertions(+), 47 deletions(-)

diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 262d4eb..cffbc7c 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -3,6 +3,7 @@
 ;;; Copyright © 2015, 2016 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2015 Paul van der Walt <paul@denknerd.org>
 ;;; Copyright © 2016 Al McElrath <hello@yrns.org>
+;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -33,9 +34,10 @@
   #:use-module (gnu packages algebra)
   #:use-module (gnu packages audio)
   #:use-module (gnu packages autotools)
+  #:use-module (gnu packages backup)
   #:use-module (gnu packages base) ;libbdf
-  #:use-module (gnu packages boost)
   #:use-module (gnu packages bison)
+  #:use-module (gnu packages boost)
   #:use-module (gnu packages cdrom)
   #:use-module (gnu packages code)
   #:use-module (gnu packages check)
@@ -148,64 +150,33 @@ many input formats and provides a customisable Vi-style user interface.")
 (define-public hydrogen
   (package
     (name "hydrogen")
-    (version "0.9.5.1")
+    (version "0.9.7-beta1")
     (source (origin
               (method url-fetch)
               (uri (string-append
-                    "mirror://sourceforge/hydrogen/Hydrogen/"
-                    (version-prefix version 3) "%20Sources/"
-                    "hydrogen-" version ".tar.gz"))
+                    "https://github.com/hydrogen-music/hydrogen/archive/"
+                    version ".tar.gz"))
               (sha256
                (base32
-                "1fvyp6gfzcqcc90dmaqbm11p272zczz5pfz1z4lj33nfr7z0bqgb"))))
-    (build-system gnu-build-system)
+                "1qs35fa5b4ysvd7pm68i86h30z198pav7kl0hhjsvs420wfxiwdh"))))
+    (build-system cmake-build-system)
     (arguments
-     `(#:tests? #f ;no "check" target
-       #:phases
-       ;; TODO: Add scons-build-system and use it here.
-       (modify-phases %standard-phases
-         (delete 'configure)
-         (add-after 'unpack 'scons-propagate-environment
-                    (lambda _
-                      ;; By design, SCons does not, by default, propagate
-                      ;; environment variables to subprocesses.  See:
-                      ;; <http://comments.gmane.org/gmane.linux.distributions.nixos/4969>
-                      ;; Here, we modify the Sconstruct file to arrange for
-                      ;; environment variables to be propagated.
-                      (substitute* "Sconstruct"
-                        (("^env = Environment\\(")
-                         "env = Environment(ENV=os.environ, "))))
-         (replace 'build
-                  (lambda* (#:key inputs outputs #:allow-other-keys)
-                    (let ((out (assoc-ref outputs "out")))
-                      (zero? (system* "scons"
-                                      (string-append "prefix=" out)
-                                      "lrdf=0" ; cannot be found
-                                      "lash=1")))))
-         (add-before
-          'install
-          'fix-img-install
-          (lambda _
-            ;; The whole ./data/img directory is copied to the target first.
-            ;; Scons complains about existing files when we try to install all
-            ;; images a second time.
-            (substitute* "Sconstruct"
-              (("os.path.walk\\(\"./data/img/\",install_images,env\\)") ""))
-            #t))
-         (replace 'install (lambda _ (zero? (system* "scons" "install")))))))
+    `(#:test-target "tests"))
     (native-inputs
-     `(("scons" ,scons)
-       ("python" ,python-2)
+     `(("cppunit" ,cppunit)
        ("pkg-config" ,pkg-config)))
     (inputs
-     `(("zlib" ,zlib)
-       ("libtar" ,libtar)
-       ("alsa-lib" ,alsa-lib)
+     `(("alsa-lib" ,alsa-lib)
        ("jack" ,jack-1)
+       ("ladspa" ,ladspa)
        ("lash" ,lash)
-       ;;("lrdf" ,lrdf) ;FIXME: cannot be found by scons
+       ("libarchive" ,libarchive)
+       ("libsndfile" ,libsndfile)
+       ("libtar" ,libtar)
+       ("lrdf" ,lrdf)
+       ("pulseaudio" ,pulseaudio)
        ("qt" ,qt-4)
-       ("libsndfile" ,libsndfile)))
+       ("zlib" ,zlib)))
     (home-page "http://www.hydrogen-music.org")
     (synopsis "Drum machine")
     (description
-- 
2.7.0


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 819 bytes --]

Re: hydrogen

[Ricardo Wurmus]

Efraim Flashner <efraim@flashner.co.il> writes:

> I was working on changing the packages that use qt-4 to using qt-5, and I
> came across hydrogen. I've updated it from 0.9.5.1 to 0.9.7-beta1 and made
> some changes. Considering I don't actually use hydrogen, I thought someone
> who did could take a look at it first to make sure everything looked good
> before I push it to master.

Looks okay to me (I haven’t built or tested it, though), with the
exception of adding “pulseaudio” to the inputs.  Is this necessary?

I only ever use Hydrogen with JACK because it should stay in sync with
other applications.  PulseAudio cannot possibly achieve this due to
layering.  I don’t see the use case for building Hydrogen with
PulseAudio.  Could you please clarify why it was added?

~~ Ricardo

Re: hydrogen

[Efraim Flashner]

[-- Attachment #1: Type: text/plain, Size: 1193 bytes --]

On Tue, 16 Feb 2016 13:26:45 +0100
Ricardo Wurmus <ricardo.wurmus@mdc-berlin.de> wrote:

> Efraim Flashner <efraim@flashner.co.il> writes:
> 
>  [...]  
> 
> Looks okay to me (I haven’t built or tested it, though), with the
> exception of adding “pulseaudio” to the inputs.  Is this necessary?
> 
> I only ever use Hydrogen with JACK because it should stay in sync with
> other applications.  PulseAudio cannot possibly achieve this due to
> layering.  I don’t see the use case for building Hydrogen with
> PulseAudio.  Could you please clarify why it was added?
> 
> ~~ Ricardo

Only because it showed up as "not found but desired" at the configure phase
summary. When I opened it up to test if it seemed to be working it defaulted
to jack. I'll build it again without pulseaudio to make sure that doesn't
cause any issues. It did give me an error about not being able to connect to
a jack server, but I'm not running jack so that isn't unexpected.

-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 819 bytes --]

Re: hydrogen

[Andreas Enge]

On Tue, Feb 16, 2016 at 02:20:03PM +0200, Efraim Flashner wrote:
> I was working on changing the packages that use qt-4 to using qt-5, and I
> came across hydrogen. I've updated it from 0.9.5.1 to 0.9.7-beta1 and made
> some changes.

From the website, it looks as if 0.9.5.1 is the latest "real" release:
   http://www.hydrogen-music.org/hcms/node/21
See at the bottom of the page.

Actually, no; it appears that the software has effectively moved from
sourceforge to github:
   https://github.com/hydrogen-music/hydrogen

There is a stable release 0.9.6.1 from the end of 2014:
   https://github.com/hydrogen-music/hydrogen/releases

Maybe you could package this instead of a beta release?

I hope that this version will also work with Qt 5.

Andreas

Re: hydrogen

[Efraim Flashner]

[-- Attachment #1: Type: text/plain, Size: 1217 bytes --]

On Tue, 16 Feb 2016 13:37:23 +0100
Andreas Enge <andreas@enge.fr> wrote:

> On Tue, Feb 16, 2016 at 02:20:03PM +0200, Efraim Flashner wrote:
>  [...]  
> 
> From the website, it looks as if 0.9.5.1 is the latest "real" release:
>    http://www.hydrogen-music.org/hcms/node/21
> See at the bottom of the page.
> 
> Actually, no; it appears that the software has effectively moved from
> sourceforge to github:
>    https://github.com/hydrogen-music/hydrogen
> 
> There is a stable release 0.9.6.1 from the end of 2014:
>    https://github.com/hydrogen-music/hydrogen/releases
> 
> Maybe you could package this instead of a beta release?

Sure

> I hope that this version will also work with Qt 5.

A bunch of the programs that don't build with Qt 5 use cmake for the build
system, and there's a check for Qt 4 specifically. I haven't tried patching
the CMake file to see if it'll build with Qt 5, but that'll take care of a
bunch of programs if it works out.

> Andreas
> 


-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 819 bytes --]

Re: hydrogen

[Ricardo Wurmus]

Efraim Flashner <efraim@flashner.co.il> writes:

> to jack. I'll build it again without pulseaudio to make sure that doesn't
> cause any issues. It did give me an error about not being able to connect to
> a jack server, but I'm not running jack so that isn't unexpected.

Yeah, that’s normal.  If you have JACK 2 then many of these programmes
can start JACK over dbus, but I usually just start a JACK server (as a
regular user) in the background whenever I do audio work.