#include <boost/shared_ptr.hpp>
+#include <glibmm/main.h>
#include "midi++/mmc.h"
#include "midi++/port.h"
#include "ardour/session.h"
#include "ardour/audio_track.h"
#include "ardour/midi_track.h"
+#include "ardour/midi_ui.h"
#include "ardour/audio_diskstream.h"
#include "ardour/slave.h"
#include "ardour/cycles.h"
using namespace ARDOUR;
using namespace PBD;
using namespace MIDI;
-
-MachineControl::CommandSignature MMC_CommandSignature;
-MachineControl::ResponseSignature MMC_ResponseSignature;
-
+using namespace Glib;
void
Session::midi_panic()
}
}
-int
-Session::use_config_midi_ports ()
-{
- string port_name;
-
- if (default_mmc_port) {
- set_mmc_port (default_mmc_port->name());
- } else {
- set_mmc_port ("");
- }
-
- if (default_mtc_port) {
- set_mtc_port (default_mtc_port->name());
- } else {
- set_mtc_port ("");
- }
-
- if (default_midi_port) {
- set_midi_port (default_midi_port->name());
- } else {
- set_midi_port ("");
- }
-
- if (default_midi_clock_port) {
- set_midi_clock_port (default_midi_clock_port->name());
- } else {
- set_midi_clock_port ("");
- }
-
- return 0;
-}
-
-
-/***********************************************************************
- MTC, MMC, etc.
-**********************************************************************/
-
-int
-Session::set_mtc_port (string port_tag)
-{
- MTC_Slave *ms;
-
- if (port_tag.length() == 0) {
-
- if (_slave && ((ms = dynamic_cast<MTC_Slave*> (_slave)) != 0)) {
- error << _("Ardour is slaved to MTC - port cannot be reset") << endmsg;
- return -1;
- }
-
- if (_mtc_port == 0) {
- return 0;
- }
-
- _mtc_port = 0;
- goto out;
- }
-
- MIDI::Port* port;
-
- if ((port = MIDI::Manager::instance()->port (port_tag)) == 0) {
- error << string_compose (_("unknown port %1 requested for MTC"), port_tag) << endl;
- return -1;
- }
-
- _mtc_port = port;
-
- if (_slave && ((ms = dynamic_cast<MTC_Slave*> (_slave)) != 0)) {
- ms->rebind (*port);
- }
-
- Config->set_mtc_port_name (port_tag);
-
- out:
- MTC_PortChanged(); /* EMIT SIGNAL */
- change_midi_ports ();
- set_dirty();
- return 0;
-}
-
-void
-Session::set_mmc_receive_device_id (uint32_t device_id)
-{
- if (mmc) {
- mmc->set_receive_device_id (device_id);
- }
-}
-
-void
-Session::set_mmc_send_device_id (uint32_t device_id)
-{
- if (mmc) {
- mmc->set_send_device_id (device_id);
- }
-}
-
-int
-Session::set_mmc_port (string port_tag)
-{
- MIDI::byte old_recv_device_id = 0;
- MIDI::byte old_send_device_id = 0;
- bool reset_id = false;
-
- if (port_tag.length() == 0) {
- if (_mmc_port == 0) {
- return 0;
- }
- _mmc_port = 0;
- goto out;
- }
-
- MIDI::Port* port;
-
- if ((port = MIDI::Manager::instance()->port (port_tag)) == 0) {
- return -1;
- }
-
- _mmc_port = port;
-
- if (mmc) {
- old_recv_device_id = mmc->receive_device_id();
- old_recv_device_id = mmc->send_device_id();
- reset_id = true;
- delete mmc;
- }
-
- mmc = new MIDI::MachineControl (*_mmc_port, 1.0,
- MMC_CommandSignature,
- MMC_ResponseSignature);
-
- if (reset_id) {
- mmc->set_receive_device_id (old_recv_device_id);
- mmc->set_send_device_id (old_send_device_id);
- }
-
- mmc->Play.connect
- (mem_fun (*this, &Session::mmc_deferred_play));
- mmc->DeferredPlay.connect
- (mem_fun (*this, &Session::mmc_deferred_play));
- mmc->Stop.connect
- (mem_fun (*this, &Session::mmc_stop));
- mmc->FastForward.connect
- (mem_fun (*this, &Session::mmc_fast_forward));
- mmc->Rewind.connect
- (mem_fun (*this, &Session::mmc_rewind));
- mmc->Pause.connect
- (mem_fun (*this, &Session::mmc_pause));
- mmc->RecordPause.connect
- (mem_fun (*this, &Session::mmc_record_pause));
- mmc->RecordStrobe.connect
- (mem_fun (*this, &Session::mmc_record_strobe));
- mmc->RecordExit.connect
- (mem_fun (*this, &Session::mmc_record_exit));
- mmc->Locate.connect
- (mem_fun (*this, &Session::mmc_locate));
- mmc->Step.connect
- (mem_fun (*this, &Session::mmc_step));
- mmc->Shuttle.connect
- (mem_fun (*this, &Session::mmc_shuttle));
- mmc->TrackRecordStatusChange.connect
- (mem_fun (*this, &Session::mmc_record_enable));
-
-
- /* also handle MIDI SPP because its so common */
-
- _mmc_port->input()->start.connect (mem_fun (*this, &Session::spp_start));
- _mmc_port->input()->contineu.connect (mem_fun (*this, &Session::spp_continue));
- _mmc_port->input()->stop.connect (mem_fun (*this, &Session::spp_stop));
-
- Config->set_mmc_port_name (port_tag);
-
- out:
- MMC_PortChanged(); /* EMIT SIGNAL */
- change_midi_ports ();
- set_dirty();
- return 0;
-}
-
-int
-Session::set_midi_port (string /*port_tag*/)
-{
-#if 0
- if (port_tag.length() == 0) {
- if (_midi_port == 0) {
- return 0;
- }
- _midi_port = 0;
- goto out;
- }
-
- MIDI::Port* port;
-
- if ((port = MIDI::Manager::instance()->port (port_tag)) == 0) {
- return -1;
- }
-
- _midi_port = port;
-
- /* XXX need something to forward this to control protocols ? or just
- use the signal below
- */
-
- Config->set_midi_port_name (port_tag);
-
- out:
-#endif
- MIDI_PortChanged(); /* EMIT SIGNAL */
- change_midi_ports ();
- set_dirty();
- return 0;
-}
-
-int
-Session::set_midi_clock_port (string port_tag)
-{
- MIDIClock_Slave *ms;
-
- if (port_tag.length() == 0) {
-
- if (_slave && ((ms = dynamic_cast<MIDIClock_Slave*> (_slave)) != 0)) {
- error << _("Ardour is slaved to MIDI Clock - port cannot be reset") << endmsg;
- return -1;
- }
-
- if (_midi_clock_port == 0) {
- return 0;
- }
-
- _midi_clock_port = 0;
- goto out;
- }
-
- MIDI::Port* port;
-
- if ((port = MIDI::Manager::instance()->port (port_tag)) == 0) {
- error << string_compose (_("unknown port %1 requested for MIDI Clock"), port_tag) << endl;
- return -1;
- }
-
- _midi_clock_port = port;
-
- if (_slave && ((ms = dynamic_cast<MIDIClock_Slave*> (_slave)) != 0)) {
- ms->rebind (*port);
- }
-
- Config->set_midi_clock_port_name (port_tag);
-
- out:
- MIDIClock_PortChanged(); /* EMIT SIGNAL */
- change_midi_ports ();
- set_dirty();
- return 0;
-}
-
-void
-Session::set_trace_midi_input (bool yn, MIDI::Port* port)
-{
- MIDI::Parser* input_parser;
-
- cerr << "enabling tracing: " << yn << " for input port " << port->name() << endl;
-
- if (port) {
- if ((input_parser = port->input()) != 0) {
- input_parser->trace (yn, &cout, "input: ");
- }
- } else {
-
- if (_mmc_port) {
- if ((input_parser = _mmc_port->input()) != 0) {
- input_parser->trace (yn, &cout, "input: ");
- }
- }
-
- if (_mtc_port && _mtc_port != _mmc_port) {
- if ((input_parser = _mtc_port->input()) != 0) {
- input_parser->trace (yn, &cout, "input: ");
- }
- }
-
- if (_midi_port && _midi_port != _mmc_port && _midi_port != _mtc_port ) {
- if ((input_parser = _midi_port->input()) != 0) {
- input_parser->trace (yn, &cout, "input: ");
- }
- }
-
- if (_midi_clock_port
- && _midi_clock_port != _mmc_port
- && _midi_clock_port != _mtc_port
- && _midi_clock_port != _midi_port) {
- if ((input_parser = _midi_clock_port->input()) != 0) {
- input_parser->trace (yn, &cout, "input: ");
- }
- }
- }
-
- Config->set_trace_midi_input (yn);
-}
-
-void
-Session::set_trace_midi_output (bool yn, MIDI::Port* port)
-{
- MIDI::Parser* output_parser;
-
- if (port) {
- if ((output_parser = port->output()) != 0) {
- output_parser->trace (yn, &cout, "output: ");
- }
- } else {
- if (_mmc_port) {
- if ((output_parser = _mmc_port->output()) != 0) {
- output_parser->trace (yn, &cout, "output: ");
- }
- }
-
- if (_mtc_port && _mtc_port != _mmc_port) {
- if ((output_parser = _mtc_port->output()) != 0) {
- output_parser->trace (yn, &cout, "output: ");
- }
- }
-
- if (_midi_port && _midi_port != _mmc_port && _midi_port != _mtc_port ) {
- if ((output_parser = _midi_port->output()) != 0) {
- output_parser->trace (yn, &cout, "output: ");
- }
- }
-
- }
-
- Config->set_trace_midi_output (yn);
-}
-
-bool
-Session::get_trace_midi_input(MIDI::Port *port)
-{
- MIDI::Parser* input_parser;
- if (port) {
- if ((input_parser = port->input()) != 0) {
- return input_parser->tracing();
- }
- }
- else {
- if (_mmc_port) {
- if ((input_parser = _mmc_port->input()) != 0) {
- return input_parser->tracing();
- }
- }
-
- if (_mtc_port) {
- if ((input_parser = _mtc_port->input()) != 0) {
- return input_parser->tracing();
- }
- }
-
- if (_midi_port) {
- if ((input_parser = _midi_port->input()) != 0) {
- return input_parser->tracing();
- }
- }
- }
-
- return false;
-}
-
-bool
-Session::get_trace_midi_output(MIDI::Port *port)
-{
- MIDI::Parser* output_parser;
- if (port) {
- if ((output_parser = port->output()) != 0) {
- return output_parser->tracing();
- }
- }
- else {
- if (_mmc_port) {
- if ((output_parser = _mmc_port->output()) != 0) {
- return output_parser->tracing();
- }
- }
-
- if (_mtc_port) {
- if ((output_parser = _mtc_port->output()) != 0) {
- return output_parser->tracing();
- }
- }
-
- if (_midi_port) {
- if ((output_parser = _midi_port->output()) != 0) {
- return output_parser->tracing();
- }
- }
- }
-
- return false;
-
-}
-
void
Session::setup_midi_control ()
{
outbound_mtc_timecode_frame = 0;
next_quarter_frame_to_send = 0;
- /* setup the MMC buffer */
-
- mmc_buffer[0] = 0xf0; // SysEx
- mmc_buffer[1] = 0x7f; // Real Time SysEx ID for MMC
- mmc_buffer[2] = (mmc ? mmc->send_device_id() : 0x7f);
- mmc_buffer[3] = 0x6; // MCC
-
/* Set up the qtr frame message */
mtc_msg[0] = 0xf1;
void
Session::mmc_record_strobe (MIDI::MachineControl &/*mmc*/)
{
- if (!Config->get_mmc_control())
+ if (!Config->get_mmc_control()) {
return;
+ }
/* record strobe does an implicit "Play" command */
last_mmc_step = now;
if (!step_queued) {
- midi_timeouts.push_back (mem_fun (*this, &Session::mmc_step_timeout));
- step_queued = true;
+ if (midi_control_ui) {
+ RefPtr<TimeoutSource> tsrc = TimeoutSource::create (100);
+ tsrc->connect (sigc::mem_fun (*this, &Session::mmc_step_timeout));
+ tsrc->attach (midi_control_ui->main_loop()->get_context());
+ step_queued = true;
+ }
}
}
}
}
-void
-Session::change_midi_ports ()
-{
- MIDIRequest* request = new MIDIRequest;
-
- request->type = MIDIRequest::PortChange;
- midi_requests.write (&request, 1);
- poke_midi_thread ();
-}
-
/** Send MTC Full Frame message (complete Timecode time) for the start of this cycle.
* This resets the MTC code, the next quarter frame message that is sent will be
* the first one with the beginning of this cycle as the new start point.
+ * @param t time to send.
*/
int
-Session::send_full_time_code(nframes_t /*nframes*/)
+Session::send_full_time_code (nframes64_t const t)
{
/* This function could easily send at a given frame offset, but would
* that be useful? Does ardour do sub-block accurate locating? [DR] */
_send_timecode_update = false;
- if (_mtc_port == 0 || !session_send_mtc) {
+ if (!session_send_mtc || _slave) {
return 0;
}
- // Get timecode time for this transport frame
- sample_to_timecode(_transport_frame, timecode, true /* use_offset */, false /* no subframes */);
+ // Get timecode time for the given time
+ sample_to_timecode (t, timecode, true /* use_offset */, false /* no subframes */);
transmitting_timecode_time = timecode;
- outbound_mtc_timecode_frame = _transport_frame;
+ outbound_mtc_timecode_frame = t;
// I don't understand this bit yet.. [DR]
if (((mtc_timecode_bits >> 5) != MIDI::MTC_25_FPS) && (transmitting_timecode_time.frames % 2)) {
// start MTC quarter frame transmission on an even frame
- Timecode::increment( transmitting_timecode_time, config.get_subframes_per_frame() );
+ Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame());
outbound_mtc_timecode_frame += (nframes_t) _frames_per_timecode_frame;
}
// Compensate for audio latency
outbound_mtc_timecode_frame += _worst_output_latency;
-
next_quarter_frame_to_send = 0;
// Sync slave to the same Timecode time as we are on
msg[7] = timecode.seconds;
msg[8] = timecode.frames;
- cerr << "MTC: Sending full time code at " << outbound_mtc_timecode_frame << endl;
-
// Send message at offset 0, sent time is for the start of this cycle
- if (_mtc_port->midimsg (msg, sizeof (msg), 0)) {
+ if (MIDI::Manager::instance()->mtc_output_port()->midimsg (msg, sizeof (msg), 0)) {
error << _("Session: could not send full MIDI time code") << endmsg;
return -1;
}
int
Session::send_midi_time_code_for_cycle(nframes_t nframes)
{
- assert (next_quarter_frame_to_send >= 0);
- assert (next_quarter_frame_to_send <= 7);
-
- if (_mtc_port == 0 || !session_send_mtc || transmitting_timecode_time.negative
- /*|| (next_quarter_frame_to_send < 0)*/ ) {
+ if (_slave || !session_send_mtc || transmitting_timecode_time.negative || (next_quarter_frame_to_send < 0)) {
// cerr << "(MTC) Not sending MTC\n";
return 0;
}
+ assert (next_quarter_frame_to_send >= 0);
+ assert (next_quarter_frame_to_send <= 7);
+
/* Duration of one quarter frame */
nframes_t quarter_frame_duration = ((long) _frames_per_timecode_frame) >> 2;
- DEBUG_TRACE (DEBUG::MTC, string_compose ("TF %1 SF %2 NQ %3 FD %\4n", _transport_frame, outbound_mtc_timecode_frame,
+ DEBUG_TRACE (DEBUG::MTC, string_compose ("TF %1 SF %2 NQ %3 FD %4\n", _transport_frame, outbound_mtc_timecode_frame,
next_quarter_frame_to_send, quarter_frame_duration));
- // FIXME: this should always be true
- //assert((outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration))
- // > _transport_frame);
+ assert((outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration))
+ >= _transport_frame);
// Send quarter frames for this cycle
nframes_t out_stamp = msg_time - _transport_frame;
assert(out_stamp < nframes);
- if (_mtc_port->midimsg (mtc_msg, 2, out_stamp)) {
+ if (MIDI::Manager::instance()->mtc_output_port()->midimsg (mtc_msg, 2, out_stamp)) {
error << string_compose(_("Session: cannot send quarter-frame MTC message (%1)"), strerror (errno))
<< endmsg;
return -1;
}
- DEBUG_STR_SET(foo,"sending ");
- DEBUG_STR(foo) << transmitting_timecode_time;
+#ifndef NDEBUG
+ DEBUG_STR_DECL(foo)
+ DEBUG_STR_APPEND(foo,"sending ");
+ DEBUG_STR_APPEND(foo, transmitting_timecode_time);
DEBUG_TRACE (DEBUG::MTC, string_compose ("%1 qfm = %2, stamp = %3\n", DEBUG_STR(foo).str(), next_quarter_frame_to_send,
out_stamp));
+#endif
// Increment quarter frame counter
next_quarter_frame_to_send++;
// Re-calculate timing of first quarter frame
//timecode_to_sample( transmitting_timecode_time, outbound_mtc_timecode_frame, true /* use_offset */, false );
outbound_mtc_timecode_frame += 8 * quarter_frame_duration;
- // Compensate for audio latency
- outbound_mtc_timecode_frame += _worst_output_latency;
}
}
OUTBOUND MMC STUFF
**********************************************************************/
-void
-Session::deliver_mmc (MIDI::MachineControl::Command cmd, nframes_t where)
-{
- using namespace MIDI;
- int nbytes = 4;
- Timecode::Time timecode;
-
- if (_mmc_port == 0 || !session_send_mmc) {
- // cerr << "Not delivering MMC " << _mmc_port << " - " << session_send_mmc << endl;
- return;
- }
-
- mmc_buffer[nbytes++] = cmd;
-
- // cerr << "delivering MMC, cmd = " << hex << (int) cmd << dec << endl;
-
- switch (cmd) {
- case MachineControl::cmdLocate:
- timecode_time_subframes (where, timecode);
-
- mmc_buffer[nbytes++] = 0x6; // byte count
- mmc_buffer[nbytes++] = 0x1; // "TARGET" subcommand
- mmc_buffer[nbytes++] = timecode.hours;
- mmc_buffer[nbytes++] = timecode.minutes;
- mmc_buffer[nbytes++] = timecode.seconds;
- mmc_buffer[nbytes++] = timecode.frames;
- mmc_buffer[nbytes++] = timecode.subframes;
- break;
-
- case MachineControl::cmdStop:
- break;
-
- case MachineControl::cmdPlay:
- /* always convert Play into Deferred Play */
- /* Why? [DR] */
- mmc_buffer[4] = MachineControl::cmdDeferredPlay;
- break;
-
- case MachineControl::cmdDeferredPlay:
- break;
-
- case MachineControl::cmdRecordStrobe:
- break;
-
- case MachineControl::cmdRecordExit:
- break;
-
- case MachineControl::cmdRecordPause:
- break;
-
- default:
- nbytes = 0;
- };
-
- if (nbytes) {
-
- mmc_buffer[nbytes++] = 0xf7; // terminate SysEx/MMC message
-
- if (_mmc_port->midimsg (mmc_buffer, nbytes, 0)) {
- error << string_compose(_("MMC: cannot send command %1%2%3"), &hex, cmd, &dec) << endmsg;
- }
- }
-}
bool
Session::mmc_step_timeout ()
int
Session::start_midi_thread ()
{
- if (pipe (midi_request_pipe)) {
- error << string_compose(_("Cannot create transport request signal pipe (%1)"), strerror (errno)) << endmsg;
- return -1;
- }
-
- if (fcntl (midi_request_pipe[0], F_SETFL, O_NONBLOCK)) {
- error << string_compose(_("UI: cannot set O_NONBLOCK on " "signal read pipe (%1)"), strerror (errno)) << endmsg;
- return -1;
- }
-
- if (fcntl (midi_request_pipe[1], F_SETFL, O_NONBLOCK)) {
- error << string_compose(_("UI: cannot set O_NONBLOCK on " "signal write pipe (%1)"), strerror (errno)) << endmsg;
- return -1;
- }
-
- if (pthread_create_and_store ("transport", &midi_thread, 0, _midi_thread_work, this)) {
- error << _("Session: could not create transport thread") << endmsg;
- return -1;
- }
-
+ midi_control_ui = new MidiControlUI (*this);
+ midi_control_ui->run ();
return 0;
}
void
Session::terminate_midi_thread ()
{
- if (midi_thread) {
-
- MIDIRequest* request = new MIDIRequest;
- void* status;
-
- request->type = MIDIRequest::Quit;
-
- midi_requests.write (&request, 1);
- poke_midi_thread ();
-
- pthread_join (midi_thread, &status);
- }
-}
-
-void
-Session::poke_midi_thread ()
-{
- static char c = 0;
-
- if (write (midi_request_pipe[1], &c, 1) != 1) {
- error << string_compose(_("cannot send signal to midi thread! (%1)"), strerror (errno)) << endmsg;
+ if (midi_control_ui) {
+ midi_control_ui->quit ();
}
}
-void *
-Session::_midi_thread_work (void* arg)
-{
- pthread_setcancelstate (PTHREAD_CANCEL_ENABLE, 0);
- pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, 0);
-
- ((Session *) arg)->midi_thread_work ();
- return 0;
-}
-
-void
-Session::midi_thread_work ()
-{
- MIDIRequest* request;
- struct pollfd pfd[4];
- int nfds = 0;
- int timeout;
- int fds_ready;
- struct sched_param rtparam;
- int x;
- bool restart;
- vector<MIDI::Port*> ports;
-
- PBD::notify_gui_about_thread_creation (pthread_self(), X_("MIDI"), 2048);
-
- memset (&rtparam, 0, sizeof (rtparam));
- rtparam.sched_priority = 9; /* XXX should be relative to audio (JACK) thread */
-
- if ((x = pthread_setschedparam (pthread_self(), SCHED_FIFO, &rtparam)) != 0) {
- // do we care? not particularly.
- }
-
- /* set up the port vector; 5 is the largest possible size for now */
-
- ports.assign (5, (MIDI::Port*) 0);
-
- while (1) {
-
- nfds = 0;
-
- pfd[nfds].fd = midi_request_pipe[0];
- pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
- nfds++;
-
- if (Config->get_mmc_control() && _mmc_port && _mmc_port->selectable() >= 0) {
- pfd[nfds].fd = _mmc_port->selectable();
- pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
- ports[nfds] = _mmc_port;
- DEBUG_TRACE (DEBUG::MidiIO, string_compose ("set up port #%1 for mmc @ %2\n", nfds, _mmc_port));
- nfds++;
- }
-
- /* if MTC is being handled on a different port from MMC
- or we are not handling MMC at all, poll
- the relevant port.
- */
-
- if (_mtc_port && (_mtc_port != _mmc_port || !Config->get_mmc_control()) && _mtc_port->selectable() >= 0) {
- pfd[nfds].fd = _mtc_port->selectable();
- pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
- ports[nfds] = _mtc_port;
- DEBUG_TRACE (DEBUG::MidiIO, string_compose ("set up port #%1 for mtc @ %2\n", nfds, _mtc_port));
- nfds++;
- }
-
- if (_midi_clock_port && (_midi_clock_port != _mmc_port || !Config->get_mmc_control()) && _midi_clock_port->selectable() >= 0) {
- pfd[nfds].fd = _midi_clock_port->selectable();
- pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
- ports[nfds] = _midi_clock_port;
- DEBUG_TRACE (DEBUG::MidiIO, string_compose ("set up port #%1 for midi clock @ %2\n", nfds, _midi_clock_port));
- nfds++;
- }
-
- /* if we are using MMC control, we obviously have to listen
- the relevant port.
- */
-
- if (_midi_port && (_midi_port != _mmc_port || !Config->get_mmc_control()) && (_midi_port != _mtc_port) && _midi_port->selectable() >= 0) {
- pfd[nfds].fd = _midi_port->selectable();
- pfd[nfds].events = POLLIN|POLLHUP|POLLERR;
- ports[nfds] = _midi_port;
- DEBUG_TRACE (DEBUG::MidiIO, string_compose ("set up port #%1 for midi @ %2\n", nfds, _midi_port));
- nfds++;
- }
-
- if (!midi_timeouts.empty()) {
- timeout = 100; /* 10msecs */
- } else {
- timeout = -1; /* if there is no data, we don't care */
- }
-
- again:
- DEBUG_TRACE (DEBUG::MidiIO, string_compose ("MIDI poll on %1 fds for %2\n", nfds, timeout));
- if (poll (pfd, nfds, timeout) < 0) {
- if (errno == EINTR) {
- /* gdb at work, perhaps */
- goto again;
- }
-
- error << string_compose(_("MIDI thread poll failed (%1)"), strerror (errno)) << endmsg;
-
- break;
- }
- DEBUG_TRACE (DEBUG::MidiIO, "MIDI thread awake\n");
-
- fds_ready = 0;
-
- /* check the transport request pipe */
-
- if (pfd[0].revents & ~POLLIN) {
- error << _("Error on transport thread request pipe") << endmsg;
- break;
- }
-
- if (pfd[0].revents & POLLIN) {
-
- char foo[16];
-
- DEBUG_TRACE (DEBUG::MidiIO, "MIDI request FIFO ready\n");
- fds_ready++;
-
- /* empty the pipe of all current requests */
-
- while (1) {
- size_t nread = read (midi_request_pipe[0], &foo, sizeof (foo));
-
- if (nread > 0) {
- if ((size_t) nread < sizeof (foo)) {
- break;
- } else {
- continue;
- }
- } else if (nread == 0) {
- break;
- } else if (errno == EAGAIN) {
- break;
- } else {
- fatal << _("Error reading from transport request pipe") << endmsg;
- /*NOTREACHED*/
- }
- }
-
- while (midi_requests.read (&request, 1) == 1) {
-
- switch (request->type) {
- case MIDIRequest::PortChange:
- /* restart poll with new ports */
- DEBUG_TRACE (DEBUG::MidiIO, "rebind\n");
- restart = true;
- break;
-
- case MIDIRequest::Quit:
- delete request;
- DEBUG_TRACE (DEBUG::MidiIO, "thread quit\n");
- pthread_exit_pbd (0);
- /*NOTREACHED*/
- break;
-
- default:
- break;
- }
-
-
- delete request;
- }
-
- }
-
- if (restart) {
- DEBUG_TRACE (DEBUG::MidiIO, "ports changed, restart poll\n");
- restart = false;
- continue;
- }
-
- /* now read the rest of the ports */
-
- for (int p = 1; p < nfds; ++p) {
-
- DEBUG_STR_SET(foo, "port #%1 revents = ");
- DEBUG_STR(foo) << hex << pfd[p].revents << dec << endl;
- DEBUG_TRACE (DEBUG::MidiIO, string_compose (DEBUG_STR(foo).str(), p));
-
- if ((pfd[p].revents & ~POLLIN)) {
- // error << string_compose(_("Transport: error polling MIDI port %1 (revents =%2%3%4"), p, &hex, pfd[p].revents, &dec) << endmsg;
- break;
- }
-
- if (pfd[p].revents & POLLIN) {
- DEBUG_TRACE (DEBUG::MidiIO, string_compose ("MIDI fd # %1 has data ready\n", p));
- fds_ready++;
- ports[p]->parse ();
- }
- }
-
- /* timeout driven */
-
- if (fds_ready < 2 && timeout != -1) {
-
- DEBUG_TRACE (DEBUG::MidiIO, "Check timeouts\n");
- for (MidiTimeoutList::iterator i = midi_timeouts.begin(); i != midi_timeouts.end(); ) {
-
- MidiTimeoutList::iterator tmp;
- tmp = i;
- ++tmp;
-
- if (!(*i)()) {
- midi_timeouts.erase (i);
- }
-
- i = tmp;
- }
- }
- }
-}
projects / ardour.git / blobdiff