fix memory leak in case LV2 GUI fails.
[ardour.git] / gtk2_ardour / lv2_plugin_ui.cc
1 /*
2     Copyright (C) 2008-2012 Paul Davis
3     Author: David Robillard
4
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.
9
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.
14
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.
18 */
19
20 #include "ardour/lv2_plugin.h"
21 #include "ardour/session.h"
22 #include "pbd/error.h"
23
24 #include "lv2_plugin_ui.h"
25 #include "timers.h"
26
27 #include "lv2/lv2plug.in/ns/extensions/ui/ui.h"
28
29 #include <lilv/lilv.h>
30 #include <suil/suil.h>
31
32 #include "i18n.h"
33
34 using namespace ARDOUR;
35 using namespace Gtk;
36 using namespace PBD;
37
38 #define NS_UI "http://lv2plug.in/ns/extensions/ui#"
39
40 static SuilHost* ui_host = NULL;
41
42 void
43 LV2PluginUI::write_from_ui(void*       controller,
44                            uint32_t    port_index,
45                            uint32_t    buffer_size,
46                            uint32_t    format,
47                            const void* buffer)
48 {
49         LV2PluginUI* me = (LV2PluginUI*)controller;
50         if (format == 0) {
51                 if (port_index >= me->_controllables.size()) {
52                         return;
53                 }
54
55                 boost::shared_ptr<AutomationControl> ac = me->_controllables[port_index];
56                 if (ac) {
57                         ac->set_value(*(const float*)buffer);
58                 }
59         } else if (format == URIMap::instance().urids.atom_eventTransfer) {
60
61                 const int cnt = me->_pi->get_count();
62                 for (int i=0; i < cnt; i++ ) {
63                         boost::shared_ptr<LV2Plugin> lv2i = boost::dynamic_pointer_cast<LV2Plugin> (me->_pi->plugin(i));
64                         lv2i->write_from_ui(port_index, format, buffer_size, (const uint8_t*)buffer);
65                 }
66         }
67 }
68
69 void
70 LV2PluginUI::write_to_ui(void*       controller,
71                          uint32_t    port_index,
72                          uint32_t    buffer_size,
73                          uint32_t    format,
74                          const void* buffer)
75 {
76         LV2PluginUI* me = (LV2PluginUI*)controller;
77         if (me->_inst) {
78                 suil_instance_port_event((SuilInstance*)me->_inst,
79                                          port_index, buffer_size, format, buffer);
80         }
81 }
82
83 uint32_t
84 LV2PluginUI::port_index(void* controller, const char* symbol)
85 {
86         return ((LV2PluginUI*)controller)->_lv2->port_index(symbol);
87 }
88
89 void
90 LV2PluginUI::touch(void*    controller,
91                    uint32_t port_index,
92                    bool     grabbed)
93 {
94         LV2PluginUI* me = (LV2PluginUI*)controller;
95         if (port_index >= me->_controllables.size()) {
96                 return;
97         }
98
99         ControllableRef control = me->_controllables[port_index];
100         if (grabbed) {
101                 control->start_touch(control->session().transport_frame());
102         } else {
103                 control->stop_touch(false, control->session().transport_frame());
104         }
105 }
106
107 void
108 LV2PluginUI::update_timeout()
109 {
110         _lv2->emit_to_ui(this, &LV2PluginUI::write_to_ui);
111 }
112
113 void
114 LV2PluginUI::on_external_ui_closed(void* controller)
115 {
116         //printf("LV2PluginUI::on_external_ui_closed\n");
117         LV2PluginUI* me = (LV2PluginUI*)controller;
118         me->_screen_update_connection.disconnect();
119         me->_external_ui_ptr = NULL;
120 }
121
122 void
123 LV2PluginUI::parameter_changed(uint32_t port_index, float val)
124 {
125         PlugUIBase::parameter_changed(port_index, val);
126
127         if (val != _values[port_index]) {
128                 parameter_update(port_index, val);
129         }
130 }
131
132 void
133 LV2PluginUI::parameter_update(uint32_t port_index, float val)
134 {
135         if (!_inst) {
136                 return;
137         }
138
139         suil_instance_port_event((SuilInstance*)_inst, port_index, 4, 0, &val);
140         _values[port_index] = val;
141 }
142
143 bool
144 LV2PluginUI::start_updating(GdkEventAny*)
145 {
146         if (!_output_ports.empty()) {
147                 _screen_update_connection.disconnect();
148                 _screen_update_connection = Timers::super_rapid_connect
149                         (sigc::mem_fun(*this, &LV2PluginUI::output_update));
150         }
151         return false;
152 }
153
154 bool
155 LV2PluginUI::stop_updating(GdkEventAny*)
156 {
157         //cout << "stop_updating" << endl;
158
159         if (!_output_ports.empty()) {
160                 _screen_update_connection.disconnect();
161         }
162         return false;
163 }
164
165 void
166 LV2PluginUI::output_update()
167 {
168         //cout << "output_update" << endl;
169         if (_external_ui_ptr) {
170                 LV2_EXTERNAL_UI_RUN(_external_ui_ptr);
171                 if (_lv2->is_external_kx() && !_external_ui_ptr) {
172                         // clean up external UI if it closes itself via
173                         // on_external_ui_closed() during run()
174                         //printf("LV2PluginUI::output_update -- UI was closed\n");
175                         //_screen_update_connection.disconnect();
176                         _message_update_connection.disconnect();
177                         if (_inst) {
178                                 suil_instance_free((SuilInstance*)_inst);
179                         }
180                         _inst = NULL;
181                         _external_ui_ptr = NULL;
182                         return;
183                 }
184         }
185
186         /* FIXME only works with control output ports (which is all we support now anyway) */
187         uint32_t nports = _output_ports.size();
188         for (uint32_t i = 0; i < nports; ++i) {
189                 uint32_t index = _output_ports[i];
190                 parameter_changed(index, _lv2->get_parameter(index));
191         }
192
193 }
194
195 LV2PluginUI::LV2PluginUI(boost::shared_ptr<PluginInsert> pi,
196                          boost::shared_ptr<LV2Plugin>    lv2p)
197         : PlugUIBase(pi)
198         , _pi(pi)
199         , _lv2(lv2p)
200         , _gui_widget(NULL)
201         , _values(NULL)
202         , _external_ui_ptr(NULL)
203         , _inst(NULL)
204 {
205         _ardour_buttons_box.set_spacing (6);
206         _ardour_buttons_box.set_border_width (6);
207         _ardour_buttons_box.pack_end (focus_button, false, false);
208         _ardour_buttons_box.pack_end (bypass_button, false, false, 10);
209         _ardour_buttons_box.pack_end (delete_button, false, false);
210         _ardour_buttons_box.pack_end (save_button, false, false);
211         _ardour_buttons_box.pack_end (add_button, false, false);
212         _ardour_buttons_box.pack_end (_preset_combo, false, false);
213         _ardour_buttons_box.pack_end (_preset_modified, false, false);
214 }
215
216 void
217 LV2PluginUI::lv2ui_instantiate(const std::string& title)
218 {
219         bool          is_external_ui = _lv2->is_external_ui();
220         LV2_Feature** features_src   = const_cast<LV2_Feature**>(_lv2->features());
221         LV2_Feature** features       = const_cast<LV2_Feature**>(_lv2->features());
222         size_t        features_count = 0;
223         while (*features++) {
224                 features_count++;
225         }
226
227         Gtk::Alignment* container = NULL;
228         if (is_external_ui) {
229                 _external_ui_host.ui_closed       = LV2PluginUI::on_external_ui_closed;
230                 _external_ui_host.plugin_human_id = strdup(title.c_str());
231
232                 _external_ui_feature.URI  = LV2_EXTERNAL_UI_URI;
233                 _external_ui_feature.data = &_external_ui_host;
234
235                 _external_kxui_feature.URI  = LV2_EXTERNAL_UI_KX__Host;
236                 _external_kxui_feature.data = &_external_ui_host;
237
238                 ++features_count;
239                 features = (LV2_Feature**)malloc(
240                         sizeof(LV2_Feature*) * (features_count + 2));
241                 for (size_t i = 0; i < features_count - 2; ++i) {
242                         features[i] = features_src[i];
243                 }
244                 features[features_count - 2] = &_external_kxui_feature;
245                 features[features_count - 1] = &_external_ui_feature;
246                 features[features_count]     = NULL;
247         } else {
248                 if (_ardour_buttons_box.get_parent()) {
249                         _ardour_buttons_box.get_parent()->remove(_ardour_buttons_box);
250                 }
251                 pack_start(_ardour_buttons_box, false, false);
252                 _ardour_buttons_box.show_all();
253
254                 _gui_widget = Gtk::manage((container = new Gtk::Alignment()));
255                 pack_start(*_gui_widget, true, true);
256                 _gui_widget->show();
257
258                 _parent_feature.URI  = LV2_UI__parent;
259                 _parent_feature.data = _gui_widget->gobj();
260
261                 ++features_count;
262                 features = (LV2_Feature**)malloc(
263                         sizeof(LV2_Feature*) * (features_count + 1));
264                 for (size_t i = 0; i < features_count - 1; ++i) {
265                         features[i] = features_src[i];
266                 }
267                 features[features_count - 1] = &_parent_feature;
268                 features[features_count]     = NULL;
269         }
270
271         if (!ui_host) {
272                 ui_host = suil_host_new(LV2PluginUI::write_from_ui,
273                                         LV2PluginUI::port_index,
274                                         NULL, NULL);
275                 suil_host_set_touch_func(ui_host, LV2PluginUI::touch);
276         }
277         const char* container_type = (is_external_ui)
278                 ? NS_UI "external"
279                 : NS_UI "GtkUI";
280
281         if (_lv2->has_message_output()) {
282                 _lv2->enable_ui_emission();
283         }
284
285         const LilvUI*   ui     = (const LilvUI*)_lv2->c_ui();
286         const LilvNode* bundle = lilv_ui_get_bundle_uri(ui);
287         const LilvNode* binary = lilv_ui_get_binary_uri(ui);
288 #ifdef HAVE_LILV_0_21_1
289         char* ui_bundle_path = lilv_file_uri_parse(lilv_node_as_uri(bundle), NULL);
290         char* ui_binary_path = lilv_file_uri_parse(lilv_node_as_uri(binary), NULL);
291 #else
292         char* ui_bundle_path = strdup(lilv_uri_to_path(lilv_node_as_uri(bundle)));
293         char* ui_binary_path = strdup(lilv_uri_to_path(lilv_node_as_uri(binary)));
294 #endif
295         if (!ui_bundle_path || !ui_binary_path) {
296                 error << _("failed to get path for UI bindle or binary") << endmsg;
297                 free(ui_bundle_path);
298                 free(ui_binary_path);
299                 free(features);
300                 return;
301         }
302
303         _inst = suil_instance_new(
304                 ui_host,
305                 this,
306                 container_type,
307                 _lv2->uri(),
308                 lilv_node_as_uri(lilv_ui_get_uri(ui)),
309                 lilv_node_as_uri((const LilvNode*)_lv2->c_ui_type()),
310                 ui_bundle_path,
311                 ui_binary_path,
312                 features);
313
314         free(ui_bundle_path);
315         free(ui_binary_path);
316         free(features);
317
318 #define GET_WIDGET(inst) suil_instance_get_widget((SuilInstance*)inst);
319
320         const uint32_t num_ports = _lv2->num_ports();
321         for (uint32_t i = 0; i < num_ports; ++i) {
322                 if (_lv2->parameter_is_output(i)
323                     && _lv2->parameter_is_control(i)
324                     && is_update_wanted(i)) {
325                         _output_ports.push_back(i);
326                 }
327         }
328
329         _external_ui_ptr = NULL;
330         if (_inst) {
331                 if (!is_external_ui) {
332                         GtkWidget* c_widget = (GtkWidget*)GET_WIDGET(_inst);
333                         if (!c_widget) {
334                                 error << _("failed to get LV2 UI widget") << endmsg;
335                                 suil_instance_free((SuilInstance*)_inst);
336                                 _inst = NULL;
337                                 return;
338                         }
339                         if (!container->get_child()) {
340                                 // Suil didn't add the UI to the container for us, so do it now
341                                 container->add(*Gtk::manage(Glib::wrap(c_widget)));
342                         }
343                         container->show_all();
344                 } else {
345                         _external_ui_ptr = (struct lv2_external_ui*)GET_WIDGET(_inst);
346                 }
347         }
348
349         _values = new float[num_ports];
350         _controllables.resize(num_ports);
351         for (uint32_t i = 0; i < num_ports; ++i) {
352                 bool     ok;
353                 uint32_t port = _lv2->nth_parameter(i, ok);
354                 if (ok) {
355                         _values[port]        = _lv2->get_parameter(port);
356                         _controllables[port] = boost::dynamic_pointer_cast<ARDOUR::AutomationControl> (
357                                 insert->control(Evoral::Parameter(PluginAutomation, 0, port)));
358
359                         if (_lv2->parameter_is_control(port) && _lv2->parameter_is_input(port)) {
360                                 parameter_update(port, _values[port]);
361                         }
362                 }
363         }
364
365         if (_lv2->has_message_output()) {
366                 _message_update_connection = Timers::super_rapid_connect (
367                         sigc::mem_fun(*this, &LV2PluginUI::update_timeout));
368         }
369 }
370
371 void
372 LV2PluginUI::lv2ui_free()
373 {
374         stop_updating (0);
375
376         if (_gui_widget) {
377                 remove (*_gui_widget);
378                 _gui_widget = NULL;
379         }
380
381         if (_inst) {
382                 suil_instance_free((SuilInstance*)_inst);
383                 _inst = NULL;
384         }
385 }
386
387 LV2PluginUI::~LV2PluginUI ()
388 {
389         if (_values) {
390                 delete[] _values;
391         }
392
393         _message_update_connection.disconnect();
394         _screen_update_connection.disconnect();
395
396         if (_external_ui_ptr && _lv2->is_external_kx()) {
397                 LV2_EXTERNAL_UI_HIDE(_external_ui_ptr);
398         }
399         lv2ui_free();
400         _external_ui_ptr = NULL;
401 }
402
403 int
404 LV2PluginUI::get_preferred_height()
405 {
406         Gtk::Requisition r = size_request();
407         return r.height;
408 }
409
410 int
411 LV2PluginUI::get_preferred_width()
412 {
413         Gtk::Requisition r = size_request();
414         return r.width;
415 }
416
417 bool
418 LV2PluginUI::resizable()
419 {
420         return _lv2->ui_is_resizable();
421 }
422
423 int
424 LV2PluginUI::package(Gtk::Window& win)
425 {
426         if (_external_ui_ptr) {
427                 _win_ptr = &win;
428         } else {
429                 /* forward configure events to plugin window */
430                 win.signal_configure_event().connect(
431                         sigc::mem_fun(*this, &LV2PluginUI::configure_handler));
432                 win.signal_map_event().connect(
433                         sigc::mem_fun(*this, &LV2PluginUI::start_updating));
434                 win.signal_unmap_event().connect(
435                         sigc::mem_fun(*this, &LV2PluginUI::stop_updating));
436         }
437         return 0;
438 }
439
440 bool
441 LV2PluginUI::configure_handler(GdkEventConfigure*)
442 {
443         std::cout << "CONFIGURE" << std::endl;
444         return false;
445 }
446
447 bool
448 LV2PluginUI::is_update_wanted(uint32_t /*index*/)
449 {
450         /* FIXME: use port notification properties
451            and/or new UI extension subscription methods
452         */
453         return true;
454 }
455
456 bool
457 LV2PluginUI::on_window_show(const std::string& title)
458 {
459         //cout << "on_window_show - " << title << endl; flush(cout);
460
461         if (_lv2->is_external_ui()) {
462                 if (_external_ui_ptr) {
463                         _screen_update_connection.disconnect();
464                         _message_update_connection.disconnect();
465                         LV2_EXTERNAL_UI_SHOW(_external_ui_ptr);
466                         _screen_update_connection = Timers::super_rapid_connect
467                         (sigc::mem_fun(*this, &LV2PluginUI::output_update));
468                         if (_lv2->has_message_output()) {
469                                 _message_update_connection = Timers::super_rapid_connect (
470                                         sigc::mem_fun(*this, &LV2PluginUI::update_timeout));
471                         }
472                         return false;
473                 }
474                 lv2ui_instantiate(title);
475                 if (!_external_ui_ptr) {
476                         return false;
477                 }
478
479                 _screen_update_connection.disconnect();
480                 _message_update_connection.disconnect();
481                 LV2_EXTERNAL_UI_SHOW(_external_ui_ptr);
482                 _screen_update_connection = Timers::super_rapid_connect
483                         (sigc::mem_fun(*this, &LV2PluginUI::output_update));
484                 if (_lv2->has_message_output()) {
485                         _message_update_connection = Timers::super_rapid_connect (
486                                 sigc::mem_fun(*this, &LV2PluginUI::update_timeout));
487                 }
488                 return false;
489         } else {
490                 lv2ui_instantiate("gtk2gui");
491         }
492
493         return true;
494 }
495
496 void
497 LV2PluginUI::on_window_hide()
498 {
499         //printf("LV2PluginUI::on_window_hide\n");
500
501         if (_lv2->is_external_ui()) {
502                 if (!_external_ui_ptr) { return; }
503                 LV2_EXTERNAL_UI_HIDE(_external_ui_ptr);
504                 if (!_lv2->is_external_kx()) { return ; }
505                 _message_update_connection.disconnect();
506                 _screen_update_connection.disconnect();
507                 _external_ui_ptr = NULL;
508                 suil_instance_free((SuilInstance*)_inst);
509                 _inst = NULL;
510         } else {
511                 lv2ui_free();
512         }
513 }