21 #include <memory>

    23 #include <sstream>

    24 #include <sys/mman.h>

    63 	const int RING_BUFFER_SIZE = 100;

    58 	/**

    64 

    59 	 * Is passed through the ring buffer

    60 	 * from the the jack-writing thread (callback) to the relpipe-writing thread.

    61 	 */

    66 		uint8_t buffer[4096];

    63 		uint8_t buffer[4096] = {0};

    71 public:

    68 	/**

    72 

    69 	 * JACK callbacks (called from the real-time thread)

    73 	int enqueueMessage(jack_nframes_t frames) {

    70 	 */

    74 		void* buffer = jack_port_get_buffer(jackPort, frames);

    71 	class RealTimeContext {

    75 		if (buffer == nullptr) throw JackException(L"Unable to get port buffer."); // TODO: exception in RT callback?

    72 	public:

    76 

    73 		jack_client_t* jackClient = nullptr;

    77 		for (jack_nframes_t i = 0, eventCount = jack_midi_get_event_count(buffer); i < eventCount; i++) {

    74 		jack_port_t* jackPort = nullptr;

    78 			jack_midi_event_t event;

    75 		jack_ringbuffer_t* ringBuffer = nullptr;

    79 			int noData = jack_midi_event_get(&event, buffer, i);

    76 

    80 			if (noData) continue;

    77 		pthread_mutex_t processingLock = PTHREAD_MUTEX_INITIALIZER;

    81 

    78 		pthread_cond_t processingDone = PTHREAD_COND_INITIALIZER;

    82 			if (event.size > sizeof (MidiMessage::buffer)) {

    79 

    83 				// TODO: should not printf in RT callback:

    80 		const int RING_BUFFER_SIZE = 100;

    84 				fwprintf(stderr, L"Error: MIDI message was too large → skipping event. Maximum allowed size: %lu bytes.\n", sizeof (MidiMessage::buffer));

    81 

    85 			} else if (jack_ringbuffer_write_space(ringBuffer) >= sizeof (MidiMessage)) {

    82 		int processCallback(jack_nframes_t frames) {

    86 				MidiMessage m;

    83 			void* buffer = jack_port_get_buffer(jackPort, frames);

    87 				m.time = event.time;

    84 			if (buffer == nullptr) throw JackException(L"Unable to get port buffer."); // TODO: exception in RT callback?

    88 				m.size = event.size;

    85 

    89 				memcpy(m.buffer, event.buffer, event.size);

    86 			for (jack_nframes_t i = 0, eventCount = jack_midi_get_event_count(buffer); i < eventCount; i++) {

    90 				jack_ringbuffer_write(ringBuffer, (const char *) &m, sizeof (MidiMessage));

    87 				jack_midi_event_t event;

    91 			} else {

    88 				int noData = jack_midi_event_get(&event, buffer, i);

    92 				// TODO: should not printf in RT callback:

    89 				if (noData) continue;

    93 				fwprintf(stderr, L"Error: ring buffer is full → skipping event.\n");

    90 

    94 			}

    91 				if (event.size > sizeof (MidiMessage::buffer)) {

    95 		}

    92 					// TODO: should not printf in RT callback:

    96 

    93 					fwprintf(stderr, L"Error: MIDI message was too large → skipping event. Maximum allowed size: %lu bytes.\n", sizeof (MidiMessage::buffer));

    97 		// TODO: just count skipped events and bytes and report them in next successful message instead of printing to STDERR

    94 				} else if (jack_ringbuffer_write_space(ringBuffer) >= sizeof (MidiMessage)) {

    98 

    95 					MidiMessage m;

    99 		if (pthread_mutex_trylock(&messageThreadLock) == 0) {

    96 					m.time = event.time;

   100 			pthread_cond_signal(&dataReady);

    97 					m.size = event.size;

   101 			pthread_mutex_unlock(&messageThreadLock);

    98 					memcpy(m.buffer, event.buffer, event.size);

   102 		}

    99 					jack_ringbuffer_write(ringBuffer, (const char *) &m, sizeof (MidiMessage));

   103 

   100 				} else {

   104 		return 0;

   101 					// TODO: should not printf in RT callback:

   105 	}

   102 					fwprintf(stderr, L"Error: ring buffer is full → skipping event.\n");

   106 

   103 				}

   107 private:

   104 			}

   108 

   105 

   109 	static void writeRecord(std::shared_ptr<RelationalWriter> writer,

   106 			// TODO: just count skipped events and bytes and report them in next successful message instead of printing to STDERR

   110 			string_t eventType, integer_t channel,

   107 

   111 			boolean_t noteOn, integer_t pitch, integer_t velocity,

   108 			if (pthread_mutex_trylock(&processingLock) == 0) {

   112 			integer_t controllerId, integer_t value,

   109 				pthread_cond_signal(&processingDone);

   113 			string_t raw) {

   110 				pthread_mutex_unlock(&processingLock);

   111 			}

   112 

   113 			return 0;

   114 		}

   115 

   116 		static int processCallback(jack_nframes_t frames, void* instance) {

   117 			return static_cast<RealTimeContext*> (instance)->processCallback(frames);

   118 		}

   119 

   120 	} realTimeContext;

   121 

   122 	static void writeRecord(std::shared_ptr<relpipe::writer::RelationalWriter> writer,

   123 			relpipe::common::type::StringX eventType, relpipe::common::type::Integer channel,

   124 			relpipe::common::type::Boolean noteOn, relpipe::common::type::Integer pitch, relpipe::common::type::Integer velocity,

   125 			relpipe::common::type::Integer controllerId, relpipe::common::type::Integer value,

   126 			relpipe::common::type::StringX raw) {

   124 	void processMessage(std::shared_ptr<RelationalWriter> writer, MidiMessage* event) {

   137 	void processMessage(std::shared_ptr<relpipe::writer::RelationalWriter> writer, MidiMessage* event) {

   145 	string_t toHex(MidiMessage* event) {

   158 	relpipe::common::type::StringX toHex(MidiMessage* event) {

   162 	}

   200 		pthread_mutex_lock(&realTimeContext.processingLock);

   163 

   201 

   164 	void finish(int sig) {

   202 		// Initialize JACK connection:

   165 		continueProcessing = false;

   203 		std::string clientName = convertor.to_bytes(configuration.jackClientName);

   166 	}

   204 		realTimeContext.jackClient = jack_client_open(clientName.c_str(), JackNullOption, nullptr);

   167 

   205 		if (realTimeContext.jackClient == nullptr) failInConstructor(L"Could not create JACK client.");

   168 	void processJackStream(std::shared_ptr<writer::RelationalWriter> writer, std::function<void() > relationalWriterFlush) {

   206 

   207 		realTimeContext.ringBuffer = jack_ringbuffer_create(realTimeContext.RING_BUFFER_SIZE * sizeof (MidiMessage));

   208 

   209 		jack_set_process_callback(realTimeContext.jackClient, RealTimeContext::processCallback, &realTimeContext);

   210 		// TODO: report also other events (connections etc.)

   211 		jack_set_error_function(jackErrorCallback);

   212 		jack_set_info_function(jackErrorCallback);

   213 

   214 		realTimeContext.jackPort = jack_port_register(realTimeContext.jackClient, "input", JACK_DEFAULT_MIDI_TYPE, JackPortIsInput, 0);

   215 		if (realTimeContext.jackPort == nullptr) failInConstructor(L"Could not register the JACK port.");

   216 

   217 		if (mlockall(MCL_CURRENT | MCL_FUTURE)) fwprintf(stderr, L"Warning: Can not lock memory.\n");

   218 

   219 		int jackError = jack_activate(realTimeContext.jackClient);

   220 		if (jackError) failInConstructor(L"Could not activate the JACK client.");

   221 	}

   222 

   223 	void processJackStream(std::shared_ptr<relpipe::writer::RelationalWriter> writer, std::function<void() > relationalWriterFlush) {

   203 			const size_t queuedMessages = jack_ringbuffer_read_space(ringBuffer) / sizeof (MidiMessage);

   240 			while (jack_ringbuffer_read_space(realTimeContext.ringBuffer) >= sizeof (MidiMessage)) {

   204 			for (size_t i = 0; i < queuedMessages; ++i) {

   206 				jack_ringbuffer_read(ringBuffer, (char*) &m, sizeof (MidiMessage));

   242 				jack_ringbuffer_read(realTimeContext.ringBuffer, (char*) &m, sizeof (MidiMessage));

   210 			pthread_cond_wait(&dataReady, &messageThreadLock);

   246 			waitForRTCycle();

   211 		}

   247 		}

   212 		pthread_mutex_unlock(&messageThreadLock);

   248 	}

   213 

   249 

   214 		// Close JACK connection:

   250 	void finish(int sig) {

   215 		jack_deactivate(client);

   251 		continueProcessing = false;

   216 		jack_client_close(client);

   252 	}

   217 		jack_ringbuffer_free(ringBuffer);

   253 

   254 	virtual ~JackCommand() {

   255 		finalize();