/[svn]/linuxsampler/trunk/src/mididriver/MidiInputDeviceAlsa.cpp
ViewVC logotype

Contents of /linuxsampler/trunk/src/mididriver/MidiInputDeviceAlsa.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 153 - (show annotations) (download)
Mon Jun 28 04:21:11 2004 UTC (15 years, 7 months ago) by senkov
File size: 7366 byte(s)
* Updated MIDI infrastructure similar to what was previously
done with the AUDIO
* Implemented Alsa driver using new infrastructure
* TODO: MacOS drivers!

1 /***************************************************************************
2 * *
3 * LinuxSampler - modular, streaming capable sampler *
4 * *
5 * Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck *
6 * *
7 * This program is free software; you can redistribute it and/or modify *
8 * it under the terms of the GNU General Public License as published by *
9 * the Free Software Foundation; either version 2 of the License, or *
10 * (at your option) any later version. *
11 * *
12 * This program is distributed in the hope that it will be useful, *
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
15 * GNU General Public License for more details. *
16 * *
17 * You should have received a copy of the GNU General Public License *
18 * along with this program; if not, write to the Free Software *
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
20 * MA 02111-1307 USA *
21 ***************************************************************************/
22
23 #include "MidiInputDeviceAlsa.h"
24 #include "MidiInputDeviceFactory.h"
25
26 namespace LinuxSampler {
27
28 REGISTER_MIDI_INPUT_DRIVER("Alsa",MidiInputDeviceAlsa);
29
30 MidiInputDeviceAlsa::MidiInputDeviceAlsa(std::map<String,String> Parameters) : MidiInputDevice(CreateParameters(Parameters)), Thread(true, 1, -1) {
31 if (snd_seq_open(&hAlsaSeq, "default", SND_SEQ_OPEN_INPUT, 0) < 0) {
32 throw MidiInputException("Error opening ALSA sequencer");
33 }
34 this->hAlsaSeqClient = snd_seq_client_id(hAlsaSeq);
35 snd_seq_set_client_name(hAlsaSeq, "LinuxSampler");
36 }
37
38 MidiInputDeviceAlsa::~MidiInputDeviceAlsa() {
39 snd_seq_close(hAlsaSeq);
40 }
41
42 MidiInputDeviceAlsa::MidiInputPortAlsa::MidiInputPortAlsa(MidiInputDeviceAlsa* pDevice, int alsaPort) : MidiInputPort(pDevice, alsaPort) {
43 this->pDevice = pDevice;
44 Parameters = MidiInputDevice::MidiInputPort::AvailableParameters();
45 Parameters["alsa_seq_bindings"] = new ParameterAlsaSeqBindings(this);
46 }
47
48 MidiInputDeviceAlsa::MidiInputPortAlsa::~MidiInputPortAlsa() {
49 snd_seq_delete_simple_port(pDevice->hAlsaSeq, portNumber);
50 }
51
52 MidiInputDeviceAlsa::MidiInputPortAlsa* MidiInputDeviceAlsa::CreateMidiPort() {
53 int alsaPort;
54 if ((alsaPort = snd_seq_create_simple_port(hAlsaSeq, "LinuxSampler",
55 SND_SEQ_PORT_CAP_WRITE|SND_SEQ_PORT_CAP_SUBS_WRITE,
56 SND_SEQ_PORT_TYPE_APPLICATION)) < 0) {
57 throw MidiInputException("Error creating sequencer port");
58 }
59 return ( new MidiInputPortAlsa(this, alsaPort) );
60 }
61
62 void MidiInputDeviceAlsa::Listen() {
63 StartThread();
64 }
65
66 void MidiInputDeviceAlsa::StopListen() {
67 StopThread();
68 }
69
70 /**
71 * Connects this Alsa midi input device with an Alsa MIDI source.
72 *
73 * @param Client - Alsa sequencer client and port ID of a MIDI source
74 * (e.g. "64:0")
75 * @throws MidiInputException if connection cannot be established
76 */
77 void MidiInputDeviceAlsa::MidiInputPortAlsa::ConnectToAlsaMidiSource(const char* MidiSource) {
78 snd_seq_addr_t sender, dest;
79 snd_seq_port_subscribe_t* subs;
80 int hExtClient, hExtPort;
81
82 sscanf(MidiSource, "%d:%d", &hExtClient, &hExtPort);
83 sender.client = (char) hExtClient;
84 sender.port = (char) hExtPort;
85 dest.client = (char) pDevice->hAlsaSeqClient;
86 dest.port = (char) portNumber;
87 snd_seq_port_subscribe_alloca(&subs);
88 snd_seq_port_subscribe_set_sender(subs, &sender);
89 snd_seq_port_subscribe_set_dest(subs, &dest);
90 snd_seq_port_subscribe_set_queue(subs, 1);
91 snd_seq_port_subscribe_set_time_update(subs, 1);
92 snd_seq_port_subscribe_set_time_real(subs, 1);
93 if (snd_seq_subscribe_port(pDevice->hAlsaSeq, subs) < 0)
94 throw MidiInputException(String("Unable to connect to Alsa seq client \'") + MidiSource + "\' (" + snd_strerror(errno) + ")");
95 }
96
97 String MidiInputDeviceAlsa::Description() {
98 return "Advanced Linux Sound Architecture";
99 }
100
101 String MidiInputDeviceAlsa::Version() {
102 String s = "$Revision: 1.5 $";
103 return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword
104 }
105
106 std::map<String,DeviceCreationParameter*> MidiInputDeviceAlsa::CreateParameters(std::map<String,String> Parameters) {
107 std::map<String,DeviceCreationParameter*> result;
108 result["active"] = OptionalParameter<ParameterActive>::New(this, Parameters["active"]);
109 result["ports"] = OptionalParameter<ParameterPorts>::New(this, Parameters["ports"]);
110 return result;
111 }
112
113 int MidiInputDeviceAlsa::Main() {
114 int npfd;
115 struct pollfd* pfd;
116 snd_seq_event_t* ev;
117
118 npfd = snd_seq_poll_descriptors_count(hAlsaSeq, POLLIN);
119 pfd = (struct pollfd*) alloca(npfd * sizeof(struct pollfd));
120 snd_seq_poll_descriptors(hAlsaSeq, pfd, npfd, POLLIN);
121 while (true) {
122 if (poll(pfd, npfd, 100000) > 0) {
123 do {
124 snd_seq_event_input(hAlsaSeq, &ev);
125 int port = (int) ev->dest.port;
126 MidiInputPort* pMidiInputPort = Ports[port];
127
128 switch (ev->type) {
129 case SND_SEQ_EVENT_CONTROLLER:
130 pMidiInputPort->DispatchControlChange(ev->data.control.param, ev->data.control.value, ev->data.control.channel);
131 break;
132
133 case SND_SEQ_EVENT_PITCHBEND:
134 // fprintf(stderr, "Pitchbender event on Channel %2d: %5d \n",
135 // ev->data.control.channel, ev->data.control.value);
136 pMidiInputPort->DispatchPitchbend(ev->data.control.value, ev->data.control.channel);
137 break;
138
139 case SND_SEQ_EVENT_NOTEON:
140 if (ev->data.note.velocity != 0) {
141 pMidiInputPort->DispatchNoteOn(ev->data.note.note, ev->data.note.velocity, ev->data.control.channel);
142 }
143 else {
144 pMidiInputPort->DispatchNoteOff(ev->data.note.note, 0, ev->data.control.channel);
145 }
146 break;
147
148 case SND_SEQ_EVENT_NOTEOFF:
149 pMidiInputPort->DispatchNoteOff(ev->data.note.note, ev->data.note.velocity, ev->data.control.channel);
150 break;
151 }
152 snd_seq_free_event(ev);
153 } while (snd_seq_event_input_pending(hAlsaSeq, 0) > 0);
154 }
155 }
156 }
157
158 } // namespace LinuxSampler

  ViewVC Help
Powered by ViewVC