add zoom slider, fix stop_playback on quit, new msg.txt, rework filelist
[goodguy/history.git] / cinelerra-5.1 / cinelerra / edl.C
1
2 /*
3  * CINELERRA
4  * Copyright (C) 1997-2012 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 "asset.h"
23 #include "assets.h"
24 #include "atrack.h"
25 #include "autoconf.h"
26 #include "automation.h"
27 #include "awindowgui.inc"
28 #include "bcsignals.h"
29 #include "clip.h"
30 #include "bccmodels.h"
31 #include "bchash.h"
32 #include "edits.h"
33 #include "edl.h"
34 #include "edlsession.h"
35 #include "filexml.h"
36 #include "guicast.h"
37 #include "indexstate.h"
38 #include "interlacemodes.h"
39 #include "labels.h"
40 #include "localsession.h"
41 #include "maskautos.h"
42 #include "mutex.h"
43 #include "nestededls.h"
44 #include "panauto.h"
45 #include "panautos.h"
46 #include "playbackconfig.h"
47 #include "playabletracks.h"
48 #include "plugin.h"
49 #include "preferences.h"
50 #include "recordconfig.h"
51 #include "recordlabel.h"
52 #include "sharedlocation.h"
53 #include "theme.h"
54 #include "tracks.h"
55 #include "transportque.inc"
56 #include "versioninfo.h"
57 #include "vedit.h"
58 #include "vtrack.h"
59
60
61
62
63 Mutex* EDL::id_lock = 0;
64
65
66
67 EDL::EDL(EDL *parent_edl)
68  : Indexable(0)
69 {
70         this->parent_edl = parent_edl;
71         tracks = 0;
72         labels = 0;
73         local_session = 0;
74 //      vwindow_edl = 0;
75 //      vwindow_edl_shared = 0;
76
77         folders.set_array_delete();
78
79 // persistent for now
80 //      new_folder(CLIP_FOLDER);
81 //      new_folder(MEDIA_FOLDER);
82
83         id = next_id();
84         path[0] = 0;
85 }
86
87
88 EDL::~EDL()
89 {
90
91         if(tracks)
92         {
93                 delete tracks;
94         }
95         if(labels)
96         {
97                 delete labels;
98         }
99
100         if(local_session)
101         {
102                 delete local_session;
103         }
104
105
106         remove_vwindow_edls();
107
108 //      if(vwindow_edl && !vwindow_edl_shared)
109 //              vwindow_edl->Garbage::remove_user();
110
111         if(!parent_edl)
112         {
113                 delete assets;
114                 delete session;
115         }
116
117
118         folders.remove_all_objects();
119         for(int i = 0; i < clips.size(); i++)
120                 clips.get(i)->Garbage::remove_user();
121         clips.remove_all();
122         delete nested_edls;
123 }
124
125
126
127 void EDL::create_objects()
128 {
129         tracks = new Tracks(this);
130         if(!parent_edl)
131         {
132                 assets = new Assets(this);
133                 session = new EDLSession(this);
134         }
135         else
136         {
137                 assets = parent_edl->assets;
138                 session = parent_edl->session;
139         }
140
141         local_session = new LocalSession(this);
142         labels = new Labels(this, "LABELS");
143         nested_edls = new NestedEDLs;
144 //      last_playback_position = 0;
145 }
146
147 EDL& EDL::operator=(EDL &edl)
148 {
149 printf("EDL::operator= 1\n");
150         copy_all(&edl);
151         return *this;
152 }
153
154 int EDL::load_defaults(BC_Hash *defaults)
155 {
156         if(!parent_edl)
157                 session->load_defaults(defaults);
158
159         local_session->load_defaults(defaults);
160         return 0;
161 }
162
163 int EDL::save_defaults(BC_Hash *defaults)
164 {
165         if(!parent_edl)
166                 session->save_defaults(defaults);
167
168         local_session->save_defaults(defaults);
169         return 0;
170 }
171
172 void EDL::boundaries()
173 {
174         session->boundaries();
175         local_session->boundaries();
176 }
177
178 int EDL::create_default_tracks()
179 {
180
181         for(int i = 0; i < session->video_tracks; i++)
182         {
183                 tracks->add_video_track(0, 0);
184         }
185         for(int i = 0; i < session->audio_tracks; i++)
186         {
187                 tracks->add_audio_track(0, 0);
188         }
189         return 0;
190 }
191
192 int EDL::load_xml(FileXML *file,
193         uint32_t load_flags)
194 {
195         int result = 0;
196 // Track numbering offset for replacing undo data.
197         int track_offset = 0;
198
199 // Clear objects
200         folders.remove_all_objects();
201
202         if((load_flags & LOAD_ALL) == LOAD_ALL)
203         {
204                 remove_vwindow_edls();
205         }
206
207
208 // Search for start of master EDL.
209
210 // The parent_edl test caused clip creation to fail since those XML files
211 // contained an EDL tag.
212
213 // The parent_edl test is required to make EDL loading work because
214 // when loading an EDL the EDL tag is already read by the parent.
215
216         if(!parent_edl)
217         {
218                 do{
219                   result = file->read_tag();
220                 }while(!result &&
221                         !file->tag.title_is("XML") &&
222                         !file->tag.title_is("EDL"));
223         }
224
225         if(!result)
226         {
227 // Get path for backups
228 //              path[0] = 0;
229                 file->tag.get_property("path", path);
230
231 // Erase everything
232                 if((load_flags & LOAD_ALL) == LOAD_ALL ||
233                         (load_flags & LOAD_EDITS) == LOAD_EDITS)
234                 {
235                         while(tracks->last) delete tracks->last;
236                 }
237
238                 if((load_flags & LOAD_ALL) == LOAD_ALL)
239                 {
240                         for(int i = 0; i < clips.size(); i++)
241                                 clips.get(i)->Garbage::remove_user();
242                         clips.remove_all();
243                 }
244
245                 if(load_flags & LOAD_TIMEBAR)
246                 {
247                         while(labels->last) delete labels->last;
248                         local_session->unset_inpoint();
249                         local_session->unset_outpoint();
250                 }
251
252 // This was originally in LocalSession::load_xml
253                 if(load_flags & LOAD_SESSION)
254                 {
255                         local_session->clipboard_length = 0;
256                 }
257
258                 do{
259                         result = file->read_tag();
260
261                         if(!result)
262                         {
263                                 if(file->tag.title_is("/XML") ||
264                                         file->tag.title_is("/EDL") ||
265                                         file->tag.title_is("/CLIP_EDL") ||
266                                         file->tag.title_is("/VWINDOW_EDL"))
267                                 {
268                                         result = 1;
269                                 }
270                                 else
271                                 if(file->tag.title_is("CLIPBOARD"))
272                                 {
273                                         local_session->clipboard_length =
274                                                 file->tag.get_property("LENGTH", (double)0);
275                                 }
276                                 else
277                                 if(file->tag.title_is("VIDEO"))
278                                 {
279                                         if((load_flags & LOAD_VCONFIG) &&
280                                                 (load_flags & LOAD_SESSION))
281                                                 session->load_video_config(file, 0, load_flags);
282                                         else
283                                                 result = file->skip_tag();
284                                 }
285                                 else
286                                 if(file->tag.title_is("AUDIO"))
287                                 {
288                                         if((load_flags & LOAD_ACONFIG) &&
289                                                 (load_flags & LOAD_SESSION))
290                                                 session->load_audio_config(file, 0, load_flags);
291                                         else
292                                                 result = file->skip_tag();
293                                 }
294                                 else
295                                 if(file->tag.title_is("FOLDER"))
296                                 {
297                                         char folder[BCTEXTLEN];
298                                         strcpy(folder, file->read_text());
299                                         new_folder(folder);
300                                 }
301                                 else
302                                 if(file->tag.title_is("ASSETS"))
303                                 {
304                                         if(load_flags & LOAD_ASSETS)
305                                                 assets->load(file, load_flags);
306                                         else
307                                                 result = file->skip_tag();
308                                 }
309                                 else
310                                 if(file->tag.title_is(labels->xml_tag))
311                                 {
312                                         if(load_flags & LOAD_TIMEBAR)
313                                                 labels->load(file, load_flags);
314                                         else
315                                                 result = file->skip_tag();
316                                 }
317                                 else
318                                 if(file->tag.title_is("LOCALSESSION"))
319                                 {
320                                         if((load_flags & LOAD_SESSION) ||
321                                                 (load_flags & LOAD_TIMEBAR))
322                                                 local_session->load_xml(file, load_flags);
323                                         else
324                                                 result = file->skip_tag();
325                                 }
326                                 else
327                                 if(file->tag.title_is("SESSION"))
328                                 {
329                                         if((load_flags & LOAD_SESSION) &&
330                                                 !parent_edl)
331                                                 session->load_xml(file, 0, load_flags);
332                                         else
333                                                 result = file->skip_tag();
334                                 }
335                                 else
336                                 if(file->tag.title_is("TRACK"))
337                                 {
338                                         tracks->load(file, track_offset, load_flags);
339                                 }
340                                 else
341 // Sub EDL.
342 // Causes clip creation to fail because that involves an opening EDL tag.
343                                 if(file->tag.title_is("CLIP_EDL") && !parent_edl)
344                                 {
345                                         EDL *new_edl = new EDL(this);
346                                         new_edl->create_objects();
347                                         new_edl->load_xml(file, LOAD_ALL);
348
349                                         if((load_flags & LOAD_ALL) == LOAD_ALL)
350                                                 clips.append(new_edl);
351                                         else
352                                                 new_edl->Garbage::remove_user();
353                                 }
354                                 else
355                                 if(file->tag.title_is("VWINDOW_EDL") && !parent_edl)
356                                 {
357                                         EDL *new_edl = new EDL(this);
358                                         new_edl->create_objects();
359                                         new_edl->load_xml(file, LOAD_ALL);
360
361
362                                         if((load_flags & LOAD_ALL) == LOAD_ALL)
363                                         {
364 //                                              if(vwindow_edl && !vwindow_edl_shared)
365 //                                                      vwindow_edl->Garbage::remove_user();
366 //                                              vwindow_edl_shared = 0;
367 //                                              vwindow_edl = new_edl;
368
369                                                 append_vwindow_edl(new_edl, 0);
370
371                                         }
372                                         else
373 // Discard if not replacing EDL
374                                         {
375                                                 new_edl->Garbage::remove_user();
376                                                 new_edl = 0;
377                                         }
378                                 }
379                         }
380                 }while(!result);
381         }
382         boundaries();
383 //dump();
384
385         return 0;
386 }
387
388 // Output path is the path of the output file if name truncation is desired.
389 // It is a "" if complete names should be used.
390 // Called recursively by copy for clips, thus the string can't be terminated.
391 // The string is not terminated in this call.
392 int EDL::save_xml(FileXML *file,
393         const char *output_path,
394         int is_clip,
395         int is_vwindow)
396 {
397         copy(0,
398                 tracks->total_length(),
399                 1,
400                 is_clip,
401                 is_vwindow,
402                 file,
403                 output_path,
404                 0);
405         return 0;
406 }
407
408 int EDL::copy_all(EDL *edl)
409 {
410         if(this == edl) return 0;
411         update_index(edl);
412         nested_edls->clear();
413         copy_session(edl);
414         copy_assets(edl);
415         copy_clips(edl);
416         tracks->copy_from(edl->tracks);
417         labels->copy_from(edl->labels);
418         return 0;
419 }
420
421 void EDL::copy_clips(EDL *edl)
422 {
423         if(this == edl) return;
424
425         remove_vwindow_edls();
426
427 //      if(vwindow_edl && !vwindow_edl_shared)
428 //              vwindow_edl->Garbage::remove_user();
429 //      vwindow_edl = 0;
430 //      vwindow_edl_shared = 0;
431
432         for(int i = 0; i < edl->total_vwindow_edls(); i++)
433         {
434                 EDL *new_edl = new EDL(this);
435                 new_edl->create_objects();
436                 new_edl->copy_all(edl->get_vwindow_edl(i));
437                 append_vwindow_edl(new_edl, 0);
438         }
439
440         for(int i = 0; i < clips.size(); i++)
441                 clips.get(i)->Garbage::remove_user();
442         clips.remove_all();
443         for(int i = 0; i < edl->clips.total; i++)
444         {
445                 add_clip(edl->clips.values[i]);
446         }
447 }
448
449 void EDL::copy_assets(EDL *edl)
450 {
451         if(this == edl) return;
452
453         if(!parent_edl)
454         {
455                 assets->copy_from(edl->assets);
456         }
457 }
458
459 void EDL::copy_session(EDL *edl, int session_only)
460 {
461         if(this == edl) return;
462
463         if(!session_only)
464         {
465                 strcpy(this->path, edl->path);
466 //printf("EDL::copy_session %p %s\n", this, this->path);
467
468                 folders.remove_all_objects();
469                 for(int i = 0; i < edl->folders.total; i++)
470                 {
471                         char *new_folder;
472                         folders.append(new_folder = new char[strlen(edl->folders.values[i]) + 1]);
473                         strcpy(new_folder, edl->folders.values[i]);
474                 }
475         }
476
477         if(!parent_edl)
478         {
479                 session->copy(edl->session);
480         }
481
482         if(!session_only)
483         {
484                 local_session->copy_from(edl->local_session);
485         }
486 }
487
488 int EDL::copy_assets(double start,
489         double end,
490         FileXML *file,
491         int all,
492         const char *output_path)
493 {
494         ArrayList<Asset*> asset_list;
495         Track* current;
496
497         file->tag.set_title("ASSETS");
498         file->append_tag();
499         file->append_newline();
500
501 // Copy everything for a save
502         if(all)
503         {
504                 for(Asset *asset = assets->first;
505                         asset;
506                         asset = asset->next)
507                 {
508                         asset_list.append(asset);
509                 }
510         }
511         else
512 // Copy just the ones being used.
513         {
514                 for(current = tracks->first;
515                         current;
516                         current = NEXT)
517                 {
518                         if(current->record)
519                         {
520                                 current->copy_assets(start,
521                                         end,
522                                         &asset_list);
523                         }
524                 }
525         }
526
527 // Paths relativised here
528         for(int i = 0; i < asset_list.total; i++)
529         {
530                 asset_list.values[i]->write(file,
531                         0,
532                         output_path);
533         }
534
535         file->tag.set_title("/ASSETS");
536         file->append_tag();
537         file->append_newline();
538         file->append_newline();
539         return 0;
540 }
541
542 int EDL::copy(double start,
543         double end,
544         int all,
545         int is_clip,
546         int is_vwindow,
547         FileXML *file,
548         const char *output_path,
549         int rewind_it)
550 {
551 //printf("EDL::copy 1\n");
552 // begin file
553         if(is_clip)
554                 file->tag.set_title("CLIP_EDL");
555         else
556         if(is_vwindow)
557                 file->tag.set_title("VWINDOW_EDL");
558         else
559         {
560                 file->tag.set_title("EDL");
561                 file->tag.set_property("VERSION", CINELERRA_VERSION);
562 // Save path for restoration of the project title from a backup.
563                 if(this->path[0])
564                 {
565                         file->tag.set_property("PATH", path);
566                 }
567         }
568
569         file->append_tag();
570         file->append_newline();
571
572 // Set clipboard samples only if copying to clipboard
573         if(!all)
574         {
575                 file->tag.set_title("CLIPBOARD");
576                 file->tag.set_property("LENGTH", end - start);
577                 file->append_tag();
578                 file->tag.set_title("/CLIPBOARD");
579                 file->append_tag();
580                 file->append_newline();
581                 file->append_newline();
582         }
583 //printf("EDL::copy 1\n");
584
585 // Sessions
586         local_session->save_xml(file, start);
587
588 //printf("EDL::copy 1\n");
589
590 // Top level stuff.
591 //      if(!parent_edl)
592         {
593 // Need to copy all this from child EDL if pasting is desired.
594 // Session
595                 session->save_xml(file);
596                 session->save_video_config(file);
597                 session->save_audio_config(file);
598
599 // Folders
600                 for(int i = 0; i < folders.total; i++)
601                 {
602                         file->tag.set_title("FOLDER");
603                         file->append_tag();
604                         file->append_text(folders.values[i]);
605                         file->tag.set_title("/FOLDER");
606                         file->append_tag();
607                         file->append_newline();
608                 }
609
610 // Media
611 // Don't replicate all assets for every clip.
612 // The assets for the clips are probably in the mane EDL.
613                 if(!is_clip)
614                         copy_assets(start,
615                                 end,
616                                 file,
617                                 all,
618                                 output_path);
619
620 // Clips
621 // Don't want this if using clipboard
622                 if(all)
623                 {
624                         for(int i = 0; i < total_vwindow_edls(); i++)
625                         {
626                                 get_vwindow_edl(i)->save_xml(file,
627                                         output_path,
628                                         0,
629                                         1);
630                         }
631
632                         for(int i = 0; i < clips.total; i++)
633                                 clips.values[i]->save_xml(file,
634                                         output_path,
635                                         1,
636                                         0);
637                 }
638
639                 file->append_newline();
640                 file->append_newline();
641         }
642
643
644 //printf("EDL::copy 1\n");
645
646         labels->copy(start, end, file);
647 //printf("EDL::copy 1\n");
648         tracks->copy(start, end, all, file, output_path);
649 //printf("EDL::copy 2\n");
650
651 // terminate file
652         if(is_clip)
653                 file->tag.set_title("/CLIP_EDL");
654         else
655         if(is_vwindow)
656                 file->tag.set_title("/VWINDOW_EDL");
657         else
658                 file->tag.set_title("/EDL");
659         file->append_tag();
660         file->append_newline();
661
662
663 // For editing operations we want to rewind it for immediate pasting.
664 // For clips and saving to disk leave it alone.
665         if(rewind_it)
666         {
667                 file->terminate_string();
668                 file->rewind();
669         }
670         return 0;
671 }
672
673 void EDL::retrack()
674 {
675         int min_w = session->output_w, min_h = session->output_h;
676         for( Track *track=tracks->first; track!=0; track=track->next ) {
677                 if( track->data_type != TRACK_VIDEO ) continue;
678                 int w = min_w, h = min_h;
679                 for( Edit *current=track->edits->first; current!=0; current=NEXT ) {
680                         Indexable* indexable = current->get_source();
681                         if( !indexable ) continue;
682                         int edit_w = indexable->get_w(), edit_h = indexable->get_h();
683                         if( w < edit_w ) w = edit_w;
684                         if( h < edit_h ) h = edit_h;
685                 }
686                 if( track->track_w == w && track->track_h == h ) continue;
687                 ((MaskAutos*)track->automation->autos[AUTOMATION_MASK])->
688                         translate_masks( (w - track->track_w) / 2, (h - track->track_h) / 2);
689                 track->track_w = w;  track->track_h = h;
690         }
691 }
692
693 void EDL::rechannel()
694 {
695         for(Track *current = tracks->first; current; current = NEXT)
696         {
697                 if(current->data_type == TRACK_AUDIO)
698                 {
699                         PanAutos *autos = (PanAutos*)current->automation->autos[AUTOMATION_PAN];
700                         ((PanAuto*)autos->default_auto)->rechannel();
701                         for(PanAuto *keyframe = (PanAuto*)autos->first;
702                                 keyframe;
703                                 keyframe = (PanAuto*)keyframe->next)
704                         {
705                                 keyframe->rechannel();
706                         }
707                 }
708         }
709 }
710
711 void EDL::resample(double old_rate, double new_rate, int data_type)
712 {
713         for(Track *current = tracks->first; current; current = NEXT)
714         {
715                 if(current->data_type == data_type)
716                 {
717                         current->resample(old_rate, new_rate);
718                 }
719         }
720 }
721
722
723 void EDL::synchronize_params(EDL *edl)
724 {
725         local_session->synchronize_params(edl->local_session);
726         for(Track *this_track = tracks->first, *that_track = edl->tracks->first;
727                 this_track && that_track;
728                 this_track = this_track->next,
729                 that_track = that_track->next)
730         {
731                 this_track->synchronize_params(that_track);
732         }
733 }
734
735 int EDL::trim_selection(double start,
736         double end,
737         int edit_labels,
738         int edit_plugins,
739         int edit_autos)
740 {
741         if(start != end)
742         {
743 // clear the data
744                 clear(0,
745                         start,
746                         edit_labels,
747                         edit_plugins,
748                         edit_autos);
749                 clear(end - start,
750                         tracks->total_length(),
751                         edit_labels,
752                         edit_plugins,
753                         edit_autos);
754         }
755         return 0;
756 }
757
758
759 int EDL::equivalent(double position1, double position2)
760 {
761         double threshold = (double).5 / session->frame_rate;
762         if(session->cursor_on_frames)
763                 threshold = (double).5 / session->frame_rate;
764         else
765                 threshold = (double)1 / session->sample_rate;
766
767         if(fabs(position2 - position1) < threshold)
768         return 1;
769     else
770         return 0;
771 }
772
773 double EDL::equivalent_output(EDL *edl)
774 {
775         double result = -1;
776         session->equivalent_output(edl->session, &result);
777         tracks->equivalent_output(edl->tracks, &result);
778         return result;
779 }
780
781
782 void EDL::set_path(const char *path)
783 {
784         strcpy(this->path, path);
785 }
786
787 void EDL::set_inpoint(double position)
788 {
789         if(equivalent(local_session->get_inpoint(), position) &&
790                 local_session->get_inpoint() >= 0)
791         {
792                 local_session->unset_inpoint();
793         }
794         else
795         {
796                 local_session->set_inpoint(align_to_frame(position, 0));
797                 if(local_session->get_outpoint() <= local_session->get_inpoint())
798                         local_session->unset_outpoint();
799         }
800 }
801
802 void EDL::set_outpoint(double position)
803 {
804         if(equivalent(local_session->get_outpoint(), position) &&
805                 local_session->get_outpoint() >= 0)
806         {
807                 local_session->unset_outpoint();
808         }
809         else
810         {
811                 local_session->set_outpoint(align_to_frame(position, 0));
812                 if(local_session->get_inpoint() >= local_session->get_outpoint())
813                         local_session->unset_inpoint();
814         }
815 }
816
817
818 int EDL::clear(double start,
819         double end,
820         int clear_labels,
821         int clear_plugins,
822         int edit_autos)
823 {
824         if(start == end)
825         {
826                 double distance = 0;
827                 tracks->clear_handle(start,
828                         end,
829                         distance,
830                         clear_labels,
831                         clear_plugins,
832                         edit_autos);
833                 if(clear_labels && distance > 0)
834                         labels->paste_silence(start,
835                                 start + distance);
836         }
837         else
838         {
839                 tracks->clear(start,
840                         end,
841                         clear_plugins,
842                         edit_autos);
843                 if(clear_labels)
844                         labels->clear(start,
845                                 end,
846                                 1);
847         }
848
849 // Need to put at beginning so a subsequent paste operation starts at the
850 // right position.
851         double position = local_session->get_selectionstart();
852         local_session->set_selectionend(position);
853         local_session->set_selectionstart(position);
854         return 0;
855 }
856
857 void EDL::modify_edithandles(double oldposition,
858         double newposition,
859         int currentend,
860         int handle_mode,
861         int edit_labels,
862         int edit_plugins,
863         int edit_autos)
864 {
865         tracks->modify_edithandles(oldposition,
866                 newposition,
867                 currentend,
868                 handle_mode,
869                 edit_labels,
870                 edit_plugins,
871                 edit_autos);
872         labels->modify_handles(oldposition,
873                 newposition,
874                 currentend,
875                 handle_mode,
876                 edit_labels);
877 }
878
879 void EDL::modify_pluginhandles(double oldposition,
880         double newposition,
881         int currentend,
882         int handle_mode,
883         int edit_labels,
884         int edit_autos,
885         Edits *trim_edits)
886 {
887         tracks->modify_pluginhandles(oldposition,
888                 newposition,
889                 currentend,
890                 handle_mode,
891                 edit_labels,
892                 edit_autos,
893                 trim_edits);
894         optimize();
895 }
896
897 void EDL::paste_silence(double start,
898         double end,
899         int edit_labels,
900         int edit_plugins,
901         int edit_autos)
902 {
903         if(edit_labels)
904                 labels->paste_silence(start, end);
905         tracks->paste_silence(start,
906                 end,
907                 edit_plugins,
908                 edit_autos);
909 }
910
911
912 void EDL::remove_from_project(ArrayList<EDL*> *clips)
913 {
914         for(int i = 0; i < clips->size(); i++)
915         {
916                 for(int j = 0; j < this->clips.size(); j++)
917                 {
918                         if(this->clips.get(j) == clips->values[i])
919                         {
920                                 EDL *clip = this->clips.get(j);
921                                 this->clips.remove(clip);
922                                 clip->Garbage::remove_user();
923                         }
924                 }
925         }
926 }
927
928 void EDL::remove_from_project(ArrayList<Indexable*> *assets)
929 {
930 // Remove from clips
931         if(!parent_edl)
932                 for(int j = 0; j < clips.total; j++)
933                 {
934                         clips.values[j]->remove_from_project(assets);
935                 }
936
937 // Remove from VWindow EDLs
938         for(int i = 0; i < total_vwindow_edls(); i++)
939                 get_vwindow_edl(i)->remove_from_project(assets);
940
941         for(int i = 0; i < assets->size(); i++)
942         {
943 // Remove from tracks
944                 for(Track *track = tracks->first; track; track = track->next)
945                 {
946                         track->remove_asset(assets->get(i));
947                 }
948
949 // Remove from assets
950                 if(!parent_edl && assets->get(i)->is_asset)
951                 {
952                         this->assets->remove_asset((Asset*)assets->get(i));
953                 }
954                 else
955                 if(!parent_edl && !assets->get(i)->is_asset)
956                 {
957                         this->nested_edls->remove_edl((EDL*)assets->get(i));
958                 }
959         }
960 }
961
962 void EDL::update_assets(EDL *src)
963 {
964         for(Asset *current = src->assets->first;
965                 current;
966                 current = NEXT)
967         {
968                 assets->update(current);
969         }
970 }
971
972 int EDL::get_tracks_height(Theme *theme)
973 {
974         int total_pixels = 0;
975         for(Track *current = tracks->first;
976                 current;
977                 current = NEXT)
978         {
979                 total_pixels += current->vertical_span(theme);
980         }
981         return total_pixels;
982 }
983
984 int64_t EDL::get_tracks_width()
985 {
986         int64_t total_pixels = 0;
987         for(Track *current = tracks->first;
988                 current;
989                 current = NEXT)
990         {
991                 int64_t pixels = current->horizontal_span();
992                 if(pixels > total_pixels) total_pixels = pixels;
993         }
994 //printf("EDL::get_tracks_width %d\n", total_pixels);
995         return total_pixels;
996 }
997
998 // int EDL::calculate_output_w(int single_channel)
999 // {
1000 //      if(single_channel) return session->output_w;
1001 //
1002 //      int widest = 0;
1003 //      for(int i = 0; i < session->video_channels; i++)
1004 //      {
1005 //              if(session->vchannel_x[i] + session->output_w > widest) widest = session->vchannel_x[i] + session->output_w;
1006 //      }
1007 //      return widest;
1008 // }
1009 //
1010 // int EDL::calculate_output_h(int single_channel)
1011 // {
1012 //      if(single_channel) return session->output_h;
1013 //
1014 //      int tallest = 0;
1015 //      for(int i = 0; i < session->video_channels; i++)
1016 //      {
1017 //              if(session->vchannel_y[i] + session->output_h > tallest) tallest = session->vchannel_y[i] + session->output_h;
1018 //      }
1019 //      return tallest;
1020 // }
1021
1022 // Get the total output size scaled to aspect ratio
1023 void EDL::calculate_conformed_dimensions(int single_channel, float &w, float &h)
1024 {
1025         if((float)session->output_w / session->output_h > get_aspect_ratio())
1026                 h = (w = session->output_w) / get_aspect_ratio();
1027         else
1028                 w = (h = session->output_h) * get_aspect_ratio();
1029 }
1030
1031 float EDL::get_aspect_ratio()
1032 {
1033         return session->aspect_w / session->aspect_h;
1034 }
1035
1036 int EDL::dump(FILE *fp)
1037 {
1038         if(parent_edl)
1039                 fprintf(fp,"CLIP\n");
1040         else
1041                 fprintf(fp,"EDL\n");
1042         fprintf(fp,"  clip_title: %s\n"
1043                 "  parent_edl: %p\n", local_session->clip_title, parent_edl);
1044         fprintf(fp,"  selectionstart %f\n  selectionend %f\n  loop_start %f\n  loop_end %f\n",
1045                 local_session->get_selectionstart(1),
1046                 local_session->get_selectionend(1),
1047                 local_session->loop_start,
1048                 local_session->loop_end);
1049         for(int i = 0; i < TOTAL_PANES; i++)
1050         {
1051                 fprintf(fp,"  pane %d view_start=%jd track_start=%d\n", i,
1052                         local_session->view_start[i],
1053                         local_session->track_start[i]);
1054         }
1055
1056         if(!parent_edl)
1057         {
1058                 fprintf(fp,"audio_channels: %d audio_tracks: %d sample_rate: %jd\n",
1059                         session->audio_channels,
1060                         session->audio_tracks,
1061                         session->sample_rate);
1062                 fprintf(fp,"  video_channels: %d\n"
1063                         "  video_tracks: %d\n"
1064                         "  frame_rate: %.2f\n"
1065                         "  frames_per_foot: %.2f\n"
1066                         "  output_w: %d\n"
1067                         "  output_h: %d\n"
1068                         "  aspect_w: %f\n"
1069                         "  aspect_h: %f\n"
1070                         "  color_model: %d\n",
1071                                 session->video_channels,
1072                                 session->video_tracks,
1073                                 session->frame_rate,
1074                                 session->frames_per_foot,
1075                                 session->output_w,
1076                                 session->output_h,
1077                                 session->aspect_w,
1078                                 session->aspect_h,
1079                                 session->color_model);
1080
1081                 fprintf(fp," CLIPS\n");
1082                 fprintf(fp,"  total: %d\n", clips.total);
1083
1084                 for(int i = 0; i < clips.total; i++)
1085                 {
1086                         fprintf(fp,"\n\n");
1087                         clips.values[i]->dump(fp);
1088                         fprintf(fp,"\n\n");
1089                 }
1090
1091                 fprintf(fp," VWINDOW EDLS\n");
1092                 fprintf(fp,"  total: %d\n", total_vwindow_edls());
1093
1094                 for(int i = 0; i < total_vwindow_edls(); i++)
1095                 {
1096                         fprintf(fp,"   %s\n", get_vwindow_edl(i)->local_session->clip_title);
1097                 }
1098
1099                 fprintf(fp," ASSETS\n");
1100                 assets->dump(fp);
1101         }
1102         fprintf(fp," LABELS\n");
1103         labels->dump(fp);
1104         fprintf(fp," TRACKS\n");
1105         tracks->dump(fp);
1106 //printf("EDL::dump 2\n");
1107         return 0;
1108 }
1109
1110 EDL* EDL::add_clip(EDL *edl)
1111 {
1112 // Copy argument.  New edls are deleted from MWindow::load_filenames.
1113         EDL *new_edl = new EDL(this);
1114         new_edl->create_objects();
1115         new_edl->copy_all(edl);
1116         clips.append(new_edl);
1117         return new_edl;
1118 }
1119
1120 void EDL::insert_asset(Asset *asset,
1121         EDL *nested_edl,
1122         double position,
1123         Track *first_track,
1124         RecordLabels *labels)
1125 {
1126 // Insert asset into asset table
1127         Asset *new_asset = 0;
1128         EDL *new_nested_edl = 0;
1129
1130         if(asset) new_asset = assets->update(asset);
1131         if(nested_edl) new_nested_edl = nested_edls->get_copy(nested_edl);
1132
1133 // Paste video
1134         int vtrack = 0;
1135         Track *current = first_track ? first_track : tracks->first;
1136
1137
1138 // Fix length of single frame
1139         double length = 0.;
1140         int layers = 0;
1141         int channels = 0;
1142
1143         if(new_nested_edl)
1144         {
1145                 length = new_nested_edl->tracks->total_playable_length();
1146                 layers = 1;
1147                 channels = new_nested_edl->session->audio_channels;
1148         }
1149
1150         if(new_asset)
1151         {
1152 // Insert 1 frame for undefined length
1153                 if(new_asset->video_length < 0)
1154                 {
1155                         length = session->si_useduration ?
1156                                 session->si_duration :
1157                                 1.0 / session->frame_rate;
1158                 }
1159                 else {
1160                         length = new_asset->frame_rate > 0 ?
1161                                 (double)new_asset->video_length / new_asset->frame_rate :
1162                                 1.0 / session->frame_rate;
1163                 }
1164                 layers = new_asset->layers;
1165                 channels = new_asset->channels;
1166         }
1167
1168         for( ;
1169                 current && vtrack < layers;
1170                 current = NEXT)
1171         {
1172                 if(!current->record ||
1173                         current->data_type != TRACK_VIDEO)
1174                         continue;
1175
1176                 current->insert_asset(new_asset,
1177                         new_nested_edl,
1178                         length,
1179                         position,
1180                         vtrack);
1181
1182                 vtrack++;
1183         }
1184
1185         int atrack = 0;
1186         if(new_asset)
1187         {
1188                 if(new_asset->audio_length < 0)
1189                 {
1190 // Insert 1 frame for undefined length & video
1191                         if(new_asset->video_data)
1192                                 length = (double)1.0 / new_asset->frame_rate;
1193                         else
1194 // Insert 1 second for undefined length & no video
1195                                 length = 1.0;
1196                 }
1197                 else
1198                         length = (double)new_asset->audio_length /
1199                                         new_asset->sample_rate;
1200         }
1201
1202         for(current = tracks->first;
1203                 current && atrack < channels;
1204                 current = NEXT)
1205         {
1206                 if(!current->record ||
1207                         current->data_type != TRACK_AUDIO)
1208                         continue;
1209
1210                 current->insert_asset(new_asset,
1211                         new_nested_edl,
1212                         length,
1213                         position,
1214                         atrack);
1215
1216
1217                 atrack++;
1218         }
1219
1220 // Insert labels from a recording window.
1221         if(labels)
1222         {
1223                 for(RecordLabel *label = labels->first; label; label = label->next)
1224                 {
1225                         this->labels->toggle_label(label->position, label->position);
1226                 }
1227         }
1228 }
1229
1230
1231
1232 void EDL::set_index_file(Indexable *indexable)
1233 {
1234         if(indexable->is_asset)
1235                 assets->update_index((Asset*)indexable);
1236         else
1237                 nested_edls->update_index((EDL*)indexable);
1238 }
1239
1240 void EDL::optimize()
1241 {
1242 //printf("EDL::optimize 1\n");
1243         if(local_session->preview_start < 0) local_session->preview_start = 0;
1244         double length = tracks->total_length();
1245         if(local_session->preview_end > length) local_session->preview_end = length;
1246         if(local_session->preview_start >= local_session->preview_end ) {
1247                 local_session->preview_start = 0;
1248                 local_session->preview_end = length;
1249         }
1250         for(Track *current = tracks->first; current; current = NEXT)
1251                 current->optimize();
1252 }
1253
1254 int EDL::next_id()
1255 {
1256         id_lock->lock("EDL::next_id");
1257         int result = EDLSession::current_id++;
1258         id_lock->unlock();
1259         return result;
1260 }
1261
1262 void EDL::get_shared_plugins(Track *source,
1263         ArrayList<SharedLocation*> *plugin_locations,
1264         int omit_recordable,
1265         int data_type)
1266 {
1267         for(Track *track = tracks->first; track; track = track->next)
1268         {
1269                 if(!track->record || !omit_recordable)
1270                 {
1271                         if(track != source &&
1272                                 track->data_type == data_type)
1273                         {
1274                                 for(int i = 0; i < track->plugin_set.total; i++)
1275                                 {
1276                                         Plugin *plugin = track->get_current_plugin(
1277                                                 local_session->get_selectionstart(1),
1278                                                 i,
1279                                                 PLAY_FORWARD,
1280                                                 1,
1281                                                 0);
1282                                         if(plugin && plugin->plugin_type == PLUGIN_STANDALONE)
1283                                         {
1284                                                 plugin_locations->append(new SharedLocation(tracks->number_of(track), i));
1285                                         }
1286                                 }
1287                         }
1288                 }
1289         }
1290 }
1291
1292 void EDL::get_shared_tracks(Track *track,
1293         ArrayList<SharedLocation*> *module_locations,
1294         int omit_recordable,
1295         int data_type)
1296 {
1297         for(Track *current = tracks->first; current; current = NEXT)
1298         {
1299                 if(!omit_recordable || !current->record)
1300                 {
1301                         if(current != track &&
1302                                 current->data_type == data_type)
1303                         {
1304                                 module_locations->append(new SharedLocation(tracks->number_of(current), 0));
1305                         }
1306                 }
1307         }
1308 }
1309
1310 // Convert position to frames if cursor alignment is enabled
1311 double EDL::align_to_frame(double position, int round)
1312 {
1313         if( session->cursor_on_frames && session->frame_rate > 0 ) {
1314                 double frame_no = position * session->frame_rate;
1315                 int64_t frame_pos = frame_no + (round ? 0.5 : 1e-6);
1316                 double pos = frame_pos / session->frame_rate;
1317                 if( !EQUIV(pos, position) ) position = pos;
1318         }
1319         return position;
1320 }
1321
1322
1323 void EDL::new_folder(const char *folder)
1324 {
1325         for(int i = 0; i < folders.total; i++)
1326         {
1327                 if(!strcasecmp(folders.values[i], folder)) return;
1328         }
1329
1330         char *new_folder;
1331         folders.append(new_folder = new char[strlen(folder) + 1]);
1332         strcpy(new_folder, folder);
1333 }
1334
1335 void EDL::delete_folder(const char *folder)
1336 {
1337         int i;
1338         for(i = 0; i < folders.total; i++)
1339         {
1340                 if(!strcasecmp(folders.values[i], folder))
1341                 {
1342                         break;
1343                 }
1344         }
1345
1346         if(i < folders.total) delete folders.values[i];
1347
1348         for( ; i < folders.total - 1; i++)
1349         {
1350                 folders.values[i] = folders.values[i + 1];
1351         }
1352 }
1353
1354 int EDL::get_use_vconsole(VEdit* *playable_edit,
1355         int64_t position,
1356         int direction,
1357         PlayableTracks *playable_tracks)
1358 {
1359         int share_playable_tracks = 1;
1360         int result = 0;
1361         VTrack *playable_track = 0;
1362         const int debug = 0;
1363         *playable_edit = 0;
1364
1365 // Calculate playable tracks when being called as a nested EDL
1366         if(!playable_tracks)
1367         {
1368                 share_playable_tracks = 0;
1369                 playable_tracks = new PlayableTracks(this,
1370                         position,
1371                         direction,
1372                         TRACK_VIDEO,
1373                         1);
1374         }
1375
1376
1377 // Total number of playable tracks is 1
1378         if(playable_tracks->size() != 1)
1379         {
1380                 result = 1;
1381         }
1382         else
1383         {
1384                 playable_track = (VTrack*)playable_tracks->get(0);
1385         }
1386
1387 // Don't need playable tracks anymore
1388         if(!share_playable_tracks)
1389         {
1390                 delete playable_tracks;
1391         }
1392
1393 if(debug) printf("EDL::get_use_vconsole %d playable_tracks->size()=%d\n",
1394 __LINE__,
1395 playable_tracks->size());
1396         if(result) return 1;
1397
1398
1399 // Test mutual conditions between direct copy rendering and this.
1400         if(!playable_track->direct_copy_possible(position,
1401                 direction,
1402                 1))
1403                 return 1;
1404 if(debug) printf("EDL::get_use_vconsole %d\n", __LINE__);
1405
1406         *playable_edit = (VEdit*)playable_track->edits->editof(position,
1407                 direction,
1408                 0);
1409 // No edit at current location
1410         if(!*playable_edit) return 1;
1411 if(debug) printf("EDL::get_use_vconsole %d\n", __LINE__);
1412
1413
1414 // Edit is nested EDL
1415         if((*playable_edit)->nested_edl)
1416         {
1417 // Test nested EDL
1418                 EDL *nested_edl = (*playable_edit)->nested_edl;
1419                 int64_t nested_position = (int64_t)((position -
1420                                 (*playable_edit)->startproject +
1421                                 (*playable_edit)->startsource) *
1422                         nested_edl->session->frame_rate /
1423                         session->frame_rate);
1424
1425
1426                 VEdit *playable_edit_temp = 0;
1427                 if(session->output_w != nested_edl->session->output_w ||
1428                         session->output_h != nested_edl->session->output_h ||
1429                         nested_edl->get_use_vconsole(&playable_edit_temp,
1430                                 nested_position,
1431                                 direction,
1432                                 0))
1433                         return 1;
1434
1435                 return 0;
1436         }
1437
1438 if(debug) printf("EDL::get_use_vconsole %d\n", __LINE__);
1439 // Edit is not a nested EDL
1440         Asset *asset = (*playable_edit)->asset;
1441 // Edit is silence
1442         if(!asset) return 1;
1443 if(debug) printf("EDL::get_use_vconsole %d\n", __LINE__);
1444
1445 // Asset and output device must have the same dimensions
1446         if( asset->width != session->output_w ||
1447             asset->height != session->output_h )
1448                 return 1;
1449
1450
1451 if(debug) printf("EDL::get_use_vconsole %d\n", __LINE__);
1452 // Asset and output device must have same resulting de-interlacing method
1453         if( ilaceautofixmethod2(session->interlace_mode,
1454             asset->interlace_autofixoption, asset->interlace_mode,
1455             asset->interlace_fixmethod) != ILACE_FIXMETHOD_NONE )
1456                 return 1;
1457
1458 // If we get here the frame is going to be directly copied.  Whether it is
1459 // decompressed in hardware depends on the colormodel.
1460         return 0;
1461 }
1462
1463
1464 // For Indexable
1465 int EDL::get_audio_channels()
1466 {
1467         return session->audio_channels;
1468 }
1469
1470 int EDL::get_sample_rate()
1471 {
1472         return session->sample_rate;
1473 }
1474
1475 int64_t EDL::get_audio_samples()
1476 {
1477         return (int64_t)(tracks->total_playable_length() *
1478                 session->sample_rate);
1479 }
1480
1481 int EDL::have_audio()
1482 {
1483         return 1;
1484 }
1485
1486 int EDL::have_video()
1487 {
1488         return 1;
1489 }
1490
1491
1492 int EDL::get_w()
1493 {
1494         return session->output_w;
1495 }
1496
1497 int EDL::get_h()
1498 {
1499         return session->output_h;
1500 }
1501
1502 double EDL::get_frame_rate()
1503 {
1504         return session->frame_rate;
1505 }
1506
1507 int EDL::get_video_layers()
1508 {
1509         return 1;
1510 }
1511
1512 int64_t EDL::get_video_frames()
1513 {
1514         return (int64_t)(tracks->total_playable_length() *
1515                 session->frame_rate);
1516 }
1517
1518
1519 void EDL::remove_vwindow_edls()
1520 {
1521         for(int i = 0; i < total_vwindow_edls(); i++)
1522         {
1523                 get_vwindow_edl(i)->Garbage::remove_user();
1524         }
1525         vwindow_edls.remove_all();
1526 }
1527
1528 void EDL::remove_vwindow_edl(EDL *edl)
1529 {
1530         if(vwindow_edls.number_of(edl) >= 0)
1531         {
1532                 edl->Garbage::remove_user();
1533
1534                 vwindow_edls.remove(edl);
1535         }
1536 }
1537
1538
1539 EDL* EDL::get_vwindow_edl(int number)
1540 {
1541         return vwindow_edls.get(number);
1542 }
1543
1544 int EDL::total_vwindow_edls()
1545 {
1546         return vwindow_edls.size();
1547 }
1548
1549 void EDL::append_vwindow_edl(EDL *edl, int increase_counter)
1550 {
1551         if(vwindow_edls.number_of(edl) >= 0) return;
1552
1553         if(increase_counter) edl->Garbage::add_user();
1554         vwindow_edls.append(edl);
1555 }
1556
1557