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