Joan: /* v1: tocar software i sonar software */

2009-06-03T22:33:58Z

v1: tocar software i sonar software

Pàgina nova

El Proj4 és un aclaratori de com utilitzo el hardware disponible (CASIO CTK-731, Yamaha WX5, Alesis DM5) com a mòdul de so o com a controlador MIDI, i com utilitzo el software disponible (fluidsynt, Virtual Keyboard,...). Hi ha quatre combinacions:
*tocar software i sonar software (proj4, v1)
*tocar software i sonar hardware (proj4, v2)
*tocar hardware i sonar software (proj4, v3)
*tocar hardware i sonar hardware (proj4, v4)

Aquí es publica estrictament el codi. En aquest [[Aclaratori_MidiShare:_tocar_i_fer_sonar_m%C3%BAsica._Solucions_software_i_hardware#Programant_MidiShare_amb_Java link]] es publica l'explicació de totes les combinacions hardware i software, i les connexions que s'han de fer.

=v1: tocar software i sonar software=
Parteixo de MidiShareIOTest.java.

Necessito MidiAppl.class. He de compilar.
<pre>
$ cd /usr/src/midishare/lang/java/native/grame/midishare
$ sudo javac -classpath /usr/src/midishare/lang/java/native -d /usr/src/midishare/lang/java/native/grame/midishare MidiAppl.java
</pre>

D'aquesta manera compilem MidiAppl.java i obtenim les classes en el mateix directori: MidiAppl.class, DriverInfos.class, MidiApplImpl.class, Midi.class, MidiPollingThread.class, ReadEvInfo.class, SmpteLoc.class, WriteEvInfo.class, MidiApplPolling.class, MidiException.class, MidiTask.class, SlotInfos.class, SyncInfo.class

Tota la nomenclatura dels ports és per a Windows, o sigui que l'elimino.$ cd /usr/src/midishare/lang/java/native/grame/midishare
$ sudo javac -classpath /usr/src/midishare/lang/java/native -d /usr/src/midishare/lang/java/native/grame/midishare MidiAppl.java

D'aquesta manera compilem MidiAppl.java i obtenim les classes en el mateix directori: MidiAppl.class, DriverInfos.class, MidiApplImpl.class, Midi.class, MidiPollingThread.class, ReadEvInfo.class, SmpteLoc.class, WriteEvInfo.class, MidiApplPolling.class, MidiException.class, MidiTask.class, SlotInfos.class, SyncInfo.class

Tota la nomenclatura dels ports és per a Windows.

script proj4_v1_UA25EX.sh
<pre>
#!/bin/bash
/usr/src/midishare/src/linux/applications/msconnect/msconnect &
/usr/src/midishare/src/linux/applications/msdisplay/msdisplay &
/usr/src/midishare/src/linux/applications/mscontrol/mscontrol &
/usr/bin/vkeybd &
sleep 2
xterm -e 'bash -c "/usr/local/bin/fluidsynth -a alsa -m midishare -o audio.alsa.device='plughw:1' -c 2 -z 64 -r 96000 -l /home/joan/soundfonts/collections/Casio_VL_1.SF2"' &
sleep 2
xterm -e '/usr/local/bin/msAlsaSeq "ALSA_MS_bridge" -i "Virtual Keyboard":0' &
sleep 2
# java -classpath /usr/src/midishare/lang/java/native:/home/joan/workspace/Proj4/bin v1.Proj4
</pre>

Proj4.class
<pre>
package v1;

import java.awt.*;
import java.awt.event.*;

import grame.midishare.*;

public class Proj4 extends MidiAppl {

private int field;

public Proj4() {

}

public void Open(String name) throws MidiException {
super.Open(name);
configureFilter();
}

/* kill active sensing */
void configureFilter() {
int i;
for (i = 0; i < 256; i++) {
Midi.AcceptType(filter, i, 1);
}

for (i = 0; i < 16; i++) {
Midi.AcceptChan(filter, i, 1);
}

Midi.AcceptType(filter, Midi.typeActiveSens, 0);
}

/** Simply notify that an input event occurred, print what kind */
public void ReceiveAlarm(int ev) {
int event_newnote;
int event_newprogram;
switch (Midi.GetType(ev)) {
case Midi.typeNote :
System.out.println("Proj4, received typeNote");
//afegim una nota d'octava
event_newnote = Midi.NewEv(Midi.typeNote);
if (event_newnote != 0) {
Midi.SetChan(event_newnote, Midi.GetChan(ev)); // set the Midi channel
Midi.SetField(event_newnote, 0, Midi.GetData0(ev)+12); //nota
Midi.SetField(event_newnote, 1, Midi.GetData1(ev)); //volum
}
if (Midi.GetData0(ev)!=60){
Midi.SendIm(this.refnum, ev);
Midi.SendIm(this.refnum, event_newnote);
}

break;
case (Midi.typeKeyOn):
System.out.println("Proj4, received typeKeyOn: " + Midi.GetData0(ev));

//canvi de programa
if (Midi.GetData0(ev)>=60 & Midi.GetData0(ev)<=72 ){
event_newprogram = Midi.NewEv(Midi.typeProgChange);
if (event_newprogram != 0) {
Midi.SetChan(event_newprogram, Midi.GetChan(ev));
Midi.SetData0(event_newprogram, Midi.GetData0(ev)-60); //canvi de programa
Midi.SendIm(this.refnum, event_newprogram);
System.out.println("Proj4, canvi de programa: " + (Midi.GetData0(ev)-60));
}
}

//afegim una nota d'octava
event_newnote = Midi.NewEv(Midi.typeKeyOn);
if (event_newnote != 0) {
Midi.SetChan(event_newnote, Midi.GetChan(ev)); // set the Midi channel
Midi.SetField(event_newnote, 0, Midi.GetData0(ev)+12); //nota
Midi.SetField(event_newnote, 1, Midi.GetData1(ev)); //volum
}
if (Midi.GetData0(ev)!=60){
Midi.SendIm(this.refnum, ev);
//Midi.SendIm(this.refnum, event_newnote);
}

break;
case Midi.typeKeyOff :
System.out.println("Proj4, received typeKeyOff: " + Midi.GetData0(ev));

//apaguem la nota d'octava
event_newnote = Midi.NewEv(Midi.typeKeyOff);
if (event_newnote != 0) {
Midi.SetChan(event_newnote, Midi.GetChan(ev)); // set the Midi channel
Midi.SetField(event_newnote, 0, Midi.GetData0(ev)+12); //nota
Midi.SetField(event_newnote, 1, 0); //volum
}
if (Midi.GetData0(ev)!=60){
Midi.SendIm(this.refnum, ev);
//Midi.SendIm(this.refnum, event_newnote);
}

break;

}

}

public static void main(String args[]) {

int installed = 0;
try {
installed = Midi.Share();
}
catch (UnsatisfiedLinkError e) {
e.printStackTrace();
System.out.println(
"\nMidiShare Java API probably not installed properly, grame.midishare.Midi.Share() barfed.\n" + e);
System.exit(0);
}

final Proj4 midiHandler = new Proj4();

try {
midiHandler.Open("Proj4");
Midi.Connect(midiHandler.refnum, 0, 1);
Midi.Connect(0, midiHandler.refnum, 1);
// Check output connection
int connected = Midi.IsConnected(midiHandler.refnum, 0);
System.out.println("Connected for input? " + connected);

// Check input connection
connected = Midi.IsConnected(0, midiHandler.refnum);
System.out.println("Connected for output? " + connected);

//em connecto a fluidsynth
int ref_fluidsynth;
if ((ref_fluidsynth = Midi.GetNamedAppl("fluidsynth")) > 0) Midi.Connect (midiHandler.refnum,ref_fluidsynth, 1);
//em connecto al mscontrol
int ref_mscontrol;
if ((ref_mscontrol = Midi.GetNamedAppl("mscontrol")) > 0) Midi.Connect (ref_mscontrol,midiHandler.refnum, 1);
// msAlsaSeq "bridge". Amb aconnectgui connecto el vkeybd amb el bridge (driver midishare-ALSA)
//i ara he de connectar el bridge amb la meva aplicació (que està connectada al fluidsynth)
int ref_bridge;
if ((ref_bridge = Midi.GetNamedAppl("ALSA_MS_bridge")) > 0) Midi.Connect (ref_bridge,midiHandler.refnum, 1);
//com a control, connecto Proj4 al msdisplay
int ref_display;
if ((ref_display = Midi.GetNamedAppl("msdisplay")) > 0) Midi.Connect (midiHandler.refnum,ref_display, 1);

}
catch (MidiException e1) {
System.out.println("Error opening Proj4: " + e1);
e1.printStackTrace();
}

}
}
</pre>

Aquí es mostra la discussió a la llista LAU (maig-juny 2009) per arrencar Beatrix (un sintetitzador que imita els orgues Hammond) des d'un script (estudiar):
<pre>
Re: [LAU] beatrix + eeepc + nanokontrol
Sunday, May 31, 2009 11:27 PM
From:
"oz" <oz@bluemonk.de>
Add sender to Contacts
To:
linux-audio-user@lists.linuxaudio.org

Very helpful, thanks a lot, Robin!
I bundled all I need to start beatrix in a little script, that I start from
an icon on my KDE-desktop now:
-----------------------------------------------------------------
#/bin/sh
# beatrix.sh virtually connects my midi-devices with beatrix and starts it.

PRESETS=/home/me/beatrix-presets.txt
BEA_DIR=/home/me/beatrix

vkeybd --preset $PRESETS &
sleep 1

BEA=$(aconnect -o -l | awk '/Virtual Raw MIDI 1-3/{print $2."0"}')

KBD=$(aseqdump -l | awk '/UM-1SX/{print $1}')
NANOK=$(aseqdump -l | awk '/nanoKONTROL/{print $1}')
VKBD=$(aseqdump -l | awk '/Virtual Keyboard/{print $1}')

aconnect $KBD $BEA
aconnect $NANOK $BEA
aconnect $VKBD $BEA

cd $BEA_DIR
$BEA_DIR/beatrix
-------------------------------------------------------------------

There were two pitfalls I had to avoid. The ID of the Virtual Raw MIDI
interface depends on the connected usb-midi-devices at boottime. Only when
nothing is connected, it has the ID 1-3 as used in the script (else 3-3 for
example). So I boot the eeepc with with my keyboard and nanokontrol unplugged.
When KDE is up, I plug them in. One klick on my script-icon and I'm ready to
play!

The second pitfall were the KDE system-sounds. They can result in '/dev/dsp
busy' when beatrix starts. Now I disabled all system-sounds in
KDE-control-center.

I like your "Jackification" and will try it after I'm familiar with the
current release of beatrix. Hopefully the author of beatrix proofs your
concept. Beatrix is hot!

- oz

On Sun, 31 May 2009 20:47:30 +0200
Robin Gareus <robin@gareus.org> wrote:

> off-list: http://rg42.org/wiki/beatrix - Bend beatix' license on your
> own account and patch it with JACK and ALSA-midi support ;)
[...]
> What is your problem with `aconnect` ? Are you looking for sth like:
>
> #/bin/sh
> BEA=$(aconnect -o -l | awk '/Virtual Raw MIDI 1-3/{print $2."0"}')
> VKBD=$(aseqdump -l | awk '/Virtual Keyboard/{print $1}')
> aconnect $BEA $VKBD
</pre>

=v2: tocar software i sonar hardware=
Depenent de la versió en què estic, canvia el script i les connexions que s'estableixen dins el codi Java.

script proj4_v2_UA25EX.sh
<pre>
#!/bin/bash
/usr/src/midishare/src/linux/applications/msconnect/msconnect &
/usr/src/midishare/src/linux/applications/msdisplay/msdisplay &
/usr/src/midishare/src/linux/applications/mscontrol/mscontrol &
/usr/bin/vkeybd &
sleep 2
xterm -e '/usr/local/bin/msAlsaSeq "ALSA_MS_bridge" -i "Virtual Keyboard":0 -o "UA-25EX":0' &
sleep 2
# java -classpath /usr/src/midishare/lang/java/native:/home/joan/workspace/Proj4/bin v1.Proj4
</pre>

Proj4.class
<pre>
try {
midiHandler.Open("Proj4");
Midi.Connect(midiHandler.refnum, 0, 1);
Midi.Connect(0, midiHandler.refnum, 1);
// Check output connection
int connected = Midi.IsConnected(midiHandler.refnum, 0);
System.out.println("Connected for input? " + connected);

// Check input connection
connected = Midi.IsConnected(0, midiHandler.refnum);
System.out.println("Connected for output? " + connected);

//em connecto al mscontrol
int ref_mscontrol;
if ((ref_mscontrol = Midi.GetNamedAppl("mscontrol")) > 0) Midi.Connect (ref_mscontrol,midiHandler.refnum, 1);
// msAlsaSeq "bridge". Amb aconnectgui connecto el vkeybd amb el bridge (driver midishare-ALSA)
//també connecto el bridge amb la Edirol UA-25EX
//i ara he de connectar el bridge amb la meva aplicació, en els dos sentits
int ref_bridge;
if ((ref_bridge = Midi.GetNamedAppl("ALSA_MS_bridge")) > 0) Midi.Connect (midiHandler.refnum,ref_bridge, 1);
if ((ref_bridge = Midi.GetNamedAppl("ALSA_MS_bridge")) > 0) Midi.Connect (ref_bridge,midiHandler.refnum, 1);
//com a control, connecto Proj4 al msdisplay
int ref_display;
if ((ref_display = Midi.GetNamedAppl("msdisplay")) > 0) Midi.Connect (midiHandler.refnum,ref_display, 1);

}
</pre>

=v3: tocar hardware i sonar software=
script proj4_v3_UA25EX.sh
<pre>
#!/bin/bash
/usr/src/midishare/src/linux/applications/msconnect/msconnect &
/usr/src/midishare/src/linux/applications/msdisplay/msdisplay &
/usr/src/midishare/src/linux/applications/mscontrol/mscontrol &
sleep 2
xterm -e 'bash -c "/usr/local/bin/fluidsynth -a alsa -m midishare -o audio.alsa.device='hw:0' -c 2 -z 128 -r 44100 -l /home/joan/soundfonts/collections/Casio_VL_1.SF2"' &
sleep 2
xterm -e '/usr/local/bin/msAlsaSeq "ALSA_MS_bridge" -i "Virtual Keyboard":0' &
sleep 2
java -classpath /usr/src/midishare/lang/java/native:/home/joan/workspace/Proj4/bin v1.Proj4
</pre>

Proj4.class
<pre>
...
try {
midiHandler.Open("Proj4");
Midi.Connect(midiHandler.refnum, 0, 1);
Midi.Connect(0, midiHandler.refnum, 1);
// Check output connection
int connected = Midi.IsConnected(midiHandler.refnum, 0);
System.out.println("Connected for input? " + connected);

// Check input connection
connected = Midi.IsConnected(0, midiHandler.refnum);
System.out.println("Connected for output? " + connected);

//em connecto a fluidsynth
int ref_fluidsynth;
if ((ref_fluidsynth = Midi.GetNamedAppl("fluidsynth")) > 0) Midi.Connect (midiHandler.refnum,ref_fluidsynth, 1);
// msAlsaSeq "bridge". Amb aconnectgui connecto el vkeybd amb el bridge (driver midishare-ALSA)
//i ara he de connectar el bridge amb la meva aplicació (que està connectada al fluidsynth)
int ref_bridge;
if ((ref_bridge = Midi.GetNamedAppl("ALSA_MS_bridge")) > 0) Midi.Connect (ref_bridge,midiHandler.refnum, 1);
//com a control, connecto Proj4 al msdisplay
int ref_display;
if ((ref_display = Midi.GetNamedAppl("msdisplay")) > 0) Midi.Connect (midiHandler.refnum,ref_display, 1);

}
...
</pre>

=v4: tocar hardware i sonar hardware=
script proj4_v4_UA25EX.sh
<pre>
#!/bin/bash
/usr/src/midishare/src/linux/applications/msconnect/msconnect &
/usr/src/midishare/src/linux/applications/msdisplay/msdisplay &
/usr/src/midishare/src/linux/applications/mscontrol/mscontrol &
sleep 2
xterm -e '/usr/local/bin/msAlsaSeq "ALSA_MS_bridge" -i "UA-25EX":0 -o "UA-25EX":0' &
sleep 2
java -classpath /usr/src/midishare/lang/java/native:/home/joan/workspace/Proj4/bin v4.Proj4
</pre>

Proj4.class
<pre>
...
try {
midiHandler.Open("Proj4");
Midi.Connect(midiHandler.refnum, 0, 1);
Midi.Connect(0, midiHandler.refnum, 1);
// Check output connection
int connected = Midi.IsConnected(midiHandler.refnum, 0);
System.out.println("Connected for input? " + connected);

// Check input connection
connected = Midi.IsConnected(0, midiHandler.refnum);
System.out.println("Connected for output? " + connected);

//em connecto al mscontrol
int ref_mscontrol;
if ((ref_mscontrol = Midi.GetNamedAppl("mscontrol")) > 0) Midi.Connect (ref_mscontrol,midiHandler.refnum, 1);
// msAlsaSeq "bridge". Amb aconnectgui connecto el vkeybd amb el bridge (driver midishare-ALSA)
//també connecto el bridge amb la Edirol UA-25EX
//i ara he de connectar el bridge amb la meva aplicació, en els dos sentits
int ref_bridge;
if ((ref_bridge = Midi.GetNamedAppl("ALSA_MS_bridge")) > 0) Midi.Connect (midiHandler.refnum,ref_bridge, 1);
if ((ref_bridge = Midi.GetNamedAppl("ALSA_MS_bridge")) > 0) Midi.Connect (ref_bridge,midiHandler.refnum, 1);
//com a control, connecto Proj4 al msdisplay
int ref_display;
if ((ref_display = Midi.GetNamedAppl("msdisplay")) > 0) Midi.Connect (midiHandler.refnum,ref_display, 1);

}
...
</pre>

Projecte Proj4 - Historial de revisió

Joan: /* v1: tocar software i sonar software */