2 Copyright (C) 2012 Paul Davis
3 Based on code by Paul Davis, Torben Hohn as part of FST
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 /******************************************************************/
22 /** VSTFX - An engine based on FST for handling linuxVST plugins **/
23 /******************************************************************/
33 #include <glibmm/timer.h>
35 #include "ardour/linux_vst_support.h"
53 static pthread_mutex_t plugin_mutex;
55 static VSTState * vstfx_first = NULL;
57 const char magic[] = "VSTFX Plugin State v002";
59 int gui_thread_id = 0;
60 static int gui_quit = 0;
62 /*This will be our connection to X*/
64 Display* LXVST_XDisplay = NULL;
66 /*The thread handle for the GUI event loop*/
68 pthread_t LXVST_gui_event_thread;
70 /*Util functions to get the value of a property attached to an XWindow*/
74 int TempErrorHandler(Display *display, XErrorEvent *e)
83 int getXWindowProperty(Window window, Atom atom)
88 unsigned long userCount;
93 /*Use our own Xerror handler while we're in here - in an
94 attempt to stop the brain dead default Xerror behaviour of
95 qutting the entire application because of e.g. an invalid
98 XErrorHandler olderrorhandler = XSetErrorHandler(TempErrorHandler);
100 XGetWindowProperty( LXVST_XDisplay, //The display
103 0, //Offset into the data
104 1, //Number of 32Bit chunks of data
105 false, //false = don't delete the property
106 AnyPropertyType, //Required property type mask
107 &userType, //Actual type returned
108 &userSize, //Actual format returned
109 &userCount, //Actual number of items stored in the returned data
110 &bytes, //Number of bytes remaining if a partial read
111 &data); //The actual data read
113 if(LXVST_xerror == false && userCount == 1)
114 result = *(int*)data;
116 XSetErrorHandler(olderrorhandler);
118 /*Hopefully this will return zero if the property is not set*/
127 /********************************************************************/
128 /* This is untested - have no 64Bit plugins which use this */
129 /* system of passing an eventProc address */
130 /********************************************************************/
132 long getXWindowProperty(Window window, Atom atom)
137 unsigned long userCount;
140 LXVST_xerror = false;
142 /*Use our own Xerror handler while we're in here - in an
143 attempt to stop the brain dead default Xerror behaviour of
144 qutting the entire application because of e.g. an invalid
147 XErrorHandler olderrorhandler = XSetErrorHandler(TempErrorHandler);
149 XGetWindowProperty( LXVST_XDisplay,
162 if(LXVST_xerror == false && userCount == 1)
163 result = *(long*)data;
165 XSetErrorHandler(olderrorhandler);
167 /*Hopefully this will return zero if the property is not set*/
174 /*The event handler - called from within the main GUI thread to
175 dispatch events to any VST UIs which have callbacks stuck to them*/
178 dispatch_x_events (XEvent* event, VSTState* vstfx)
180 /*Handle some of the Events we might be interested in*/
184 /*Configure event - when the window is resized or first drawn*/
186 case ConfigureNotify:
188 Window window = event->xconfigure.event;
190 int width = event->xconfigure.width;
191 int height = event->xconfigure.height;
193 /*If we get a config notify on the parent window XID then we need to see
194 if the size has been changed - some plugins re-size their UI window e.g.
195 when opening a preset manager (you might think that should be spawned as a new window...) */
197 /*if the size has changed, we flag this so that in lxvst_pluginui.cc we can make the
198 change to the GTK parent window in ardour, from its UI thread*/
200 if (window == (Window) (vstfx->linux_window)) {
201 if (width != vstfx->width || height!=vstfx->height) {
202 vstfx->width = width;
203 vstfx->height = height;
204 vstfx->want_resize = 1;
206 /*QUIRK : Loomer plugins not only resize the UI but throw it into some random
207 position at the same time. We need to re-position the window at the origin of
210 if (vstfx->linux_plugin_ui_window) {
211 XMoveWindow (LXVST_XDisplay, vstfx->linux_plugin_ui_window, 0, 0);
220 /*Reparent Notify - when the plugin UI is reparented into
221 our Host Window we will get an event here... probably... */
225 Window ParentWindow = event->xreparent.parent;
227 /*If the ParentWindow matches the window for the vstfx instance then
228 the Child window must be the XID of the pluginUI window created by the
229 plugin, so we need to see if it has a callback stuck to it, and if so
230 set that up in the vstfx */
232 /***********************************************************/
233 /* 64Bit --- This mechanism is not 64Bit compatible at the */
235 /***********************************************************/
237 if (ParentWindow == (Window) (vstfx->linux_window)) {
239 Window PluginUIWindowID = event->xreparent.window;
241 vstfx->linux_plugin_ui_window = PluginUIWindowID;
243 int result = getXWindowProperty(PluginUIWindowID, XInternAtom(LXVST_XDisplay, "_XEventProc", false));
246 vstfx->eventProc = NULL;
248 vstfx->eventProc = (void (*) (void* event))result;
252 long result = getXWindowProperty(PluginUIWindowID, XInternAtom(LXVST_XDisplay, "_XEventProc", false));
255 vstfx->eventProc = NULL;
257 vstfx->eventProc = (void (*) (void* event))result;
265 Window window = event->xany.window;
266 Atom message_type = event->xclient.message_type;
268 /*The only client message we are interested in is to signal
269 that the plugin parent window is now valid and can be passed
270 to effEditOpen when the editor is launched*/
272 if (window == (Window) (vstfx->linux_window)) {
273 char* message = XGetAtomName(LXVST_XDisplay, message_type);
275 if (strcmp(message,"LaunchEditor") == 0) {
276 if (event->xclient.data.l[0] == 0x0FEEDBAC) {
277 vstfx_launch_editor (vstfx);
290 /* Some VSTs built with toolkits e.g. JUCE will manager their own UI
291 autonomously in the plugin, running the UI in its own thread, so once
292 we have created a parent window for the plugin, its UI takes care of
295 /*Other types register a callback as an Xwindow property on the plugin
296 UI window after they create it. If that is the case, we need to call it
297 here, passing the XEvent into it*/
299 if (vstfx->eventProc == NULL) {
303 vstfx->eventProc((void*)event);
307 maybe_set_program (VSTState* vstfx)
309 if (vstfx->want_program != -1) {
310 if (vstfx->vst_version >= 2) {
311 vstfx->plugin->dispatcher (vstfx->plugin, 67 /* effBeginSetProgram */, 0, 0, NULL, 0);
314 vstfx->plugin->dispatcher (vstfx->plugin, effSetProgram, 0, vstfx->want_program, NULL, 0);
316 if (vstfx->vst_version >= 2) {
317 vstfx->plugin->dispatcher (vstfx->plugin, 68 /* effEndSetProgram */, 0, 0, NULL, 0);
320 vstfx->want_program = -1;
323 if (vstfx->want_chunk == 1) {
324 vstfx->plugin->dispatcher (vstfx->plugin, 24 /* effSetChunk */, 1, vstfx->wanted_chunk_size, vstfx->wanted_chunk, 0);
325 vstfx->want_chunk = 0;
329 /** This is the main gui event loop for the plugin, we also need to pass
330 any Xevents to all the UI callbacks plugins 'may' have registered on their
331 windows, that is if they don't manage their own UIs **/
333 void* gui_event_loop (void* ptr)
336 int LXVST_sched_timer_interval = 40; //ms, 25fps
338 uint64_t clock1, clock2;
340 clock1 = g_get_monotonic_time();
341 /*The 'Forever' loop - runs the plugin UIs etc - based on the FST gui event loop*/
345 /* handle window creation requests, destroy requests,
346 and run idle callbacks */
348 /*Look at the XEvent queue - if there are any XEvents we need to handle them,
349 including passing them to all the plugin (eventProcs) we are currently managing*/
351 bool may_sleep = true;
355 /*See if there are any events in the queue*/
357 int num_events = XPending(LXVST_XDisplay);
359 if (num_events > 0) {
360 // keep dispatching events as fast as possible
364 /*process them if there are any*/
368 XNextEvent(LXVST_XDisplay, &event);
370 /*Call dispatch events, with the event, for each plugin in the linked list*/
372 for (vstfx = vstfx_first; vstfx; vstfx = vstfx->next)
374 pthread_mutex_lock(&vstfx->lock);
376 dispatch_x_events(&event, vstfx);
378 pthread_mutex_unlock(&vstfx->lock);
385 /*We don't want to use all the CPU.. */
389 /*See if its time for us to do a scheduled event pass on all the plugins*/
391 clock2 = g_get_monotonic_time();
392 const int64_t elapsed_time_ms = (clock2 - clock1) / 1000;
394 if((LXVST_sched_timer_interval != 0) && elapsed_time_ms >= LXVST_sched_timer_interval)
396 //printf("elapsed %d ms ^= %.2f Hz\n", elapsed_time_ms, 1000.0/(double)elapsed_time_ms); // DEBUG
397 pthread_mutex_lock (&plugin_mutex);
400 /*Parse through the linked list of plugins*/
402 for (vstfx = vstfx_first; vstfx; vstfx = vstfx->next)
404 pthread_mutex_lock (&vstfx->lock);
406 /*Window scheduled for destruction*/
408 if (vstfx->destroy) {
409 if (vstfx->linux_window) {
410 vstfx->plugin->dispatcher (vstfx->plugin, effEditClose, 0, 0, NULL, 0.0);
412 XDestroyWindow (LXVST_XDisplay, vstfx->linux_window);
413 /* FIXME - probably safe to assume we never have an XID of 0 but not explicitly true */
414 vstfx->linux_window = 0;
415 vstfx->destroy = FALSE;
418 vstfx_event_loop_remove_plugin (vstfx);
419 vstfx->been_activated = FALSE;
420 pthread_cond_signal (&vstfx->window_status_change);
421 pthread_mutex_unlock (&vstfx->lock);
426 /*Window does not yet exist - scheduled for creation*/
428 /* FIXME - probably safe to assume 0 is not a valid XID but not explicitly true */
429 if (vstfx->linux_window == 0) {
430 if (vstfx_create_editor (vstfx)) {
431 vstfx_error ("** ERROR ** VSTFX : Cannot create editor for plugin %s", vstfx->handle->name);
432 vstfx_event_loop_remove_plugin (vstfx);
433 pthread_cond_signal (&vstfx->window_status_change);
434 pthread_mutex_unlock (&vstfx->lock);
437 /* condition/unlock: it was signalled & unlocked in fst_create_editor() */
441 maybe_set_program (vstfx);
442 vstfx->want_program = -1;
443 vstfx->want_chunk = 0;
445 /*scheduled call to dispatcher*/
447 if (vstfx->dispatcher_wantcall) {
448 vstfx->dispatcher_retval = vstfx->plugin->dispatcher (
450 vstfx->dispatcher_opcode,
451 vstfx->dispatcher_index,
452 vstfx->dispatcher_val,
453 vstfx->dispatcher_ptr,
454 vstfx->dispatcher_opt
457 vstfx->dispatcher_wantcall = 0;
458 pthread_cond_signal (&vstfx->plugin_dispatcher_called);
461 /*Call the editor Idle function in the plugin*/
463 vstfx->plugin->dispatcher (vstfx->plugin, effEditIdle, 0, 0, NULL, 0);
466 vstfx->plugin->dispatcher (vstfx->plugin, 53, 0, 0, NULL, 0);
468 pthread_mutex_unlock (&vstfx->lock);
470 pthread_mutex_unlock (&plugin_mutex);
472 clock1 = g_get_monotonic_time();
475 if (may_sleep && elapsed_time_ms + 1 < LXVST_sched_timer_interval) {
476 Glib::usleep(1000 * (LXVST_sched_timer_interval - elapsed_time_ms - 1));
480 /*Drop out to here if we set gui_quit to 1 */
485 /*The VSTFX Init function - this needs to be called before the VSTFX engine
486 can be accessed, it gets the UI thread running, opens a connection to X etc
487 normally started in globals.cc*/
489 int vstfx_init (void* ptr)
492 int thread_create_result;
494 pthread_attr_t thread_attributes;
496 /*Init the attribs to defaults*/
498 pthread_attr_init(&thread_attributes);
500 /*Make sure the thread is joinable - this should be the default anyway -
501 so we can join to it on vstfx_exit*/
503 pthread_attr_setdetachstate(&thread_attributes, PTHREAD_CREATE_JOINABLE);
506 /*This is where we need to open a connection to X, and start the GUI thread*/
508 /*Open our connection to X - all linuxVST plugin UIs handled by the LXVST engine
509 will talk to X down this connection - X cannot handle multi-threaded access via
512 if(LXVST_XDisplay==NULL)
513 LXVST_XDisplay = XOpenDisplay(NULL); //We might be able to make this open a specific screen etc
515 /*Drop out and report the error if we fail to connect to X */
517 if(LXVST_XDisplay==NULL)
519 vstfx_error ("** ERROR ** VSTFX: Failed opening connection to X");
524 /*We have a connection to X - so start the gui event loop*/
526 /*Create the thread - use default attrs for now, don't think we need anything special*/
528 thread_create_result = pthread_create(&LXVST_gui_event_thread, NULL, gui_event_loop, NULL);
530 if(thread_create_result!=0)
532 /*There was a problem starting the GUI event thread*/
534 vstfx_error ("** ERROR ** VSTFX: Failed starting GUI event thread");
536 XCloseDisplay(LXVST_XDisplay);
544 /*The vstfx Quit function*/
550 /*We need to pthread_join the gui_thread here so
551 we know when it has stopped*/
553 pthread_join(LXVST_gui_event_thread, NULL);
556 /*Adds a new plugin (VSTFX) instance to the linked list*/
558 int vstfx_run_editor (VSTState* vstfx)
560 pthread_mutex_lock (&plugin_mutex);
562 /* Add the new VSTFX instance to the linked list */
564 if (vstfx_first == NULL) {
567 VSTState* p = vstfx_first;
574 /* Mark the new end of the list */
579 pthread_mutex_unlock (&plugin_mutex);
581 /* wait for the plugin editor window to be created (or not) */
583 pthread_mutex_lock (&vstfx->lock);
585 if (!vstfx->linux_window) {
586 pthread_cond_wait (&vstfx->window_status_change, &vstfx->lock);
589 pthread_mutex_unlock (&vstfx->lock);
591 if (!vstfx->linux_window) {
599 /*Creates an editor for the plugin - normally called from within the gui event loop
600 after run_editor has added the plugin (editor) to the linked list*/
602 int vstfx_create_editor (VSTState* vstfx)
604 Window parent_window;
609 /* Note: vstfx->lock is held while this function is called */
611 if (!(vstfx->plugin->flags & effFlagsHasEditor))
613 vstfx_error ("** ERROR ** VSTFX: Plugin \"%s\" has no editor", vstfx->handle->name);
618 /*Create an XWindow for the plugin to inhabit*/
620 parent_window = XCreateSimpleWindow (
622 DefaultRootWindow(LXVST_XDisplay),
632 /*Select the events we are interested in receiving - we need Substructure notify so that
633 if the plugin resizes its window - e.g. Loomer Manifold then we get a message*/
635 XSelectInput(LXVST_XDisplay,
637 SubstructureNotifyMask | ButtonPressMask | ButtonReleaseMask | ButtonMotionMask | ExposureMask);
639 vstfx->linux_window = parent_window;
641 vstfx->xid = parent_window; //vstfx->xid will be referenced to connect to GTK UI in ardour later
643 /*Because the plugin may be operating on a different Display* to us, and therefore
644 the two event queues can be asynchronous, although we have created the window on
645 our display, we can't guarantee it exists in the server yet, which will
646 cause BadWindow crashes if the plugin tries to use it.
648 It would be nice to use CreateNotify events here, but they don't get
649 through on all window managers, so instead we pass a client message
650 into out queue, after the XCreateWindow. When this message pops out
651 in our event handler, it will trigger the second stage of plugin
652 Editor instantiation, and by then the Window should be valid...*/
654 XClientMessageEvent event;
656 /*Create an atom to identify our message (only if it doesn't already exist)*/
658 Atom WindowActiveAtom = XInternAtom(LXVST_XDisplay, "LaunchEditor", false);
660 event.type = ClientMessage;
661 event.send_event = true;
662 event.window = parent_window;
663 event.message_type = WindowActiveAtom;
665 event.format = 32; //Data format
666 event.data.l[0] = 0x0FEEDBAC; //Something we can recognize later
668 /*Push the event into the queue on our Display*/
670 XSendEvent(LXVST_XDisplay, parent_window, FALSE, NoEventMask, (XEvent*)&event);
672 /*Unlock - and we are done for the first part of staring the Editor...*/
674 pthread_mutex_unlock (&vstfx->lock);
680 vstfx_launch_editor (VSTState* vstfx)
682 /*This is the second stage of launching the editor (see vstfx_create editor)
683 we get called here in response to receiving the ClientMessage on our Window,
684 therefore it's about as safe (as can be) to assume that the Window we created
685 is now valid in the XServer and can be passed to the plugin in effEditOpen
686 without generating BadWindow errors when the plugin reparents itself into our
689 if(vstfx->been_activated)
692 Window parent_window;
698 parent_window = vstfx->linux_window;
700 /*Open the editor - Bah! we have to pass the int windowID as a void pointer - yuck
701 it gets cast back to an int as the parent window XID in the plugin - and we have to pass the
702 Display* as a long */
704 /**************************************************************/
705 /* 64Bit --- parent window is an int passed as a void* so */
706 /* that should be ok for 64Bit machines */
708 /* Display is passed in as a long - ok on arch's where sizeof */
711 /* Most linux VST plugins open a connection to X on their own */
712 /* Display anyway so it may not matter */
714 /* linuxDSP VSTs don't use the host Display* at all */
715 /**************************************************************/
717 vstfx->plugin->dispatcher (vstfx->plugin, effEditOpen, 0, (long)LXVST_XDisplay, (void*)(parent_window), 0 );
719 /*QUIRK - some plugins need a slight delay after opening the editor before you can
720 ask the window size or they might return zero - specifically discoDSP */
722 Glib::usleep(100000);
724 /*Now we can find out how big the parent window should be (and try) to resize it*/
726 vstfx->plugin->dispatcher (vstfx->plugin, effEditGetRect, 0, 0, &er, 0 );
728 x_size = er->right - er->left;
729 y_size = er->bottom - er->top;
731 vstfx->width = x_size;
732 vstfx->height = y_size;
734 XResizeWindow(LXVST_XDisplay, parent_window, x_size, y_size);
736 XFlush (LXVST_XDisplay);
738 /*Not sure if we need to map the window or if the plugin will do it for us
739 it should be ok because XReparentWindow generates a Map event*/
741 /*mark the editor as activated - mainly so that vstfx_get_XID
742 will know it is valid*/
744 vstfx->been_activated = TRUE;
746 pthread_cond_signal (&vstfx->window_status_change);
750 /** Destroy the editor window */
752 vstfx_destroy_editor (VSTState* vstfx)
754 pthread_mutex_lock (&vstfx->lock);
755 if (vstfx->linux_window) {
756 vstfx->destroy = TRUE;
757 pthread_cond_wait (&vstfx->window_status_change, &vstfx->lock);
759 pthread_mutex_unlock (&vstfx->lock);
762 /** Remove a vstfx instance from the linked list parsed by the
766 vstfx_event_loop_remove_plugin (VSTState* vstfx)
768 /* This only ever gets called from within our GUI thread
769 so we don't need to lock here - if we did there would be
776 for (p = vstfx_first, prev = NULL; p; prev = p, p = p->next) {
779 prev->next = p->next;
785 // if this function is called, there must be
786 // at least one plugin in the linked list
789 if (vstfx_first == vstfx) {
790 vstfx_first = vstfx_first->next;