clear group_id on move_edits, neoph about_bg leak, use inv clr on edit title bar...
[goodguy/cinelerra.git] / cinelerra-5.1 / cinelerra / tracksedit.C
1 /*
2  * CINELERRA
3  * Copyright (C) 2010 Adam Williams <broadcast at earthling dot net>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  *
19  */
20
21 #include "assets.h"
22 #include "atrack.h"
23 #include "automation.h"
24 #include "aedits.h"
25 #include "bcsignals.h"
26 #include "edit.h"
27 #include "edits.h"
28 #include "edl.h"
29 #include "edlsession.h"
30 #include "filexml.h"
31 #include "intauto.h"
32 #include "intautos.h"
33 #include "labels.h"
34 #include "localsession.h"
35 #include "mainundo.h"
36 #include "module.h"
37 #include "mainsession.h"
38 #include "pluginserver.h"
39 #include "pluginset.h"
40 #include "plugin.h"
41 #include "timebar.h"
42 #include "trackcanvas.h"
43 #include "tracks.h"
44 #include "trackscroll.h"
45 #include "transition.h"
46 #include "transportque.h"
47 #include "vtrack.h"
48 #include <string.h>
49
50 int Tracks::blade(double position)
51 {
52         for( Track *track=first; track!=0; track=track->next ) {
53                 if( !track->record ) continue;
54                 track->blade(position);
55         }
56         return 0;
57 }
58
59 int Tracks::clear(double start, double end, int clear_plugins, int edit_autos)
60 {
61         Track *current_track;
62
63         for(current_track = first;
64                 current_track;
65                 current_track = current_track->next)
66         {
67                 if(current_track->record)
68                 {
69                         current_track->clear(start,
70                                 end,
71                                 1, // edits
72                                 1, // labels
73                                 clear_plugins, // edit_plugins
74                                 edit_autos,
75                                 1, // convert_units
76                                 0); // trim_edits
77                 }
78         }
79         return 0;
80 }
81
82 void Tracks::clear_automation(double selectionstart, double selectionend)
83 {
84         Track* current_track;
85
86         for(current_track = first; current_track; current_track = current_track->next)
87         {
88                 if(current_track->record)
89                 {
90                         current_track->clear_automation(selectionstart,
91                                 selectionend,
92                                 0,
93                                 0);
94                 }
95         }
96 }
97
98 void Tracks::clear_transitions(double start, double end)
99 {
100         for(Track *current_track = first;
101                 current_track;
102                 current_track = current_track->next)
103         {
104                 if(current_track->record)
105                 {
106                         int64_t start_units = current_track->to_units(start, 0);
107                         int64_t end_units = current_track->to_units(end, 0);
108
109                         for(Edit *current_edit = current_track->edits->first;
110                                 current_edit;
111                                 current_edit = current_edit->next)
112                         {
113                                 if(current_edit->startproject >= start_units &&
114                                         current_edit->startproject < end_units &&
115                                         current_edit->transition)
116                                 {
117                                         current_edit->detach_transition();
118                                 }
119                         }
120                 }
121         }
122 }
123
124 void Tracks::shuffle_edits(double start, double end)
125 {
126 // This doesn't affect automation or effects
127 // Labels follow the first track.
128         int first_track = 1;
129         for(Track *current_track = first;
130                 current_track;
131                 current_track = current_track->next)
132         {
133                 if(current_track->record)
134                 {
135                         current_track->shuffle_edits(start, end, first_track);
136
137                         first_track = 0;
138                 }
139         }
140 }
141
142 void Tracks::reverse_edits(double start, double end)
143 {
144 // This doesn't affect automation or effects
145 // Labels follow the first track.
146         int first_track = 1;
147         for(Track *current_track = first;
148                 current_track;
149                 current_track = current_track->next)
150         {
151                 if(current_track->record)
152                 {
153                         current_track->reverse_edits(start, end, first_track);
154
155                         first_track = 0;
156                 }
157         }
158 }
159 void Tracks::align_edits(double start, double end)
160 {
161 // This doesn't affect automation or effects
162         ArrayList<double> times;
163
164         for(Track *current_track = first;
165                 current_track;
166                 current_track = current_track->next)
167         {
168                 if(current_track->record)
169                 {
170                         current_track->align_edits(start, end, &times);
171                 }
172         }
173 }
174
175 void Tracks::set_edit_length(double start, double end, double length)
176 {
177         int first_track = 1;
178         for(Track *current_track = first;
179                 current_track;
180                 current_track = current_track->next)
181         {
182                 if(current_track->record)
183                 {
184 #define USE_FLOATING_LENGTHS
185
186 #ifdef USE_FLOATING_LENGTHS
187
188
189 // The first edit anchors the length offsets.
190 // Round edits up & down so they end where they would if they all had floating point lengths.
191                         //int first_edit = 1;
192                         int64_t start_units = current_track->to_units(start, 0);
193                         int64_t end_units = current_track->to_units(end, 0);
194 // Total time of edits accumulated, in track units
195                         int64_t total_units = 0;
196 // Number of length offsets added so far
197                         int total_lengths = 0;
198
199                         for(Edit *current_edit = current_track->edits->last;
200                                 current_edit;
201                                 current_edit = current_edit->previous)
202                         {
203                                 if(current_edit->startproject >= start_units &&
204                                         current_edit->startproject + current_edit->length <= end_units)
205                                 {
206 // Calculate true length based on number of length offsets & total time
207                                         double end_time = (1 + total_lengths) * length;
208                                         int64_t length_units = current_track->to_units(end_time, 0) -
209                                                 total_units;
210                                         if(length_units < 1) length_units = 1;
211 printf("Tracks::set_edit_length %d %f %f\n", __LINE__, end_time, current_track->from_units(total_units));
212                                         total_units += length_units;
213
214 // Go in using the edit handle interface
215                                         int64_t starting_length = current_edit->length;
216
217                                         if(length_units < current_edit->length)
218                                         {
219                                                 current_edit->shift_end_in(MOVE_ALL_EDITS,
220                                                         current_edit->startproject + length_units,
221                                                         current_edit->startproject + current_edit->length,
222                                                         1,
223                                                         edl->session->labels_follow_edits,
224                                                         edl->session->plugins_follow_edits,
225                                                         edl->session->autos_follow_edits,
226                                                         0);
227                                         }
228                                         else
229                                         {
230                                                 current_edit->shift_end_out(MOVE_ALL_EDITS,
231                                                         current_edit->startproject + length_units,
232                                                         current_edit->startproject + current_edit->length,
233                                                         1,
234                                                         edl->session->labels_follow_edits,
235                                                         edl->session->plugins_follow_edits,
236                                                         edl->session->autos_follow_edits,
237                                                         0);
238                                         }
239
240                                         int64_t ending_length = current_edit->length;
241
242                                         if(edl->session->labels_follow_edits && first_track)
243                                         {
244 // printf("Tracks::set_edit_length %d %f %f\n",
245 // __LINE__,
246 // current_track->from_units(current_edit->startproject + starting_length),
247 // current_track->from_units(current_edit->startproject + ending_length));
248                                                  edl->labels->modify_handles(
249                                                         current_track->from_units(current_edit->startproject + starting_length),
250                                                         current_track->from_units(current_edit->startproject + ending_length),
251                                                         1,
252                                                         MOVE_ALL_EDITS,
253                                                         1);
254                                         }
255
256
257                                         //first_edit = 0;
258                                         total_lengths++;
259                                 }
260                         }
261
262
263
264 #else // USE_FLOATING_LENGTHS
265
266 // The first edit anchors the length offsets.
267 // The idea was to round edits up & down so they end where they should
268 // if they all had floating point lengths.  It's easier just to make sure the framerate
269 // is divisible by the required length.
270 //                      int first_edit = 1;
271                         int64_t start_units = current_track->to_units(start, 0);
272                         int64_t end_units = current_track->to_units(end, 0);
273                         int64_t length_units = current_track->to_units(length, 1);
274 // Starting time of the length offsets in seconds
275 //                      double start_time = 0;
276 // Number of length offsets added so far
277 //                      int total_lengths = 0;
278
279                         for(Edit *current_edit = current_track->edits->last;
280                                 current_edit;
281                                 current_edit = current_edit->previous)
282                         {
283                                 if(current_edit->startproject >= start_units &&
284                                         current_edit->startproject + current_edit->length <= end_units)
285                                 {
286 // Calculate starting time of length offsets
287 //                                      if(first_edit)
288 //                                      {
289 //                                              start_time = current_track->from_units(current_edit->startproject);
290 //                                      }
291
292 // Calculate true length based on number of length offsets
293 //                                      double end_time = start_time + (1 + total_lengths) * length;
294 //                                      int64_t length_units = current_track->to_units(end_time, 0) -
295 //                                              current_edit->startproject;
296 //                                      if(length_units < 1) length_units = 1;
297
298 // Go in using the edit handle interface
299                                         int64_t starting_length = current_edit->length;
300
301                                         if(length_units < current_edit->length)
302                                         {
303                                                 current_edit->shift_end_in(MOVE_ALL_EDITS,
304                                                         current_edit->startproject + length_units,
305                                                         current_edit->startproject + current_edit->length,
306                                                         1,
307                                                         edl->session->labels_follow_edits,
308                                                         edl->session->plugins_follow_edits,
309                                                         edl->session->autos_follow_edits,
310                                                         0);
311                                         }
312                                         else
313                                         {
314                                                 current_edit->shift_end_out(MOVE_ALL_EDITS,
315                                                         current_edit->startproject + length_units,
316                                                         current_edit->startproject + current_edit->length,
317                                                         1,
318                                                         edl->session->labels_follow_edits,
319                                                         edl->session->plugins_follow_edits,
320                                                         edl->session->autos_follow_edits,
321                                                         0);
322                                         }
323
324                                         int64_t ending_length = current_edit->length;
325
326                                         if(edl->session->labels_follow_edits && first_track)
327                                         {
328 // printf("Tracks::set_edit_length %d %f %f\n",
329 // __LINE__,
330 // current_track->from_units(current_edit->startproject + starting_length),
331 // current_track->from_units(current_edit->startproject + ending_length));
332                                                  edl->labels->modify_handles(
333                                                         current_track->from_units(current_edit->startproject + starting_length),
334                                                         current_track->from_units(current_edit->startproject + ending_length),
335                                                         1,
336                                                         MOVE_ALL_EDITS,
337                                                         1);
338                                         }
339
340
341 //                                      first_edit = 0;
342 //                                      total_lengths++;
343                                 }
344                         }
345 #endif // !USE_FLOATING_LENGTHS
346
347                         first_track = 0;
348                 }
349         }
350 }
351
352 void Tracks::set_transition_length(double start, double end, double length)
353 {
354         for(Track *current_track = first;
355                 current_track;
356                 current_track = current_track->next)
357         {
358                 if(current_track->record)
359                 {
360                         int64_t start_units = current_track->to_units(start, 0);
361                         int64_t end_units = current_track->to_units(end, 0);
362
363                         for(Edit *current_edit = current_track->edits->first;
364                                 current_edit;
365                                 current_edit = current_edit->next)
366                         {
367                                 if(current_edit->startproject >= start_units &&
368                                         current_edit->startproject < end_units &&
369                                         current_edit->transition)
370                                 {
371                                         current_edit->transition->length =
372                                                 current_track->to_units(length, 1);
373                                         if( current_edit == current_track->edits->last &&
374                                             current_edit->silence() ) {
375                                                 current_edit->length = current_edit->transition->length;
376                                         }
377                                 }
378                         }
379                 }
380         }
381 }
382
383 void Tracks::set_transition_length(Transition *transition, double length)
384 {
385 // Must verify existence of transition
386         int done = 0;
387         if(!transition) return;
388         for(Track *current_track = first;
389                 current_track && !done;
390                 current_track = current_track->next)
391         {
392                 for(Edit *current_edit = current_track->edits->first;
393                         current_edit && !done;
394                         current_edit = current_edit->next)
395                 {
396                         if(current_edit->transition == transition)
397                         {
398                                 transition->length = current_track->to_units(length, 1);
399                                 if( current_edit == current_track->edits->last &&
400                                     current_edit->silence() ) {
401                                         current_edit->length = current_edit->transition->length;
402                                 }
403                                 done = 1;
404                         }
405                 }
406         }
407 }
408
409 void Tracks::paste_transitions(double start, double end, int track_type, char* title)
410 {
411         int count = 0;
412         for( Track *track=first; track; track=track->next ) {
413                 if( !track->record || track->data_type != track_type ) continue;
414                 for( Edit *edit=track->edits->first;  edit; edit=edit->next ) {
415                         if( !edit->is_selected ) continue;
416                         edit->insert_transition(title);
417                         ++count;
418                 }
419         }
420         if( count > 0 ) {
421                 clear_selected_edits();
422                 return;
423         }
424
425         for( Track *track=first; track; track=track->next ) {
426                 if( !track->record || track->data_type != track_type ) continue;
427                 int64_t start_units = track->to_units(start, 0);
428                 int64_t end_units = track->to_units(end, 0);
429                 if( start_units == end_units ) {
430                         for( Edit *edit = track->edits->first; edit; edit = edit->next) {
431                                 int64_t edit_start = edit->startproject;
432                                 int64_t edit_end = edit_start + edit->length;
433                                 if( edit_start > start_units ) continue;
434                                 if( start_units == track->edits->length() ) {
435                                         double length = edl->session->default_transition_length;
436                                         int64_t units = track->to_units(length, 1);
437                                         edit = track->edits->
438                                                 create_silence(start_units, start_units+units);
439                                 }
440                                 else if( start_units >= edit_end ) continue;
441                                 edit->insert_transition(title);
442                         }
443                 }
444                 else {
445                         for( Edit *edit=track->edits->first; edit; edit=edit->next) {
446                                 int64_t edit_start = edit->startproject;
447                                 if( !edit_start ) continue;
448                                 if( edit_start >= start_units && edit_start < end_units ) {
449                                         edit->insert_transition(title);
450                                 }
451                         }
452                 }
453         }
454 }
455
456 void Tracks::set_automation_mode(double selectionstart,
457         double selectionend,
458         int mode)
459 {
460         Track* current_track;
461
462         for(current_track = first; current_track; current_track = current_track->next)
463         {
464                 if(current_track->record)
465                 {
466                         current_track->set_automation_mode(selectionstart,
467                                 selectionend,
468                                 mode);
469                 }
470         }
471 }
472
473 int Tracks::clear_default_keyframe()
474 {
475         for(Track *current = first; current; current = NEXT)
476         {
477                 if(current->record)
478                         current->clear_automation(0, 0, 0, 1);
479         }
480         return 0;
481 }
482
483 int Tracks::clear_handle(double start,
484         double end,
485         double &longest_distance,
486         int clear_labels,
487         int clear_plugins,
488         int edit_autos)
489 {
490         Track* current_track;
491         double distance;
492
493         for(current_track = first; current_track; current_track = current_track->next)
494         {
495                 if(current_track->record)
496                 {
497                         current_track->clear_handle(start,
498                                 end,
499                                 clear_labels,
500                                 clear_plugins,
501                                 edit_autos,
502                                 distance);
503                         if(distance > longest_distance) longest_distance = distance;
504                 }
505         }
506
507         return 0;
508 }
509
510 int Tracks::copy_automation(double selectionstart,
511         double selectionend,
512         FileXML *file,
513         int default_only,
514         int autos_only)
515 {
516 // called by MWindow::copy_automation for copying automation alone
517         Track* current_track;
518
519         file->tag.set_title("AUTO_CLIPBOARD");
520         file->tag.set_property("LENGTH", selectionend - selectionstart);
521         file->tag.set_property("FRAMERATE", edl->session->frame_rate);
522         file->tag.set_property("SAMPLERATE", edl->session->sample_rate);
523         file->append_tag();
524         file->append_newline();
525         file->append_newline();
526
527         for(current_track = first;
528                 current_track;
529                 current_track = current_track->next)
530         {
531                 if(current_track->record)
532                 {
533                         current_track->copy_automation(selectionstart,
534                                 selectionend,
535                                 file,
536                                 default_only,
537                                 autos_only);
538                 }
539         }
540
541         file->tag.set_title("/AUTO_CLIPBOARD");
542         file->append_tag();
543         file->append_newline();
544         file->terminate_string();
545         return 0;
546 }
547
548 // int Tracks::copy_default_keyframe(FileXML *file)
549 // {
550 //      copy_automation(0, 0, file, 1, 0);
551 //      return 0;
552 // }
553
554 int Tracks::delete_tracks()
555 {
556         int total_deleted = 0;
557         int done = 0;
558
559         while(!done)
560         {
561                 done = 1;
562                 Track *next_track = 0;
563                 for (Track* current = first; current && done; current = next_track)
564                 {
565                         next_track = current->next;
566                         if(current->record)
567                         {
568                                 delete_track(current);
569                                 current = NULL;
570                                 total_deleted++;
571                                 done = 0;
572                                 break;
573                         }
574                 }
575         }
576         return total_deleted;
577 }
578
579 void Tracks::move_edits(ArrayList<Edit*> *edits,
580         Track *track,
581         double position,
582         int edit_labels,  // Ignored
583         int edit_plugins,  // Ignored
584         int edit_autos, // Ignored
585         int behaviour)
586 {
587 //printf("Tracks::move_edits 1\n");
588         for(Track *dest_track = track; dest_track; dest_track = dest_track->next)
589         {
590                 if(dest_track->record)
591                 {
592 // Need a local copy of the source edit since the original source edit may
593 // change in the editing operation.
594                         Edit *source_edit = 0;
595                         Track *source_track = 0;
596
597
598 // Get source track
599                         if(dest_track->data_type == TRACK_AUDIO)
600                         {
601                                 int current_aedit = 0;
602
603                                 while(current_aedit < edits->total &&
604                                         edits->values[current_aedit]->track->data_type != TRACK_AUDIO)
605                                         current_aedit++;
606
607                                 if(current_aedit < edits->total)
608                                 {
609                                         source_edit = edits->values[current_aedit];
610                                         source_track = source_edit->track;
611                                         edits->remove_number(current_aedit);
612                                 }
613                         }
614                         else
615                         if(dest_track->data_type == TRACK_VIDEO)
616                         {
617                                 int current_vedit = 0;
618                                 while(current_vedit < edits->total &&
619                                         edits->values[current_vedit]->track->data_type != TRACK_VIDEO)
620                                         current_vedit++;
621
622                                 if(current_vedit < edits->total)
623                                 {
624                                         source_edit = edits->values[current_vedit];
625                                         source_track = source_edit->track;
626                                         edits->remove_number(current_vedit);
627                                 }
628                         }
629
630 //printf("Tracks::move_edits 2 %s %s %d\n", source_track->title, dest_track->title, source_edit->length);
631                         if(source_edit)
632                         {
633                                 int64_t position_i = source_track->to_units(position, 0);
634 // Source edit changes
635                                 int64_t source_length = source_edit->length;
636                                 int64_t source_startproject = source_edit->startproject;
637
638                                 if (behaviour == 0)
639                                 {
640                                 // This works like this: CUT edit, INSERT edit at final position, keyframes also follow
641                                 // FIXME: there should be a GUI way to tell whenever user also wants to move autos or not
642 // this is all screwed up
643 //  inserts defaults/bogus everywhere
644 #if 0
645 // Copy keyframes
646                                         FileXML temp;
647                                         AutoConf temp_autoconf;
648
649                                         temp_autoconf.set_all(1);
650
651                                         source_track->automation->copy(source_edit->startproject,
652                                                 source_edit->startproject + source_edit->length,
653                                                 &temp,
654                                                 0,
655                                                 0);
656                                         temp.terminate_string();
657                                         temp.rewind();
658 // Insert new keyframes
659 //printf("Tracks::move_edits 2 %d %p\n", result->startproject, result->asset);
660                                         source_track->automation->clear(source_edit->startproject,
661                                                 source_edit->startproject + source_edit->length,
662                                                 &temp_autoconf,
663                                                 1);
664                                         int64_t position_a = position_i;
665                                         if (dest_track == source_track)
666                                         {
667                                                 if (position_a > source_edit->startproject)
668                                                         position_a -= source_length;
669                                         }
670
671                                         dest_track->automation->paste_silence(position_a,
672                                                 position_a + source_length);
673                                         while(!temp.read_tag())
674                                                 dest_track->automation->paste(position_a,
675                                                         source_length, 1.0, &temp, 0, 1,
676                                                         &temp_autoconf);
677 #endif
678 // Insert new edit
679                                         Edit *dest_edit = dest_track->edits->shift(position_i,
680                                                 source_length);
681                                         Edit *result = dest_track->edits->insert_before(dest_edit,
682                                                 dest_track->edits->create_edit());
683                                         result->copy_from(source_edit);
684                                         result->startproject = position_i;
685                                         result->length = source_length;
686
687 // Clear source
688                                         source_track->edits->clear(source_edit->startproject,
689                                                 source_edit->startproject + source_length);
690
691         /*
692 //this is outline for future thinking how it is supposed to be done trough C&P mechanisms
693                                         temp.reset_tag();
694                                         source_track->cut(source_edit->startproject,
695                                                 source_edit->startproject + source_edit->length,
696                                                 &temp,
697                                                 NULL);
698                                         temp.terminate_string();
699                                         temp.rewind();
700                                         dest_track->paste_silence(position_a,
701                                                 position_a + source_length,
702                                                 edit_plugins);
703                                         while(!temp.read_tag())
704                                                 dest_track->paste(position_a,          // MISSING PIECE OF FUNCTIONALITY
705                                                         source_length,
706                                                         1.0,
707                                                         &temp,
708                                                         0,
709                                                         &temp_autoconf);
710         */
711
712
713                                 } else
714                                 if (behaviour == 1)
715                                 // ONLY edit is moved, all other edits stay where they are
716                                 {
717                                         // Copy edit to temp, delete the edit, insert the edit
718                                         Edit *temp_edit = dest_track->edits->create_edit();
719                                         temp_edit->copy_from(source_edit);
720                                         // we call the edits directly since we do not want to move keyframes or anything else
721                                         source_track->edits->clear(source_startproject,
722                                                 source_startproject + source_length);
723                                         source_track->edits->paste_silence(source_startproject,
724                                                 source_startproject + source_length);
725
726                                         dest_track->edits->clear(position_i,
727                                                 position_i + source_length);
728                                         Edit *dest_edit = dest_track->edits->shift(position_i,  source_length);
729                                         Edit *result = dest_track->edits->insert_before(dest_edit,
730                                                 dest_track->edits->create_edit());
731                                         result->copy_from(temp_edit);
732                                         result->startproject = position_i;
733                                         result->length = source_length;
734                                         delete temp_edit;
735                                 }
736                                 source_track->optimize();
737                                 dest_track->optimize();
738                         }
739                 }
740         }
741 }
742
743 void Tracks::move_group(EDL *group, Track *first_track, double position)
744 {
745         for( Track *track=first; track; track=track->next ) {
746                 if( !track->record ) continue;
747                 for( Edit *edit=track->edits->first; edit; edit=edit->next ) {
748                         if( !edit->is_selected ) continue;
749                         edit->mute();
750                         edit->is_selected = 0;
751                         edit->group_id = 0;
752                 }
753         }
754         Track *src = group->tracks->first;
755         for( Track *track=first_track; track && src; track=track->next ) {
756                 if( !track->record ) continue;
757                 int64_t pos = track->to_units(position, 0);
758                 for( Edit *edit=src->edits->first; edit; edit=edit->next ) {
759                         if( edit->silence() ) continue;
760                         int64_t start = pos + edit->startproject;
761                         int64_t end = start + edit->length;
762                         track->edits->clear(start, end);
763                         Edit *dst = track->edits->insert_new_edit(start);
764                         dst->copy_from(edit);
765                         dst->startproject = start;
766                         dst->is_selected = 1;
767                         while( (dst=dst->next) != 0 )
768                                 dst->startproject += edit->length;
769                 }
770                 track->optimize();
771                 src = src->next;
772         }
773 }
774
775 void Tracks::move_effect(Plugin *plugin, Track *track, int64_t position)
776 {
777         Track *source_track = plugin->track;
778         Plugin *result = 0;
779 // Create a new plugin set
780         double start = track->from_units(position);
781         double length = track->from_units(plugin->length);
782
783         result = track->insert_effect("", &plugin->shared_location, 0, 0,
784                                 start, length, plugin->plugin_type);
785         result->copy_from(plugin);
786         result->shift(position - plugin->startproject);
787
788 // Clear new plugin from old set
789         plugin->plugin_set->clear(plugin->startproject,
790                 plugin->startproject + plugin->length,
791                 edl->session->autos_follow_edits);
792
793         source_track->optimize();
794 }
795
796 void Tracks::move_effect(Plugin *plugin, PluginSet *plugin_set, int64_t position)
797 {
798 // src/dest track must be the same
799 // replace plugin in source plugin_set with silence
800         PluginSet *src_plugin_set = plugin->plugin_set;
801         Plugin *silent = new Plugin(edl, src_plugin_set, "");
802         silent->startproject = plugin->startproject;
803         silent->length = plugin->length;
804         src_plugin_set->insert_after(plugin, silent);
805         src_plugin_set->remove_pointer(plugin);
806 // truncate previous plugin
807         Plugin *dest = (Plugin *)plugin_set->editof(position, PLAY_FORWARD, 0);
808 // add plugin after dest
809         plugin_set->insert_after(dest, plugin);
810         if( dest ) {
811                 dest->length = position - dest->startproject;
812                 if( dest->length < 0 ) dest->length = 0;
813         }
814 // update plugin position
815         plugin->startproject = position;
816         plugin->plugin_set = plugin_set;
817         plugin->edits = plugin_set;
818         src_plugin_set->track->optimize();
819 }
820
821 int Tracks::concatenate_tracks(int edit_plugins, int edit_autos)
822 {
823         Track *output_track, *first_output_track, *input_track;
824         int i, data_type = TRACK_AUDIO;
825         double output_start;
826         int result = 0;
827
828 // Relocate tracks
829         for(i = 0; i < 2; i++)
830         {
831 // Get first output track
832                 for(output_track = first;
833                         output_track;
834                         output_track = output_track->next)
835                         if(output_track->data_type == data_type &&
836                                 output_track->record) break;
837
838                 first_output_track = output_track;
839
840 // Get first input track
841                 for(input_track = first;
842                         input_track;
843                         input_track = input_track->next)
844                 {
845                         if(input_track->data_type == data_type &&
846                                 input_track->play &&
847                                 !input_track->record) break;
848                 }
849
850
851                 if(output_track && input_track)
852                 {
853 // Transfer input track to end of output track one at a time
854                         while(input_track)
855                         {
856                                 output_start = output_track->get_length();
857                                 output_track->insert_track(input_track,
858                                         output_start,
859                                         0,
860                                         edit_plugins,
861                                         edit_autos,
862                                         0);
863
864 // Get next source and destination
865                                 for(input_track = input_track->next;
866                                         input_track;
867                                         input_track = input_track->next)
868                                 {
869
870                                         if(input_track->data_type == data_type &&
871                                                 !input_track->record &&
872                                                 input_track->play) break;
873                                 }
874
875                                 for(output_track = output_track->next;
876                                         output_track;
877                                         output_track = output_track->next)
878                                 {
879                                         if(output_track->data_type == data_type &&
880                                                 output_track->record) break;
881                                 }
882
883                                 if(!output_track)
884                                 {
885                                         output_track = first_output_track;
886                                 }
887                         }
888                         result = 1;
889                 }
890
891                 if(data_type == TRACK_AUDIO) data_type = TRACK_VIDEO;
892         }
893
894         return result;
895 }
896
897 int Tracks::delete_all_tracks()
898 {
899         while(last) delete last;
900         return 0;
901 }
902
903
904 void Tracks::change_modules(int old_location, int new_location, int do_swap)
905 {
906         for(Track* current = first ; current; current = current->next)
907         {
908                 current->change_modules(old_location, new_location, do_swap);
909         }
910 }
911
912 void Tracks::change_plugins(SharedLocation &old_location, SharedLocation &new_location, int do_swap)
913 {
914         for(Track* current = first ; current; current = current->next)
915         {
916                 current->change_plugins(old_location, new_location, do_swap);
917         }
918 }
919
920
921
922 // =========================================== EDL editing
923
924
925 int Tracks::copy(double start,
926         double end,
927         int all,
928         FileXML *file,
929         const char *output_path)
930 {
931 // nothing selected
932         if(start == end && !all) return 1;
933
934         Track* current;
935
936         for(current = first;
937                 current;
938                 current = NEXT)
939         {
940                 if(current->record || all)
941                 {
942                         current->copy(start, end, file,output_path);
943                 }
944         }
945
946         return 0;
947 }
948
949
950
951 int Tracks::move_track_up(Track *track)
952 {
953         Track *next_track = track->previous;
954         if(!next_track) next_track = last;
955
956         change_modules(number_of(track), number_of(next_track), 1);
957
958 // printf("Tracks::move_track_up 1 %p %p\n", track, next_track);
959 // int count = 0;
960 // for(Track *current = first; current && count < 5; current = NEXT, count++)
961 //      printf("Tracks::move_track_up %p %p %p\n", current->previous, current, current->next);
962 // printf("Tracks::move_track_up 2\n");
963 //
964         swap(track, next_track);
965
966 // count = 0;
967 // for(Track *current = first; current && count < 5; current = NEXT, count++)
968 //      printf("Tracks::move_track_up %p %p %p\n", current->previous, current, current->next);
969 // printf("Tracks::move_track_up 3\n");
970
971         return 0;
972 }
973
974 int Tracks::move_track_down(Track *track)
975 {
976         Track *next_track = track->next;
977         if(!next_track) next_track = first;
978
979         change_modules(number_of(track), number_of(next_track), 1);
980         swap(track, next_track);
981         return 0;
982 }
983
984
985 int Tracks::move_tracks_up()
986 {
987         Track *track, *next_track;
988         int result = 0;
989
990         for(track = first;
991                 track;
992                 track = next_track)
993         {
994                 next_track = track->next;
995
996                 if(track->record)
997                 {
998                         if(track->previous)
999                         {
1000                                 change_modules(number_of(track->previous), number_of(track), 1);
1001
1002                                 swap(track->previous, track);
1003                                 result = 1;
1004                         }
1005                 }
1006         }
1007
1008         return result;
1009 }
1010
1011 int Tracks::move_tracks_down()
1012 {
1013         Track *track, *previous_track;
1014         int result = 0;
1015
1016         for(track = last;
1017                 track;
1018                 track = previous_track)
1019         {
1020                 previous_track = track->previous;
1021
1022                 if(track->record)
1023                 {
1024                         if(track->next)
1025                         {
1026                                 change_modules(number_of(track), number_of(track->next), 1);
1027
1028                                 swap(track, track->next);
1029                                 result = 1;
1030                         }
1031                 }
1032         }
1033
1034         return result;
1035 }
1036
1037
1038
1039 void Tracks::paste_audio_transition(PluginServer *server)
1040 {
1041         for(Track *current = first; current; current = NEXT)
1042         {
1043                 if(current->data_type == TRACK_AUDIO &&
1044                         current->record)
1045                 {
1046                         int64_t position = current->to_units(
1047                                 edl->local_session->get_selectionstart(), 0);
1048                         Edit *current_edit = current->edits->editof(position,
1049                                 PLAY_FORWARD,
1050                                 0);
1051                         if( !current_edit && position == current->edits->length() ) {
1052                                 double length = edl->session->default_transition_length;
1053                                 int64_t units = current->to_units(length, 1);
1054                                 current_edit = current->edits->create_silence(position, position+units);
1055                         }
1056                         if(current_edit)
1057                         {
1058                                 paste_transition(server, current_edit);
1059                         }
1060                 }
1061         }
1062 }
1063
1064 void Tracks::paste_automation(double selectionstart,
1065         FileXML *file,
1066         int default_only,
1067         int active_only,
1068         int typeless)
1069 {
1070         Track* current_track = 0;
1071         Track* current_atrack = 0;
1072         Track* current_vtrack = 0;
1073         Track* dst_track = 0;
1074         int src_type;
1075         int result = 0;
1076         double length;
1077         double frame_rate = edl->session->frame_rate;
1078         int64_t sample_rate = edl->session->sample_rate;
1079         char string[BCTEXTLEN];
1080         string[0] = 0;
1081
1082 // Search for start
1083         do{
1084           result = file->read_tag();
1085         }while(!result &&
1086                 !file->tag.title_is("AUTO_CLIPBOARD"));
1087
1088         if(!result)
1089         {
1090                 length = file->tag.get_property("LENGTH", 0);
1091                 frame_rate = file->tag.get_property("FRAMERATE", frame_rate);
1092                 sample_rate = file->tag.get_property("SAMPLERATE", sample_rate);
1093
1094
1095                 do
1096                 {
1097                         result = file->read_tag();
1098
1099                         if(!result)
1100                         {
1101                                 if(file->tag.title_is("/AUTO_CLIPBOARD"))
1102                                 {
1103                                         result = 1;
1104                                 }
1105                                 else
1106                                 if(file->tag.title_is("TRACK"))
1107                                 {
1108                                         file->tag.get_property("TYPE", string);
1109                                         if(!strcmp(string, "AUDIO"))
1110                                         {
1111                                                 src_type = TRACK_AUDIO;
1112                                         }
1113                                         else
1114                                         {
1115                                                 src_type = TRACK_VIDEO;
1116                                         }
1117
1118 // paste to any media type
1119                                         if(typeless)
1120                                         {
1121                                                 if(!current_track) current_track = first;
1122                                                 while(current_track && !current_track->record)
1123                                                         current_track = current_track->next;
1124                                                 dst_track = current_track;
1125                                         }
1126                                         else
1127                                         if(!strcmp(string, "AUDIO"))
1128                                         {
1129 // Get next audio track
1130                                                 if(!current_atrack)
1131                                                         current_atrack = first;
1132                                                 else
1133                                                         current_atrack = current_atrack->next;
1134
1135                                                 while(current_atrack &&
1136                                                         (current_atrack->data_type != TRACK_AUDIO ||
1137                                                         !current_atrack->record))
1138                                                         current_atrack = current_atrack->next;
1139                                                 dst_track = current_atrack;
1140                                         }
1141                                         else
1142                                         {
1143 // Get next video track
1144                                                 if(!current_vtrack)
1145                                                         current_vtrack = first;
1146                                                 else
1147                                                         current_vtrack = current_vtrack->next;
1148
1149                                                 while(current_vtrack &&
1150                                                         (current_vtrack->data_type != TRACK_VIDEO ||
1151                                                         !current_vtrack->record))
1152                                                         current_vtrack = current_vtrack->next;
1153
1154                                                 dst_track = current_vtrack;
1155                                         }
1156
1157                                         if(dst_track)
1158                                         {
1159                                                 double frame_rate2 = frame_rate;
1160                                                 double sample_rate2 = sample_rate;
1161
1162                                                 if(src_type != dst_track->data_type)
1163                                                 {
1164                                                         frame_rate2 = sample_rate;
1165                                                         sample_rate2 = frame_rate;
1166                                                 }
1167
1168                                                 dst_track->paste_automation(selectionstart,
1169                                                         length,
1170                                                         frame_rate2,
1171                                                         sample_rate2,
1172                                                         file,
1173                                                         default_only,
1174                                                         active_only);
1175                                         }
1176                                 }
1177                         }
1178                 }while(!result);
1179         }
1180 }
1181
1182 // int Tracks::paste_default_keyframe(FileXML *file)
1183 // {
1184 //      paste_automation(0, file, 1, 0);
1185 //      return 0;
1186 // }
1187
1188 void Tracks::paste_transition(PluginServer *server, Edit *dest_edit)
1189 {
1190         dest_edit->insert_transition(server->title);
1191 }
1192
1193 void Tracks::paste_video_transition(PluginServer *server, int first_track)
1194 {
1195         for(Track *current = first; current; current = NEXT)
1196         {
1197                 if(current->data_type == TRACK_VIDEO &&
1198                         current->record)
1199                 {
1200                         int64_t position = current->to_units(
1201                                 edl->local_session->get_selectionstart(), 0);
1202                         Edit *current_edit = current->edits->editof(position,
1203                                 PLAY_FORWARD,
1204                                 0);
1205                         if( !current_edit && position == current->edits->length() ) {
1206                                 double length = edl->session->default_transition_length;
1207                                 int64_t units = current->to_units(length, 1);
1208                                 current_edit = current->edits->create_silence(position, position+units);
1209                         }
1210                         if(current_edit)
1211                         {
1212                                 paste_transition(server, current_edit);
1213                         }
1214                         if(first_track) break;
1215                 }
1216         }
1217 }
1218
1219
1220 int Tracks::paste_silence(double start,
1221         double end,
1222         int edit_plugins,
1223         int edit_autos)
1224 {
1225         Track* current_track;
1226
1227         for(current_track = first;
1228                 current_track;
1229                 current_track = current_track->next)
1230         {
1231                 if(current_track->record)
1232                 {
1233                         current_track->paste_silence(start,
1234                                 end,
1235                                 edit_plugins,
1236                                 edit_autos);
1237                 }
1238         }
1239         return 0;
1240 }
1241
1242
1243
1244 int Tracks::select_auto(int cursor_x, int cursor_y)
1245 {
1246         int result = 0;
1247         for(Track* current = first; current && !result; current = NEXT) { result = current->select_auto(&auto_conf, cursor_x, cursor_y); }
1248         return result;
1249 }
1250
1251 int Tracks::move_auto(int cursor_x, int cursor_y, int shift_down)
1252 {
1253         int result = 0;
1254
1255         for(Track* current = first; current && !result; current = NEXT)
1256         {
1257                 result = current->move_auto(&auto_conf, cursor_x, cursor_y, shift_down);
1258         }
1259         return 0;
1260 }
1261
1262 int Tracks::modify_edithandles(double &oldposition,
1263         double &newposition,
1264         int currentend,
1265         int handle_mode,
1266         int edit_labels,
1267         int edit_plugins,
1268         int edit_autos)
1269 {
1270         Track *current;
1271
1272         for(current = first; current; current = NEXT)
1273         {
1274                 if(current->record)
1275                 {
1276                         current->modify_edithandles(oldposition,
1277                                 newposition,
1278                                 currentend,
1279                                 handle_mode,
1280                                 edit_labels,
1281                                 edit_plugins,
1282                                 edit_autos);
1283                 }
1284         }
1285         return 0;
1286 }
1287
1288 int Tracks::modify_pluginhandles(double &oldposition,
1289         double &newposition,
1290         int currentend,
1291         int handle_mode,
1292         int edit_labels,
1293         int edit_autos,
1294         Edits *trim_edits)
1295 {
1296         Track *current;
1297
1298         for(current = first; current; current = NEXT)
1299         {
1300                 if(current->record)
1301                 {
1302                         current->modify_pluginhandles(oldposition,
1303                                 newposition,
1304                                 currentend,
1305                                 handle_mode,
1306                                 edit_labels,
1307                                 edit_autos,
1308                                 trim_edits);
1309                 }
1310         }
1311         return 0;
1312 }
1313
1314
1315
1316 int Tracks::purge_asset(Asset *asset)
1317 {
1318         Track *current_track;
1319         int result = 0;
1320
1321         for(current_track = first; current_track; current_track = current_track->next)
1322         {
1323                 result += current_track->purge_asset(asset);
1324         }
1325         return result;
1326 }
1327
1328 int Tracks::asset_used(Asset *asset)
1329 {
1330         Track *current_track;
1331         int result = 0;
1332
1333         for(current_track = first; current_track; current_track = current_track->next)
1334         {
1335                 result += current_track->asset_used(asset);
1336         }
1337         return result;
1338 }
1339
1340 int Tracks::scale_time(float rate_scale, int ignore_record, int scale_edits, int scale_autos, int64_t start, int64_t end)
1341 {
1342         Track *current_track;
1343
1344         for(current_track = first;
1345                 current_track;
1346                 current_track = current_track->next)
1347         {
1348                 if((current_track->record || ignore_record) &&
1349                         current_track->data_type == TRACK_VIDEO)
1350                 {
1351                         current_track->scale_time(rate_scale, scale_edits, scale_autos, start, end);
1352                 }
1353         }
1354         return 0;
1355 }
1356