X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=libs%2Fsurfaces%2Fgeneric_midi%2Fgeneric_midi_control_protocol.cc;h=d0d74f4c12196efd5ae3daea0c0d0bc4d75ddbe1;hb=e10d0339ccd3659e0de58db29131e528571bc8c4;hp=a8a5b6eacec4f88967e150890870fafe2e351f59;hpb=ffdf5ada616d285fafb58f45c2e3d37b212a328a;p=ardour.git diff --git a/libs/surfaces/generic_midi/generic_midi_control_protocol.cc b/libs/surfaces/generic_midi/generic_midi_control_protocol.cc index a8a5b6eace..d0d74f4c12 100644 --- a/libs/surfaces/generic_midi/generic_midi_control_protocol.cc +++ b/libs/surfaces/generic_midi/generic_midi_control_protocol.cc @@ -15,31 +15,39 @@ along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. - $Id$ */ +#define __STDC_FORMAT_MACROS 1 +#include + +#include #include -#include -#include +#include "pbd/error.h" +#include "pbd/failed_constructor.h" -#include -#include -#include +#include "midi++/port.h" +#include "midi++/manager.h" -#include -#include +#include "ardour/session.h" +#include "ardour/route.h" +#include "ardour/midi_ui.h" #include "generic_midi_control_protocol.h" #include "midicontrollable.h" +#include "midifunction.h" using namespace ARDOUR; using namespace PBD; +using namespace std; #include "i18n.h" +#define midi_ui_context() MidiControlUI::instance() /* a UICallback-derived object that specifies the event loop for signal handling */ +#define ui_bind(x) boost::protect (boost::bind ((x))) + GenericMidiControlProtocol::GenericMidiControlProtocol (Session& s) - : ControlProtocol (s, _("Generic MIDI")) + : ControlProtocol (s, _("Generic MIDI"), midi_ui_context()) { MIDI::Manager* mm = MIDI::Manager::instance(); @@ -54,20 +62,48 @@ GenericMidiControlProtocol::GenericMidiControlProtocol (Session& s) throw failed_constructor(); } + do_feedback = false; _feedback_interval = 10000; // microseconds last_feedback_time = 0; - Controllable::StartLearning.connect (mem_fun (*this, &GenericMidiControlProtocol::start_learning)); - Controllable::StopLearning.connect (mem_fun (*this, &GenericMidiControlProtocol::stop_learning)); - Session::SendFeedback.connect (mem_fun (*this, &GenericMidiControlProtocol::send_feedback)); + /* XXX is it right to do all these in the same thread as whatever emits the signal? */ + + Controllable::StartLearning.connect_same_thread (*this, boost::bind (&GenericMidiControlProtocol::start_learning, this, _1)); + Controllable::StopLearning.connect_same_thread (*this, boost::bind (&GenericMidiControlProtocol::stop_learning, this, _1)); + Controllable::CreateBinding.connect_same_thread (*this, boost::bind (&GenericMidiControlProtocol::create_binding, this, _1, _2, _3)); + Controllable::DeleteBinding.connect_same_thread (*this, boost::bind (&GenericMidiControlProtocol::delete_binding, this, _1)); + + Session::SendFeedback.connect (*this, boost::bind (&GenericMidiControlProtocol::send_feedback, this), midi_ui_context());; + + std::string xmlpath = "/tmp/midi.map"; + + load_bindings (xmlpath); + reset_controllables (); } GenericMidiControlProtocol::~GenericMidiControlProtocol () { + Glib::Mutex::Lock lm (pending_lock); + Glib::Mutex::Lock lm2 (controllables_lock); + + for (MIDIControllables::iterator i = controllables.begin(); i != controllables.end(); ++i) { + delete *i; + } + controllables.clear (); + + for (MIDIPendingControllables::iterator i = pending_controllables.begin(); i != pending_controllables.end(); ++i) { + delete *i; + } + pending_controllables.clear (); + + for (MIDIFunctions::iterator i = functions.begin(); i != functions.end(); ++i) { + delete *i; + } + functions.clear (); } int -GenericMidiControlProtocol::set_active (bool yn) +GenericMidiControlProtocol::set_active (bool /*yn*/) { /* start/stop delivery/outbound thread */ return 0; @@ -82,6 +118,10 @@ GenericMidiControlProtocol::set_feedback_interval (microseconds_t ms) void GenericMidiControlProtocol::send_feedback () { + if (!do_feedback) { + return; + } + microseconds_t now = get_microseconds (); if (last_feedback_time != 0) { @@ -98,7 +138,7 @@ GenericMidiControlProtocol::send_feedback () void GenericMidiControlProtocol::_send_feedback () { - const int32_t bufsize = 16 * 1024; + const int32_t bufsize = 16 * 1024; /* XXX too big */ MIDI::byte buf[bufsize]; int32_t bsize = bufsize; MIDI::byte* end = buf; @@ -110,8 +150,8 @@ GenericMidiControlProtocol::_send_feedback () if (end == buf) { return; } - - _port->write (buf, (int32_t) (end - buf)); + + _port->write (buf, (int32_t) (end - buf), 0); } bool @@ -121,15 +161,55 @@ GenericMidiControlProtocol::start_learning (Controllable* c) return false; } - MIDIControllable* mc = new MIDIControllable (*_port, *c); + Glib::Mutex::Lock lm (pending_lock); + Glib::Mutex::Lock lm2 (controllables_lock); + + MIDIControllables::iterator tmp; + for (MIDIControllables::iterator i = controllables.begin(); i != controllables.end(); ) { + tmp = i; + ++tmp; + if ((*i)->get_controllable() == c) { + delete (*i); + controllables.erase (i); + } + i = tmp; + } + + MIDIPendingControllables::iterator ptmp; + for (MIDIPendingControllables::iterator i = pending_controllables.begin(); i != pending_controllables.end(); ) { + ptmp = i; + ++ptmp; + if (((*i)->first)->get_controllable() == c) { + (*i)->second.disconnect(); + delete (*i)->first; + delete *i; + pending_controllables.erase (i); + } + i = ptmp; + } + + + MIDIControllable* mc = 0; + + for (MIDIControllables::iterator i = controllables.begin(); i != controllables.end(); ++i) { + if ((*i)->get_controllable()->id() == c->id()) { + mc = *i; + break; + } + } + + if (!mc) { + mc = new MIDIControllable (*_port, *c); + } { Glib::Mutex::Lock lm (pending_lock); - std::pair result; - result = pending_controllables.insert (mc); - if (result.second) { - c->LearningFinished.connect (bind (mem_fun (*this, &GenericMidiControlProtocol::learning_stopped), mc)); - } + + MIDIPendingControllable* element = new MIDIPendingControllable; + element->first = mc; + c->LearningFinished.connect_same_thread (element->second, boost::bind (&GenericMidiControlProtocol::learning_stopped, this, mc)); + + pending_controllables.push_back (element); } mc->learn_about_external_control (); @@ -142,10 +222,19 @@ GenericMidiControlProtocol::learning_stopped (MIDIControllable* mc) Glib::Mutex::Lock lm (pending_lock); Glib::Mutex::Lock lm2 (controllables_lock); - MIDIControllables::iterator i = find (pending_controllables.begin(), pending_controllables.end(), mc); + MIDIPendingControllables::iterator tmp; + + for (MIDIPendingControllables::iterator i = pending_controllables.begin(); i != pending_controllables.end(); ) { + tmp = i; + ++tmp; + + if ( (*i)->first == mc) { + (*i)->second.disconnect(); + delete *i; + pending_controllables.erase(i); + } - if (i != pending_controllables.end()) { - pending_controllables.erase (i); + i = tmp; } controllables.insert (mc); @@ -155,27 +244,91 @@ void GenericMidiControlProtocol::stop_learning (Controllable* c) { Glib::Mutex::Lock lm (pending_lock); + Glib::Mutex::Lock lm2 (controllables_lock); + MIDIControllable* dptr = 0; /* learning timed out, and we've been told to consider this attempt to learn to be cancelled. find the relevant MIDIControllable and remove it from the pending list. */ - for (MIDIControllables::iterator i = pending_controllables.begin(); i != pending_controllables.end(); ++i) { - if (&(*i)->get_controllable() == c) { - (*i)->stop_learning (); - delete (*i); + for (MIDIPendingControllables::iterator i = pending_controllables.begin(); i != pending_controllables.end(); ++i) { + if (((*i)->first)->get_controllable() == c) { + (*i)->first->stop_learning (); + dptr = (*i)->first; + (*i)->second.disconnect(); + + delete *i; pending_controllables.erase (i); break; } } + + delete dptr; +} + +void +GenericMidiControlProtocol::delete_binding (PBD::Controllable* control) +{ + if (control != 0) { + Glib::Mutex::Lock lm2 (controllables_lock); + + for (MIDIControllables::iterator iter = controllables.begin(); iter != controllables.end(); ++iter) { + MIDIControllable* existingBinding = (*iter); + + if (control == (existingBinding->get_controllable())) { + delete existingBinding; + controllables.erase (iter); + } + + } + } +} + +void +GenericMidiControlProtocol::create_binding (PBD::Controllable* control, int pos, int control_number) +{ + if (control != NULL) { + Glib::Mutex::Lock lm2 (controllables_lock); + + MIDI::channel_t channel = (pos & 0xf); + MIDI::byte value = control_number; + + // Create a MIDIControllable + MIDIControllable* mc = new MIDIControllable (*_port, *control); + + // Remove any old binding for this midi channel/type/value pair + // Note: can't use delete_binding() here because we don't know the specific controllable we want to remove, only the midi information + for (MIDIControllables::iterator iter = controllables.begin(); iter != controllables.end(); ++iter) { + MIDIControllable* existingBinding = (*iter); + + if ((existingBinding->get_control_channel() & 0xf ) == channel && + existingBinding->get_control_additional() == value && + (existingBinding->get_control_type() & 0xf0 ) == MIDI::controller) { + + delete existingBinding; + controllables.erase (iter); + } + + } + + // Update the MIDI Controllable based on the the pos param + // Here is where a table lookup for user mappings could go; for now we'll just wing it... + mc->bind_midi(channel, MIDI::controller, value); + + controllables.insert (mc); + } } XMLNode& GenericMidiControlProtocol::get_state () { XMLNode* node = new XMLNode ("Protocol"); + char buf[32]; node->add_property (X_("name"), _name); + node->add_property (X_("feedback"), do_feedback ? "1" : "0"); + snprintf (buf, sizeof (buf), "%" PRIu64, _feedback_interval); + node->add_property (X_("feedback_interval"), buf); XMLNode* children = new XMLNode (X_("controls")); @@ -190,52 +343,293 @@ GenericMidiControlProtocol::get_state () } int -GenericMidiControlProtocol::set_state (const XMLNode& node) +GenericMidiControlProtocol::set_state (const XMLNode& node, int version) { XMLNodeList nlist; XMLNodeConstIterator niter; - Controllable* c; + const XMLProperty* prop; + if ((prop = node.property ("feedback")) != 0) { + do_feedback = (bool) atoi (prop->value().c_str()); + } else { + do_feedback = false; + } + + if ((prop = node.property ("feedback_interval")) != 0) { + if (sscanf (prop->value().c_str(), "%" PRIu64, &_feedback_interval) != 1) { + _feedback_interval = 10000; + } + } else { + _feedback_interval = 10000; + } + + boost::shared_ptr c; + { Glib::Mutex::Lock lm (pending_lock); + for (MIDIPendingControllables::iterator i = pending_controllables.begin(); i != pending_controllables.end(); ++i) { + delete *i; + } pending_controllables.clear (); } - + Glib::Mutex::Lock lm2 (controllables_lock); - controllables.clear (); - - nlist = node.children(); - + nlist = node.children(); // "controls" + if (nlist.empty()) { return 0; } - + nlist = nlist.front()->children (); - + for (niter = nlist.begin(); niter != nlist.end(); ++niter) { - - XMLProperty* prop; - + if ((prop = (*niter)->property ("id")) != 0) { ID id = prop->value (); - c = session->controllable_by_id (id); if (c) { MIDIControllable* mc = new MIDIControllable (*_port, *c); - if (mc->set_state (**niter) == 0) { + if (mc->set_state (**niter, version) == 0) { controllables.insert (mc); } } else { - warning << string_compose (_("Generic MIDI control: controllable %1 not found in session (ignored)"), - id) - << endmsg; + warning << string_compose ( + _("Generic MIDI control: controllable %1 not found in session (ignored)"), + id) << endmsg; + } + } + } + return 0; +} + +int +GenericMidiControlProtocol::set_feedback (bool yn) +{ + do_feedback = yn; + last_feedback_time = 0; + return 0; +} + +bool +GenericMidiControlProtocol::get_feedback () const +{ + return do_feedback; +} + +int +GenericMidiControlProtocol::load_bindings (const string& xmlpath) +{ + XMLTree state_tree; + + if (!state_tree.read (xmlpath.c_str())) { + error << string_compose(_("Could not understand MIDI bindings file %1"), xmlpath) << endmsg; + return -1; + } + + XMLNode* root = state_tree.root(); + + if (root->name() != X_("ArdourMIDIBindings")) { + error << string_compose (_("MIDI Bindings file %1 is not really a MIDI bindings file"), xmlpath) << endmsg; + return -1; + } + + const XMLProperty* prop; + + if ((prop = root->property ("version")) == 0) { + return -1; + } else { + int major; + int minor; + int micro; + + sscanf (prop->value().c_str(), "%d.%d.%d", &major, &minor, µ); + Stateful::loading_state_version = (major * 1000) + minor; + } + + const XMLNodeList& children (root->children()); + XMLNodeConstIterator citer; + XMLNodeConstIterator gciter; + + MIDIControllable* mc; + + for (citer = children.begin(); citer != children.end(); ++citer) { + if ((*citer)->name() == "Binding") { + const XMLNode* child = *citer; + + if (child->property ("uri")) { + /* controllable */ + + if ((mc = create_binding (*child)) != 0) { + Glib::Mutex::Lock lm2 (controllables_lock); + controllables.insert (mc); + } + + } else if (child->property ("function")) { + + cerr << "try to create a function from " << child->property ("function")->value() << endl; + + /* function */ + MIDIFunction* mf; + + if ((mf = create_function (*child)) != 0) { + functions.push_back (mf); + } } } } return 0; } + +MIDIControllable* +GenericMidiControlProtocol::create_binding (const XMLNode& node) +{ + const XMLProperty* prop; + int detail; + int channel; + string uri; + MIDI::eventType ev; + + if ((prop = node.property (X_("channel"))) == 0) { + return 0; + } + + if (sscanf (prop->value().c_str(), "%d", &channel) != 1) { + return 0; + } + + if ((prop = node.property (X_("ctl"))) != 0) { + ev = MIDI::controller; + } else if ((prop = node.property (X_("note"))) != 0) { + ev = MIDI::on; + } else if ((prop = node.property (X_("pgm"))) != 0) { + ev = MIDI::program; + } else { + return 0; + } + + if (sscanf (prop->value().c_str(), "%d", &detail) != 1) { + return 0; + } + + prop = node.property (X_("uri")); + uri = prop->value(); + + MIDIControllable* mc = new MIDIControllable (*_port, uri, false); + mc->bind_midi (channel, ev, detail); + + cerr << "New MC with URI = " << uri << endl; + + return mc; +} + +void +GenericMidiControlProtocol::reset_controllables () +{ + Glib::Mutex::Lock lm2 (controllables_lock); + + for (MIDIControllables::iterator iter = controllables.begin(); iter != controllables.end(); ++iter) { + MIDIControllable* existingBinding = (*iter); + + boost::shared_ptr c = session->controllable_by_uri (existingBinding->current_uri()); + existingBinding->set_controllable (c.get()); + } +} + +MIDIFunction* +GenericMidiControlProtocol::create_function (const XMLNode& node) +{ + const XMLProperty* prop; + int intval; + MIDI::byte detail = 0; + MIDI::channel_t channel = 0; + string uri; + MIDI::eventType ev; + MIDI::byte* sysex = 0; + uint32_t sysex_size = 0; + + if ((prop = node.property (X_("ctl"))) != 0) { + ev = MIDI::controller; + } else if ((prop = node.property (X_("note"))) != 0) { + ev = MIDI::on; + } else if ((prop = node.property (X_("pgm"))) != 0) { + ev = MIDI::program; + } else if ((prop = node.property (X_("sysex"))) != 0) { + + ev = MIDI::sysex; + int val; + uint32_t cnt; + + { + cnt = 0; + stringstream ss (prop->value()); + ss << hex; + + while (ss >> val) { + cnt++; + } + } + + if (cnt == 0) { + return 0; + } + + sysex = new MIDI::byte[cnt]; + sysex_size = cnt; + + { + stringstream ss (prop->value()); + ss << hex; + cnt = 0; + + while (ss >> val) { + sysex[cnt++] = (MIDI::byte) val; + cerr << hex << (int) sysex[cnt-1] << dec << ' ' << endl; + } + } + + } else { + warning << "Binding ignored - unknown type" << endmsg; + return 0; + } + + if (sysex_size == 0) { + if ((prop = node.property (X_("channel"))) == 0) { + return 0; + } + + if (sscanf (prop->value().c_str(), "%d", &intval) != 1) { + return 0; + } + channel = (MIDI::channel_t) intval; + /* adjust channel to zero-based counting */ + if (channel > 0) { + channel -= 1; + } + + if (sscanf (prop->value().c_str(), "%d", &intval) != 1) { + return 0; + } + + detail = (MIDI::byte) intval; + } + + prop = node.property (X_("function")); + + MIDIFunction* mf = new MIDIFunction (*_port); + + if (mf->init (*this, prop->value(), sysex, sysex_size)) { + delete mf; + return 0; + } + + mf->bind_midi (channel, ev, detail); + + cerr << "New MF with function = " << prop->value() << endl; + + return mf; +}