author | František Kučera <franta-hg@frantovo.cz> |
Mon, 11 May 2020 20:50:54 +0200 | |
branch | v_0 |
changeset 0 | c8c8ec34120f |
child 1 | 001b956610ca |
permissions | -rw-r--r-- |
0
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
1 |
/** |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
2 |
* Relational pipes |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
3 |
* Copyright © 2020 František Kučera (Frantovo.cz, GlobalCode.info) |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
4 |
* |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
5 |
* This program is free software: you can redistribute it and/or modify |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
6 |
* it under the terms of the GNU General Public License as published by |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
7 |
* the Free Software Foundation, version 3 of the License. |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
8 |
* |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
9 |
* This program is distributed in the hope that it will be useful, |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
10 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
11 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
12 |
* GNU General Public License for more details. |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
13 |
* |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
14 |
* You should have received a copy of the GNU General Public License |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
15 |
* along with this program. If not, see <http://www.gnu.org/licenses/>. |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
16 |
*/ |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
17 |
#include <cstdlib> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
18 |
#include <cstring> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
19 |
#include <memory> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
20 |
#include <unistd.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
21 |
#include <signal.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
22 |
#include <pthread.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
23 |
#include <sys/mman.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
24 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
25 |
#include <jack/jack.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
26 |
#include <jack/midiport.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
27 |
#include <jack/ringbuffer.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
28 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
29 |
#include <relpipe/writer/RelationalWriter.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
30 |
#include <relpipe/writer/RelpipeWriterException.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
31 |
#include <relpipe/writer/AttributeMetadata.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
32 |
#include <relpipe/writer/Factory.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
33 |
#include <relpipe/writer/TypeId.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
34 |
#include <relpipe/cli/CLI.h> |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
35 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
36 |
#include "JackException.h" |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
37 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
38 |
using namespace relpipe::cli; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
39 |
using namespace relpipe::writer; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
40 |
using namespace relpipe::in::jack; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
41 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
42 |
static jack_port_t* jackPort = nullptr; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
43 |
static jack_ringbuffer_t* ringBuffer = nullptr; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
44 |
static pthread_mutex_t messageThreadLock = PTHREAD_MUTEX_INITIALIZER; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
45 |
static pthread_cond_t dataReady = PTHREAD_COND_INITIALIZER; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
46 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
47 |
static bool continueProcessing = true; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
48 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
49 |
const int RING_BUFFER_SIZE = 100; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
50 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
51 |
struct MidiMessage { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
52 |
uint8_t buffer[4096]; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
53 |
uint32_t size; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
54 |
uint32_t time; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
55 |
}; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
56 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
57 |
int enqueueMessage(jack_nframes_t frames, void* arg) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
58 |
void* buffer = jack_port_get_buffer(jackPort, frames); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
59 |
if (buffer == nullptr) throw JackException(L"Unable to get port buffer."); // TODO: exception in RT callback? |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
60 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
61 |
for (jack_nframes_t i = 0, eventCount = jack_midi_get_event_count(buffer); i < eventCount; i++) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
62 |
jack_midi_event_t event; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
63 |
int noData = jack_midi_event_get(&event, buffer, i); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
64 |
if (noData) continue; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
65 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
66 |
if (event.size > sizeof (MidiMessage::buffer)) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
67 |
// TODO: should not printf in RT callback: |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
68 |
fwprintf(stderr, L"Error: MIDI message was too large → skipping event. Maximum allowed size: %lu bytes.\n", sizeof (MidiMessage::buffer)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
69 |
} else if (jack_ringbuffer_write_space(ringBuffer) >= sizeof (MidiMessage)) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
70 |
MidiMessage m; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
71 |
m.time = event.time; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
72 |
m.size = event.size; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
73 |
memcpy(m.buffer, event.buffer, event.size); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
74 |
jack_ringbuffer_write(ringBuffer, (const char *) &m, sizeof (MidiMessage)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
75 |
} else { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
76 |
// TODO: should not printf in RT callback: |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
77 |
fwprintf(stderr, L"Error: ring buffer is full → skipping event.\n"); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
78 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
79 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
80 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
81 |
// TODO: just count skipped events and bytes and report them in next successful message instead of printing to STDERR |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
82 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
83 |
if (pthread_mutex_trylock(&messageThreadLock) == 0) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
84 |
pthread_cond_signal(&dataReady); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
85 |
pthread_mutex_unlock(&messageThreadLock); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
86 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
87 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
88 |
return 0; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
89 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
90 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
91 |
static void writeRecord(std::shared_ptr<RelationalWriter> writer, |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
92 |
string_t eventType, integer_t channel, |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
93 |
boolean_t noteOn, integer_t pitch, integer_t velocity, |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
94 |
integer_t controllerId, integer_t value) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
95 |
writer->writeAttribute(eventType); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
96 |
writer->writeAttribute(&channel, typeid (channel)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
97 |
writer->writeAttribute(¬eOn, typeid (noteOn)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
98 |
writer->writeAttribute(&pitch, typeid (pitch)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
99 |
writer->writeAttribute(&velocity, typeid (velocity)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
100 |
writer->writeAttribute(&controllerId, typeid (controllerId)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
101 |
writer->writeAttribute(&value, typeid (value)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
102 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
103 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
104 |
static void processMessage(std::shared_ptr<RelationalWriter> writer, MidiMessage* event) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
105 |
if (event->size == 0) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
106 |
return; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
107 |
} else { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
108 |
uint8_t type = event->buffer[0] & 0xF0; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
109 |
uint8_t channel = event->buffer[0] & 0x0F; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
110 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
111 |
// TODO: write timestamp, message number |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
112 |
// TODO: write raw buffer in hex |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
113 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
114 |
if ((type == 0x90 || type == 0x80) && event->size == 3) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
115 |
writeRecord(writer, L"note", channel, type == 0x90, event->buffer[1], event->buffer[2], 0, 0); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
116 |
} else if (type == 0xB0 && event->size == 3) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
117 |
writeRecord(writer, L"control", channel, false, 0, 0, event->buffer[1], event->buffer[2]); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
118 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
119 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
120 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
121 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
122 |
static void finish(int sig) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
123 |
continueProcessing = false; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
124 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
125 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
126 |
void processJackStream(ostream &output) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
127 |
// Relation headers: |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
128 |
std::shared_ptr<RelationalWriter> writer(Factory::create(output)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
129 |
vector<AttributeMetadata> metadata; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
130 |
metadata.push_back({L"event", TypeId::STRING}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
131 |
metadata.push_back({L"channel", TypeId::INTEGER}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
132 |
metadata.push_back({L"note_on", TypeId::BOOLEAN}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
133 |
metadata.push_back({L"note_pitch", TypeId::INTEGER}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
134 |
metadata.push_back({L"note_velocity", TypeId::INTEGER}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
135 |
metadata.push_back({L"controller_id", TypeId::INTEGER}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
136 |
metadata.push_back({L"controller_value", TypeId::INTEGER}); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
137 |
writer->startRelation(L"midi", metadata, true); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
138 |
output.flush(); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
139 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
140 |
// Initialize JACK connection: |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
141 |
std::string clientName = "relpipe-in-jack"; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
142 |
jack_client_t* client = jack_client_open(clientName.c_str(), JackNullOption, nullptr); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
143 |
if (client == nullptr) throw JackException(L"Could not create JACK client."); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
144 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
145 |
ringBuffer = jack_ringbuffer_create(RING_BUFFER_SIZE * sizeof (MidiMessage)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
146 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
147 |
jack_set_process_callback(client, enqueueMessage, nullptr); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
148 |
// TODO: report also other events (connections etc.) |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
149 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
150 |
jackPort = jack_port_register(client, "input", JACK_DEFAULT_MIDI_TYPE, JackPortIsInput, 0); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
151 |
if (jackPort == nullptr) throw JackException(L"Could not register port."); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
152 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
153 |
if (mlockall(MCL_CURRENT | MCL_FUTURE)) fwprintf(stderr, L"Warning: Can not lock memory.\n"); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
154 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
155 |
int jackError = jack_activate(client); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
156 |
if (jackError) throw JackException(L"Could not activate client."); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
157 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
158 |
signal(SIGHUP, finish); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
159 |
signal(SIGINT, finish); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
160 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
161 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
162 |
// Process messages from the ring buffer queue: |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
163 |
pthread_mutex_lock(&messageThreadLock); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
164 |
while (continueProcessing) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
165 |
const size_t queuedMessages = jack_ringbuffer_read_space(ringBuffer) / sizeof (MidiMessage); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
166 |
for (size_t i = 0; i < queuedMessages; ++i) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
167 |
MidiMessage m; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
168 |
jack_ringbuffer_read(ringBuffer, (char*) &m, sizeof (MidiMessage)); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
169 |
processMessage(writer, &m); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
170 |
output.flush(); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
171 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
172 |
pthread_cond_wait(&dataReady, &messageThreadLock); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
173 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
174 |
pthread_mutex_unlock(&messageThreadLock); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
175 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
176 |
// Close JACK connection: |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
177 |
jack_deactivate(client); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
178 |
jack_client_close(client); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
179 |
jack_ringbuffer_free(ringBuffer); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
180 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
181 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
182 |
int main(int argc, char** argv) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
183 |
setlocale(LC_ALL, ""); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
184 |
CLI::untieStdIO(); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
185 |
CLI cli(argc, argv); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
186 |
// TODO: options, CLI parsing, configurable attributes |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
187 |
// TODO: separate handler class |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
188 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
189 |
int resultCode = CLI::EXIT_CODE_UNEXPECTED_ERROR; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
190 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
191 |
try { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
192 |
processJackStream(cout); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
193 |
resultCode = CLI::EXIT_CODE_SUCCESS; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
194 |
} catch (JackException e) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
195 |
fwprintf(stderr, L"Caught JACK exception: %ls\n", e.getMessge().c_str()); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
196 |
fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount()); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
197 |
resultCode = CLI::EXIT_CODE_UNEXPECTED_ERROR; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
198 |
} catch (RelpipeWriterException e) { |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
199 |
fwprintf(stderr, L"Caught Writer exception: %ls\n", e.getMessge().c_str()); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
200 |
fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount()); |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
201 |
resultCode = CLI::EXIT_CODE_DATA_ERROR; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
202 |
} |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
203 |
|
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
204 |
return resultCode; |
c8c8ec34120f
first dirty version, writes MIDI events from JACK
František Kučera <franta-hg@frantovo.cz>
parents:
diff
changeset
|
205 |
} |