3 #include <pbd/compose.h>
5 #include <pbd/pathscanner.h>
7 #include <control_protocol/control_protocol.h>
9 #include <ardour/session.h>
10 #include <ardour/control_protocol_manager.h>
12 using namespace ARDOUR;
18 ControlProtocolManager* ControlProtocolManager::_instance = 0;
19 const string ControlProtocolManager::state_node_name = X_("ControlProtocols");
21 ControlProtocolManager::ControlProtocolManager ()
30 ControlProtocolManager::~ControlProtocolManager()
32 Glib::Mutex::Lock lm (protocols_lock);
34 for (list<ControlProtocol*>::iterator i = control_protocols.begin(); i != control_protocols.end(); ++i) {
38 control_protocols.clear ();
41 for (list<ControlProtocolInfo*>::iterator p = control_protocol_info.begin(); p != control_protocol_info.end(); ++p) {
45 control_protocol_info.clear();
50 ControlProtocolManager::set_session (Session& s)
53 _session->GoingAway.connect (mem_fun (*this, &ControlProtocolManager::drop_session));
55 for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
56 if ((*i)->requested || (*i)->mandatory) {
58 (*i)->requested = false;
60 if ((*i)->protocol && (*i)->state) {
61 (*i)->protocol->set_state (*(*i)->state);
68 ControlProtocolManager::drop_session ()
73 Glib::Mutex::Lock lm (protocols_lock);
74 for (list<ControlProtocol*>::iterator p = control_protocols.begin(); p != control_protocols.end(); ++p) {
77 control_protocols.clear ();
79 for (list<ControlProtocolInfo*>::iterator p = control_protocol_info.begin(); p != control_protocol_info.end(); ++p) {
83 control_protocol_info.clear();
88 ControlProtocolManager::instantiate (ControlProtocolInfo& cpi)
94 cpi.descriptor = get_descriptor (cpi.path);
96 if (cpi.descriptor == 0) {
97 error << string_compose (_("control protocol name \"%1\" has no descriptor"), cpi.name) << endmsg;
101 if ((cpi.protocol = cpi.descriptor->initialize (cpi.descriptor, _session)) == 0) {
102 error << string_compose (_("control protocol name \"%1\" could not be initialized"), cpi.name) << endmsg;
106 Glib::Mutex::Lock lm (protocols_lock);
107 control_protocols.push_back (cpi.protocol);
110 cpi.protocol->set_state (*cpi.state);
117 ControlProtocolManager::teardown (ControlProtocolInfo& cpi)
123 if (!cpi.descriptor) {
131 cpi.descriptor->destroy (cpi.descriptor, cpi.protocol);
134 Glib::Mutex::Lock lm (protocols_lock);
135 list<ControlProtocol*>::iterator p = find (control_protocols.begin(), control_protocols.end(), cpi.protocol);
136 if (p != control_protocols.end()) {
137 control_protocols.erase (p);
139 cerr << "Programming error: ControlProtocolManager::teardown() called for " << cpi.name << ", but it was not found in control_protocols" << endl;
142 list<ControlProtocolInfo*>::iterator p2 = find (control_protocol_info.begin(), control_protocol_info.end(), &cpi);
143 if (p2 != control_protocol_info.end()) {
144 control_protocol_info.erase (p2);
146 cerr << "Programming error: ControlProtocolManager::teardown() called for " << cpi.name << ", but it was not found in control_protocol_info" << endl;
151 dlclose (cpi.descriptor->module);
155 static bool protocol_filter (const string& str, void *arg)
157 /* Not a dotfile, has a prefix before a period, suffix is "so" */
159 return str[0] != '.' && (str.length() > 3 && str.find (".so") == (str.length() - 3));
163 ControlProtocolManager::load_mandatory_protocols ()
169 for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
170 if ((*i)->mandatory && ((*i)->protocol == 0)) {
171 info << string_compose (_("Instantiating mandatory control protocol %1"), (*i)->name) << endmsg;
178 ControlProtocolManager::discover_control_protocols (string path)
180 vector<string *> *found;
183 info << string_compose (_("looking for control protocols in %1"), path) << endmsg;
185 found = scanner (path, protocol_filter, 0, false, true);
187 for (vector<string*>::iterator i = found->begin(); i != found->end(); ++i) {
188 control_protocol_discover (**i);
196 ControlProtocolManager::control_protocol_discover (string path)
198 ControlProtocolDescriptor* descriptor;
200 if ((descriptor = get_descriptor (path)) != 0) {
202 ControlProtocolInfo* cpi = new ControlProtocolInfo ();
204 if (!descriptor->probe (descriptor)) {
205 info << string_compose (_("Control protocol %1 not usable"), descriptor->name) << endmsg;
208 cpi->descriptor = descriptor;
209 cpi->name = descriptor->name;
212 cpi->requested = false;
213 cpi->mandatory = descriptor->mandatory;
214 cpi->supports_feedback = descriptor->supports_feedback;
217 control_protocol_info.push_back (cpi);
219 info << string_compose(_("Control surface protocol discovered: \"%1\""), cpi->name) << endmsg;
222 dlclose (descriptor->module);
228 ControlProtocolDescriptor*
229 ControlProtocolManager::get_descriptor (string path)
232 ControlProtocolDescriptor *descriptor = 0;
233 ControlProtocolDescriptor* (*dfunc)(void);
236 if ((module = dlopen (path.c_str(), RTLD_NOW)) == 0) {
237 error << string_compose(_("ControlProtocolManager: cannot load module \"%1\" (%2)"), path, dlerror()) << endmsg;
242 dfunc = (ControlProtocolDescriptor* (*)(void)) dlsym (module, "protocol_descriptor");
244 if ((errstr = dlerror()) != 0) {
245 error << string_compose(_("ControlProtocolManager: module \"%1\" has no descriptor function."), path) << endmsg;
246 error << errstr << endmsg;
251 descriptor = dfunc();
253 descriptor->module = module;
262 ControlProtocolManager::foreach_known_protocol (sigc::slot<void,const ControlProtocolInfo*> method)
264 for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
270 ControlProtocolManager::cpi_by_name (string name)
272 for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
273 if (name == (*i)->name) {
281 ControlProtocolManager::set_state (const XMLNode& node)
284 XMLNodeConstIterator citer;
287 clist = node.children();
289 for (citer = clist.begin(); citer != clist.end(); ++citer) {
290 if ((*citer)->name() == X_("Protocol")) {
292 prop = (*citer)->property (X_("active"));
294 if (prop && prop->value() == X_("yes")) {
295 if ((prop = (*citer)->property (X_("name"))) != 0) {
296 ControlProtocolInfo* cpi = cpi_by_name (prop->value());
299 if (!(*citer)->children().empty()) {
300 cpi->state = (*citer)->children().front ();
308 cpi->requested = true;
319 ControlProtocolManager::get_state (void)
321 XMLNode* root = new XMLNode (state_node_name);
322 Glib::Mutex::Lock lm (protocols_lock);
324 for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
325 XMLNode* child = new XMLNode (X_("Protocol"));
326 child->add_property (X_("name"), (*i)->name);
327 child->add_property (X_("active"), (*i)->protocol ? "yes" : "no");
328 root->add_child_nocopy (*child);
335 ControlProtocolManager::set_protocol_states (const XMLNode& node)
338 XMLNodeConstIterator niter;
341 nlist = node.children();
343 for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
345 XMLNode* child = (*niter);
347 if ((prop = child->property ("name")) == 0) {
348 error << _("control protocol XML node has no name property. Ignored.") << endmsg;
352 ControlProtocolInfo* cpi = cpi_by_name (prop->value());
355 warning << string_compose (_("control protocol \"%1\" is not known. Ignored"), prop->value()) << endmsg;
359 /* copy the node so that ownership is clear */
361 cpi->state = new XMLNode (*child);