author | František Kučera <franta-hg@frantovo.cz> |
Sat, 03 Oct 2020 18:20:30 +0200 | |
branch | v_0 |
changeset 14 | 9ad606c80d3b |
parent 13 | a85c191709e6 |
child 15 | b3239e4ad328 |
permissions | -rw-r--r-- |
0 | 1 |
/** |
2 |
* Relational pipes |
|
10 | 3 |
* Copyright © 2020 František Kučera (Frantovo.cz, GlobalCode.info) |
0 | 4 |
* |
5 |
* This program is free software: you can redistribute it and/or modify |
|
6 |
* it under the terms of the GNU General Public License as published by |
|
7 |
* the Free Software Foundation, version 3 of the License. |
|
8 |
* |
|
9 |
* This program is distributed in the hope that it will be useful, |
|
10 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
11 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
12 |
* GNU General Public License for more details. |
|
13 |
* |
|
14 |
* You should have received a copy of the GNU General Public License |
|
15 |
* along with this program. If not, see <http://www.gnu.org/licenses/>. |
|
16 |
*/ |
|
17 |
#pragma once |
|
18 |
||
19 |
#include <memory> |
|
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
20 |
#include <atomic> |
0 | 21 |
#include <string> |
6
4174fc0c2e7c
send some (constant, dummy) MIDI message to JACK
František Kučera <franta-hg@frantovo.cz>
parents:
5
diff
changeset
|
22 |
#include <cstring> |
0 | 23 |
#include <vector> |
24 |
#include <iostream> |
|
25 |
#include <sstream> |
|
26 |
#include <locale> |
|
27 |
#include <codecvt> |
|
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
28 |
#include <sys/mman.h> |
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
29 |
#include <signal.h> |
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
30 |
#include <unistd.h> |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
31 |
|
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
32 |
#include <jack/jack.h> |
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
33 |
#include <jack/midiport.h> |
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
34 |
#include <jack/ringbuffer.h> |
0 | 35 |
|
36 |
#include <relpipe/common/type/typedefs.h> |
|
37 |
#include <relpipe/reader/TypeId.h> |
|
38 |
#include <relpipe/reader/handlers/RelationalReaderStringHandler.h> |
|
39 |
#include <relpipe/reader/handlers/AttributeMetadata.h> |
|
40 |
||
41 |
#include "Configuration.h" |
|
42 |
#include "JackException.h" |
|
43 |
||
44 |
namespace relpipe { |
|
45 |
namespace out { |
|
46 |
namespace jack { |
|
47 |
||
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
48 |
int dequeueMessages(jack_nframes_t frames, void* arg); |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
49 |
|
0 | 50 |
class JackHandler : public relpipe::reader::handlers::RelationalReaderStringHandler { |
51 |
private: |
|
52 |
Configuration& configuration; |
|
53 |
std::wstring_convert<std::codecvt_utf8<wchar_t>> convertor; // TODO: local system encoding |
|
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
54 |
|
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
55 |
std::atomic<bool> continueProcessing{true}; |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
56 |
|
10 | 57 |
/** |
58 |
* Is passed through the ring buffer |
|
59 |
* from the relpipe-reading thread to the jack-writing thread (callback). |
|
60 |
*/ |
|
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
61 |
struct MidiMessage { |
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
62 |
uint8_t buffer[4096] = {0}; |
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
63 |
uint32_t size; |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
64 |
uint32_t time; |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
65 |
}; |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
66 |
|
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
67 |
/** |
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
68 |
* JACK callbacks (called from the real-time thread) |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
69 |
*/ |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
70 |
class RealTimeContext { |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
71 |
public: |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
72 |
jack_client_t* jackClient = nullptr; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
73 |
jack_port_t* jackPort = nullptr; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
74 |
jack_ringbuffer_t* ringBuffer = nullptr; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
75 |
|
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
76 |
const int RING_BUFFER_SIZE = 100; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
77 |
|
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
78 |
int processCallback(jack_nframes_t frames) { |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
79 |
const size_t queuedMessages = jack_ringbuffer_read_space(ringBuffer) / sizeof (MidiMessage); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
80 |
void* jackPortBuffer = jack_port_get_buffer(jackPort, frames); // jack_port_get_buffer() must be called outside the loop, otherwise it will multiply the MIDI events |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
81 |
jack_midi_clear_buffer(jackPortBuffer); // TODO: clean buffer? |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
82 |
for (size_t i = 0; i < queuedMessages && i < frames; i++) { |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
83 |
// TODO: correct timing? |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
84 |
MidiMessage m; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
85 |
jack_ringbuffer_read(ringBuffer, (char*) &m, sizeof (MidiMessage)); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
86 |
jack_midi_data_t* midiData = jack_midi_event_reserve(jackPortBuffer, m.time, m.size); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
87 |
memcpy(midiData, m.buffer, m.size); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
88 |
} |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
89 |
return 0; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
90 |
} |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
91 |
|
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
92 |
static int processCallback(jack_nframes_t frames, void* arg) { |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
93 |
return static_cast<RealTimeContext*> (arg)->processCallback(frames); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
94 |
} |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
95 |
|
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
96 |
} realTimeContext; |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
97 |
|
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
98 |
/** |
10 | 99 |
* Temporary storage of values read from relational input. |
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
100 |
*/ |
10 | 101 |
class RelationContext { |
102 |
public: |
|
13
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
103 |
bool skip = false; |
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
104 |
|
10 | 105 |
size_t indexOfEvent = -1; |
106 |
size_t indexOfChannel = -1; |
|
107 |
size_t indexOfNoteOn = -1; |
|
108 |
size_t indexOfNotePitch = -1; |
|
109 |
size_t indexOfNoteVelocity = -1; |
|
110 |
size_t indexOfControllerId = -1; |
|
111 |
size_t indexOfControllerValue = -1; |
|
112 |
size_t indexOfRaw = -1; |
|
113 |
||
114 |
size_t attributeCount = 0; |
|
115 |
||
116 |
class RecordContext { |
|
117 |
public: |
|
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
118 |
|
10 | 119 |
enum class Event { |
120 |
NOTE, |
|
121 |
CONTROL, |
|
122 |
SYSEX, |
|
123 |
UNKNOWN |
|
124 |
}; |
|
125 |
||
126 |
static Event parseEventType(const relpipe::common::type::StringX name) { |
|
127 |
if (name == L"note") return Event::NOTE; |
|
128 |
else if (name == L"control") return Event::CONTROL; |
|
129 |
else if (name == L"sysex") return Event::SYSEX; |
|
130 |
else return Event::UNKNOWN; |
|
131 |
} |
|
132 |
||
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
133 |
Event event = Event::UNKNOWN; |
10 | 134 |
relpipe::common::type::Integer channel; |
135 |
relpipe::common::type::Boolean noteOn; |
|
136 |
relpipe::common::type::Integer notePitch; |
|
137 |
relpipe::common::type::Integer noteVelocity; |
|
138 |
relpipe::common::type::Integer controllerId; |
|
139 |
relpipe::common::type::Integer controllerValue; |
|
140 |
relpipe::common::type::StringX raw; |
|
141 |
||
142 |
size_t attributeIndex = 0; |
|
143 |
||
144 |
} recordContext; |
|
145 |
||
146 |
} relationContext; |
|
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
147 |
|
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
148 |
static void jackErrorCallback(const char * message) { |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
149 |
std::wstring_convert < std::codecvt_utf8<wchar_t>> convertor; // TODO: local system encoding |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
150 |
std::wcerr << L"JACK: " << convertor.from_bytes(message) << std::endl; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
151 |
} |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
152 |
|
0 | 153 |
public: |
154 |
||
155 |
JackHandler(Configuration& configuration) : configuration(configuration) { |
|
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
156 |
// Initialize JACK connection: |
2
01553c2ffa1d
configurable JACK client name
František Kučera <franta-hg@frantovo.cz>
parents:
1
diff
changeset
|
157 |
std::string clientName = convertor.to_bytes(configuration.jackClientName); |
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
158 |
realTimeContext.jackClient = jack_client_open(clientName.c_str(), JackNullOption, nullptr); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
159 |
if (realTimeContext.jackClient == nullptr) throw JackException(L"Could not create JACK client."); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
160 |
|
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
161 |
realTimeContext.ringBuffer = jack_ringbuffer_create(realTimeContext.RING_BUFFER_SIZE * sizeof (MidiMessage)); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
162 |
|
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
163 |
jack_set_process_callback(realTimeContext.jackClient, RealTimeContext::processCallback, &realTimeContext); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
164 |
// TODO: report also other events (connections etc.) |
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
165 |
jack_set_error_function(jackErrorCallback); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
166 |
jack_set_info_function(jackErrorCallback); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
167 |
|
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
168 |
realTimeContext.jackPort = jack_port_register(realTimeContext.jackClient, "output", JACK_DEFAULT_MIDI_TYPE, JackPortIsOutput, 0); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
169 |
if (realTimeContext.jackPort == nullptr) throw JackException(L"Could not register port."); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
170 |
|
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
171 |
if (mlockall(MCL_CURRENT | MCL_FUTURE)) fwprintf(stderr, L"Warning: Can not lock memory.\n"); |
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
172 |
|
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
173 |
int jackError = jack_activate(realTimeContext.jackClient); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
174 |
if (jackError) throw JackException(L"Could not activate client."); |
5
6be3464ccb2b
wait for a port connection
František Kučera <franta-hg@frantovo.cz>
parents:
4
diff
changeset
|
175 |
|
6be3464ccb2b
wait for a port connection
František Kučera <franta-hg@frantovo.cz>
parents:
4
diff
changeset
|
176 |
// Wait for a port connection, because it does not make much sense to send MIDI events nowhere: |
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
177 |
while (jack_port_connected(realTimeContext.jackPort) < configuration.requiredJackConnections) usleep(10000); |
8
27579c5cdc51
send correct number of messages to the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
7
diff
changeset
|
178 |
|
27579c5cdc51
send correct number of messages to the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
7
diff
changeset
|
179 |
// TODO: configurable auto-connection to another client/port |
0 | 180 |
} |
181 |
||
182 |
void startRelation(const relpipe::common::type::StringX name, std::vector<relpipe::reader::handlers::AttributeMetadata> attributes) override { |
|
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
183 |
// TODO: validate metadata and prepare attribute mappings (names and types are important, order does not matter) |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
184 |
|
10 | 185 |
relationContext = RelationContext(); |
186 |
relationContext.attributeCount = attributes.size(); |
|
187 |
||
188 |
for (int i = 0; i < relationContext.attributeCount; i++) { |
|
189 |
const relpipe::common::type::StringX attributeName = attributes[i].getAttributeName(); |
|
190 |
if (attributeName == L"event") relationContext.indexOfEvent = i; |
|
191 |
else if (attributeName == L"channel") relationContext.indexOfChannel = i; |
|
192 |
else if (attributeName == L"controller_id") relationContext.indexOfControllerId = i; |
|
193 |
else if (attributeName == L"controller_value") relationContext.indexOfControllerValue = i; |
|
194 |
else if (attributeName == L"note_on") relationContext.indexOfNoteOn = i; |
|
195 |
else if (attributeName == L"note_pitch") relationContext.indexOfNotePitch = i; |
|
196 |
else if (attributeName == L"note_velocity") relationContext.indexOfNoteVelocity = i; |
|
197 |
else if (attributeName == L"raw") relationContext.indexOfRaw = i; |
|
198 |
} |
|
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
199 |
|
10 | 200 |
// TODO: check also data types and skipt relation if important attributes are missing |
201 |
// TODO: configurable relation name |
|
13
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
202 |
|
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
203 |
if (relationContext.indexOfRaw == -1) { |
13
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
204 |
relationContext.skip = true; |
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
205 |
fwprintf(stderr, L"Relation „%ls“ will be ignored because mandatory attribute „raw“ is missing.\n", name.c_str()); |
13
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
206 |
} |
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
207 |
|
0 | 208 |
} |
209 |
||
210 |
void attribute(const relpipe::common::type::StringX& value) override { |
|
13
a85c191709e6
skip relations with missing mandatory attributes
František Kučera <franta-hg@frantovo.cz>
parents:
12
diff
changeset
|
211 |
if (relationContext.skip) return; |
10 | 212 |
// TODO: switch to RelationalReaderStringHandler |
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
213 |
// TODO: if (continueProcessing) {} ? |
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
214 |
|
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
215 |
RelationContext& rel = relationContext; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
216 |
RelationContext::RecordContext& rec = rel.recordContext; |
10 | 217 |
|
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
218 |
if (rel.indexOfEvent == rec.attributeIndex) rec.event = rec.parseEventType(value); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
219 |
else if (rel.indexOfChannel == rec.attributeIndex) rec.channel = std::stoi(value); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
220 |
else if (rel.indexOfControllerId == rec.attributeIndex) rec.controllerId = std::stoi(value); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
221 |
else if (rel.indexOfControllerValue == rec.attributeIndex) rec.controllerValue = std::stoi(value); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
222 |
else if (rel.indexOfNoteOn == rec.attributeIndex) rec.noteOn = value == L"true"; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
223 |
else if (rel.indexOfNotePitch == rec.attributeIndex) rec.notePitch = std::stoi(value); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
224 |
else if (rel.indexOfNoteVelocity == rec.attributeIndex) rec.noteVelocity = std::stoi(value); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
225 |
else if (rel.indexOfRaw == rec.attributeIndex) rec.raw = value; |
7
b2fc99295546
send correct number of messages to JACK + wait in order to be sure that all events were sent
František Kučera <franta-hg@frantovo.cz>
parents:
6
diff
changeset
|
226 |
|
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
227 |
rec.attributeIndex++; |
10 | 228 |
|
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
229 |
if (rec.attributeIndex == rel.attributeCount) { |
12
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
230 |
|
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
231 |
while (jack_ringbuffer_write_space(realTimeContext.ringBuffer) < sizeof (MidiMessage)) usleep(1000); // should not happen, the real-time thread should be faster |
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
232 |
|
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
233 |
MidiMessage m; |
8
27579c5cdc51
send correct number of messages to the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
7
diff
changeset
|
234 |
|
12
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
235 |
// TODO: correct timing? |
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
236 |
m.time = 0; |
14
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
237 |
|
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
238 |
if (rec.event == RelationContext::RecordContext::Event::NOTE) { |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
239 |
m.size = 3; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
240 |
m.buffer[0] = (rec.noteOn ? 0x90 : 0x80) | rec.channel; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
241 |
m.buffer[1] = rec.notePitch; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
242 |
m.buffer[2] = rec.noteVelocity; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
243 |
} else if (rec.event == RelationContext::RecordContext::Event::CONTROL) { |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
244 |
m.size = 3; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
245 |
m.buffer[0] = 0xB0 | rec.channel; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
246 |
m.buffer[1] = rec.controllerId; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
247 |
m.buffer[2] = rec.controllerValue; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
248 |
} else { // SysEx and other raw messages |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
249 |
m.size = 0; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
250 |
size_t nibble = 0; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
251 |
for (int i = 0; i < rec.raw.size() && m.size < sizeof (m.buffer); i++) { |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
252 |
wchar_t ch = rec.raw[i]; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
253 |
|
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
254 |
if (ch == L' ') continue; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
255 |
else if (ch >= L'0' && ch <= L'9') m.buffer[m.size] += (ch - '0') /**/ << (nibble % 2 ? 0 : 4); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
256 |
else if (ch >= L'a' && ch <= L'f') m.buffer[m.size] += (ch - 'a' + 10) << (nibble % 2 ? 0 : 4); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
257 |
else if (ch >= L'A' && ch <= L'F') m.buffer[m.size] += (ch - 'A' + 10) << (nibble % 2 ? 0 : 4); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
258 |
else throw JackException(L"Invalid character in the hexadeximal sequence: „" + std::wstring(1, ch) + L"“."); |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
259 |
|
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
260 |
nibble++; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
261 |
if (nibble % 2 == 0) m.size++; |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
262 |
} |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
263 |
} |
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
264 |
|
9ad606c80d3b
encode MIDI messages + process JACK error output
František Kučera <franta-hg@frantovo.cz>
parents:
13
diff
changeset
|
265 |
// TODO: if (m.size == 0) fwprintf(stderr, L"Missing data\n"); |
10 | 266 |
|
12
f56620b95180
wait until there is enough space in the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
11
diff
changeset
|
267 |
jack_ringbuffer_write(realTimeContext.ringBuffer, (const char *) &m, sizeof (m)); |
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
268 |
|
10 | 269 |
relationContext.recordContext = RelationContext::RecordContext(); |
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
270 |
} |
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
271 |
|
0 | 272 |
} |
273 |
||
274 |
void endOfPipe() { |
|
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
275 |
// TODO: send optional (configurable) MIDI events |
4
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
276 |
|
65dfbf0494a3
pass MIDI messages through the ring buffer (queue) from one thread to another
František Kučera <franta-hg@frantovo.cz>
parents:
3
diff
changeset
|
277 |
// Wait until the ring buffer is empty |
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
278 |
while (continueProcessing && jack_ringbuffer_read_space(realTimeContext.ringBuffer)) usleep(1000); |
7
b2fc99295546
send correct number of messages to JACK + wait in order to be sure that all events were sent
František Kučera <franta-hg@frantovo.cz>
parents:
6
diff
changeset
|
279 |
usleep(1000000); |
b2fc99295546
send correct number of messages to JACK + wait in order to be sure that all events were sent
František Kučera <franta-hg@frantovo.cz>
parents:
6
diff
changeset
|
280 |
// TODO: better waiting (ringBuffer might be empty, but events have not been sent to JACK yet) |
8
27579c5cdc51
send correct number of messages to the ring buffer
František Kučera <franta-hg@frantovo.cz>
parents:
7
diff
changeset
|
281 |
// TODO: optionally mute all; probably enabled by default |
3
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
282 |
} |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
283 |
|
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
284 |
void finish(int sig) { |
baa8055c5b10
ring buffer, JACK callback skeleton, signal handler
František Kučera <franta-hg@frantovo.cz>
parents:
2
diff
changeset
|
285 |
continueProcessing = false; |
0 | 286 |
} |
287 |
||
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
288 |
virtual ~JackHandler() { |
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
289 |
// Close JACK connection: |
11
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
290 |
jack_deactivate(realTimeContext.jackClient); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
291 |
jack_client_close(realTimeContext.jackClient); |
1c0b9981eb6d
move real-time callbacks to a separate context
František Kučera <franta-hg@frantovo.cz>
parents:
10
diff
changeset
|
292 |
jack_ringbuffer_free(realTimeContext.ringBuffer); |
1
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
293 |
} |
7f3ab657dc50
link to the JACK library, connect to the JACK daemon
František Kučera <franta-hg@frantovo.cz>
parents:
0
diff
changeset
|
294 |
|
0 | 295 |
}; |
296 |
||
297 |
} |
|
298 |
} |
|
299 |
} |