fix crash when copy'ing latent plugins
[ardour.git] / libs / ardour / control_protocol_manager.cc
index 06c9c72cb450afb7e74a13c73b4d968743299147..a0a36c17dd2150480e4262d4caea12dd51a8fa14 100644 (file)
@@ -22,6 +22,7 @@
 #include <glibmm/fileutils.h>
 
 #include "pbd/compose.h"
+#include "pbd/event_loop.h"
 #include "pbd/file_utils.h"
 #include "pbd/error.h"
 
 #include "ardour/debug.h"
 #include "ardour/control_protocol_manager.h"
 
-#include "ardour/control_protocol_search_path.h"
+#include "ardour/search_paths.h"
 
 
 using namespace ARDOUR;
 using namespace std;
 using namespace PBD;
 
-#include "i18n.h"
+#include "pbd/i18n.h"
 
 ControlProtocolManager* ControlProtocolManager::_instance = 0;
 const string ControlProtocolManager::state_node_name = X_("ControlProtocols");
 
+
+ControlProtocolInfo::~ControlProtocolInfo ()
+{
+       if (protocol && descriptor) {
+               descriptor->destroy (descriptor, protocol);
+               protocol = 0;
+       }
+
+       delete state; state = 0;
+
+       if (descriptor) {
+               delete (Glib::Module*) descriptor->module;
+               descriptor = 0;
+       }
+}
+
 ControlProtocolManager::ControlProtocolManager ()
 {
 }
@@ -74,47 +91,84 @@ ControlProtocolManager::set_session (Session* s)
 
                for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
                        if ((*i)->requested || (*i)->mandatory) {
-                               
-                               instantiate (**i);
-                               (*i)->requested = false;
-
-                               if ((*i)->protocol) {
-                                       if ((*i)->state) {
-                                               (*i)->protocol->set_state (*(*i)->state, Stateful::loading_state_version);
-                                       } else {
-                                               /* guarantee a call to
-                                                  set_state() whether we have
-                                                  existing state or not
-                                               */
-                                               (*i)->protocol->set_state (XMLNode(""), Stateful::loading_state_version);
-                                       }
-                               }
+                               (void) activate (**i);
                        }
                }
        }
 }
 
+int
+ControlProtocolManager::activate (ControlProtocolInfo& cpi)
+{
+       ControlProtocol* cp;
+
+       cpi.requested = true;
+
+       if ((cp = instantiate (cpi)) == 0) {
+               return -1;
+       }
+
+       /* we split the set_state() and set_active() operations so that
+          protocols that need state to configure themselves (e.g. "What device
+          is connected, or supposed to be connected?") can get it before
+          actually starting any interaction.
+       */
+
+       if (cpi.state) {
+               /* force this by tweaking the internals of the state
+                * XMLNode. Ugh.
+                */
+               cp->set_state (*cpi.state, Stateful::loading_state_version);
+       } else {
+               /* guarantee a call to
+                  set_state() whether we have
+                  existing state or not
+               */
+               cp->set_state (XMLNode(""), Stateful::loading_state_version);
+       }
+
+       cp->set_active (true);
+
+       return 0;
+}
+
+int
+ControlProtocolManager::deactivate (ControlProtocolInfo& cpi)
+{
+       cpi.requested = false;
+       return teardown (cpi);
+}
+
 void
 ControlProtocolManager::session_going_away()
 {
        SessionHandlePtr::session_going_away ();
+       /* Session::destroy() will explicitly call drop_protocols() so we don't
+        * have to worry about that here.
+        */
+}
 
-       {
-               Glib::Threads::Mutex::Lock lm (protocols_lock);
+void
+ControlProtocolManager::drop_protocols ()
+{
+       /* called explicitly by Session::destroy() so that we can clean up
+        * before the process cycle stops and ports vanish.
+        */
 
-               for (list<ControlProtocol*>::iterator p = control_protocols.begin(); p != control_protocols.end(); ++p) {
-                       delete *p;
-               }
+       Glib::Threads::Mutex::Lock lm (protocols_lock);
+
+       for (list<ControlProtocol*>::iterator p = control_protocols.begin(); p != control_protocols.end(); ++p) {
+               delete *p;
+       }
 
-               control_protocols.clear ();
+       control_protocols.clear ();
 
-               for (list<ControlProtocolInfo*>::iterator p = control_protocol_info.begin(); p != control_protocol_info.end(); ++p) {
-                       // mark existing protocols as requested
-                       // otherwise the ControlProtocol instances are not recreated in set_session
-                       if ((*p)->protocol) {
-                               (*p)->requested = true;
-                               (*p)->protocol = 0;
-                       }
+       for (list<ControlProtocolInfo*>::iterator p = control_protocol_info.begin(); p != control_protocol_info.end(); ++p) {
+               // mark existing protocols as requested
+               // otherwise the ControlProtocol instances are not recreated in set_session
+               if ((*p)->protocol) {
+                       (*p)->requested = true;
+                       (*p)->protocol = 0;
                }
        }
 }
@@ -130,7 +184,7 @@ ControlProtocolManager::instantiate (ControlProtocolInfo& cpi)
 
        cpi.descriptor = get_descriptor (cpi.path);
 
-       DEBUG_TRACE (DEBUG::ControlProtocols, string_compose ("instantiating %1\n", cpi.name));
+       DEBUG_TRACE (DEBUG::ControlProtocols, string_compose ("instantiating %1\n", cpi.name));
 
        if (cpi.descriptor == 0) {
                error << string_compose (_("control protocol name \"%1\" has no descriptor"), cpi.name) << endmsg;
@@ -155,6 +209,18 @@ int
 ControlProtocolManager::teardown (ControlProtocolInfo& cpi)
 {
        if (!cpi.protocol) {
+
+               /* we could still have a descriptor even if the protocol was
+                  never instantiated. Close the associated module (shared
+                  object/DLL) and make sure we forget about it.
+               */
+
+               if (cpi.descriptor) {
+                       cerr << "Closing descriptor for CPI anyway\n";
+                       delete (Glib::Module*) cpi.descriptor->module;
+                       cpi.descriptor = 0;
+               }
+
                return 0;
        }
 
@@ -166,6 +232,12 @@ ControlProtocolManager::teardown (ControlProtocolInfo& cpi)
                return 0;
        }
 
+       /* save current state */
+
+       delete cpi.state;
+       cpi.state = new XMLNode (cpi.protocol->get_state());
+       cpi.state->add_property (X_("active"), "no");
+
        cpi.descriptor->destroy (cpi.descriptor, cpi.protocol);
 
        {
@@ -179,9 +251,15 @@ ControlProtocolManager::teardown (ControlProtocolInfo& cpi)
        }
 
        cpi.protocol = 0;
+
        delete cpi.state;
        cpi.state = 0;
-       delete (Glib::Module*)cpi.descriptor->module;
+       delete (Glib::Module*) cpi.descriptor->module;
+       /* cpi->descriptor is now inaccessible since dlclose() or equivalent
+        * has been performed, and the descriptor is (or could be) a static
+        * object made accessible by dlopen().
+        */
+       cpi.descriptor = 0;
 
        ProtocolStatusChange (&cpi);
 
@@ -211,18 +289,41 @@ ControlProtocolManager::discover_control_protocols ()
 {
        vector<std::string> cp_modules;
 
+#ifdef COMPILER_MSVC
+   /**
+    * Different build targets (Debug / Release etc) use different versions
+    * of the 'C' runtime (which can't be 'mixed & matched'). Therefore, in
+    * case the supplied search path contains multiple version(s) of a given
+    * module, only select the one(s) which match the current build target
+    */
+       #if defined (_DEBUG)
+               Glib::PatternSpec dll_extension_pattern("*D.dll");
+       #elif defined (RDC_BUILD)
+               Glib::PatternSpec dll_extension_pattern("*RDC.dll");
+       #elif defined (_WIN64)
+               Glib::PatternSpec dll_extension_pattern("*64.dll");
+       #else
+               Glib::PatternSpec dll_extension_pattern("*32.dll");
+       #endif
+#else
+       Glib::PatternSpec dll_extension_pattern("*.dll");
+#endif
+
        Glib::PatternSpec so_extension_pattern("*.so");
        Glib::PatternSpec dylib_extension_pattern("*.dylib");
 
-       find_matching_files_in_search_path (control_protocol_search_path (),
-                                           so_extension_pattern, cp_modules);
+       find_files_matching_pattern (cp_modules, control_protocol_search_path (),
+                                    dll_extension_pattern);
+
+       find_files_matching_pattern (cp_modules, control_protocol_search_path (),
+                                    so_extension_pattern);
 
-       find_matching_files_in_search_path (control_protocol_search_path (),
-                                           dylib_extension_pattern, cp_modules);
+       find_files_matching_pattern (cp_modules, control_protocol_search_path (),
+                                    dylib_extension_pattern);
 
-       DEBUG_TRACE (DEBUG::ControlProtocols, 
+       DEBUG_TRACE (DEBUG::ControlProtocols,
                     string_compose (_("looking for control protocols in %1\n"), control_protocol_search_path().to_string()));
-       
+
        for (vector<std::string>::iterator i = cp_modules.begin(); i != cp_modules.end(); ++i) {
                control_protocol_discover (*i);
        }
@@ -262,11 +363,9 @@ ControlProtocolManager::control_protocol_discover (string path)
 
                        control_protocol_info.push_back (cpi);
 
-                       DEBUG_TRACE (DEBUG::ControlProtocols, 
+                       DEBUG_TRACE (DEBUG::ControlProtocols,
                                     string_compose(_("Control surface protocol discovered: \"%1\"\n"), cpi->name));
                }
-
-               delete (Glib::Module*)descriptor->module;
        }
 
        return 0;
@@ -298,8 +397,6 @@ ControlProtocolManager::get_descriptor (string path)
 
        if (descriptor) {
                descriptor->module = (void*)module;
-       } else {
-               delete module;
        }
 
        return descriptor;
@@ -329,30 +426,33 @@ ControlProtocolManager::set_state (const XMLNode& node, int /*version*/)
 {
        XMLNodeList clist;
        XMLNodeConstIterator citer;
-       XMLProperty* prop;
+       XMLProperty const * prop;
 
        Glib::Threads::Mutex::Lock lm (protocols_lock);
 
        clist = node.children();
 
        for (citer = clist.begin(); citer != clist.end(); ++citer) {
-               if ((*citer)->name() == X_("Protocol")) {
+               XMLNode const * child = *citer;
+
+               if (child->name() == X_("Protocol")) {
 
-                       if ((prop = (*citer)->property (X_("active"))) == 0) {
+                       if ((prop = child->property (X_("active"))) == 0) {
                                continue;
                        }
 
                        bool active = string_is_affirmative (prop->value());
-                       
-                       if ((prop = (*citer)->property (X_("name"))) == 0) {
+
+                       if ((prop = child->property (X_("name"))) == 0) {
                                continue;
                        }
 
                        ControlProtocolInfo* cpi = cpi_by_name (prop->value());
-                       
+
                        if (cpi) {
+                               delete cpi->state;
                                cpi->state = new XMLNode (**citer);
-                               
+
                                if (active) {
                                        if (_session) {
                                                instantiate (*cpi);
@@ -381,22 +481,21 @@ ControlProtocolManager::get_state ()
 
        for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
 
-               XMLNode * child;
-
                if ((*i)->protocol) {
-                       child = &((*i)->protocol->get_state());
-                       child->add_property (X_("active"), "yes");
-                       // should we update (*i)->state here?  probably.
-                       root->add_child_nocopy (*child);
+                       XMLNode& child_state ((*i)->protocol->get_state());
+                       child_state.add_property (X_("active"), "yes");
+                       root->add_child_nocopy (child_state);
                } else if ((*i)->state) {
-                       // keep ownership clear
-                       root->add_child_copy (*(*i)->state);
+                       XMLNode* child_state = new XMLNode (*(*i)->state);
+                       child_state->add_property (X_("active"), "no");
+                       root->add_child_nocopy (*child_state);
                } else {
-                       child = new XMLNode (X_("Protocol"));
-                       child->add_property (X_("name"), (*i)->name);
-                       child->add_property (X_("active"), "no");
-                       root->add_child_nocopy (*child);
+                       XMLNode* child_state = new XMLNode (X_("Protocol"));
+                       child_state->add_property (X_("name"), (*i)->name);
+                       child_state->add_property (X_("active"), "no");
+                       root->add_child_nocopy (*child_state);
                }
+
        }
 
        return *root;
@@ -422,3 +521,21 @@ ControlProtocolManager::midi_connectivity_established ()
                (*p)->midi_connectivity_established ();
        }
 }
+
+void
+ControlProtocolManager::register_request_buffer_factories ()
+{
+       Glib::Threads::Mutex::Lock lm (protocols_lock);
+
+       for (list<ControlProtocolInfo*>::iterator i = control_protocol_info.begin(); i != control_protocol_info.end(); ++i) {
+
+               if ((*i)->descriptor == 0) {
+                       warning << string_compose (_("Control protocol \"%1\" has no descriptor"), (*i)->name) << endmsg;
+                       continue;
+               }
+
+               if ((*i)->descriptor->request_buffer_factory) {
+                       EventLoop::register_request_buffer_factory ((*i)->descriptor->name, (*i)->descriptor->request_buffer_factory);
+               }
+       }
+}