X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Ffst%2Fvstwin.c;h=27fb3cbead21af949eb87ed6361e4d21df356f61;hb=95ccbc452f513a9d6f70de45bc413067e568364c;hp=f1553821ad45d263c08dac494e1e9a28217de8cd;hpb=d367d94c7febe766afc7356e874ba4eb36fcae48;p=ardour.git diff --git a/libs/fst/vstwin.c b/libs/fst/vstwin.c index f1553821ad..27fb3cbead 100644 --- a/libs/fst/vstwin.c +++ b/libs/fst/vstwin.c @@ -1,297 +1,180 @@ #include -#include -#include -#include +#include #include + +#define fst_error(...) fprintf(stderr, __VA_ARGS__) + +#ifdef PLATFORM_WINDOWS + +#include +static UINT_PTR idle_timer_id = 0; + +#else /* linux + wine */ + +#include // PATH_MAX #include #include #include -#include -#include +static int gui_quit = 0; +static unsigned int idle_id = 0; -#include "fst.h" +#endif -#include -#include +extern char * strdup (const char *); +#include +#include "fst.h" -struct ERect{ - short top; - short left; - short bottom; - short right; +struct ERect { + short top; + short left; + short bottom; + short right; }; -static pthread_mutex_t plugin_mutex; -static FST* fst_first = NULL; -const char magic[] = "FST Plugin State v002"; +static pthread_mutex_t plugin_mutex; +static VSTState* fst_first = NULL; /**< Head of linked list of all FSTs */ +static int host_initialized = 0; +static const char magic[] = "FST Plugin State v002"; -DWORD gui_thread_id = 0; -static int gui_quit = 0; -#define DELAYED_WINDOW 1 +static LRESULT WINAPI +vstedit_wndproc (HWND w, UINT msg, WPARAM wp, LPARAM lp) +{ + switch (msg) { + case WM_KEYUP: + case WM_KEYDOWN: + break; + case WM_CLOSE: + /* we don't care about windows closing ... + * WM_CLOSE is used for minimizing the window. + * Our window has no frame so it shouldn't ever + * get sent - but if it does, we don't want our + * window to get minimized! + */ + return 0; + break; -static LRESULT WINAPI -my_window_proc (HWND w, UINT msg, WPARAM wp, LPARAM lp) -{ -#if 0 - if (msg != WM_TIMER) { - fst_error ("window callback handler, msg = 0x%x win=%p\n", msg, w); - } -#endif + case WM_DESTROY: + case WM_NCDESTROY: + /* we don't care about windows being destroyed ... */ + return 0; + break; - switch (msg) { - case WM_KEYUP: - case WM_KEYDOWN: - break; - - case WM_CLOSE: - /* we don't care about windows closing ... */ - return 0; - break; - - case WM_DESTROY: - case WM_NCDESTROY: - /* we don't care about windows being destroyed ... */ - return 0; - break; - - default: - break; + default: + break; } return DefWindowProcA (w, msg, wp, lp ); } -static FST* -fst_new () -{ - FST* fst = (FST*) calloc (1, sizeof (FST)); - pthread_mutex_init (&fst->lock, NULL); - pthread_cond_init (&fst->window_status_change, NULL); - pthread_cond_init (&fst->plugin_dispatcher_called, NULL); - fst->want_program = -1; - fst->want_chunk = 0; - fst->current_program = -1; - fst->pending_key = 0; - return fst; -} - -static FSTHandle* -fst_handle_new () -{ - FSTHandle* fst = (FSTHandle*) calloc (1, sizeof (FSTHandle)); - return fst; -} -DWORD WINAPI gui_event_loop (LPVOID param) +static void +maybe_set_program (VSTState* fst) { - MSG msg; - FST* fst; - HMODULE hInst; - HWND window; - - gui_thread_id = GetCurrentThreadId (); + if (fst->want_program != -1) { + if (fst->vst_version >= 2) { + fst->plugin->dispatcher (fst->plugin, effBeginSetProgram, 0, 0, NULL, 0); + } - /* create a dummy window for timer events */ + fst->plugin->dispatcher (fst->plugin, effSetProgram, 0, fst->want_program, NULL, 0); - if ((hInst = GetModuleHandleA (NULL)) == NULL) { - fst_error ("can't get module handle"); - return 1; - } - - if ((window = CreateWindowExA (0, "FST", "dummy", - WS_OVERLAPPEDWINDOW & ~WS_THICKFRAME & ~WS_MAXIMIZEBOX, - 9999, 9999, - 1, 1, - NULL, NULL, - hInst, - NULL )) == NULL) { - fst_error ("cannot create dummy timer window"); + if (fst->vst_version >= 2) { + fst->plugin->dispatcher (fst->plugin, effEndSetProgram, 0, 0, NULL, 0); + } + fst->want_program = -1; } - if (!SetTimer (window, 1000, 20, NULL)) { - fst_error ("cannot set timer on dummy window"); + if (fst->want_chunk == 1) { + // XXX check + // 24 == audioMasterGetAutomationState, + // 48 == audioMasterGetChunkFile + fst->plugin->dispatcher (fst->plugin, 24 /* effSetChunk */, 1, fst->wanted_chunk_size, fst->wanted_chunk, 0); + fst->want_chunk = 0; } +} - while (!gui_quit) { +static VOID CALLBACK +idle_hands( + HWND hwnd, // handle to window for timer messages + UINT message, // WM_TIMER message + UINT idTimer, // timer identifier + DWORD dwTime) // current system time +{ + VSTState* fst; - if (!GetMessageA (&msg, NULL, 0,0)) { - if (!gui_quit) { - fprintf (stderr, "QUIT message received by Windows GUI thread - ignored\n"); - continue; - } else { - break; - } - } + pthread_mutex_lock (&plugin_mutex); - TranslateMessage( &msg ); - DispatchMessageA (&msg); + for (fst = fst_first; fst; fst = fst->next) { + if (fst->gui_shown) { + // this seems insane, but some plugins will not draw their meters if you don't + // call this every time. Example Ambience by Magnus @ Smartelectron:x + fst->plugin->dispatcher (fst->plugin, effEditIdle, 0, 0, NULL, 0); - /* handle window creation requests, destroy requests, - and run idle callbacks - */ - - if (msg.message == WM_TIMER) { - pthread_mutex_lock (&plugin_mutex); - -again: - for (fst = fst_first; fst; fst = fst->next) { - - pthread_mutex_lock (&fst->lock); - - if (fst->destroy) { - fprintf (stderr, "%s scheduled for destroy\n", fst->handle->name); - if (fst->window) { - fst->plugin->dispatcher( fst->plugin, effEditClose, 0, 0, NULL, 0.0 ); - CloseWindow (fst->window); - fst->window = NULL; - fst->destroy = FALSE; - } - fst_event_loop_remove_plugin (fst); - fst->been_activated = FALSE; - pthread_cond_signal (&fst->window_status_change); - pthread_mutex_unlock (&fst->lock); - goto again; - } - - if (fst->window == NULL) { - if (fst_create_editor (fst)) { - fst_error ("cannot create editor for plugin %s", fst->handle->name); - fst_event_loop_remove_plugin (fst); - pthread_cond_signal (&fst->window_status_change); - pthread_mutex_unlock (&fst->lock); - goto again; - } else { - /* condition/unlock: it was signalled & unlocked in fst_create_editor() */ - } - } - - if (fst->want_program != -1 ) { - if (fst->vst_version >= 2) { - fst->plugin->dispatcher (fst->plugin, 67 /* effBeginSetProgram */, 0, 0, NULL, 0); - } - - fst->plugin->dispatcher (fst->plugin, effSetProgram, 0, fst->want_program, NULL, 0); - - if (fst->vst_version >= 2) { - fst->plugin->dispatcher (fst->plugin, 68 /* effEndSetProgram */, 0, 0, NULL, 0); - } - /* did it work? */ - fst->current_program = fst->plugin->dispatcher (fst->plugin, 3, /* effGetProgram */ 0, 0, NULL, 0); - fst->want_program = -1; - } - - if (fst->want_chunk == 1) { - fst->plugin->dispatcher (fst->plugin, 24 /* effSetChunk */, 1, fst->wanted_chunk_size, fst->wanted_chunk, 0); - fst->want_chunk = 0; - } - - if(fst->dispatcher_wantcall) { - fst->dispatcher_retval = fst->plugin->dispatcher( fst->plugin, - fst->dispatcher_opcode, - fst->dispatcher_index, - fst->dispatcher_val, - fst->dispatcher_ptr, - fst->dispatcher_opt ); - fst->dispatcher_wantcall = 0; - pthread_cond_signal (&fst->plugin_dispatcher_called); - } - - fst->plugin->dispatcher (fst->plugin, effEditIdle, 0, 0, NULL, 0); - - if( fst->wantIdle ) { - fst->plugin->dispatcher (fst->plugin, 53, 0, 0, NULL, 0); - } - - pthread_mutex_unlock (&fst->lock); - + if (fst->wantIdle) { + fst->wantIdle = fst->plugin->dispatcher (fst->plugin, effIdle, 0, 0, NULL, 0); } - pthread_mutex_unlock (&plugin_mutex); - } - - for (fst = fst_first; fst; fst = fst->next) { - - if (fst->pending_key) { + pthread_mutex_lock (&fst->lock); +#ifndef PLATFORM_WINDOWS /* linux + wine */ + /* Dispatch messages to send keypresses to the plugin */ + int i; + + for (i = 0; i < fst->n_pending_keys; ++i) { + MSG msg; + /* I'm not quite sure what is going on here; it seems + * `special' keys must be delivered with WM_KEYDOWN, + * but that alphanumerics etc. must use WM_CHAR or + * they will be ignored. Ours is not to reason why ... + */ + if (fst->pending_keys[i].special != 0) { + msg.message = WM_KEYDOWN; + msg.wParam = fst->pending_keys[i].special; + } else { msg.message = WM_CHAR; - msg.hwnd = GetFocus (); - msg.wParam = fst->pending_key; - msg.lParam = 0; - DispatchMessageA (&msg); - fst->pending_key = 0; + msg.wParam = fst->pending_keys[i].character; } - + msg.hwnd = GetFocus (); + msg.lParam = 0; + DispatchMessageA (&msg); } - } - - return 0; -} - -int -fst_init (void* possible_hmodule) -{ - WNDCLASSEX wclass; - HMODULE hInst; - - if (possible_hmodule) { - hInst = (HMODULE) possible_hmodule; - } else if ((hInst = GetModuleHandleA (NULL)) == NULL) { - fst_error ("can't get module handle"); - return -1; - } - - wclass.cbSize = sizeof(WNDCLASSEX); - wclass.style = 0; - wclass.lpfnWndProc = my_window_proc; - wclass.cbClsExtra = 0; - wclass.cbWndExtra = 0; - wclass.hInstance = hInst; - wclass.hIcon = LoadIcon(hInst, "FST"); - wclass.hCursor = LoadCursor(0, IDI_APPLICATION); -// wclass.hbrBackground = (HBRUSH)GetStockObject(BLACK_BRUSH); - wclass.lpszMenuName = "MENU_FST"; - wclass.lpszClassName = "FST"; - wclass.hIconSm = 0; - - - if (!RegisterClassExA(&wclass)){ - printf( "Class register failed :(\n" ); - return -1; - } + fst->n_pending_keys = 0; +#endif - fst_error ("Startup win32 GUI thread\n"); + /* See comment for maybe_set_program call below */ + maybe_set_program (fst); + fst->want_program = -1; + fst->want_chunk = 0; + /* If we don't have an editor window yet, we still need to + * set up the program, otherwise when we load a plugin without + * opening its window it will sound wrong. However, it seems + * that if you don't also load the program after opening the GUI, + * the GUI does not reflect the program properly. So we'll not + * mark that we've done this (ie we won't set want_program to -1) + * and so it will be done again if and when the GUI arrives. + */ + if (fst->program_set_without_editor == 0) { + maybe_set_program (fst); + fst->program_set_without_editor = 1; + } - if (CreateThread (NULL, 0, gui_event_loop, NULL, 0, NULL) == NULL) { - fst_error ("could not create new thread proxy"); - return -1; + pthread_mutex_unlock (&fst->lock); } -#ifdef HAVE_JACK_SET_THREAD_CREATOR - jack_set_thread_creator (wine_pthread_create); -#endif - - return 0; -} - -void -fst_exit () -{ - gui_quit = 1; - PostQuitMessage (0); + pthread_mutex_unlock (&plugin_mutex); } -int -fst_run_editor (FST* fst) +static void +fst_idle_timer_add_plugin (VSTState* fst) { pthread_mutex_lock (&plugin_mutex); if (fst_first == NULL) { fst_first = fst; } else { - FST* p = fst_first; + VSTState* p = fst_first; while (p->next) { p = p->next; } @@ -299,527 +182,451 @@ fst_run_editor (FST* fst) } pthread_mutex_unlock (&plugin_mutex); +} - /* wait for the plugin editor window to be created (or not) */ +static void +fst_idle_timer_remove_plugin (VSTState* fst) +{ + VSTState* p; + VSTState* prev; - pthread_mutex_lock (&fst->lock); - if (!fst->window) { - pthread_cond_wait (&fst->window_status_change, &fst->lock); - } - pthread_mutex_unlock (&fst->lock); + pthread_mutex_lock (&plugin_mutex); - if (!fst->window) { - return -1; + for (p = fst_first, prev = NULL; p; prev = p, p = p->next) { + if (p == fst) { + if (prev) { + prev->next = p->next; + } + break; + } + if (!p->next) { + break; + } } - return 0; + if (fst_first == fst) { + fst_first = fst_first->next; + } + + pthread_mutex_unlock (&plugin_mutex); } -int -fst_call_dispatcher (FST *fst, int opcode, int index, int val, void *ptr, float opt) +static VSTState* +fst_new (void) { - pthread_mutex_lock (&fst->lock); - fst->dispatcher_opcode = opcode; - fst->dispatcher_index = index; - fst->dispatcher_val = val; - fst->dispatcher_ptr = ptr; - fst->dispatcher_opt = opt; - fst->dispatcher_wantcall = 1; - - pthread_cond_wait (&fst->plugin_dispatcher_called, &fst->lock); - pthread_mutex_unlock (&fst->lock); - - return fst->dispatcher_retval; + VSTState* fst = (VSTState*) calloc (1, sizeof (VSTState)); + pthread_mutex_init (&fst->lock, NULL); + pthread_cond_init (&fst->window_status_change, NULL); // unused ?? -> TODO check gtk2ardour + pthread_cond_init (&fst->plugin_dispatcher_called, NULL); // unused ?? + fst->want_program = -1; + fst->want_chunk = 0; + fst->n_pending_keys = 0; + fst->has_editor = 0; +#ifdef PLATFORM_WINDOWS + fst->voffset = 50; + fst->hoffset = 0; +#else /* linux + wine */ + fst->voffset = 24; + fst->hoffset = 6; +#endif + fst->program_set_without_editor = 0; + return fst; } -int -fst_create_editor (FST* fst) +static void +fst_delete (VSTState* fst) { - HMODULE hInst; - HWND window; - struct ERect* er; - - /* "guard point" to trap errors that occur during plugin loading */ + if (fst) { + free((void*)fst); + fst = NULL; + } +} - /* Note: fst->lock is held while this function is called */ +static VSTHandle* +fst_handle_new (void) +{ + VSTHandle* fst = (VSTHandle*) calloc (1, sizeof (VSTHandle)); + return fst; +} - if (!(fst->plugin->flags & effFlagsHasEditor)) { - fst_error ("Plugin \"%s\" has no editor", fst->handle->name); - return -1; +#ifndef PLATFORM_WINDOWS /* linux + wine */ +static gboolean +g_idle_call (gpointer ignored) { + if (gui_quit) return FALSE; + MSG msg; + if (PeekMessageA (&msg, NULL, 0, 0, 1)) { + TranslateMessage (&msg); + DispatchMessageA (&msg); } + idle_hands(NULL, 0, 0, 0); + g_main_context_iteration(NULL, FALSE); + return gui_quit ? FALSE : TRUE; +} +#endif + + +int +fst_init (void* possible_hmodule) +{ + if (host_initialized) return 0; + HMODULE hInst; - if ((hInst = GetModuleHandleA (NULL)) == NULL) { + if (possible_hmodule) { +#ifdef PLATFORM_WINDOWS + fst_error ("Error in fst_init(): (module handle is unnecessary for Win32 build)"); + return -1; +#else /* linux + wine */ + hInst = (HMODULE) possible_hmodule; +#endif + } else if ((hInst = GetModuleHandleA (NULL)) == NULL) { fst_error ("can't get module handle"); - return 1; - } - -// if ((window = CreateWindowExA (WS_EX_TOOLWINDOW | WS_EX_TRAYWINDOW, "FST", fst->handle->name, - if ((window = CreateWindowExA (0, "FST", fst->handle->name, - (WS_OVERLAPPEDWINDOW & ~WS_THICKFRAME & ~WS_MAXIMIZEBOX), -// (WS_OVERLAPPEDWINDOW & ~WS_MAXIMIZEBOX), - 9999,9999,1,1, -// CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, - NULL, NULL, - hInst, - NULL)) == NULL) { - fst_error ("cannot create editor window"); - return 1; + return -1; } - if (!SetPropA (window, "fst_ptr", fst)) { - fst_error ("cannot set fst_ptr on window"); + if (!hInst) { + fst_error ("Cannot initialise VST host"); + return -1; } - fst->window = window; -// fst->xid = (int) GetPropA (window, "__wine_x11_whole_window"); - - - //printf( "effEditOpen......\n" ); - fst->plugin->dispatcher (fst->plugin, effEditOpen, 0, 0, fst->window, 0 ); - fst->plugin->dispatcher (fst->plugin, effEditGetRect, 0, 0, &er, 0 ); + WNDCLASSEX wclass; - fst->width = er->right-er->left; - fst->height = er->bottom-er->top; - //printf( "get rect ses... %d,%d\n", fst->width, fst->height ); + wclass.cbSize = sizeof(WNDCLASSEX); +#ifdef PLATFORM_WINDOWS + wclass.style = (CS_HREDRAW | CS_VREDRAW); + wclass.hIcon = NULL; + wclass.hCursor = LoadCursor(0, IDC_ARROW); +#else /* linux + wine */ + wclass.style = 0; + wclass.hIcon = LoadIcon(hInst, "FST"); + wclass.hCursor = LoadCursor(0, IDI_APPLICATION); +#endif + wclass.hbrBackground = (HBRUSH)GetStockObject(BLACK_BRUSH); + wclass.lpfnWndProc = vstedit_wndproc; + wclass.cbClsExtra = 0; + wclass.cbWndExtra = 0; + wclass.hInstance = hInst; + wclass.lpszMenuName = "MENU_FST"; + wclass.lpszClassName = "FST"; + wclass.hIconSm = 0; - //SetWindowPos (fst->window, 0, 9999, 9999, er->right-er->left+8, er->bottom-er->top+26, 0); - SetWindowPos (fst->window, 0, 9999, 9999, 2, 2, 0); - ShowWindow (fst->window, SW_SHOWNA); - //SetWindowPos (fst->window, 0, 0, 0, er->right-er->left+8, er->bottom-er->top+26, SWP_NOMOVE|SWP_NOZORDER); - - fst->xid = (int) GetPropA (window, "__wine_x11_whole_window"); - fst->been_activated = TRUE; - pthread_cond_signal (&fst->window_status_change); - pthread_mutex_unlock (&fst->lock); + pthread_mutex_init (&plugin_mutex, NULL); + host_initialized = -1; + if (!RegisterClassExA(&wclass)){ + fst_error ("Error in fst_init(): (class registration failed"); + return -1; + } return 0; } void -fst_move_window_into_view (FST* fst) +fst_start_threading(void) { - if (fst->window) { - SetWindowPos (fst->window, 0, 0, 0, fst->width, fst->height+24, 0); - ShowWindow (fst->window, SW_SHOWNA); +#ifndef PLATFORM_WINDOWS /* linux + wine */ + if (idle_id == 0) { + gui_quit = 0; + idle_id = g_idle_add (g_idle_call, NULL); } +#endif } void -fst_destroy_editor (FST* fst) -{ - pthread_mutex_lock (&fst->lock); - if (fst->window) { - fprintf (stderr, "mark %s for destroy\n", fst->handle->name); - fst->destroy = TRUE; - //if (!PostThreadMessageA (gui_thread_id, WM_USER, 0, 0)) { - //if (!PostThreadMessageA (gui_thread_id, WM_QUIT, 0, 0)) { - // fst_error ("could not post message to gui thread"); - //} - pthread_cond_wait (&fst->window_status_change, &fst->lock); - fprintf (stderr, "%s editor destroyed\n", fst->handle->name); - +fst_stop_threading(void) { +#ifndef PLATFORM_WINDOWS /* linux + wine */ + if (idle_id != 0) { + gui_quit = 1; + PostQuitMessage (0); + g_main_context_iteration(NULL, FALSE); + //g_source_remove(idle_id); + idle_id = 0; } - pthread_mutex_unlock (&fst->lock); +#endif } void -fst_event_loop_remove_plugin (FST* fst) +fst_exit (void) { - FST* p; - FST* prev; + if (!host_initialized) return; + VSTState* fst; + // If any plugins are still open at this point, close them! + while ((fst = fst_first)) + fst_close (fst); - for (p = fst_first, prev = NULL; p->next; prev = p, p = p->next) { - if (p == fst) { - if (prev) { - prev->next = p->next; - } - } +#ifdef PLATFORM_WINDOWS + if (idle_timer_id != 0) { + KillTimer(NULL, idle_timer_id); } - - if (fst_first == fst) { - fst_first = fst_first->next; +#else /* linux + wine */ + if (idle_id) { + gui_quit = 1; + PostQuitMessage (0); } +#endif + host_initialized = FALSE; + pthread_mutex_destroy (&plugin_mutex); } -HMODULE -fst_load_vst_library(const char * path) + +int +fst_run_editor (VSTState* fst, void* window_parent) { - HMODULE dll; - char * full_path; - char * envdup; - char * vst_path; - size_t len1; - size_t len2; - - if ((dll = LoadLibraryA (path)) != NULL) { - return dll; - } + if (fst->windows_window == NULL) { + HMODULE hInst; + HWND window; + struct ERect* er; + + if (!(fst->plugin->flags & effFlagsHasEditor)) { + fst_error ("Plugin \"%s\" has no editor", fst->handle->name); + return -1; + } - envdup = getenv ("VST_PATH"); - if (envdup == NULL) { - return NULL; - } + if ((hInst = GetModuleHandleA (NULL)) == NULL) { + fst_error ("fst_create_editor() can't get module handle"); + return 1; + } - envdup = strdup (envdup); - if (envdup == NULL) { - fst_error ("strdup failed"); - return NULL; - } + if ((window = CreateWindowExA (0, "FST", fst->handle->name, + window_parent ? WS_CHILD : (WS_OVERLAPPEDWINDOW & ~WS_THICKFRAME & ~WS_MAXIMIZEBOX), + CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, + (HWND)window_parent, NULL, + hInst, + NULL) ) == NULL) { + fst_error ("fst_create_editor() cannot create editor window"); + return 1; + } - len2 = strlen(path); + if (!SetPropA (window, "fst_ptr", fst)) { + fst_error ("fst_create_editor() cannot set fst_ptr on window"); + } - vst_path = strtok (envdup, ":"); - while (vst_path != NULL) { - fst_error ("\"%s\"", vst_path); - len1 = strlen(vst_path); - full_path = malloc (len1 + 1 + len2 + 1); - memcpy(full_path, vst_path, len1); - full_path[len1] = '/'; - memcpy(full_path + len1 + 1, path, len2); - full_path[len1 + 1 + len2] = '\0'; + fst->windows_window = window; - if ((dll = LoadLibraryA (full_path)) != NULL) { - break; + if (window_parent) { + // This is requiredv for some reason. Note the parent is set above when the window + // is created. Without this extra call the actual plugin window will draw outside + // of our plugin window. + SetParent((HWND)fst->windows_window, (HWND)window_parent); + fst->xid = 0; +#ifndef PLATFORM_WINDOWS /* linux + wine */ + } else { + SetWindowPos (fst->windows_window, 0, 9999, 9999, 2, 2, 0); + ShowWindow (fst->windows_window, SW_SHOWNA); + fst->xid = (int) GetPropA (fst->windows_window, "__wine_x11_whole_window"); +#endif } - vst_path = strtok (NULL, ":"); + // This is the suggested order of calls. + fst->plugin->dispatcher (fst->plugin, effEditGetRect, 0, 0, &er, 0 ); + fst->plugin->dispatcher (fst->plugin, effEditOpen, 0, 0, fst->windows_window, 0 ); + fst->plugin->dispatcher (fst->plugin, effEditGetRect, 0, 0, &er, 0 ); + + fst->width = er->right-er->left; + fst->height = er->bottom-er->top; + + + fst->been_activated = TRUE; + } - free(envdup); + if (fst->windows_window) { +#ifdef PLATFORM_WINDOWS + if (idle_timer_id == 0) { + // Init the idle timer if needed, so that the main window calls us. + idle_timer_id = SetTimer(NULL, idle_timer_id, 50, (TIMERPROC) idle_hands); + } +#endif + + fst_idle_timer_add_plugin (fst); + } - return dll; + return fst->windows_window == NULL ? -1 : 0; } -FSTHandle* -fst_load (const char *path) +void +fst_destroy_editor (VSTState* fst) { - char* buf; - FSTHandle* fhandle; - char* period; - - fhandle = fst_handle_new (); - - // XXX: Would be nice to find the correct call for this. - // if the user does not configure Z: to be / we are doomed :( + if (fst->windows_window) { + fprintf (stderr, "%s destroying edit window\n", fst->handle->name); - if (strstr (path, ".dll") == NULL) { + fst_idle_timer_remove_plugin (fst); + fst->plugin->dispatcher( fst->plugin, effEditClose, 0, 0, NULL, 0.0 ); - buf = (char *) malloc (strlen (path) + 7); + DestroyWindow ((HWND)(fst->windows_window)); - if( path[0] == '/' ) { - sprintf (buf, "Z:%s.dll", path); - } else { - sprintf (buf, "%s.dll", path); - } + fst->windows_window = NULL; + } - fhandle->nameptr = strdup (path); + fst->been_activated = FALSE; +} - } else { +void +fst_move_window_into_view (VSTState* fst) +{ + if (fst->windows_window) { +#ifdef PLATFORM_WINDOWS + SetWindowPos ((HWND)(fst->windows_window), 0, fst->hoffset, fst->voffset, fst->width + fst->hoffset, fst->height + fst->voffset, 0); +#else /* linux + wine */ + SetWindowPos ((HWND)(fst->windows_window), 0, 0, 0, fst->width + fst->hoffset, fst->height + fst->voffset, 0); +#endif + ShowWindow ((HWND)(fst->windows_window), SW_SHOWNA); + } +} - buf = (char *) malloc (strlen (path) + 3); +static HMODULE +fst_load_vst_library(const char * path) +{ + char legalized_path[PATH_MAX]; + strcpy (legalized_path, g_locale_from_utf8(path, -1, NULL, NULL, NULL)); + return ( LoadLibraryA (legalized_path) ); +} - if( path[0] == '/' ) { - sprintf (buf, "Z:%s", path); - } else { - sprintf (buf, "%s", path); +VSTHandle * +fst_load (const char *path) +{ + VSTHandle* fhandle = NULL; + + if ((strlen(path)) && (NULL != (fhandle = fst_handle_new ()))) + { + char* period; + fhandle->path = strdup (path); + fhandle->name = g_path_get_basename(path); + if ((period = strrchr (fhandle->name, '.'))) { + *period = '\0'; } - fhandle->nameptr = strdup (path); - } - - fhandle->name = basename (fhandle->nameptr); + // See if we can load the plugin DLL + if ((fhandle->dll = (HMODULE)fst_load_vst_library (path)) == NULL) { + fst_unload (&fhandle); + return NULL; + } - /* strip off .dll */ + fhandle->main_entry = (main_entry_t) GetProcAddress ((HMODULE)fhandle->dll, "main"); - if ((period = strrchr (fhandle->name, '.')) != NULL) { - *period = '\0'; - } - - if ((fhandle->dll = fst_load_vst_library (buf)) == NULL) { - fst_unload (fhandle); - return NULL; - } + if (fhandle->main_entry == 0) { + if ((fhandle->main_entry = (main_entry_t) GetProcAddress ((HMODULE)fhandle->dll, "VSTPluginMain"))) { + fprintf(stderr, "VST >= 2.4 plugin '%s'\n", path); + //PBD::warning << path << _(": is a VST >= 2.4 - this plugin may or may not function correctly with this version of Ardour.") << endmsg; + } + } - if ((fhandle->main_entry = (main_entry_t) GetProcAddress (fhandle->dll, "main")) == NULL) { - fst_unload (fhandle); - return NULL; + if (fhandle->main_entry == 0) { + fst_unload (&fhandle); + return NULL; + } } - return fhandle; } int -fst_unload (FSTHandle* fhandle) +fst_unload (VSTHandle** fhandle) { - if (fhandle->plugincnt) { + if (!(*fhandle)) { + return -1; + } + + if ((*fhandle)->plugincnt) { return -1; } - if (fhandle->dll) { - FreeLibrary (fhandle->dll); - fhandle->dll = NULL; + if ((*fhandle)->dll) { + FreeLibrary ((HMODULE)(*fhandle)->dll); + (*fhandle)->dll = NULL; } - if (fhandle->nameptr) { - free (fhandle->nameptr); - fhandle->name = NULL; + if ((*fhandle)->path) { + free ((*fhandle)->path); + (*fhandle)->path = NULL; } - - free (fhandle); + + if ((*fhandle)->name) { + free ((*fhandle)->name); + (*fhandle)->name = NULL; + } + + free (*fhandle); + *fhandle = NULL; + return 0; } -FST* -fst_instantiate (FSTHandle* fhandle, audioMasterCallback amc, void* userptr) +VSTState* +fst_instantiate (VSTHandle* fhandle, audioMasterCallback amc, void* userptr) { - FST* fst = fst_new (); + VSTState* fst = NULL; if( fhandle == NULL ) { - fst_error( "the handle was NULL\n" ); - return NULL; + fst_error( "fst_instantiate(): (the handle was NULL)\n" ); + return NULL; } + fst = fst_new (); + if ((fst->plugin = fhandle->main_entry (amc)) == NULL) { - fst_error ("%s could not be instantiated\n", fhandle->name); + fst_error ("fst_instantiate: %s could not be instantiated\n", fhandle->name); free (fst); return NULL; } - + fst->handle = fhandle; fst->plugin->user = userptr; - + if (fst->plugin->magic != kEffectMagic) { - fst_error ("%s is not a VST plugin\n", fhandle->name); - free (fst); + fst_error ("fst_instantiate: %s is not a vst plugin\n", fhandle->name); + fst_close(fst); return NULL; } - - fst->plugin->dispatcher (fst->plugin, effOpen, 0, 0, 0, 0); - //fst->plugin->dispatcher (fst->plugin, effMainsChanged, 0, 0, NULL, 0); + fst->plugin->dispatcher (fst->plugin, effOpen, 0, 0, 0, 0); fst->vst_version = fst->plugin->dispatcher (fst->plugin, effGetVstVersion, 0, 0, 0, 0); - + fst->handle->plugincnt++; fst->wantIdle = 0; return fst; } -void -fst_close (FST* fst) -{ - fst_destroy_editor (fst); - - fst->plugin->dispatcher (fst->plugin, effMainsChanged, 0, 0, NULL, 0); - fst->plugin->dispatcher (fst->plugin, effClose, 0, 0, 0, 0); - - if (fst->handle->plugincnt) { - --fst->handle->plugincnt; - } -} - -int -fst_get_XID (FST* fst) -{ - return fst->xid; -} - -float htonf (float v) -{ - float result; - char * fin = (char*)&v; - char * fout = (char*)&result; - fout[0] = fin[3]; - fout[1] = fin[2]; - fout[2] = fin[1]; - fout[3] = fin[0]; - return result; +void fst_audio_master_idle(void) { + while(g_main_context_iteration(NULL, FALSE)) ; } -#if 0 -int fst_load_state (FST * fst, char * filename) +void +fst_close (VSTState* fst) { - FILE * f = fopen (filename, "rb"); - if (f) { - char testMagic[sizeof (magic)]; - fread (&testMagic, sizeof (magic), 1, f); - if (strcmp (testMagic, magic)) { - printf ("File corrupt\n"); - return FALSE; - } + if (fst != NULL) { + fst_destroy_editor (fst); - char productString[64]; - char vendorString[64]; - char effectName[64]; - char testString[64]; - unsigned length; - int success; - - fread (&length, sizeof (unsigned), 1, f); - length = htonl (length); - fread (productString, length, 1, f); - productString[length] = 0; - printf ("Product string: %s\n", productString); - - success = fst_call_dispatcher( fst, effGetProductString, 0, 0, testString, 0 ); - if (success == 1) { - if (strcmp (testString, productString) != 0) { - printf ("Product string mismatch! Plugin has: %s\n", testString); - fclose (f); - return FALSE; - } - } else if (length != 0) { - printf ("Product string mismatch! Plugin has none.\n", testString); - fclose (f); - return FALSE; + if (fst->plugin) { + fst->plugin->dispatcher (fst->plugin, effMainsChanged, 0, 0, NULL, 0); + fst->plugin->dispatcher (fst->plugin, effClose, 0, 0, 0, 0); + fst->plugin = NULL; } - fread (&length, sizeof (unsigned), 1, f); - length = htonl (length); - fread (effectName, length, 1, f); - effectName[length] = 0; - printf ("Effect name: %s\n", effectName); - - success = fst_call_dispatcher( fst, effGetEffectName, 0, 0, testString, 0 ); - if (success == 1) { - if (strcmp (testString, effectName) != 0) { - printf ("Effect name mismatch! Plugin has: %s\n", testString); - fclose (f); - return FALSE; - } - } else if (length != 0) { - printf ("Effect name mismatch! Plugin has none.\n", testString); - fclose (f); - return FALSE; - } + if (fst->handle) { + if (fst->handle->plugincnt && --fst->handle->plugincnt == 0) { - fread (&length, sizeof (unsigned), 1, f); - length = htonl (length); - fread (vendorString, length, 1, f); - vendorString[length] = 0; - printf ("Vendor string: %s\n", vendorString); - - success = fst_call_dispatcher( fst, effGetVendorString, 0, 0, testString, 0 ); - if (success == 1) { - if (strcmp (testString, vendorString) != 0) { - printf ("Vendor string mismatch! Plugin has: %s\n", testString); - fclose (f); - return FALSE; + fst->handle->main_entry = NULL; + fst_unload (&fst->handle); // XXX } - } else if (length != 0) { - printf ("Vendor string mismatch! Plugin has none.\n", testString); - fclose (f); - return FALSE; - } - - int numParam; - unsigned i; - fread (&numParam, sizeof (int), 1, f); - numParam = htonl (numParam); - for (i = 0; i < numParam; ++i) { - float val; - fread (&val, sizeof (float), 1, f); - val = htonf (val); - - pthread_mutex_lock( &fst->lock ); - fst->plugin->setParameter( fst->plugin, i, val ); - pthread_mutex_unlock( &fst->lock ); } - int bytelen; - fread (&bytelen, sizeof (int), 1, f); - bytelen = htonl (bytelen); - if (bytelen) { - char * buf = malloc (bytelen); - fread (buf, bytelen, 1, f); - - fst_call_dispatcher( fst, 24, 0, bytelen, buf, 0 ); - free (buf); - } - } else { - printf ("Could not open state file\n"); - return FALSE; + /* It might be good for this to be in it's own cleanup function + since it will free the memory for the fst leaving the caller + with an invalid pointer. Caller beware */ + fst_delete(fst); } - return TRUE; - } -#endif -int fst_save_state (FST * fst, char * filename) +#if 0 // ?? who needs this, where? +float htonf (float v) { - FILE * f = fopen (filename, "wb"); - if (f) { - int bytelen; - int numParams = fst->plugin->numParams; - unsigned i; - char productString[64]; - char effectName[64]; - char vendorString[64]; - int success; - - // write header - fprintf( f, "\n" ); - - success = fst_call_dispatcher( fst, effGetProductString, 0, 0, productString, 0 ); - if( success == 1 ) { - fprintf (f, " \n", productString); - } else { - printf ("No product string\n"); - } - - success = fst_call_dispatcher( fst, effGetEffectName, 0, 0, effectName, 0 ); - if( success == 1 ) { - fprintf (f, " \n", effectName); - printf ("Effect name: %s\n", effectName); - } else { - printf ("No effect name\n"); - } - - success = fst_call_dispatcher( fst, effGetVendorString, 0, 0, vendorString, 0 ); - if( success == 1 ) { - fprintf (f, " \n", vendorString); - printf ("Vendor string: %s\n", vendorString); - } else { - printf ("No vendor string\n"); - } - - - if( fst->plugin->flags & 32 ) { - numParams = 0; - } - - for( i=0; ilock ); - val = fst->plugin->getParameter( fst->plugin, i ); - pthread_mutex_unlock( &fst->lock ); - fprintf( f, " \n", i, val ); - } - - if( fst->plugin->flags & 32 ) { - printf( "getting chunk...\n" ); - void * chunk; - bytelen = fst_call_dispatcher( fst, 23, 0, 0, &chunk, 0 ); - printf( "got tha chunk..\n" ); - if( bytelen ) { - if( bytelen < 0 ) { - printf( "Chunke len < 0 !!! Not saving chunk.\n" ); - } else { - char *encoded = g_base64_encode( chunk, bytelen ); - fprintf( f, " \n %s\n \n", bytelen, encoded ); - g_free( encoded ); - } - } - } - - fprintf( f, "\n" ); - fclose( f ); - } else { - printf ("Could not open state file\n"); - return FALSE; - } - return TRUE; + float result; + char * fin = (char*)&v; + char * fout = (char*)&result; + fout[0] = fin[3]; + fout[1] = fin[2]; + fout[2] = fin[1]; + fout[3] = fin[0]; + return result; } - +#endif