fix transition keyframe update when autogenerate keyframes set, revert copy operators...
[goodguy/cinelerra.git] / cinelerra-5.1 / cinelerra / pluginserver.C
1
2 /*
3  * CINELERRA
4  * Copyright (C) 2009 Adam Williams <broadcast at earthling dot net>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  */
21
22 #include "amodule.h"
23 #include "atrack.h"
24 #include "attachmentpoint.h"
25 #include "autoconf.h"
26 #include "bcsignals.h"
27 #include "cplayback.h"
28 #include "cstrdup.h"
29 #include "cwindow.h"
30 #include "edl.h"
31 #include "edlsession.h"
32 #include "file.h"
33 #include "floatautos.h"
34 #include "keyframes.h"
35 #include "localsession.h"
36 #include "mainerror.h"
37 #include "mainprogress.h"
38 #include "menueffects.h"
39 #include "mwindow.h"
40 #include "mwindowgui.h"
41 #include "playbackengine.h"
42 #include "plugin.h"
43 #include "pluginaclient.h"
44 #include "pluginaclientlad.h"
45 #include "pluginfclient.h"
46 #include "pluginclient.h"
47 #include "plugincommands.h"
48 #include "pluginserver.h"
49 #include "pluginvclient.h"
50 #include "preferences.h"
51 #include "samples.h"
52 #include "sema.h"
53 #include "mainsession.h"
54 #include "theme.h"
55 #include "trackcanvas.h"
56 #include "tracks.h"
57 #include "transportque.h"
58 #include "vdevicex11.h"
59 #include "vframe.h"
60 #include "videodevice.h"
61 #include "virtualanode.h"
62 #include "virtualvnode.h"
63 #include "vmodule.h"
64 #include "vtrack.h"
65
66
67 #include<stdio.h>
68 #include<unistd.h>
69 #include<fcntl.h>
70 #include <sys/types.h>
71 #include <sys/wait.h>
72 #include<sys/stat.h>
73 #include <sys/mman.h>
74
75
76 void PluginServer::init()
77 {
78         reset_parameters();
79         this->plugin_type = PLUGIN_TYPE_UNKNOWN;
80         plugin_obj = new PluginObj();
81         modules = new ArrayList<Module*>;
82         nodes = new ArrayList<VirtualNode*>;
83         tip = 0;
84         gui_id = -1;
85         plugin_id = -1;
86 }
87
88 PluginServer::PluginServer()
89 {
90         init();
91 }
92
93 PluginServer::PluginServer(MWindow *mwindow, const char *path, int type)
94 {
95         char fpath[BCTEXTLEN];
96         init();
97         this->plugin_type = type;
98         this->mwindow = mwindow;
99         if( type == PLUGIN_TYPE_FFMPEG ) {
100                 ff_name = cstrdup(path);
101                 sprintf(fpath, "ff_%s", path);
102                 path = fpath;
103         }
104         set_path(path);
105 }
106
107 PluginServer::PluginServer(PluginServer &that)
108 {
109         reset_parameters();
110         plugin_type = that.plugin_type;
111         plugin_obj = that.plugin_obj;
112         plugin_obj->add_user();
113         title = !that.title ? 0 : cstrdup(that.title);
114         tip = !that.tip ? 0 : cstrdup(that.tip);
115         path = !that.path ? 0 : cstrdup(that.path);
116         ff_name = !that.ff_name ? 0 : cstrdup(that.ff_name);
117         modules = new ArrayList<Module*>;
118         nodes = new ArrayList<VirtualNode*>;
119
120         attachment = that.attachment;
121         realtime = that.realtime;
122         multichannel = that.multichannel;
123         preferences = that.preferences;
124         synthesis = that.synthesis;
125         audio = that.audio;
126         video = that.video;
127         theme = that.theme;
128         fileio = that.fileio;
129         uses_gui = that.uses_gui;
130         mwindow = that.mwindow;
131         keyframe = that.keyframe;
132         new_plugin = that.new_plugin;
133
134         lad_descriptor = that.lad_descriptor;
135         lad_descriptor_function = that.lad_descriptor_function;
136         lad_index = that.lad_index;
137 }
138
139 PluginServer::~PluginServer()
140 {
141         close_plugin();
142         delete [] path;
143         delete [] ff_name;
144         delete [] title;
145         delete [] tip;
146         delete modules;
147         delete nodes;
148         delete picon;
149         plugin_obj->remove_user();
150 }
151
152 // Done only once at creation
153 int PluginServer::reset_parameters()
154 {
155         mwindow = 0;
156         keyframe = 0;
157         prompt = 0;
158         cleanup_plugin();
159
160         plugin_obj = 0;
161         client = 0; 
162         new_plugin = 0;
163         lad_index = -1;
164         lad_descriptor_function = 0;
165         lad_descriptor = 0;
166         ff_name = 0;
167         use_opengl = 0;
168         vdevice = 0;
169         plugin_type = 0;
170         start_auto = end_auto = 0;
171         autos = 0;
172         reverse = 0;
173         plugin_open = 0;
174         realtime = multichannel = fileio = 0;
175         synthesis = 0;
176         audio = video = theme = 0;
177         uses_gui = 0;
178         transition = 0;
179         title = 0;
180         tip = 0;
181         path = 0;
182         data_text = 0;
183         for( int i=sizeof(args)/sizeof(args[0]); --i>=0; ) args[i] = 0;
184         total_args = 0; 
185         dir_idx = 0;
186         modules = 0;
187         nodes = 0;
188         attachmentpoint = 0;
189         edl = 0;
190         preferences = 0;
191         prompt = 0;
192         temp_frame = 0;
193         picon = 0;
194
195         return 0;
196 }
197
198 // Done every time the plugin is opened or closed
199 int PluginServer::cleanup_plugin()
200 {
201         in_buffer_size = out_buffer_size = 0;
202         total_in_buffers = total_out_buffers = 0;
203         error_flag = 0;
204         written_samples = 0;
205         shared_buffers = 0;
206         new_buffers = 0;
207         written_samples = written_frames = 0;
208         gui_on = 0;
209         plugin_id = -1;
210         plugin_open = 0;
211         return 0;
212 }
213
214 void PluginServer::set_mwindow(MWindow *mwindow)
215 {
216         this->mwindow = mwindow;
217 }
218
219 void PluginServer::set_attachmentpoint(AttachmentPoint *attachmentpoint)
220 {
221         this->attachmentpoint = attachmentpoint;
222 }
223
224 void PluginServer::set_keyframe(KeyFrame *keyframe)
225 {
226         this->keyframe = keyframe;
227 }
228
229 void PluginServer::set_prompt(MenuEffectPrompt *prompt)
230 {
231         this->prompt = prompt;
232 }
233
234 void PluginServer::set_lad_index(int i)
235 {
236         this->lad_index = i;
237 }
238
239 int PluginServer::get_lad_index()
240 {
241         return this->lad_index;
242 }
243
244 int PluginServer::is_unknown()
245 {
246         return plugin_type == PLUGIN_TYPE_UNKNOWN ? 1 : 0;
247 }
248
249 int PluginServer::is_executable()
250 {
251         return  plugin_type == PLUGIN_TYPE_EXECUTABLE ? 1 : 0;
252 }
253
254 int PluginServer::is_builtin()
255 {
256         return plugin_type == PLUGIN_TYPE_BUILTIN ? 1 : 0;
257 }
258
259 int PluginServer::is_ladspa()
260 {
261         return plugin_type == PLUGIN_TYPE_LADSPA ? 1 : 0;
262 }
263
264 int PluginServer::is_ffmpeg()
265 {
266         return plugin_type == PLUGIN_TYPE_FFMPEG ? 1 : 0;
267 }
268
269 int PluginServer::is_lv2()
270 {
271         return plugin_type == PLUGIN_TYPE_LV2 ? 1 : 0;
272 }
273
274 void PluginServer::set_path(const char *path)
275 {
276         delete [] this->path;
277         this->path = cstrdup(path);
278 }
279
280 char* PluginServer::get_path()
281 {
282         return this->path;
283 }
284
285 int PluginServer::get_synthesis()
286 {
287         return synthesis;
288 }
289
290
291 void PluginServer::set_title(const char *string)
292 {
293         delete [] title;
294         title = cstrdup(string);
295 }
296
297 void PluginServer::generate_display_title(char *string)
298 {
299         char ltitle[BCTEXTLEN];
300         if( BC_Resources::locale_utf8 )
301                 strcpy(ltitle, _(title));
302         else
303                 BC_Resources::encode(BC_Resources::encoding, 0,
304                                 _(title),strlen(title)+1, ltitle,BCTEXTLEN);
305         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
306         if( plugin && plugin->track )
307                 sprintf(string, "%s: %s", plugin->track->title, ltitle);
308         else
309                 strcpy(string, ltitle);
310 }
311
312 void *PluginObj::load(const char *plugin_dir, const char *path)
313 {
314         char dlpath[BCTEXTLEN], *dp = dlpath;
315         const char *cp = path;
316         if( *cp != '/' ) {
317                 const char *bp = plugin_dir;
318                 while( *bp ) *dp++ = *bp++;
319                 *dp++ = '/';
320         }
321         while( *cp ) *dp++ = *cp++;
322         *dp = 0;
323         return dlobj = load(dlpath);
324 }
325
326 int PluginServer::load_obj()
327 {
328         void *obj = plugin_obj->obj();
329         if( !obj ) obj =plugin_obj->load(preferences->plugin_dir, path);
330         return obj ? 1 : 0;
331 }
332
333 const char *PluginServer::load_error()
334 {
335         return plugin_obj->load_error();
336 }
337
338 void *PluginServer::get_sym(const char *sym)
339 {
340         if( !plugin_obj->obj() ) return 0;
341         return plugin_obj->load_sym(sym);
342 }
343
344 // Open plugin for signal processing
345 int PluginServer::open_plugin(int master,
346         Preferences *preferences,
347         EDL *edl,
348         Plugin *plugin)
349 {
350         if( plugin_open ) return 0;
351
352         this->preferences = preferences;
353         this->plugin_id = plugin ? plugin->orig_id : -1;
354         this->edl = edl;
355         if( !is_ffmpeg() && !is_lv2() && !is_executable() && !load_obj() ) {
356 // If the load failed, can't use error string to detect executable
357 //  because locale and language selection changes the load_error() message
358 //      if( !strstr(string, "executable") ) { set_title(path); plugin_type = PLUGIN_TYPE_EXECUTABLE; }
359                 eprintf("PluginServer::open_plugin: load_obj %s = %s\n", path, load_error());
360                 return PLUGINSERVER_NOT_RECOGNIZED;
361         }
362         if( is_unknown() || is_builtin() ) {
363                 new_plugin =
364                         (PluginClient* (*)(PluginServer*)) get_sym("new_plugin");
365                 if( new_plugin )
366                         plugin_type = PLUGIN_TYPE_BUILTIN;
367         }
368         if( is_unknown() || is_ladspa() ) {
369                 lad_descriptor_function =
370                         (LADSPA_Descriptor_Function) get_sym("ladspa_descriptor");
371                 if( lad_descriptor_function ) {
372                         if( lad_index < 0 ) return PLUGINSERVER_IS_LAD;
373                         lad_descriptor = lad_descriptor_function(lad_index);
374                         if( !lad_descriptor )
375                                 return PLUGINSERVER_NOT_RECOGNIZED;
376                         plugin_type = PLUGIN_TYPE_LADSPA;
377                 }
378         }
379         if( is_unknown() ) {
380                 fprintf(stderr, "PluginServer::open_plugin "
381                         " %d: plugin undefined in %s\n", __LINE__, path);
382                 return PLUGINSERVER_NOT_RECOGNIZED;
383         }
384         switch( plugin_type ) {
385         case PLUGIN_TYPE_EXECUTABLE:
386                 return PLUGINSERVER_OK;
387         case PLUGIN_TYPE_BUILTIN:
388                 client = new_plugin(this);
389                 break;
390         case PLUGIN_TYPE_FFMPEG:
391                 client = new_ffmpeg_plugin();
392                 break;
393         case PLUGIN_TYPE_LADSPA:
394                 client = new PluginAClientLAD(this);
395                 break;
396         case PLUGIN_TYPE_LV2:
397                 client = new_lv2_plugin();
398                 break;
399         default:
400                 client = 0;
401                 break;
402         }
403         if( !client )
404                 return PLUGINSERVER_NOT_RECOGNIZED;
405
406 // Run initialization functions
407         realtime = client->is_realtime();
408 // Don't load defaults when probing the directory.
409         if( !master ) {
410                 if( realtime )
411                         client->load_defaults_xml();
412                 else
413                         client->load_defaults();
414         }
415         audio = client->is_audio();
416         video = client->is_video();
417         theme = client->is_theme();
418         fileio = client->is_fileio();
419         uses_gui = client->uses_gui();
420         multichannel = client->is_multichannel();
421         synthesis = client->is_synthesis();
422         transition = client->is_transition();
423         set_title(client->plugin_title());
424
425 //printf("PluginServer::open_plugin 2\n");
426         plugin_open = 1;
427         return PLUGINSERVER_OK;
428 }
429
430 int PluginServer::close_plugin()
431 {
432         if( !plugin_open ) return 0;
433         delete client;
434         plugin_open = 0;
435         cleanup_plugin();
436         return 0;
437 }
438
439 void PluginServer::client_side_close()
440 {
441 // Last command executed in client thread
442         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
443         if( plugin )
444                 mwindow->hide_plugin(plugin, 1);
445         else if( prompt ) {
446                 prompt->lock_window();
447                 prompt->set_done(1);
448                 prompt->unlock_window();
449         }
450 }
451
452 void PluginServer::render_stop()
453 {
454         if( client )
455                 client->render_stop();
456         send_reset_gui_frames();
457 }
458
459 void PluginServer::write_table(FILE *fp, const char *path, int idx, int64_t mtime)
460 {
461         if( !fp ) return;
462         fprintf(fp, "%d \"%s\" \"%s\" %jd %d %d %d %d %d %d %d %d %d %d %d\n",
463                 plugin_type, path, title, mtime, idx, audio, video, theme, realtime,
464                 fileio, uses_gui, multichannel, synthesis, transition, lad_index);
465 }
466
467 int PluginServer::scan_table(char *text, int &type, char *path, char *title, int64_t &mtime)
468 {
469         int n = sscanf(text, "%d \"%[^\"]\" \"%[^\"]\" %jd", &type, path, title, &mtime);
470         return n < 4 ? 1 : 0;
471 }
472
473 int PluginServer::read_table(char *text)
474 {
475         char path[BCTEXTLEN], title[BCTEXTLEN];
476         int64_t mtime;
477         int n = sscanf(text, "%d \"%[^\"]\" \"%[^\"]\" %jd %d %d %d %d %d %d %d %d %d %d %d",
478                 &plugin_type, path, title, &mtime, &dir_idx, &audio, &video, &theme, &realtime,
479                 &fileio, &uses_gui, &multichannel, &synthesis, &transition, &lad_index);
480         if( n != 15 ) return 1;
481         set_title(title);
482         return 0;
483 }
484
485 int PluginServer::init_realtime(int realtime_sched,
486                 int total_in_buffers,
487                 int buffer_size)
488 {
489
490         if( !plugin_open ) return 0;
491
492 // set for realtime priority
493 // initialize plugin
494 // Call start_realtime
495         this->total_in_buffers = this->total_out_buffers = total_in_buffers;
496         client->plugin_init_realtime(realtime_sched,
497                 total_in_buffers,
498                 buffer_size);
499
500         return 0;
501 }
502
503
504 // Replaced by pull method but still needed for transitions
505 void PluginServer::process_transition(VFrame *input,
506                 VFrame *output,
507                 int64_t current_position,
508                 int64_t total_len)
509 {
510         if( !plugin_open ) return;
511         PluginVClient *vclient = (PluginVClient*)client;
512
513         vclient->source_position = current_position;
514         vclient->source_start = 0;
515         vclient->total_len = total_len;
516
517         vclient->input = new VFrame*[1];
518         vclient->output = new VFrame*[1];
519
520         vclient->input[0] = input;
521         vclient->output[0] = output;
522
523         vclient->process_realtime(input, output);
524         vclient->age_temp();
525         delete [] vclient->input;
526         delete [] vclient->output;
527         use_opengl = 0;
528 }
529
530 void PluginServer::process_transition(Samples *input,
531                 Samples *output,
532                 int64_t current_position,
533                 int64_t fragment_size,
534                 int64_t total_len)
535 {
536         if( !plugin_open ) return;
537         PluginAClient *aclient = (PluginAClient*)client;
538
539         aclient->source_position = current_position;
540         aclient->total_len = total_len;
541         aclient->source_start = 0;
542         aclient->process_realtime(fragment_size,
543                 input,
544                 output);
545 }
546
547
548 void PluginServer::process_buffer(VFrame **frame,
549         int64_t current_position,
550         double frame_rate,
551         int64_t total_len,
552         int direction)
553 {
554         if( !plugin_open ) return;
555         PluginVClient *vclient = (PluginVClient*)client;
556         vclient->in_buffer_size = vclient->out_buffer_size = 1;
557         vclient->source_position = current_position;
558         vclient->total_len = total_len;
559         vclient->frame_rate = frame_rate;
560         vclient->input = new VFrame*[total_in_buffers];
561         vclient->output = new VFrame*[total_in_buffers];
562         for( int i = 0; i < total_in_buffers; i++ ) {
563                 vclient->input[i] = frame[i];
564                 vclient->output[i] = frame[i];
565         }
566
567         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
568         if( plugin ) {
569                 vclient->source_start = (int64_t)plugin->startproject *
570                         frame_rate / vclient->project_frame_rate;
571         }
572         vclient->direction = direction;
573
574 //PRINT_TRACE
575 //printf("plugin=%p source_start=%ld\n", plugin, vclient->source_start);
576 //      vclient->begin_process_buffer();
577         if( multichannel )
578                 vclient->process_buffer(frame, current_position, frame_rate);
579         else
580                 vclient->process_buffer(frame[0], current_position, frame_rate);
581 //      vclient->end_process_buffer();
582
583         for( int i = 0; i < total_in_buffers; i++ )
584                 frame[i]->push_prev_effect(title);
585
586         delete [] vclient->input;
587         delete [] vclient->output;
588
589         vclient->age_temp();
590         use_opengl = 0;
591 }
592
593 void PluginServer::process_buffer(Samples **buffer,
594         int64_t current_position,
595         int64_t fragment_size,
596         int64_t sample_rate,
597         int64_t total_len,
598         int direction)
599 {
600         if( !plugin_open ) return;
601         PluginAClient *aclient = (PluginAClient*)client;
602         aclient->source_position = current_position;
603         aclient->total_len = total_len;
604         aclient->sample_rate = sample_rate;
605         aclient->in_buffer_size = aclient->out_buffer_size = fragment_size;
606         aclient->output_buffers = buffer;
607
608         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
609         if( plugin )
610                 aclient->source_start = plugin->startproject *
611                         sample_rate /
612                         aclient->project_sample_rate;
613
614         aclient->direction = direction;
615         aclient->begin_process_buffer();
616         if( multichannel ) {
617                 aclient->process_buffer(fragment_size,
618                         buffer, current_position, sample_rate);
619         }
620         else {
621                 aclient->process_buffer(fragment_size,
622                         buffer[0], current_position, sample_rate);
623         }
624         aclient->end_process_buffer();
625 }
626
627
628 void PluginServer::send_reset_gui_frames()
629 {
630         if( !attachmentpoint ) return;
631         attachmentpoint->reset_gui_frames(this);
632 }
633
634 void PluginServer::send_render_gui(void *data)
635 {
636         if( !attachmentpoint ) return;
637         attachmentpoint->render_gui(data, this);
638 }
639
640 void PluginServer::send_render_gui(void *data, int size)
641 {
642         if( !attachmentpoint ) return;
643         attachmentpoint->render_gui(data, size, this);
644 }
645
646 void PluginServer::render_gui(void *data)
647 {
648         if( !client ) return;
649         client->plugin_render_gui(data);
650 }
651
652 void PluginServer::render_gui(void *data, int size)
653 {
654         if( !client ) return;
655         client->plugin_render_gui(data, size);
656 }
657
658
659 PluginGUIs::PluginGUIs(MWindow *mwindow)
660 {
661         this->mwindow = mwindow;
662         this->next_id = 0;
663 }
664 PluginGUIs::~PluginGUIs()
665 {
666 }
667
668 void PluginGUIs::append(PluginServer *server)
669 {
670         server->gui_id = next_id++;
671         ArrayList<PluginServer*>::append(server);
672 }
673
674 PluginServer *PluginGUIs::gui_server(int gui_id)
675 {
676         for( int i=0; i<size(); ++i ) {
677                 PluginServer *plugin_server = get(i);
678                 if( plugin_server->gui_id == gui_id )
679                         return plugin_server;
680         }
681         return 0;
682 }
683
684
685 void PluginServer::reset_gui_frames()
686 {
687         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
688         if( plugin )
689                 mwindow->reset_plugin_gui_frames(plugin);
690 }
691
692 void PluginServer::reset_plugin_gui_frames()
693 {
694         if( !client ) return;
695         client->plugin_reset_gui_frames();
696 }
697
698 void PluginServer::render_gui_frames(PluginClientFrames *frames)
699 {
700         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
701         if( plugin )
702                 mwindow->render_plugin_gui_frames(frames, plugin);
703 }
704
705 void PluginServer::render_plugin_gui_frames(PluginClientFrames *frames)
706 {
707         if( !client ) return;
708         client->plugin_render_gui_frames(frames);
709 }
710
711 MainProgressBar* PluginServer::start_progress(char *string, int64_t length)
712 {
713         mwindow->gui->lock_window();
714         MainProgressBar *result = mwindow->mainprogress->start_progress(string, length);
715         mwindow->gui->unlock_window();
716         return result;
717 }
718
719 int64_t PluginServer::get_written_samples()
720 {
721         if( !plugin_open ) return 0;
722         return written_samples;
723 }
724
725 int64_t PluginServer::get_written_frames()
726 {
727         if( !plugin_open ) return 0;
728         return written_frames;
729 }
730
731
732 // ======================= Non-realtime plugin
733
734 int PluginServer::get_parameters(int64_t start, int64_t end, int channels)
735 {
736         if( !plugin_open ) return 0;
737
738         client->start = start;
739         client->end = end;
740         client->source_start = start;
741         client->total_len = end - start;
742         client->total_in_buffers = channels;
743
744 //PRINT_TRACE
745 //printf(" source_start=%ld total_len=%ld\n", client->source_start, client->total_len);
746
747         return client->plugin_get_parameters();
748 }
749
750 int PluginServer::set_interactive()
751 {
752         if( !plugin_open ) return 0;
753         client->set_interactive();
754         return 0;
755 }
756
757 void PluginServer::append_module(Module *module)
758 {
759         modules->append(module);
760 }
761
762 void PluginServer::append_node(VirtualNode *node)
763 {
764         nodes->append(node);
765 }
766
767 void PluginServer::reset_nodes()
768 {
769         nodes->remove_all();
770 }
771
772 int PluginServer::set_error()
773 {
774         error_flag = 1;
775         return 0;
776 }
777
778 int PluginServer::set_realtime_sched()
779 {
780         //struct sched_param params;
781         //params.sched_priority = 1;
782         //sched_setscheduler(0, SCHED_RR, &param);
783         return 0;
784 }
785
786
787 int PluginServer::process_loop(VFrame **buffers, int64_t &write_length)
788 {
789         if( !plugin_open ) return 1;
790         return client->plugin_process_loop(buffers, write_length);
791 }
792
793 int PluginServer::process_loop(Samples **buffers, int64_t &write_length)
794 {
795         if( !plugin_open ) return 1;
796         return client->plugin_process_loop(buffers, write_length);
797 }
798
799
800 int PluginServer::start_loop(int64_t start,
801         int64_t end,
802         int64_t buffer_size,
803         int total_buffers)
804 {
805         if( !plugin_open ) return 0;
806         client->plugin_start_loop(start, end, buffer_size, total_buffers);
807         return 0;
808 }
809
810 int PluginServer::stop_loop()
811 {
812         if( !plugin_open ) return 0;
813         return client->plugin_stop_loop();
814 }
815
816 int PluginServer::read_frame(VFrame *buffer,
817         int channel,
818         int64_t start_position)
819 {
820         ((VModule*)modules->values[channel])->render(buffer,
821                 start_position, PLAY_FORWARD,
822                 mwindow->edl->session->frame_rate, 0, 0);
823         return 0;
824 }
825
826 int PluginServer::read_samples(Samples *buffer,
827         int channel, int64_t sample_rate, int64_t start_position, int64_t len)
828 {
829 // len is now in buffer
830         if( !multichannel ) channel = 0;
831
832         if( nodes->total > channel )
833                 return ((VirtualANode*)nodes->values[channel])->read_data(buffer,
834                         len, start_position, sample_rate);
835         if( modules->total > channel )
836                 return ((AModule*)modules->values[channel])->render(buffer,
837                         len, start_position, PLAY_FORWARD, sample_rate, 0);
838         printf("PluginServer::read_samples no object available for channel=%d\n",
839                 channel);
840         return -1;
841 }
842
843
844 int PluginServer::read_samples(Samples *buffer,
845                 int channel, int64_t start_position, int64_t size)
846 {
847 // total_samples is now set in buffer
848         ((AModule*)modules->values[channel])->render(buffer,
849                 size, start_position, PLAY_FORWARD,
850                 mwindow->edl->session->sample_rate, 0);
851         return 0;
852 }
853
854 int PluginServer::read_frame(VFrame *buffer,
855                 int channel, int64_t start_position, double frame_rate,
856                 int use_opengl)
857 {
858 // Data source depends on whether we're part of a virtual console or a
859 // plugin array.
860 //     VirtualNode
861 //     Module
862 // If we're a VirtualNode, read_data in the virtual plugin node handles
863 //     backward propogation and produces the data.
864 // If we're a Module, render in the module produces the data.
865 //PRINT_TRACE
866
867         int result = -1;
868         if( !multichannel ) channel = 0;
869
870 // Push our name on the next effect stack
871         buffer->push_next_effect(title);
872 //printf("PluginServer::read_frame %p\n", buffer);
873 //buffer->dump_stacks();
874
875         if( nodes->total > channel ) {
876 //printf("PluginServer::read_frame %d\n", __LINE__);
877                 result = ((VirtualVNode*)nodes->values[channel])->read_data(buffer,
878                         start_position, frame_rate, use_opengl);
879         }
880         else
881         if( modules->total > channel ) {
882 //printf("PluginServer::read_frame %d\n", __LINE__);
883                 result = ((VModule*)modules->values[channel])->render(buffer,
884                         start_position, //                      PLAY_FORWARD,
885                         client->direction, frame_rate, 0, 0, use_opengl);
886         }
887         else {
888                 printf("PluginServer::read_frame no object available for channel=%d\n",
889                         channel);
890         }
891
892 // Pop our name from the next effect stack
893         buffer->pop_next_effect();
894
895         return result;
896 }
897
898
899 // Called by client
900 int PluginServer::get_gui_status()
901 {
902         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
903         if( plugin )
904                 return plugin->show ? GUI_ON : GUI_OFF;
905         else
906                 return GUI_OFF;
907 }
908
909 void PluginServer::raise_window()
910 {
911         if( !plugin_open ) return;
912         client->raise_window();
913 }
914
915 void PluginServer::show_gui()
916 {
917         if( !plugin_open ) return;
918         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
919         if( plugin ) {
920                 plugin->gui_id = gui_id;
921                 client->total_len = plugin->length;
922                 client->source_start = plugin->startproject;
923         }
924         if( video ) {
925                 client->source_position = Units::to_int64(
926                         mwindow->edl->local_session->get_selectionstart(1) *
927                                 mwindow->edl->session->frame_rate);
928         }
929         else
930         if( audio ) {
931                 client->source_position = Units::to_int64(
932                         mwindow->edl->local_session->get_selectionstart(1) *
933                                 mwindow->edl->session->sample_rate);
934         }
935
936         client->update_display_title();
937         client->show_gui();
938 }
939
940 void PluginServer::hide_gui()
941 {
942         if( !plugin_open ) return;
943         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
944         if( plugin ) plugin->gui_id = -1;
945         if( client->defaults ) client->save_defaults();
946         client->hide_gui();
947 }
948
949 void PluginServer::update_gui()
950 {
951         if( !plugin_open ) return;
952         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
953         if( !plugin ) return;
954
955         client->total_len = plugin->length;
956         client->source_start = plugin->startproject;
957
958         if( video ) {
959                 client->source_position = Units::to_int64(
960                         mwindow->edl->local_session->get_selectionstart(1) *
961                                 mwindow->edl->session->frame_rate);
962         }
963         else if( audio ) {
964                 client->source_position = Units::to_int64(
965                         mwindow->edl->local_session->get_selectionstart(1) *
966                                 mwindow->edl->session->sample_rate);
967         }
968
969         client->plugin_update_gui();
970 }
971
972 void PluginServer::update_title()
973 {
974         if( !plugin_open ) return;
975
976         client->update_display_title();
977 }
978
979
980 int PluginServer::set_string(char *string)
981 {
982         if( !plugin_open ) return 0;
983
984         client->set_string_client(string);
985         return 0;
986 }
987
988 int PluginServer::gui_open()
989 {
990         if( attachmentpoint ) return attachmentpoint->gui_open();
991         return 0;
992 }
993
994 void PluginServer::set_use_opengl(int value, VideoDevice *vdevice)
995 {
996         this->use_opengl = value;
997         this->vdevice = vdevice;
998 }
999
1000 int PluginServer::get_use_opengl()
1001 {
1002         return use_opengl;
1003 }
1004
1005
1006 void PluginServer::run_opengl(PluginClient *plugin_client)
1007 {
1008         if( vdevice )
1009                 ((VDeviceX11*)vdevice->get_output_base())->run_plugin(plugin_client);
1010 }
1011
1012 // ============================= queries
1013
1014 void PluginServer::get_defaults_path(char *path)
1015 {
1016         char string2[BCTEXTLEN];
1017         switch( plugin_type ) {
1018         case PLUGIN_TYPE_FFMPEG:
1019         case PLUGIN_TYPE_LV2:
1020                 strcpy(string2, client->plugin_title());
1021                 break;
1022         case PLUGIN_TYPE_BUILTIN:
1023         case PLUGIN_TYPE_LADSPA:
1024         default: { // Get plugin name from path
1025                 char *ptr1 = strrchr(get_path(), '/');
1026                 char *ptr2 = strrchr(get_path(), '.');
1027                 if( !ptr1 ) ptr1 = get_path();
1028                 if( !ptr2 ) ptr2 = get_path() + strlen(get_path());
1029                 char *ptr3 = string2;
1030                 while( ptr1 < ptr2 ) *ptr3++ = *ptr1++;
1031                 *ptr3 = 0;
1032                 break; }
1033         }
1034         sprintf(path, "%s/%s.xml", File::get_config_path(), string2);
1035 }
1036
1037 void PluginServer::save_defaults()
1038 {
1039         if( client ) client->save_defaults();
1040 }
1041
1042 int PluginServer::get_samplerate()
1043 {
1044         if( !plugin_open ) return 0;
1045         if( audio )
1046                 return client->get_samplerate();
1047         if( mwindow )
1048                 return mwindow->edl->session->sample_rate;
1049         printf("PluginServer::get_samplerate audio and mwindow == NULL\n");
1050         return 1;
1051 }
1052
1053
1054 double PluginServer::get_framerate()
1055 {
1056         if( !plugin_open ) return 0;
1057         if( video )
1058                 return client->get_framerate();
1059         if( mwindow )
1060                 return mwindow->edl->session->frame_rate;
1061         printf("PluginServer::get_framerate video and mwindow == NULL\n");
1062         return 1;
1063 }
1064
1065 int PluginServer::get_project_samplerate()
1066 {
1067         if( mwindow )
1068                 return mwindow->edl->session->sample_rate;
1069         if( edl )
1070                 return edl->session->sample_rate;
1071         printf("PluginServer::get_project_samplerate mwindow and edl are NULL.\n");
1072         return 1;
1073 }
1074
1075 double PluginServer::get_project_framerate()
1076 {
1077         if( mwindow )
1078                 return mwindow->edl->session->frame_rate;
1079         if( edl )
1080                 return edl->session->frame_rate;
1081         printf("PluginServer::get_project_framerate mwindow and edl are NULL.\n");
1082         return 1;
1083 }
1084
1085
1086 int PluginServer::detach_buffers()
1087 {
1088         ring_buffers_out.remove_all();
1089         offset_out_render.remove_all();
1090         double_buffer_out_render.remove_all();
1091         realtime_out_size.remove_all();
1092
1093         ring_buffers_in.remove_all();
1094         offset_in_render.remove_all();
1095         double_buffer_in_render.remove_all();
1096         realtime_in_size.remove_all();
1097
1098         out_buffer_size = 0;
1099         shared_buffers = 0;
1100         total_out_buffers = 0;
1101         in_buffer_size = 0;
1102         total_in_buffers = 0;
1103         return 0;
1104 }
1105
1106 int PluginServer::arm_buffer(int buffer_number,
1107                 int64_t offset_in, int64_t offset_out,
1108                 int double_buffer_in, int double_buffer_out)
1109 {
1110         offset_in_render.values[buffer_number] = offset_in;
1111         offset_out_render.values[buffer_number] = offset_out;
1112         double_buffer_in_render.values[buffer_number] = double_buffer_in;
1113         double_buffer_out_render.values[buffer_number] = double_buffer_out;
1114         return 0;
1115 }
1116
1117
1118 int PluginServer::set_automation(FloatAutos *autos, FloatAuto **start_auto, FloatAuto **end_auto, int reverse)
1119 {
1120         this->autos = autos;
1121         this->start_auto = start_auto;
1122         this->end_auto = end_auto;
1123         this->reverse = reverse;
1124         return 0;
1125 }
1126
1127
1128
1129 void PluginServer::save_data(KeyFrame *keyframe)
1130 {
1131         if( !plugin_open ) return;
1132         client->save_data(keyframe);
1133 }
1134
1135 KeyFrame* PluginServer::get_prev_keyframe(int64_t position)
1136 {
1137         KeyFrame *result = 0;
1138         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1139         if( plugin )
1140                 result = plugin->get_prev_keyframe(position, client->direction);
1141         else
1142                 result = keyframe;
1143         return result;
1144 }
1145
1146 KeyFrame* PluginServer::get_next_keyframe(int64_t position)
1147 {
1148         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1149         KeyFrame *result = !plugin ? 0 :
1150                 plugin->get_next_keyframe(position, client->direction);
1151         return result;
1152 }
1153
1154 // Called for
1155 KeyFrame* PluginServer::get_keyframe()
1156 {
1157         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1158         if( plugin )
1159 // Realtime plugin case
1160                 return plugin->get_keyframe();
1161 // Rendered plugin case
1162         return keyframe;
1163 }
1164
1165
1166 void PluginServer::apply_keyframe(KeyFrame *src)
1167 {
1168         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1169         if( !plugin )
1170                 keyframe->copy_data(src);
1171         else if( plugin->is_transition() )
1172                 plugin->get_keyframe()->copy_data(src);
1173         else
1174 // Span keyframes
1175                 plugin->keyframes->update_parameter(src);
1176 }
1177
1178
1179 void PluginServer::get_camera(float *x, float *y, float *z,
1180         int64_t position, int direction)
1181 {
1182         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1183         if( plugin )
1184                 plugin->track->automation->get_camera(x, y, z, position, direction);
1185 }
1186
1187 void PluginServer::get_projector(float *x, float *y, float *z,
1188         int64_t position, int direction)
1189 {
1190         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1191         if( plugin )
1192                 plugin->track->automation->get_projector(x, y, z, position, direction);
1193 }
1194
1195
1196 int PluginServer::get_interpolation_type()
1197 {
1198         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1199         if( plugin )
1200                 return plugin->edl->session->interpolation_type;
1201         return NEAREST_NEIGHBOR;
1202 }
1203
1204 Theme* PluginServer::new_theme()
1205 {
1206         if( theme )
1207                 return client->new_theme();
1208         return 0;
1209 }
1210
1211 Theme* PluginServer::get_theme()
1212 {
1213         if( mwindow ) return mwindow->theme;
1214         printf("PluginServer::get_theme mwindow not set\n");
1215         return 0;
1216 }
1217
1218
1219 void PluginServer::get_plugin_png_name(char *png_name)
1220 {
1221         char *pp = png_name, *ep = pp + BCSTRLEN-1;
1222         char *cp = strrchr(path, '/');
1223         cp = !cp ? path : cp+1;
1224         char *sp = strrchr(cp, '.');
1225         if( !sp ) sp = cp+strlen(cp);
1226         while( pp < ep && cp < sp ) *pp++ = *cp++;
1227         snprintf(pp, ep-pp, ".png");
1228 }
1229
1230 int PluginServer::get_plugin_png_path(char *png_path, const char *plugin_icons)
1231 {
1232         char png_name[BCSTRLEN];
1233         get_plugin_png_name(png_name);
1234         char *pp = png_path, *ep = pp + BCTEXTLEN-1;
1235         pp += snprintf(pp, ep-pp, "%s/picon/%s/%s",
1236                 File::get_plugin_path(), plugin_icons, png_name);
1237         return access(png_path,R_OK) ? 1 : 0;
1238 }
1239
1240 int PluginServer::get_plugin_png_path(char *png_path)
1241 {
1242         int ret = get_plugin_png_path(png_path, mwindow->preferences->plugin_icons);
1243         if( ret ) ret = get_plugin_png_path(png_path, DEFAULT_PICON);
1244         return ret;
1245 }
1246
1247 VFrame *PluginServer::get_plugin_images()
1248 {
1249         char png_path[BCTEXTLEN];
1250         if( !get_plugin_png_path(png_path) )
1251                 return VFramePng::vframe_png(png_path,0,0);
1252         char png_name[BCSTRLEN];
1253         get_plugin_png_name(png_name);
1254         unsigned char *data = mwindow->theme->get_image_data(png_name, 0);
1255         return data ? new VFramePng(data, 0.) : 0;
1256 }
1257
1258 VFrame *PluginServer::get_picon()
1259 {
1260         if( !picon )
1261                 picon = get_plugin_images();
1262         return picon;
1263 }
1264
1265 // Called when plugin interface is tweeked
1266 void PluginServer::sync_parameters()
1267 {
1268         if( video ) mwindow->restart_brender();
1269         mwindow->sync_parameters();
1270         mwindow->update_keyframe_guis();
1271         if( mwindow->edl->session->auto_conf->plugins ) {
1272                 mwindow->gui->lock_window("PluginServer::sync_parameters");
1273                 mwindow->gui->draw_overlays(1);
1274                 mwindow->gui->unlock_window();
1275         }
1276 }
1277
1278 int64_t PluginServer::get_startproject()
1279 {
1280         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1281         return !plugin ? -1 : plugin->startproject;
1282 }
1283 int64_t PluginServer::get_endproject()
1284 {
1285         Plugin *plugin = edl->tracks->plugin_exists(plugin_id);
1286         return !plugin ? -1 : plugin->startproject + plugin->length;
1287 }
1288
1289 void PluginServer::dump(FILE *fp)
1290 {
1291         fprintf(fp,"    PluginServer %d %p %s %s %d\n",
1292                 __LINE__, this, path, title, realtime);
1293 }