source/blender/editors/space_sequencer/sequencer_edit.c

   1 /**
   2  * $Id$
   3  *
   4  * ***** BEGIN GPL LICENSE BLOCK *****
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * as published by the Free Software Foundation; either version 2
   9  * of the License, or (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 Foundation,
  18  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  19  *
  20  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
  21  * All rights reserved.
  22  *
  23  * Contributor(s): Blender Foundation, 2003-2009
  24  *
  25  * ***** END GPL LICENSE BLOCK *****
  26  */
  27
  28 #include <stdlib.h>
  29 #include <math.h>
  30 #include <string.h>
  31
  32 #ifndef WIN32
  33 #include <unistd.h>
  34 #else
  35 #include <io.h>
  36 #endif
  37 #include <sys/types.h>
  38
  39 #include "MEM_guardedalloc.h"
  40
  41 #include "BLI_blenlib.h"
  42 #include "BLI_math.h"
  43 #include "BLI_storage_types.h"
  44 #include "BLI_utildefines.h"
  45
  46 #include "DNA_scene_types.h"
  47 #include "DNA_userdef_types.h"
  48
  49 #include "BKE_context.h"
  50 #include "BKE_global.h"
  51 #include "BKE_main.h"
  52 #include "BKE_sequencer.h"
  53 #include "BKE_report.h"
  54 #include "BKE_sound.h"
  55
  56 #include "WM_api.h"
  57 #include "WM_types.h"
  58
  59 #include "RNA_define.h"
  60
  61 /* for menu/popup icons etc etc*/
  62
  63 #include "ED_screen.h"
  64 #include "ED_transform.h"
  65 #include "ED_sequencer.h"
  66
  67 #include "UI_view2d.h"
  68
  69 /* own include */
  70 #include "sequencer_intern.h"
  71
  72 static void error(const char *UNUSED(dummy)) {}
  73 static void waitcursor(int UNUSED(val)) {}
  74 static void activate_fileselect(int UNUSED(d1), const char *UNUSED(d2), const char *UNUSED(d3), void *UNUSED(d4)) {}
  75 static int pupmenu(const char *UNUSED(dummy)) {return 0;}
  76 static int okee(const char *UNUSED(dummy)) {return 0;}
  77
  78
  79 /* XXX */
  80 /* RNA Enums, used in multiple files */
  81 EnumPropertyItem sequencer_prop_effect_types[] = {
  82         {SEQ_CROSS, "CROSS", 0, "Crossfade", "Crossfade effect strip type"},
  83         {SEQ_ADD, "ADD", 0, "Add", "Add effect strip type"},
  84         {SEQ_SUB, "SUBTRACT", 0, "Subtract", "Subtract effect strip type"},
  85         {SEQ_ALPHAOVER, "ALPHA_OVER", 0, "Alpha Over", "Alpha Over effect strip type"},
  86         {SEQ_ALPHAUNDER, "ALPHA_UNDER", 0, "Alpha Under", "Alpha Under effect strip type"},
  87         {SEQ_GAMCROSS, "GAMMA_CROSS", 0, "Gamma Cross", "Gamma Cross effect strip type"},
  88         {SEQ_MUL, "MULTIPLY", 0, "Multiply", "Multiply effect strip type"},
  89         {SEQ_OVERDROP, "OVER_DROP", 0, "Alpha Over Drop", "Alpha Over Drop effect strip type"},
  90         {SEQ_PLUGIN, "PLUGIN", 0, "Plugin", "Plugin effect strip type"},
  91         {SEQ_WIPE, "WIPE", 0, "Wipe", "Wipe effect strip type"},
  92         {SEQ_GLOW, "GLOW", 0, "Glow", "Glow effect strip type"},
  93         {SEQ_TRANSFORM, "TRANSFORM", 0, "Transform", "Transform effect strip type"},
  94         {SEQ_COLOR, "COLOR", 0, "Color", "Color effect strip type"},
  95         {SEQ_SPEED, "SPEED", 0, "Speed", "Color effect strip type"},
  96         {SEQ_MULTICAM, "MULTICAM", 0, "Multicam Selector", ""},
  97         {0, NULL, 0, NULL, NULL}
  98 };
  99
 100 /* mute operator */
 101
 102 EnumPropertyItem prop_side_types[] = {
 103         {SEQ_SIDE_LEFT, "LEFT", 0, "Left", ""},
 104         {SEQ_SIDE_RIGHT, "RIGHT", 0, "Right", ""},
 105         {SEQ_SIDE_BOTH, "BOTH", 0, "Both", ""},
 106         {0, NULL, 0, NULL, NULL}
 107 };
 108
 109 static EnumPropertyItem prop_side_lr_types[] = {
 110         {SEQ_SIDE_LEFT, "LEFT", 0, "Left", ""},
 111         {SEQ_SIDE_RIGHT, "RIGHT", 0, "Right", ""},
 112         {0, NULL, 0, NULL, NULL}
 113 };
 114
 115 typedef struct TransSeq {
 116         int start, machine;
 117         int startstill, endstill;
 118         int startdisp, enddisp;
 119         int startofs, endofs;
 120         int final_left, final_right;
 121         int len;
 122 } TransSeq;
 123
 124 static Sequence *get_foreground_frame_seq(Scene *scene, int frame)
 125 {
 126         Editing *ed= seq_give_editing(scene, FALSE);
 127         Sequence *seq, *best_seq=NULL;
 128         int best_machine = -1;
 129
 130         if(!ed) return NULL;
 131
 132         for (seq=ed->seqbasep->first; seq; seq= seq->next) {
 133                 if(seq->flag & SEQ_MUTE || seq->startdisp > frame || seq->enddisp <= frame)
 134                         continue;
 135                 /* only use elements you can see - not */
 136                 if (ELEM5(seq->type, SEQ_IMAGE, SEQ_META, SEQ_SCENE, SEQ_MOVIE, SEQ_COLOR)) {
 137                         if (seq->machine > best_machine) {
 138                                 best_seq = seq;
 139                                 best_machine = seq->machine;
 140                         }
 141                 }
 142         }
 143         return best_seq;
 144 }
 145
 146 void seq_rectf(Sequence *seq, rctf *rectf)
 147 {
 148         if(seq->startstill) rectf->xmin= seq->start;
 149         else rectf->xmin= seq->startdisp;
 150         rectf->ymin= seq->machine+SEQ_STRIP_OFSBOTTOM;
 151         if(seq->endstill) rectf->xmax= seq->start+seq->len;
 152         else rectf->xmax= seq->enddisp;
 153         rectf->ymax= seq->machine+SEQ_STRIP_OFSTOP;
 154 }
 155
 156 static void change_plugin_seq(Scene *scene, char *str)  /* called from fileselect */
 157 {
 158         Editing *ed= seq_give_editing(scene, FALSE);
 159         struct SeqEffectHandle sh;
 160         Sequence *last_seq= seq_active_get(scene);
 161
 162         if(last_seq==NULL || last_seq->type != SEQ_PLUGIN) return;
 163
 164         sh = get_sequence_effect(last_seq);
 165         sh.free(last_seq);
 166         sh.init_plugin(last_seq, str);
 167
 168         last_seq->machine = MAX3(last_seq->seq1->machine,
 169                                  last_seq->seq2->machine,
 170                                  last_seq->seq3->machine);
 171
 172         if( seq_test_overlap(ed->seqbasep, last_seq) ) shuffle_seq(ed->seqbasep, last_seq, scene);
 173
 174 }
 175
 176
 177 void boundbox_seq(Scene *scene, rctf *rect)
 178 {
 179         Sequence *seq;
 180         Editing *ed= seq_give_editing(scene, FALSE);
 181         float min[2], max[2];
 182
 183
 184         if(ed==NULL) return;
 185
 186         min[0]= 0.0;
 187         max[0]= EFRA+1;
 188         min[1]= 0.0;
 189         max[1]= 8.0;
 190
 191         seq= ed->seqbasep->first;
 192         while(seq) {
 193
 194                 if( min[0] > seq->startdisp-1) min[0]= seq->startdisp-1;
 195                 if( max[0] < seq->enddisp+1) max[0]= seq->enddisp+1;
 196                 if( max[1] < seq->machine+2.0) max[1]= seq->machine+2.0;
 197
 198                 seq= seq->next;
 199         }
 200
 201         rect->xmin= min[0];
 202         rect->xmax= max[0];
 203         rect->ymin= min[1];
 204         rect->ymax= max[1];
 205
 206 }
 207
 208 static int mouse_frame_side(View2D *v2d, short mouse_x, int frame )
 209 {
 210         short mval[2];
 211         float mouseloc[2];
 212
 213         mval[0]= mouse_x;
 214         mval[1]= 0;
 215
 216         /* choose the side based on which side of the playhead the mouse is on */
 217         UI_view2d_region_to_view(v2d, mval[0], mval[1], &mouseloc[0], &mouseloc[1]);
 218
 219         return mouseloc[0] > frame ? SEQ_SIDE_RIGHT : SEQ_SIDE_LEFT;
 220 }
 221
 222
 223 Sequence *find_neighboring_sequence(Scene *scene, Sequence *test, int lr, int sel)
 224 {
 225         /* sel - 0==unselected, 1==selected, -1==done care*/
 226         Sequence *seq;
 227         Editing *ed= seq_give_editing(scene, FALSE);
 228
 229         if(ed==NULL) return NULL;
 230
 231         if (sel>0) sel = SELECT;
 232
 233         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
 234                 if(     (seq!=test) &&
 235                         (test->machine==seq->machine) &&
 236                         ((sel == -1) || (sel && (seq->flag & SELECT)) || (sel==0 && (seq->flag & SELECT)==0)  ))
 237                 {
 238                         switch (lr) {
 239                         case SEQ_SIDE_LEFT:
 240                                 if (test->startdisp == (seq->enddisp)) {
 241                                         return seq;
 242                                 }
 243                                 break;
 244                         case SEQ_SIDE_RIGHT:
 245                                 if (test->enddisp == (seq->startdisp)) {
 246                                         return seq;
 247                                 }
 248                                 break;
 249                         }
 250                 }
 251         }
 252         return NULL;
 253 }
 254
 255 static Sequence *find_next_prev_sequence(Scene *scene, Sequence *test, int lr, int sel)
 256 {
 257         /* sel - 0==unselected, 1==selected, -1==done care*/
 258         Sequence *seq,*best_seq = NULL;
 259         Editing *ed= seq_give_editing(scene, FALSE);
 260
 261         int dist, best_dist;
 262         best_dist = MAXFRAME*2;
 263
 264
 265         if(ed==NULL) return NULL;
 266
 267         seq= ed->seqbasep->first;
 268         while(seq) {
 269                 if(             (seq!=test) &&
 270                                 (test->machine==seq->machine) &&
 271                                 (test->depth==seq->depth) &&
 272                                 ((sel == -1) || (sel==(seq->flag & SELECT))))
 273                 {
 274                         dist = MAXFRAME*2;
 275
 276                         switch (lr) {
 277                         case SEQ_SIDE_LEFT:
 278                                 if (seq->enddisp <= test->startdisp) {
 279                                         dist = test->enddisp - seq->startdisp;
 280                                 }
 281                                 break;
 282                         case SEQ_SIDE_RIGHT:
 283                                 if (seq->startdisp >= test->enddisp) {
 284                                         dist = seq->startdisp - test->enddisp;
 285                                 }
 286                                 break;
 287                         }
 288
 289                         if (dist==0) {
 290                                 best_seq = seq;
 291                                 break;
 292                         } else if (dist < best_dist) {
 293                                 best_dist = dist;
 294                                 best_seq = seq;
 295                         }
 296                 }
 297                 seq= seq->next;
 298         }
 299         return best_seq; /* can be null */
 300 }
 301
 302
 303 Sequence *find_nearest_seq(Scene *scene, View2D *v2d, int *hand, short mval[2])
 304 {
 305         Sequence *seq;
 306         Editing *ed= seq_give_editing(scene, FALSE);
 307         float x, y;
 308         float pixelx;
 309         float handsize;
 310         float displen;
 311         *hand= SEQ_SIDE_NONE;
 312
 313
 314         if(ed==NULL) return NULL;
 315
 316         pixelx = (v2d->cur.xmax - v2d->cur.xmin)/(v2d->mask.xmax - v2d->mask.xmin);
 317
 318         UI_view2d_region_to_view(v2d, mval[0], mval[1], &x, &y);
 319
 320         seq= ed->seqbasep->first;
 321
 322         while(seq) {
 323                 if(seq->machine == (int)y) {
 324                         /* check for both normal strips, and strips that have been flipped horizontally */
 325                         if( ((seq->startdisp < seq->enddisp) && (seq->startdisp<=x && seq->enddisp>=x)) ||
 326                                 ((seq->startdisp > seq->enddisp) && (seq->startdisp>=x && seq->enddisp<=x)) )
 327                         {
 328                                 if(seq_tx_test(seq)) {
 329
 330                                         /* clamp handles to defined size in pixel space */
 331
 332                                         handsize = seq->handsize;
 333                                         displen = (float)abs(seq->startdisp - seq->enddisp);
 334
 335                                         if (displen / pixelx > 16) { /* dont even try to grab the handles of small strips */
 336                                                 /* Set the max value to handle to 1/3 of the total len when its less then 28.
 337                                                 * This is important because otherwise selecting handles happens even when you click in the middle */
 338
 339                                                 if ((displen/3) < 30*pixelx) {
 340                                                         handsize = displen/3;
 341                                                 } else {
 342                                                         CLAMP(handsize, 7*pixelx, 30*pixelx);
 343                                                 }
 344
 345                                                 if( handsize+seq->startdisp >=x )
 346                                                         *hand= SEQ_SIDE_LEFT;
 347                                                 else if( -handsize+seq->enddisp <=x )
 348                                                         *hand= SEQ_SIDE_RIGHT;
 349                                         }
 350                                 }
 351                                 return seq;
 352                         }
 353                 }
 354                 seq= seq->next;
 355         }
 356         return 0;
 357 }
 358
 359
 360 static int seq_is_parent(Sequence *par, Sequence *seq)
 361 {
 362         return ((par->seq1 == seq) || (par->seq2 == seq) || (par->seq3 == seq));
 363 }
 364
 365 static int seq_is_predecessor(Sequence *pred, Sequence *seq)
 366 {
 367         if (!pred) return 0;
 368         if(pred == seq) return 0;
 369         else if(seq_is_parent(pred, seq)) return 1;
 370         else if(pred->seq1 && seq_is_predecessor(pred->seq1, seq)) return 1;
 371         else if(pred->seq2 && seq_is_predecessor(pred->seq2, seq)) return 1;
 372         else if(pred->seq3 && seq_is_predecessor(pred->seq3, seq)) return 1;
 373
 374         return 0;
 375 }
 376
 377 void deselect_all_seq(Scene *scene)
 378 {
 379         Sequence *seq;
 380         Editing *ed= seq_give_editing(scene, FALSE);
 381
 382
 383         if(ed==NULL) return;
 384
 385         SEQP_BEGIN(ed, seq) {
 386                 seq->flag &= ~SEQ_ALLSEL;
 387         }
 388         SEQ_END
 389
 390 }
 391
 392 void recurs_sel_seq(Sequence *seqm)
 393 {
 394         Sequence *seq;
 395
 396         seq= seqm->seqbase.first;
 397         while(seq) {
 398
 399                 if(seqm->flag & (SEQ_LEFTSEL+SEQ_RIGHTSEL)) seq->flag &= ~SEQ_ALLSEL;
 400                 else if(seqm->flag & SELECT) seq->flag |= SELECT;
 401                 else seq->flag &= ~SEQ_ALLSEL;
 402
 403                 if(seq->seqbase.first) recurs_sel_seq(seq);
 404
 405                 seq= seq->next;
 406         }
 407 }
 408
 409 int event_to_efftype(int event)
 410 {
 411         if(event==2) return SEQ_CROSS;
 412         if(event==3) return SEQ_GAMCROSS;
 413         if(event==4) return SEQ_ADD;
 414         if(event==5) return SEQ_SUB;
 415         if(event==6) return SEQ_MUL;
 416         if(event==7) return SEQ_ALPHAOVER;
 417         if(event==8) return SEQ_ALPHAUNDER;
 418         if(event==9) return SEQ_OVERDROP;
 419         if(event==10) return SEQ_PLUGIN;
 420         if(event==13) return SEQ_WIPE;
 421         if(event==14) return SEQ_GLOW;
 422         if(event==15) return SEQ_TRANSFORM;
 423         if(event==16) return SEQ_COLOR;
 424         if(event==17) return SEQ_SPEED;
 425         return 0;
 426 }
 427
 428 #if 0
 429 static void reload_sound_strip(Scene *scene, char *name)
 430 {
 431         Editing *ed;
 432         Sequence *seq, *seqact;
 433         SpaceFile *sfile;
 434         Sequence *last_seq= seq_active_get(scene);
 435
 436         ed= scene->ed;
 437
 438         if(last_seq==0 || last_seq->type!=SEQ_SOUND) return;
 439         seqact= last_seq;       /* last_seq changes in alloc_sequence */
 440
 441         /* search sfile */
 442 //      sfile= scrarea_find_space_of_type(curarea, SPACE_FILE);
 443         if(sfile==0) return;
 444
 445         waitcursor(1);
 446
 447         seq = sfile_to_snd_sequence(sfile, seqact->start, seqact->machine);
 448         printf("seq->type: %i\n", seq->type);
 449         if(seq && seq!=seqact) {
 450                 /* i'm not sure about this one, seems to work without it -- sgefant */
 451                 seq_free_strip(seqact->strip);
 452
 453                 seqact->strip= seq->strip;
 454
 455                 seqact->len= seq->len;
 456                 calc_sequence(scene, seqact);
 457
 458                 seq->strip= 0;
 459                 seq_free_sequence(scene, seq);
 460                 BLI_remlink(ed->seqbasep, seq);
 461
 462                 seq= ed->seqbasep->first;
 463
 464         }
 465
 466         waitcursor(0);
 467
 468 }
 469 #endif
 470
 471 static void reload_image_strip(Scene *scene, char *UNUSED(name))
 472 {
 473         Editing *ed= seq_give_editing(scene, FALSE);
 474         Sequence *seq=NULL, *seqact;
 475         SpaceFile *sfile=NULL;
 476         Sequence *last_seq= seq_active_get(scene);
 477
 478
 479
 480         if(last_seq==0 || last_seq->type!=SEQ_IMAGE) return;
 481         seqact= last_seq;       /* last_seq changes in alloc_sequence */
 482
 483         /* search sfile */
 484 //      sfile= scrarea_find_space_of_type(curarea, SPACE_FILE);
 485         if(sfile==0) return;
 486
 487         waitcursor(1);
 488
 489 //      seq= sfile_to_sequence(scene, sfile, seqact->start, seqact->machine, 1); // XXX ADD BACK
 490         if(seq && seq!=seqact) {
 491                 seq_free_strip(seqact->strip);
 492
 493                 seqact->strip= seq->strip;
 494
 495                 seqact->len= seq->len;
 496                 calc_sequence(scene, seqact);
 497
 498                 seq->strip= 0;
 499                 seq_free_sequence(scene, seq);
 500                 BLI_remlink(ed->seqbasep, seq);
 501
 502                 update_changed_seq_and_deps(scene, seqact, 1, 1);
 503         }
 504         waitcursor(0);
 505
 506 }
 507
 508
 509 static void change_sequence(Scene *scene)
 510 {
 511         Editing *ed= seq_give_editing(scene, FALSE);
 512         Sequence *last_seq= seq_active_get(scene);
 513         Scene *sce;
 514         short event;
 515
 516         if(last_seq==0) return;
 517
 518         if(last_seq->type & SEQ_EFFECT) {
 519                 event = pupmenu("Change Effect%t"
 520                                 "|Switch A <-> B %x1"
 521                                 "|Switch B <-> C %x10"
 522                                 "|Plugin%x11"
 523                                 "|Recalculate%x12"
 524                                 "|Cross%x2"
 525                                 "|Gamma Cross%x3"
 526                                 "|Add%x4"
 527                                 "|Sub%x5"
 528                                 "|Mul%x6"
 529                                 "|Alpha Over%x7"
 530                                 "|Alpha Under%x8"
 531                                 "|Alpha Over Drop%x9"
 532                                 "|Wipe%x13"
 533                                 "|Glow%x14"
 534                                 "|Transform%x15"
 535                                 "|Color Generator%x16"
 536                                 "|Speed Control%x17");
 537                 if(event > 0) {
 538                         if(event==1) {
 539                                 SWAP(Sequence *,last_seq->seq1,last_seq->seq2);
 540                         }
 541                         else if(event==10) {
 542                                 SWAP(Sequence *,last_seq->seq2,last_seq->seq3);
 543                         }
 544                         else if(event==11) {
 545                                 activate_fileselect(
 546                                         FILE_SPECIAL, "Select Plugin",
 547                                         U.plugseqdir, change_plugin_seq);
 548                         }
 549                         else if(event==12);
 550                                                                 /* recalculate: only new_stripdata */
 551                         else {
 552                                 /* free previous effect and init new effect */
 553                                 struct SeqEffectHandle sh;
 554
 555                                 if (get_sequence_effect_num_inputs(
 556                                                 last_seq->type)
 557                                         < get_sequence_effect_num_inputs(
 558                                                 event_to_efftype(event))) {
 559                                         error("New effect needs more "
 560                                                   "input strips!");
 561                                 } else {
 562                                         sh = get_sequence_effect(last_seq);
 563                                         sh.free(last_seq);
 564
 565                                         last_seq->type
 566                                                 = event_to_efftype(event);
 567
 568                                         sh = get_sequence_effect(last_seq);
 569                                         sh.init(last_seq);
 570                                 }
 571                         }
 572
 573                         update_changed_seq_and_deps(scene, last_seq, 0, 1);
 574                 }
 575         }
 576         else if(last_seq->type == SEQ_IMAGE) {
 577                 if(okee("Change images")) {
 578                         activate_fileselect(FILE_SPECIAL,
 579                                                 "Select Images",
 580                                                 ed->act_imagedir,
 581                                                 reload_image_strip);
 582                 }
 583         }
 584         else if(last_seq->type == SEQ_MOVIE) {
 585                 ;
 586         }
 587         else if(last_seq->type == SEQ_SCENE) {
 588                 event= pupmenu("Change Scene%t|Update Start and End");
 589
 590                 if(event==1) {
 591                         sce= last_seq->scene;
 592
 593                         last_seq->len= sce->r.efra - sce->r.sfra + 1;
 594                         last_seq->sfra= sce->r.sfra;
 595
 596                         /* bad code to change seq->len? update_changed_seq_and_deps() expects the strip->len to be OK */
 597                         new_tstripdata(last_seq);
 598
 599                         update_changed_seq_and_deps(scene, last_seq, 1, 1);
 600
 601                 }
 602         }
 603
 604 }
 605
 606 int seq_effect_find_selected(Scene *scene, Sequence *activeseq, int type, Sequence **selseq1, Sequence **selseq2, Sequence **selseq3, const char **error_str)
 607 {
 608         Editing *ed = seq_give_editing(scene, FALSE);
 609         Sequence *seq1= 0, *seq2= 0, *seq3= 0, *seq;
 610
 611         *error_str= NULL;
 612
 613         if (!activeseq)
 614                 seq2= seq_active_get(scene);
 615
 616         for(seq=ed->seqbasep->first; seq; seq=seq->next) {
 617                 if(seq->flag & SELECT) {
 618                         if (seq->type == SEQ_SOUND && get_sequence_effect_num_inputs(type) != 0) {
 619                                 *error_str= "Can't apply effects to audio sequence strips";
 620                                 return 0;
 621                         }
 622                         if((seq != activeseq) && (seq != seq2)) {
 623                                                                 if(seq2==0) seq2= seq;
 624                                                                 else if(seq1==0) seq1= seq;
 625                                                                 else if(seq3==0) seq3= seq;
 626                                                                 else {
 627                                                                         *error_str= "Can't apply effect to more than 3 sequence strips";
 628                                                                         return 0;
 629                                                                 }
 630                         }
 631                 }
 632         }
 633
 634         /* make sequence selection a little bit more intuitive
 635            for 3 strips: the last-strip should be sequence3 */
 636         if (seq3 != 0 && seq2 != 0) {
 637                 Sequence *tmp = seq2;
 638                 seq2 = seq3;
 639                 seq3 = tmp;
 640         }
 641
 642
 643         switch(get_sequence_effect_num_inputs(type)) {
 644         case 0:
 645                 *selseq1 = *selseq2 = *selseq3 = 0;
 646                 return 1; /* succsess */
 647         case 1:
 648                 if(seq2==0)  {
 649                         *error_str= "Need at least one selected sequence strip";
 650                         return 0;
 651                 }
 652                 if(seq1==0) seq1= seq2;
 653                 if(seq3==0) seq3= seq2;
 654         case 2:
 655                 if(seq1==0 || seq2==0) {
 656                         *error_str= "Need 2 selected sequence strips";
 657                         return 0;
 658                 }
 659                 if(seq3==0) seq3= seq2;
 660         }
 661
 662         if (seq1==NULL && seq2==NULL && seq3==NULL) {
 663                 *error_str= "TODO: in what cases does this happen?";
 664                 return 0;
 665         }
 666
 667         *selseq1= seq1;
 668         *selseq2= seq2;
 669         *selseq3= seq3;
 670
 671         return 1;
 672 }
 673
 674 static Sequence *del_seq_find_replace_recurs(Scene *scene, Sequence *seq)
 675 {
 676         Sequence *seq1, *seq2, *seq3;
 677
 678         /* try to find a replacement input sequence, and flag for later deletion if
 679            no replacement can be found */
 680
 681         if(!seq)
 682                 return NULL;
 683         else if(!(seq->type & SEQ_EFFECT))
 684                 return ((seq->flag & SELECT)? NULL: seq);
 685         else if(!(seq->flag & SELECT)) {
 686                 /* try to find replacement for effect inputs */
 687                 seq1= del_seq_find_replace_recurs(scene, seq->seq1);
 688                 seq2= del_seq_find_replace_recurs(scene, seq->seq2);
 689                 seq3= del_seq_find_replace_recurs(scene, seq->seq3);
 690
 691                 if(seq1==seq->seq1 && seq2==seq->seq2 && seq3==seq->seq3);
 692                 else if(seq1 || seq2 || seq3) {
 693                         seq->seq1= (seq1)? seq1: (seq2)? seq2: seq3;
 694                         seq->seq2= (seq2)? seq2: (seq1)? seq1: seq3;
 695                         seq->seq3= (seq3)? seq3: (seq1)? seq1: seq2;
 696
 697                         update_changed_seq_and_deps(scene, seq, 1, 1);
 698                 }
 699                 else
 700                         seq->flag |= SELECT; /* mark for delete */
 701         }
 702
 703         if (seq->flag & SELECT) {
 704                 if((seq1 = del_seq_find_replace_recurs(scene, seq->seq1))) return seq1;
 705                 if((seq2 = del_seq_find_replace_recurs(scene, seq->seq2))) return seq2;
 706                 if((seq3 = del_seq_find_replace_recurs(scene, seq->seq3))) return seq3;
 707                 else return NULL;
 708         }
 709         else
 710                 return seq;
 711 }
 712
 713 static void recurs_del_seq_flag(Scene *scene, ListBase *lb, short flag, short deleteall)
 714 {
 715         Sequence *seq, *seqn;
 716         Sequence *last_seq = seq_active_get(scene);
 717
 718         seq= lb->first;
 719         while(seq) {
 720                 seqn= seq->next;
 721                 if((seq->flag & flag) || deleteall) {
 722                         if(seq->type==SEQ_SOUND && seq->sound) {
 723                                 ((ID *)seq->sound)->us--; /* TODO, could be moved into seq_free_sequence() */
 724                         }
 725
 726                         BLI_remlink(lb, seq);
 727                         if(seq==last_seq) seq_active_set(scene, NULL);
 728                         if(seq->type==SEQ_META) recurs_del_seq_flag(scene, &seq->seqbase, flag, 1);
 729                         /* if(seq->ipo) seq->ipo->id.us--; */
 730                         /* XXX, remove fcurve */
 731                         seq_free_sequence(scene, seq);
 732                 }
 733                 seq= seqn;
 734         }
 735 }
 736
 737
 738 static Sequence *cut_seq_hard(Scene *scene, Sequence * seq, int cutframe)
 739 {
 740         TransSeq ts;
 741         Sequence *seqn = 0;
 742         int skip_dup = FALSE;
 743
 744         /* backup values */
 745         ts.start= seq->start;
 746         ts.machine= seq->machine;
 747         ts.startstill= seq->startstill;
 748         ts.endstill= seq->endstill;
 749         ts.startdisp= seq->startdisp;
 750         ts.enddisp= seq->enddisp;
 751         ts.startofs= seq->anim_startofs;
 752         ts.endofs= seq->anim_endofs;
 753         ts.len= seq->len;
 754
 755         /* First Strip! */
 756         /* strips with extended stillfames before */
 757
 758         if ((seq->startstill) && (cutframe <seq->start)) {
 759                 /* don't do funny things with METAs ... */
 760                 if (seq->type == SEQ_META) {
 761                         skip_dup = TRUE;
 762                         seq->startstill = seq->start - cutframe;
 763                 } else {
 764                         seq->start= cutframe -1;
 765                         seq->startstill= cutframe -seq->startdisp -1;
 766                         seq->anim_endofs += seq->len - 1;
 767                         seq->endstill= 0;
 768                 }
 769         }
 770         /* normal strip */
 771         else if ((cutframe >=seq->start)&&(cutframe <=(seq->start+seq->len))) {
 772                 seq->endofs = 0;
 773                 seq->endstill = 0;
 774                 seq->anim_endofs += (seq->start+seq->len) - cutframe;
 775         }
 776         /* strips with extended stillframes after */
 777         else if (((seq->start+seq->len) < cutframe) && (seq->endstill)) {
 778                 seq->endstill -= seq->enddisp - cutframe;
 779                 /* don't do funny things with METAs ... */
 780                 if (seq->type == SEQ_META) {
 781                         skip_dup = TRUE;
 782                 }
 783         }
 784
 785         reload_sequence_new_file(scene, seq, FALSE);
 786         calc_sequence(scene, seq);
 787         new_tstripdata(seq);
 788
 789         if (!skip_dup) {
 790                 /* Duplicate AFTER the first change */
 791                 seqn = seq_dupli_recursive(scene, NULL, seq, SEQ_DUPE_UNIQUE_NAME | SEQ_DUPE_ANIM);
 792         }
 793
 794         if (seqn) {
 795                 seqn->flag |= SELECT;
 796
 797                 /* Second Strip! */
 798                 /* strips with extended stillframes before */
 799                 if ((seqn->startstill) && (cutframe == seqn->start + 1)) {
 800                         seqn->start = ts.start;
 801                         seqn->startstill= ts.start- cutframe;
 802                         seqn->anim_endofs = ts.endofs;
 803                         seqn->endstill = ts.endstill;
 804                 }
 805
 806                 /* normal strip */
 807                 else if ((cutframe>=seqn->start)&&(cutframe<=(seqn->start+seqn->len))) {
 808                         seqn->start = cutframe;
 809                         seqn->startstill = 0;
 810                         seqn->startofs = 0;
 811                         seqn->anim_startofs += cutframe - ts.start;
 812                         seqn->anim_endofs = ts.endofs;
 813                         seqn->endstill = ts.endstill;
 814                 }
 815
 816                 /* strips with extended stillframes after */
 817                 else if (((seqn->start+seqn->len) < cutframe) && (seqn->endstill)) {
 818                         seqn->start = cutframe;
 819                         seqn->startofs = 0;
 820                         seqn->anim_startofs += ts.len-1;
 821                         seqn->endstill = ts.enddisp - cutframe -1;
 822                         seqn->startstill = 0;
 823                 }
 824
 825                 reload_sequence_new_file(scene, seqn, FALSE);
 826                 calc_sequence(scene, seqn);
 827                 new_tstripdata(seqn);
 828         }
 829         return seqn;
 830 }
 831
 832 static Sequence *cut_seq_soft(Scene *scene, Sequence * seq, int cutframe)
 833 {
 834         TransSeq ts;
 835         Sequence *seqn = 0;
 836         int skip_dup = FALSE;
 837
 838         /* backup values */
 839         ts.start= seq->start;
 840         ts.machine= seq->machine;
 841         ts.startstill= seq->startstill;
 842         ts.endstill= seq->endstill;
 843         ts.startdisp= seq->startdisp;
 844         ts.enddisp= seq->enddisp;
 845         ts.startofs= seq->startofs;
 846         ts.endofs= seq->endofs;
 847         ts.len= seq->len;
 848
 849         /* First Strip! */
 850         /* strips with extended stillfames before */
 851
 852         if ((seq->startstill) && (cutframe <seq->start)) {
 853                 /* don't do funny things with METAs ... */
 854                 if (seq->type == SEQ_META) {
 855                         skip_dup = TRUE;
 856                         seq->startstill = seq->start - cutframe;
 857                 } else {
 858                         seq->start= cutframe -1;
 859                         seq->startstill= cutframe -seq->startdisp -1;
 860                         seq->endofs = seq->len - 1;
 861                         seq->endstill= 0;
 862                 }
 863         }
 864         /* normal strip */
 865         else if ((cutframe >=seq->start)&&(cutframe <=(seq->start+seq->len))) {
 866                 seq->endofs = (seq->start+seq->len) - cutframe;
 867         }
 868         /* strips with extended stillframes after */
 869         else if (((seq->start+seq->len) < cutframe) && (seq->endstill)) {
 870                 seq->endstill -= seq->enddisp - cutframe;
 871                 /* don't do funny things with METAs ... */
 872                 if (seq->type == SEQ_META) {
 873                         skip_dup = TRUE;
 874                 }
 875         }
 876
 877         calc_sequence(scene, seq);
 878         new_tstripdata(seq);
 879
 880         if (!skip_dup) {
 881                 /* Duplicate AFTER the first change */
 882                 seqn = seq_dupli_recursive(scene, NULL, seq, SEQ_DUPE_UNIQUE_NAME | SEQ_DUPE_ANIM);
 883         }
 884
 885         if (seqn) {
 886                 seqn->flag |= SELECT;
 887
 888                 /* Second Strip! */
 889                 /* strips with extended stillframes before */
 890                 if ((seqn->startstill) && (cutframe == seqn->start + 1)) {
 891                         seqn->start = ts.start;
 892                         seqn->startstill= ts.start- cutframe;
 893                         seqn->endofs = ts.endofs;
 894                         seqn->endstill = ts.endstill;
 895                 }
 896
 897                 /* normal strip */
 898                 else if ((cutframe>=seqn->start)&&(cutframe<=(seqn->start+seqn->len))) {
 899                         seqn->startstill = 0;
 900                         seqn->startofs = cutframe - ts.start;
 901                         seqn->endofs = ts.endofs;
 902                         seqn->endstill = ts.endstill;
 903                 }
 904
 905                 /* strips with extended stillframes after */
 906                 else if (((seqn->start+seqn->len) < cutframe) && (seqn->endstill)) {
 907                         seqn->start = cutframe - ts.len +1;
 908                         seqn->startofs = ts.len-1;
 909                         seqn->endstill = ts.enddisp - cutframe -1;
 910                         seqn->startstill = 0;
 911                 }
 912
 913                 calc_sequence(scene, seqn);
 914                 new_tstripdata(seqn);
 915         }
 916         return seqn;
 917 }
 918
 919
 920 /* like duplicate, but only duplicate and cut overlapping strips,
 921  * strips to the left of the cutframe are ignored and strips to the right are moved into the new list */
 922 static int cut_seq_list(Scene *scene, ListBase *old, ListBase *new, int cutframe,
 923                         Sequence * (*cut_seq)(Scene *, Sequence *, int))
 924 {
 925         int did_something = FALSE;
 926         Sequence *seq, *seq_next_iter;
 927
 928         seq= old->first;
 929
 930         while(seq) {
 931                 seq_next_iter = seq->next; /* we need this because we may remove seq */
 932
 933                 seq->tmp= NULL;
 934                 if(seq->flag & SELECT) {
 935                         if(cutframe > seq->startdisp &&
 936                            cutframe < seq->enddisp) {
 937                                 Sequence * seqn = cut_seq(scene, seq, cutframe);
 938                                 if (seqn) {
 939                                         BLI_addtail(new, seqn);
 940                                 }
 941                                 did_something = TRUE;
 942                         } else if (seq->enddisp <= cutframe) {
 943                                 /* do nothing */
 944                         } else if (seq->startdisp >= cutframe) {
 945                                 /* move into new list */
 946                                 BLI_remlink(old, seq);
 947                                 BLI_addtail(new, seq);
 948                         }
 949                 }
 950                 seq = seq_next_iter;
 951         }
 952         return did_something;
 953 }
 954
 955 static int insert_gap(Scene *scene, int gap, int cfra)
 956 {
 957         Sequence *seq;
 958         Editing *ed= seq_give_editing(scene, FALSE);
 959         int done=0;
 960
 961         /* all strips >= cfra are shifted */
 962
 963         if(ed==NULL) return 0;
 964
 965         SEQP_BEGIN(ed, seq) {
 966                 if(seq->startdisp >= cfra) {
 967                         seq->start+= gap;
 968                         calc_sequence(scene, seq);
 969                         done= 1;
 970                 }
 971         }
 972         SEQ_END
 973
 974         return done;
 975 }
 976
 977 static void touch_seq_files(Scene *scene)
 978 {
 979         Sequence *seq;
 980         Editing *ed= seq_give_editing(scene, FALSE);
 981         char str[256];
 982
 983         /* touch all strips with movies */
 984
 985         if(ed==NULL) return;
 986
 987         if(okee("Touch and print selected movies")==0) return;
 988
 989         waitcursor(1);
 990
 991         SEQP_BEGIN(ed, seq) {
 992                 if(seq->flag & SELECT) {
 993                         if(seq->type==SEQ_MOVIE) {
 994                                 if(seq->strip && seq->strip->stripdata) {
 995                                         BLI_make_file_string(G.main->name, str, seq->strip->dir, seq->strip->stripdata->name);
 996                                         BLI_touch(seq->name);
 997                                 }
 998                         }
 999
1000                 }
1001         }
1002         SEQ_END
1003
1004         waitcursor(0);
1005 }
1006
1007 /*
1008 static void set_filter_seq(Scene *scene)
1009 {
1010         Sequence *seq;
1011         Editing *ed= seq_give_editing(scene, FALSE);
1012
1013
1014         if(ed==NULL) return;
1015
1016         if(okee("Set Deinterlace")==0) return;
1017
1018         SEQP_BEGIN(ed, seq) {
1019                 if(seq->flag & SELECT) {
1020                         if(seq->type==SEQ_MOVIE) {
1021                                 seq->flag |= SEQ_FILTERY;
1022                                 reload_sequence_new_file(scene, seq, FALSE);
1023                                 calc_sequence(scene, seq);
1024                         }
1025
1026                 }
1027         }
1028         SEQ_END
1029 }
1030 */
1031
1032 static void seq_remap_paths(Scene *scene)
1033 {
1034         Sequence *seq, *last_seq = seq_active_get(scene);
1035         Editing *ed= seq_give_editing(scene, FALSE);
1036         char from[FILE_MAX], to[FILE_MAX], stripped[FILE_MAX];
1037
1038
1039         if(last_seq==NULL)
1040                 return;
1041
1042         BLI_strncpy(from, last_seq->strip->dir, FILE_MAX);
1043 // XXX  if (0==sbutton(from, 0, sizeof(from)-1, "From: "))
1044 //              return;
1045
1046         strcpy(to, from);
1047 // XXX  if (0==sbutton(to, 0, sizeof(to)-1, "To: "))
1048 //              return;
1049
1050         if (strcmp(to, from)==0)
1051                 return;
1052
1053         SEQP_BEGIN(ed, seq) {
1054                 if(seq->flag & SELECT) {
1055                         if(strncmp(seq->strip->dir, from, strlen(from))==0) {
1056                                 printf("found %s\n", seq->strip->dir);
1057
1058                                 /* strip off the beginning */
1059                                 stripped[0]= 0;
1060                                 BLI_strncpy(stripped, seq->strip->dir + strlen(from), FILE_MAX);
1061
1062                                 /* new path */
1063                                 BLI_snprintf(seq->strip->dir, sizeof(seq->strip->dir), "%s%s", to, stripped);
1064                                 printf("new %s\n", seq->strip->dir);
1065                         }
1066                 }
1067         }
1068         SEQ_END
1069
1070 }
1071
1072
1073 static void no_gaps(Scene *scene)
1074 {
1075         Editing *ed= seq_give_editing(scene, FALSE);
1076         int cfra, first= 0, done;
1077
1078
1079         if(ed==NULL) return;
1080
1081         for(cfra= CFRA; cfra<=EFRA; cfra++) {
1082                 if(first==0) {
1083                         if( evaluate_seq_frame(scene, cfra) ) first= 1;
1084                 }
1085                 else {
1086                         done= 1;
1087                         while( evaluate_seq_frame(scene, cfra) == 0) {
1088                                 done= insert_gap(scene, -1, cfra);
1089                                 if(done==0) break;
1090                         }
1091                         if(done==0) break;
1092                 }
1093         }
1094
1095 }
1096
1097 #if 0
1098 static int seq_get_snaplimit(View2D *v2d)
1099 {
1100         /* fake mouse coords to get the snap value
1101         a bit lazy but its only done once pre transform */
1102         float xmouse, ymouse, x;
1103         short mval[2] = {24, 0}; /* 24 screen px snap */
1104
1105         UI_view2d_region_to_view(v2d, mval[0], mval[1], &xmouse, &ymouse);
1106         x = xmouse;
1107         mval[0] = 0;
1108         UI_view2d_region_to_view(v2d, mval[0], mval[1], &xmouse, &ymouse);
1109         return (int)(x - xmouse);
1110 }
1111 #endif
1112
1113 /* Operator functions */
1114 int sequencer_edit_poll(bContext *C)
1115 {
1116         return (seq_give_editing(CTX_data_scene(C), FALSE) != NULL);
1117 }
1118
1119 int sequencer_view_poll(bContext *C)
1120 {
1121         SpaceSeq *sseq= CTX_wm_space_seq(C);
1122         Editing *ed= seq_give_editing(CTX_data_scene(C), FALSE);
1123         if (ed && sseq && (sseq->mainb == SEQ_DRAW_IMG_IMBUF))
1124                 return 1;
1125
1126         return 0;
1127 }
1128
1129 /* snap operator*/
1130 static int sequencer_snap_exec(bContext *C, wmOperator *op)
1131 {
1132         Scene *scene= CTX_data_scene(C);
1133
1134         Editing *ed= seq_give_editing(scene, FALSE);
1135         Sequence *seq;
1136         int snap_frame;
1137
1138         snap_frame= RNA_int_get(op->ptr, "frame");
1139
1140         /* also check metas */
1141         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1142                 if (seq->flag & SELECT && !(seq->depth==0 && seq->flag & SEQ_LOCK) &&
1143                         seq_tx_test(seq)) {
1144                         if((seq->flag & (SEQ_LEFTSEL+SEQ_RIGHTSEL))==0) {
1145                                 /* simple but no anim update */
1146                                 /* seq->start= snap_frame-seq->startofs+seq->startstill; */
1147
1148                                 seq_translate(scene, seq, (snap_frame-seq->startofs+seq->startstill) - seq->start);
1149                         } else {
1150                                 if(seq->flag & SEQ_LEFTSEL) {
1151                                         seq_tx_set_final_left(seq, snap_frame);
1152                                 } else { /* SEQ_RIGHTSEL */
1153                                         seq_tx_set_final_right(seq, snap_frame);
1154                                 }
1155                                 seq_tx_handle_xlimits(seq, seq->flag & SEQ_LEFTSEL, seq->flag & SEQ_RIGHTSEL);
1156                         }
1157                         calc_sequence(scene, seq);
1158                 }
1159         }
1160
1161         /* test for effects and overlap
1162          * dont use SEQP_BEGIN since that would be recursive */
1163         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1164                 if(seq->flag & SELECT && !(seq->depth==0 && seq->flag & SEQ_LOCK)) {
1165                         seq->flag &= ~SEQ_OVERLAP;
1166                         if( seq_test_overlap(ed->seqbasep, seq) ) {
1167                                 shuffle_seq(ed->seqbasep, seq, scene);
1168                         }
1169                 }
1170                 else if(seq->type & SEQ_EFFECT) {
1171                         if(seq->seq1 && (seq->seq1->flag & SELECT))
1172                                 calc_sequence(scene, seq);
1173                         else if(seq->seq2 && (seq->seq2->flag & SELECT))
1174                                 calc_sequence(scene, seq);
1175                         else if(seq->seq3 && (seq->seq3->flag & SELECT))
1176                                 calc_sequence(scene, seq);
1177                 }
1178         }
1179
1180         /* as last: */
1181         sort_seq(scene);
1182
1183         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1184
1185         return OPERATOR_FINISHED;
1186 }
1187
1188 static int sequencer_snap_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
1189 {
1190         Scene *scene = CTX_data_scene(C);
1191
1192         int snap_frame;
1193
1194         snap_frame= CFRA;
1195
1196         RNA_int_set(op->ptr, "frame", snap_frame);
1197         return sequencer_snap_exec(C, op);
1198 }
1199
1200 void SEQUENCER_OT_snap(struct wmOperatorType *ot)
1201 {
1202         /* identifiers */
1203         ot->name= "Snap strips";
1204         ot->idname= "SEQUENCER_OT_snap";
1205         ot->description="Frame where selected strips will be snapped";
1206
1207         /* api callbacks */
1208         ot->invoke= sequencer_snap_invoke;
1209         ot->exec= sequencer_snap_exec;
1210         ot->poll= sequencer_edit_poll;
1211
1212         /* flags */
1213         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1214
1215         RNA_def_int(ot->srna, "frame", 0, INT_MIN, INT_MAX, "Frame", "Frame where selected strips will be snapped", INT_MIN, INT_MAX);
1216 }
1217
1218 /* mute operator */
1219 static int sequencer_mute_exec(bContext *C, wmOperator *op)
1220 {
1221         Scene *scene= CTX_data_scene(C);
1222         Editing *ed= seq_give_editing(scene, FALSE);
1223         Sequence *seq;
1224         int selected;
1225
1226         selected= !RNA_boolean_get(op->ptr, "unselected");
1227
1228         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1229                 if ((seq->flag & SEQ_LOCK)==0) {
1230                         if(selected){ /* mute unselected */
1231                                 if(seq->flag & SELECT)
1232                                         seq->flag |= SEQ_MUTE;
1233                         }
1234                         else {
1235                                 if((seq->flag & SELECT)==0)
1236                                         seq->flag |= SEQ_MUTE;
1237                         }
1238                 }
1239         }
1240
1241         seq_update_muting(scene, ed);
1242         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1243
1244         return OPERATOR_FINISHED;
1245 }
1246
1247 void SEQUENCER_OT_mute(struct wmOperatorType *ot)
1248 {
1249         /* identifiers */
1250         ot->name= "Mute Strips";
1251         ot->idname= "SEQUENCER_OT_mute";
1252         ot->description="Mute selected strips";
1253
1254         /* api callbacks */
1255         ot->exec= sequencer_mute_exec;
1256         ot->poll= sequencer_edit_poll;
1257
1258         /* flags */
1259         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1260
1261         RNA_def_boolean(ot->srna, "unselected", 0, "Unselected", "Mute unselected rather than selected strips.");
1262 }
1263
1264
1265 /* unmute operator */
1266 static int sequencer_unmute_exec(bContext *C, wmOperator *op)
1267 {
1268         Scene *scene= CTX_data_scene(C);
1269         Editing *ed= seq_give_editing(scene, FALSE);
1270         Sequence *seq;
1271         int selected;
1272
1273         selected= !RNA_boolean_get(op->ptr, "unselected");
1274
1275         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1276                 if ((seq->flag & SEQ_LOCK)==0) {
1277                         if(selected){ /* unmute unselected */
1278                                 if(seq->flag & SELECT)
1279                                         seq->flag &= ~SEQ_MUTE;
1280                         }
1281                         else {
1282                                 if((seq->flag & SELECT)==0)
1283                                         seq->flag &= ~SEQ_MUTE;
1284                         }
1285                 }
1286         }
1287
1288         seq_update_muting(scene, ed);
1289         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1290
1291         return OPERATOR_FINISHED;
1292 }
1293
1294 void SEQUENCER_OT_unmute(struct wmOperatorType *ot)
1295 {
1296         /* identifiers */
1297         ot->name= "Un-Mute Strips";
1298         ot->idname= "SEQUENCER_OT_unmute";
1299         ot->description="Un-Mute unselected rather than selected strips";
1300
1301         /* api callbacks */
1302         ot->exec= sequencer_unmute_exec;
1303         ot->poll= sequencer_edit_poll;
1304
1305         /* flags */
1306         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1307
1308         RNA_def_boolean(ot->srna, "unselected", 0, "Unselected", "UnMute unselected rather than selected strips.");
1309 }
1310
1311
1312 /* lock operator */
1313 static int sequencer_lock_exec(bContext *C, wmOperator *UNUSED(op))
1314 {
1315         Scene *scene= CTX_data_scene(C);
1316         Editing *ed= seq_give_editing(scene, FALSE);
1317         Sequence *seq;
1318
1319         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1320                 if (seq->flag & SELECT) {
1321                         seq->flag |= SEQ_LOCK;
1322                 }
1323         }
1324
1325         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1326
1327         return OPERATOR_FINISHED;
1328 }
1329
1330 void SEQUENCER_OT_lock(struct wmOperatorType *ot)
1331 {
1332         /* identifiers */
1333         ot->name= "Lock Strips";
1334         ot->idname= "SEQUENCER_OT_lock";
1335         ot->description="Lock the active strip so that it can't be transformed";
1336
1337         /* api callbacks */
1338         ot->exec= sequencer_lock_exec;
1339         ot->poll= sequencer_edit_poll;
1340
1341         /* flags */
1342         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1343 }
1344
1345 /* unlock operator */
1346 static int sequencer_unlock_exec(bContext *C, wmOperator *UNUSED(op))
1347 {
1348         Scene *scene= CTX_data_scene(C);
1349         Editing *ed= seq_give_editing(scene, FALSE);
1350         Sequence *seq;
1351
1352         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1353                 if (seq->flag & SELECT) {
1354                         seq->flag &= ~SEQ_LOCK;
1355                 }
1356         }
1357
1358         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1359
1360         return OPERATOR_FINISHED;
1361 }
1362
1363 void SEQUENCER_OT_unlock(struct wmOperatorType *ot)
1364 {
1365         /* identifiers */
1366         ot->name= "UnLock Strips";
1367         ot->idname= "SEQUENCER_OT_unlock";
1368         ot->description="Unlock the active strip so that it can't be transformed";
1369
1370         /* api callbacks */
1371         ot->exec= sequencer_unlock_exec;
1372         ot->poll= sequencer_edit_poll;
1373
1374         /* flags */
1375         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1376 }
1377
1378 /* reload operator */
1379 static int sequencer_reload_exec(bContext *C, wmOperator *UNUSED(op))
1380 {
1381         Scene *scene= CTX_data_scene(C);
1382         Editing *ed= seq_give_editing(scene, FALSE);
1383         Sequence *seq;
1384
1385         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
1386                 if(seq->flag & SELECT) {
1387                         update_changed_seq_and_deps(scene, seq, 0, 1);
1388                 }
1389         }
1390
1391         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1392
1393         return OPERATOR_FINISHED;
1394 }
1395
1396 void SEQUENCER_OT_reload(struct wmOperatorType *ot)
1397 {
1398         /* identifiers */
1399         ot->name= "Reload Strips";
1400         ot->idname= "SEQUENCER_OT_reload";
1401         ot->description="Reload strips in the sequencer";
1402
1403         /* api callbacks */
1404         ot->exec= sequencer_reload_exec;
1405         ot->poll= sequencer_edit_poll;
1406
1407         /* flags */
1408         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1409 }
1410
1411 /* reload operator */
1412 static int sequencer_refresh_all_exec(bContext *C, wmOperator *UNUSED(op))
1413 {
1414         Scene *scene= CTX_data_scene(C);
1415         Editing *ed= seq_give_editing(scene, FALSE);
1416
1417         free_imbuf_seq(scene, &ed->seqbase, FALSE, FALSE);
1418
1419         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1420
1421         return OPERATOR_FINISHED;
1422 }
1423
1424 void SEQUENCER_OT_refresh_all(struct wmOperatorType *ot)
1425 {
1426         /* identifiers */
1427         ot->name= "Refresh Sequencer";
1428         ot->idname= "SEQUENCER_OT_refresh_all";
1429         ot->description="Refresh the sequencer editor";
1430
1431         /* api callbacks */
1432         ot->exec= sequencer_refresh_all_exec;
1433         ot->poll= sequencer_edit_poll;
1434
1435         /* flags */
1436         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1437 }
1438
1439 static int sequencer_reassign_inputs_exec(bContext *C, wmOperator *op)
1440 {
1441         Scene *scene= CTX_data_scene(C);
1442         Sequence *seq1, *seq2, *seq3, *last_seq = seq_active_get(scene);
1443         const char *error_msg;
1444
1445         if(!seq_effect_find_selected(scene, last_seq, last_seq->type, &seq1, &seq2, &seq3, &error_msg)) {
1446                 BKE_report(op->reports, RPT_ERROR, error_msg);
1447                 return OPERATOR_CANCELLED;
1448         }
1449         /* see reassigning would create a cycle */
1450         if(     seq_is_predecessor(seq1, last_seq) ||
1451                 seq_is_predecessor(seq2, last_seq) ||
1452                 seq_is_predecessor(seq3, last_seq)
1453         ) {
1454                 BKE_report(op->reports, RPT_ERROR, "Can't reassign inputs: no cycles allowed");
1455                 return OPERATOR_CANCELLED;
1456         }
1457
1458         last_seq->seq1 = seq1;
1459         last_seq->seq2 = seq2;
1460         last_seq->seq3 = seq3;
1461
1462         update_changed_seq_and_deps(scene, last_seq, 1, 1);
1463
1464         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1465
1466         return OPERATOR_FINISHED;
1467 }
1468
1469 static int sequencer_effect_poll(bContext *C)
1470 {
1471         Scene *scene= CTX_data_scene(C);
1472         Editing *ed= seq_give_editing(scene, FALSE);
1473
1474         if(ed) {
1475                 Sequence *last_seq= seq_active_get(scene);
1476                 if(last_seq && (last_seq->type & SEQ_EFFECT)) {
1477                         return 1;
1478                 }
1479         }
1480
1481         return 0;
1482 }
1483
1484 void SEQUENCER_OT_reassign_inputs(struct wmOperatorType *ot)
1485 {
1486         /* identifiers */
1487         ot->name= "Reassign Inputs";
1488         ot->idname= "SEQUENCER_OT_reassign_inputs";
1489         ot->description="Reassign the inputs for the effects strip";
1490
1491         /* api callbacks */
1492         ot->exec= sequencer_reassign_inputs_exec;
1493         ot->poll= sequencer_effect_poll;
1494
1495         /* flags */
1496         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1497 }
1498
1499
1500 static int sequencer_swap_inputs_exec(bContext *C, wmOperator *op)
1501 {
1502         Scene *scene= CTX_data_scene(C);
1503         Sequence *seq, *last_seq = seq_active_get(scene);
1504
1505         if(last_seq->seq1==NULL || last_seq->seq2 == NULL) {
1506                 BKE_report(op->reports, RPT_ERROR, "No valid inputs to swap");
1507                 return OPERATOR_CANCELLED;
1508         }
1509
1510         seq = last_seq->seq1;
1511         last_seq->seq1 = last_seq->seq2;
1512         last_seq->seq2 = seq;
1513
1514         update_changed_seq_and_deps(scene, last_seq, 1, 1);
1515
1516         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1517
1518         return OPERATOR_FINISHED;
1519 }
1520 void SEQUENCER_OT_swap_inputs(struct wmOperatorType *ot)
1521 {
1522         /* identifiers */
1523         ot->name= "Swap Inputs";
1524         ot->idname= "SEQUENCER_OT_swap_inputs";
1525         ot->description="Swap the first two inputs for the effects strip";
1526
1527         /* api callbacks */
1528         ot->exec= sequencer_swap_inputs_exec;
1529         ot->poll= sequencer_effect_poll;
1530
1531         /* flags */
1532         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1533 }
1534
1535
1536 /* cut operator */
1537 static EnumPropertyItem prop_cut_types[] = {
1538         {SEQ_CUT_SOFT, "SOFT", 0, "Soft", ""},
1539         {SEQ_CUT_HARD, "HARD", 0, "Hard", ""},
1540         {0, NULL, 0, NULL, NULL}
1541 };
1542
1543 static int sequencer_cut_exec(bContext *C, wmOperator *op)
1544 {
1545         Scene *scene= CTX_data_scene(C);
1546         Editing *ed= seq_give_editing(scene, FALSE);
1547         int cut_side, cut_hard, cut_frame;
1548
1549         ListBase newlist;
1550         int changed;
1551
1552         cut_frame= RNA_int_get(op->ptr, "frame");
1553         cut_hard= RNA_enum_get(op->ptr, "type");
1554         cut_side= RNA_enum_get(op->ptr, "side");
1555
1556         newlist.first= newlist.last= NULL;
1557
1558         if (cut_hard==SEQ_CUT_HARD) {
1559                 changed = cut_seq_list(scene, ed->seqbasep, &newlist, cut_frame, cut_seq_hard);
1560         } else {
1561                 changed = cut_seq_list(scene, ed->seqbasep, &newlist, cut_frame, cut_seq_soft);
1562         }
1563
1564         if (newlist.first) { /* got new strips ? */
1565                 Sequence *seq;
1566                 BLI_movelisttolist(ed->seqbasep, &newlist);
1567
1568                 if (cut_side != SEQ_SIDE_BOTH) {
1569                         SEQP_BEGIN(ed, seq) {
1570                                 if (cut_side==SEQ_SIDE_LEFT) {
1571                                         if ( seq->startdisp >= cut_frame ) {
1572                                                 seq->flag &= ~SEQ_ALLSEL;
1573                                         }
1574                                 } else {
1575                                         if ( seq->enddisp <= cut_frame ) {
1576                                                 seq->flag &= ~SEQ_ALLSEL;
1577                                         }
1578                                 }
1579                         }
1580                         SEQ_END;
1581                 }
1582                 /* as last: */
1583                 sort_seq(scene);
1584         }
1585
1586         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1587
1588         return OPERATOR_FINISHED;
1589 }
1590
1591
1592 static int sequencer_cut_invoke(bContext *C, wmOperator *op, wmEvent *event)
1593 {
1594         Scene *scene = CTX_data_scene(C);
1595         ARegion *ar= CTX_wm_region(C);
1596         View2D *v2d= UI_view2d_fromcontext(C);
1597
1598         int cut_side= SEQ_SIDE_BOTH;
1599         int cut_frame= CFRA;
1600
1601         if (ED_operator_sequencer_active(C) && v2d)
1602                 cut_side= mouse_frame_side(v2d, event->x - ar->winrct.xmin, cut_frame);
1603
1604         RNA_int_set(op->ptr, "frame", cut_frame);
1605         RNA_enum_set(op->ptr, "side", cut_side);
1606         /*RNA_enum_set(op->ptr, "type", cut_hard); */ /*This type is set from the key shortcut */
1607
1608         return sequencer_cut_exec(C, op);
1609 }
1610
1611
1612 void SEQUENCER_OT_cut(struct wmOperatorType *ot)
1613 {
1614         /* identifiers */
1615         ot->name= "Cut Strips";
1616         ot->idname= "SEQUENCER_OT_cut";
1617         ot->description="Cut the selected strips";
1618
1619         /* api callbacks */
1620         ot->invoke= sequencer_cut_invoke;
1621         ot->exec= sequencer_cut_exec;
1622         ot->poll= sequencer_edit_poll;
1623
1624         /* flags */
1625         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1626
1627         RNA_def_int(ot->srna, "frame", 0, INT_MIN, INT_MAX, "Frame", "Frame where selected strips will be cut", INT_MIN, INT_MAX);
1628         RNA_def_enum(ot->srna, "type", prop_cut_types, SEQ_CUT_SOFT, "Type", "The type of cut operation to perform on strips");
1629         RNA_def_enum(ot->srna, "side", prop_side_types, SEQ_SIDE_BOTH, "Side", "The side that remains selected after cutting");
1630 }
1631
1632 /* duplicate operator */
1633 static int apply_unique_name_cb(Sequence *seq, void *arg_pt)
1634 {
1635         Scene *scene= (Scene *)arg_pt;
1636         char name[sizeof(seq->name)-2];
1637
1638         strcpy(name, seq->name+2);
1639         seqbase_unique_name_recursive(&scene->ed->seqbase, seq);
1640         seq_dupe_animdata(scene, name, seq->name+2);
1641         return 1;
1642
1643 }
1644
1645 static int sequencer_add_duplicate_exec(bContext *C, wmOperator *UNUSED(op))
1646 {
1647         Scene *scene= CTX_data_scene(C);
1648         Editing *ed= seq_give_editing(scene, FALSE);
1649
1650         ListBase nseqbase= {NULL, NULL};
1651
1652         if(ed==NULL)
1653                 return OPERATOR_CANCELLED;
1654
1655         seqbase_dupli_recursive(scene, NULL, &nseqbase, ed->seqbasep, SEQ_DUPE_CONTEXT);
1656
1657         if(nseqbase.first) {
1658                 Sequence * seq= nseqbase.first;
1659                 /* rely on the nseqbase list being added at the end */
1660                 BLI_movelisttolist(ed->seqbasep, &nseqbase);
1661
1662                 for( ; seq; seq= seq->next)
1663                         seq_recursive_apply(seq, apply_unique_name_cb, scene);
1664
1665                 WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1666                 return OPERATOR_FINISHED;
1667         }
1668
1669         return OPERATOR_CANCELLED;
1670 }
1671
1672 static int sequencer_add_duplicate_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
1673 {
1674         sequencer_add_duplicate_exec(C, op);
1675
1676         RNA_int_set(op->ptr, "mode", TFM_TRANSLATION);
1677         WM_operator_name_call(C, "TRANSFORM_OT_transform", WM_OP_INVOKE_REGION_WIN, op->ptr);
1678
1679         return OPERATOR_FINISHED;
1680 }
1681
1682 void SEQUENCER_OT_duplicate(wmOperatorType *ot)
1683 {
1684         /* identifiers */
1685         ot->name= "Duplicate";
1686         ot->idname= "SEQUENCER_OT_duplicate";
1687         ot->description="Duplicate the selected strips";
1688
1689         /* api callbacks */
1690         ot->invoke= sequencer_add_duplicate_invoke;
1691         ot->exec= sequencer_add_duplicate_exec;
1692         ot->poll= ED_operator_sequencer_active;
1693
1694         /* flags */
1695         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1696
1697         /* to give to transform */
1698         RNA_def_int(ot->srna, "mode", TFM_TRANSLATION, 0, INT_MAX, "Mode", "", 0, INT_MAX);
1699 }
1700
1701 /* delete operator */
1702 static int sequencer_delete_exec(bContext *C, wmOperator *UNUSED(op))
1703 {
1704         Scene *scene= CTX_data_scene(C);
1705         Editing *ed= seq_give_editing(scene, FALSE);
1706         Sequence *seq;
1707         MetaStack *ms;
1708         int nothingSelected = TRUE;
1709
1710         seq=seq_active_get(scene);
1711         if (seq && seq->flag & SELECT) { /* avoid a loop since this is likely to be selected */
1712                 nothingSelected = FALSE;
1713         } else {
1714                 for (seq = ed->seqbasep->first; seq; seq = seq->next) {
1715                         if (seq->flag & SELECT) {
1716                                 nothingSelected = FALSE;
1717                                 break;
1718                         }
1719                 }
1720         }
1721
1722         if (nothingSelected)
1723                 return OPERATOR_FINISHED;
1724
1725         /* free imbufs of all dependent strips */
1726         for(seq=ed->seqbasep->first; seq; seq=seq->next)
1727                 if(seq->flag & SELECT)
1728                         update_changed_seq_and_deps(scene, seq, 1, 0);
1729
1730         /* for effects, try to find a replacement input */
1731         for(seq=ed->seqbasep->first; seq; seq=seq->next)
1732                 if((seq->type & SEQ_EFFECT) && !(seq->flag & SELECT))
1733                         del_seq_find_replace_recurs(scene, seq);
1734
1735         /* delete all selected strips */
1736         recurs_del_seq_flag(scene, ed->seqbasep, SELECT, 0);
1737
1738         /* updates lengths etc */
1739         seq= ed->seqbasep->first;
1740         while(seq) {
1741                 calc_sequence(scene, seq);
1742                 seq= seq->next;
1743         }
1744
1745         /* free parent metas */
1746         ms= ed->metastack.last;
1747         while(ms) {
1748                 ms->parseq->strip->len= 0;              /* force new alloc */
1749                 calc_sequence(scene, ms->parseq);
1750                 ms= ms->prev;
1751         }
1752
1753         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1754
1755         return OPERATOR_FINISHED;
1756 }
1757
1758
1759 void SEQUENCER_OT_delete(wmOperatorType *ot)
1760 {
1761
1762         /* identifiers */
1763         ot->name= "Erase Strips";
1764         ot->idname= "SEQUENCER_OT_delete";
1765         ot->description="Erase selected strips from the sequencer";
1766
1767         /* api callbacks */
1768         ot->invoke= WM_operator_confirm;
1769         ot->exec= sequencer_delete_exec;
1770         ot->poll= sequencer_edit_poll;
1771
1772         /* flags */
1773         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1774 }
1775
1776
1777 /* separate_images operator */
1778 static int sequencer_separate_images_exec(bContext *C, wmOperator *op)
1779 {
1780         Scene *scene= CTX_data_scene(C);
1781         Editing *ed= seq_give_editing(scene, FALSE);
1782
1783         Sequence *seq, *seq_new;
1784         Strip *strip_new;
1785         StripElem *se, *se_new;
1786         int start_ofs, cfra, frame_end;
1787         int step= RNA_int_get(op->ptr, "length");
1788
1789         seq= ed->seqbasep->first; /* poll checks this is valid */
1790
1791         while (seq) {
1792                 if((seq->flag & SELECT) && (seq->type == SEQ_IMAGE) && (seq->len > 1)) {
1793                         /* remove seq so overlap tests dont conflict,
1794                         see seq_free_sequence below for the real free'ing */
1795                         BLI_remlink(ed->seqbasep, seq);
1796                         /* if(seq->ipo) seq->ipo->id.us--; */
1797                         /* XXX, remove fcurve and assign to split image strips */
1798
1799                         start_ofs = cfra = seq_tx_get_final_left(seq, 0);
1800                         frame_end = seq_tx_get_final_right(seq, 0);
1801
1802                         while (cfra < frame_end) {
1803                                 /* new seq */
1804                                 se = give_stripelem(seq, cfra);
1805
1806                                 seq_new= alloc_sequence(ed->seqbasep, start_ofs, seq->machine);
1807                                 seq_new->type= SEQ_IMAGE;
1808                                 seq_new->len = 1;
1809                                 seq_new->endstill = step-1;
1810
1811                                 /* new strip */
1812                                 seq_new->strip= strip_new= MEM_callocN(sizeof(Strip)*1, "strip");
1813                                 strip_new->len= 1;
1814                                 strip_new->us= 1;
1815                                 strncpy(strip_new->dir, seq->strip->dir, FILE_MAXDIR-1);
1816
1817                                 /* new stripdata */
1818                                 strip_new->stripdata= se_new= MEM_callocN(sizeof(StripElem)*1, "stripelem");
1819                                 BLI_strncpy(se_new->name, se->name, sizeof(se_new->name));
1820                                 calc_sequence(scene, seq_new);
1821
1822                                 if(step > 1) {
1823                                         seq_new->flag &= ~SEQ_OVERLAP;
1824                                         if (seq_test_overlap(ed->seqbasep, seq_new)) {
1825                                                 shuffle_seq(ed->seqbasep, seq_new, scene);
1826                                         }
1827                                 }
1828
1829                                 /* XXX, COPY FCURVES */
1830                                 strncpy(seq_new->name+2, seq->name+2, sizeof(seq->name)-2);
1831                                 seqbase_unique_name_recursive(&scene->ed->seqbase, seq_new);
1832
1833                                 cfra++;
1834                                 start_ofs += step;
1835                         }
1836
1837                         seq_free_sequence(scene, seq);
1838                         seq = seq->next;
1839                 } else {
1840                         seq = seq->next;
1841                 }
1842         }
1843
1844         /* as last: */
1845         sort_seq(scene);
1846
1847         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1848
1849         return OPERATOR_FINISHED;
1850 }
1851
1852
1853 void SEQUENCER_OT_images_separate(wmOperatorType *ot)
1854 {
1855         /* identifiers */
1856         ot->name= "Separate Images";
1857         ot->idname= "SEQUENCER_OT_images_separate";
1858         ot->description="On image sequences strips, it return a strip for each image";
1859
1860         /* api callbacks */
1861         ot->invoke= WM_operator_props_popup;
1862         ot->exec= sequencer_separate_images_exec;
1863         ot->poll= sequencer_edit_poll;
1864
1865         /* flags */
1866         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1867
1868         RNA_def_int(ot->srna, "length", 1, 1, 1000, "Length", "Length of each frame", 1, INT_MAX);
1869 }
1870
1871
1872 /* META Operators */
1873
1874 /* separate_meta_toggle operator */
1875 static int sequencer_meta_toggle_exec(bContext *C, wmOperator *UNUSED(op))
1876 {
1877         Scene *scene= CTX_data_scene(C);
1878         Editing *ed= seq_give_editing(scene, FALSE);
1879         Sequence *last_seq= seq_active_get(scene);
1880         MetaStack *ms;
1881
1882         if(last_seq && last_seq->type==SEQ_META && last_seq->flag & SELECT) {
1883                 /* Enter Metastrip */
1884                 ms= MEM_mallocN(sizeof(MetaStack), "metastack");
1885                 BLI_addtail(&ed->metastack, ms);
1886                 ms->parseq= last_seq;
1887                 ms->oldbasep= ed->seqbasep;
1888
1889                 ed->seqbasep= &last_seq->seqbase;
1890
1891                 seq_active_set(scene, NULL);
1892
1893         }
1894         else {
1895                 /* Exit Metastrip (if possible) */
1896
1897                 Sequence *seq;
1898
1899                 if(ed->metastack.first==NULL)
1900                         return OPERATOR_CANCELLED;
1901
1902                 ms= ed->metastack.last;
1903                 BLI_remlink(&ed->metastack, ms);
1904
1905                 ed->seqbasep= ms->oldbasep;
1906
1907                 /* recalc all: the meta can have effects connected to it */
1908                 for(seq= ed->seqbasep->first; seq; seq= seq->next)
1909                         calc_sequence(scene, seq);
1910
1911                 seq_active_set(scene, ms->parseq);
1912
1913                 ms->parseq->flag |= SELECT;
1914                 recurs_sel_seq(ms->parseq);
1915
1916                 MEM_freeN(ms);
1917
1918         }
1919
1920         seq_update_muting(scene, ed);
1921         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1922
1923         return OPERATOR_FINISHED;
1924 }
1925
1926 void SEQUENCER_OT_meta_toggle(wmOperatorType *ot)
1927 {
1928         /* identifiers */
1929         ot->name= "Toggle Meta Strip";
1930         ot->idname= "SEQUENCER_OT_meta_toggle";
1931         ot->description="Toggle a metastrip (to edit enclosed strips)";
1932
1933         /* api callbacks */
1934         ot->exec= sequencer_meta_toggle_exec;
1935         ot->poll= sequencer_edit_poll;
1936
1937         /* flags */
1938         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
1939 }
1940
1941
1942 /* separate_meta_make operator */
1943 static int sequencer_meta_make_exec(bContext *C, wmOperator *op)
1944 {
1945         Scene *scene= CTX_data_scene(C);
1946         Editing *ed= seq_give_editing(scene, FALSE);
1947
1948         Sequence *seq, *seqm, *next, *last_seq = seq_active_get(scene);
1949         int channel_max= 1;
1950
1951         if(seqbase_isolated_sel_check(ed->seqbasep)==FALSE) {
1952                 BKE_report(op->reports, RPT_ERROR, "Please select all related strips");
1953                 return OPERATOR_CANCELLED;
1954         }
1955
1956         /* remove all selected from main list, and put in meta */
1957
1958         seqm= alloc_sequence(ed->seqbasep, 1, 1); /* channel number set later */
1959         strcpy(seqm->name+2, "MetaStrip");
1960         seqm->type= SEQ_META;
1961         seqm->flag= SELECT;
1962
1963         seq= ed->seqbasep->first;
1964         while(seq) {
1965                 next= seq->next;
1966                 if(seq!=seqm && (seq->flag & SELECT)) {
1967                         channel_max= MAX2(seq->machine, channel_max);
1968                         BLI_remlink(ed->seqbasep, seq);
1969                         BLI_addtail(&seqm->seqbase, seq);
1970                 }
1971                 seq= next;
1972         }
1973         seqm->machine= last_seq ? last_seq->machine : channel_max;
1974         calc_sequence(scene, seqm);
1975
1976         seqm->strip= MEM_callocN(sizeof(Strip), "metastrip");
1977         seqm->strip->len= seqm->len;
1978         seqm->strip->us= 1;
1979
1980         seq_active_set(scene, seqm);
1981
1982         if( seq_test_overlap(ed->seqbasep, seqm) ) shuffle_seq(ed->seqbasep, seqm, scene);
1983
1984         seq_update_muting(scene, ed);
1985
1986         seqbase_unique_name_recursive(&scene->ed->seqbase, seqm);
1987
1988         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
1989
1990         return OPERATOR_FINISHED;
1991 }
1992
1993 void SEQUENCER_OT_meta_make(wmOperatorType *ot)
1994 {
1995         /* identifiers */
1996         ot->name= "Make Meta Strip";
1997         ot->idname= "SEQUENCER_OT_meta_make";
1998         ot->description="Group selected strips into a metastrip";
1999
2000         /* api callbacks */
2001         ot->invoke= WM_operator_confirm;
2002         ot->exec= sequencer_meta_make_exec;
2003         ot->poll= sequencer_edit_poll;
2004
2005         /* flags */
2006         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2007 }
2008
2009
2010 static int seq_depends_on_meta(Sequence *seq, Sequence *seqm)
2011 {
2012         if (seq == seqm) return 1;
2013         else if (seq->seq1 && seq_depends_on_meta(seq->seq1, seqm)) return 1;
2014         else if (seq->seq2 && seq_depends_on_meta(seq->seq2, seqm)) return 1;
2015         else if (seq->seq3 && seq_depends_on_meta(seq->seq3, seqm)) return 1;
2016         else return 0;
2017 }
2018
2019 /* separate_meta_make operator */
2020 static int sequencer_meta_separate_exec(bContext *C, wmOperator *UNUSED(op))
2021 {
2022         Scene *scene= CTX_data_scene(C);
2023         Editing *ed= seq_give_editing(scene, FALSE);
2024
2025         Sequence *seq, *last_seq = seq_active_get(scene); /* last_seq checks ed==NULL */
2026
2027         if(last_seq==NULL || last_seq->type!=SEQ_META)
2028                 return OPERATOR_CANCELLED;
2029
2030         BLI_movelisttolist(ed->seqbasep, &last_seq->seqbase);
2031
2032         last_seq->seqbase.first= 0;
2033         last_seq->seqbase.last= 0;
2034
2035         BLI_remlink(ed->seqbasep, last_seq);
2036         seq_free_sequence(scene, last_seq);
2037
2038         /* emtpy meta strip, delete all effects depending on it */
2039         for(seq=ed->seqbasep->first; seq; seq=seq->next)
2040                 if((seq->type & SEQ_EFFECT) && seq_depends_on_meta(seq, last_seq))
2041                         seq->flag |= SEQ_FLAG_DELETE;
2042
2043         recurs_del_seq_flag(scene, ed->seqbasep, SEQ_FLAG_DELETE, 0);
2044
2045         /* test for effects and overlap
2046          * dont use SEQP_BEGIN since that would be recursive */
2047         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
2048                 if(seq->flag & SELECT) {
2049                         seq->flag &= ~SEQ_OVERLAP;
2050                         if(seq_test_overlap(ed->seqbasep, seq)) {
2051                                 shuffle_seq(ed->seqbasep, seq, scene);
2052                         }
2053                 }
2054         }
2055
2056         sort_seq(scene);
2057         seq_update_muting(scene, ed);
2058
2059         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
2060
2061         return OPERATOR_FINISHED;
2062 }
2063
2064 void SEQUENCER_OT_meta_separate(wmOperatorType *ot)
2065 {
2066         /* identifiers */
2067         ot->name= "UnMeta Strip";
2068         ot->idname= "SEQUENCER_OT_meta_separate";
2069         ot->description="Put the contents of a metastrip back in the sequencer";
2070
2071         /* api callbacks */
2072         ot->invoke= WM_operator_confirm;
2073         ot->exec= sequencer_meta_separate_exec;
2074         ot->poll= sequencer_edit_poll;
2075
2076         /* flags */
2077         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2078 }
2079
2080 /* view_all operator */
2081 static int sequencer_view_all_exec(bContext *C, wmOperator *UNUSED(op))
2082 {
2083         //Scene *scene= CTX_data_scene(C);
2084         bScreen *sc= CTX_wm_screen(C);
2085         ScrArea *area= CTX_wm_area(C);
2086         //ARegion *ar= CTX_wm_region(C);
2087         View2D *v2d= UI_view2d_fromcontext(C);
2088
2089         v2d->cur= v2d->tot;
2090         UI_view2d_curRect_validate(v2d);
2091         UI_view2d_sync(sc, area, v2d, V2D_LOCK_COPY);
2092
2093         ED_area_tag_redraw(CTX_wm_area(C));
2094         return OPERATOR_FINISHED;
2095 }
2096
2097 void SEQUENCER_OT_view_all(wmOperatorType *ot)
2098 {
2099         /* identifiers */
2100         ot->name= "View All";
2101         ot->idname= "SEQUENCER_OT_view_all";
2102         ot->description="View all the strips in the sequencer";
2103
2104         /* api callbacks */
2105         ot->exec= sequencer_view_all_exec;
2106         ot->poll= ED_operator_sequencer_active;
2107
2108         /* flags */
2109         ot->flag= OPTYPE_REGISTER;
2110 }
2111
2112 /* view_all operator */
2113 static int sequencer_view_all_preview_exec(bContext *C, wmOperator *UNUSED(op))
2114 {
2115         bScreen *sc= CTX_wm_screen(C);
2116         ScrArea *area= CTX_wm_area(C);
2117 #if 0
2118         ARegion *ar= CTX_wm_region(C);
2119         SpaceSeq *sseq= area->spacedata.first;
2120         Scene *scene= CTX_data_scene(C);
2121 #endif
2122         View2D *v2d= UI_view2d_fromcontext(C);
2123
2124         v2d->cur= v2d->tot;
2125         UI_view2d_curRect_validate(v2d);
2126         UI_view2d_sync(sc, area, v2d, V2D_LOCK_COPY);
2127
2128 #if 0
2129         /* Like zooming on an image view */
2130         float zoomX, zoomY;
2131         int width, height, imgwidth, imgheight;
2132
2133         width = ar->winx;
2134         height = ar->winy;
2135
2136         seq_reset_imageofs(sseq);
2137
2138         imgwidth= (scene->r.size*scene->r.xsch)/100;
2139         imgheight= (scene->r.size*scene->r.ysch)/100;
2140
2141         /* Apply aspect, dosnt need to be that accurate */
2142         imgwidth= (int)(imgwidth * (scene->r.xasp / scene->r.yasp));
2143
2144         if (((imgwidth >= width) || (imgheight >= height)) &&
2145                 ((width > 0) && (height > 0))) {
2146
2147                 /* Find the zoom value that will fit the image in the image space */
2148                 zoomX = ((float)width) / ((float)imgwidth);
2149                 zoomY = ((float)height) / ((float)imgheight);
2150                 sseq->zoom= (zoomX < zoomY) ? zoomX : zoomY;
2151
2152                 sseq->zoom = 1.0f / power_of_2(1/ MIN2(zoomX, zoomY) );
2153         }
2154         else {
2155                 sseq->zoom= 1.0f;
2156         }
2157 #endif
2158
2159         ED_area_tag_redraw(CTX_wm_area(C));
2160         return OPERATOR_FINISHED;
2161 }
2162
2163 void SEQUENCER_OT_view_all_preview(wmOperatorType *ot)
2164 {
2165         /* identifiers */
2166         ot->name= "View All";
2167         ot->idname= "SEQUENCER_OT_view_all_preview";
2168         ot->description="Zoom preview to fit in the area";
2169
2170         /* api callbacks */
2171         ot->exec= sequencer_view_all_preview_exec;
2172         ot->poll= ED_operator_sequencer_active;
2173
2174         /* flags */
2175         ot->flag= OPTYPE_REGISTER;
2176 }
2177
2178
2179 static int sequencer_view_zoom_ratio_exec(bContext *C, wmOperator *op)
2180 {
2181         RenderData *r= &CTX_data_scene(C)->r;
2182         View2D *v2d= UI_view2d_fromcontext(C);
2183
2184         float ratio= RNA_float_get(op->ptr, "ratio");
2185
2186         float winx= (int)(r->size * r->xsch)/100;
2187         float winy= (int)(r->size * r->ysch)/100;
2188
2189         float facx= (v2d->mask.xmax - v2d->mask.xmin) / winx;
2190         float facy= (v2d->mask.ymax - v2d->mask.ymin) / winy;
2191
2192         BLI_resize_rctf(&v2d->cur, (int)(winx*facx*ratio) + 1, (int)(winy*facy*ratio) + 1);
2193
2194         ED_region_tag_redraw(CTX_wm_region(C));
2195
2196         return OPERATOR_FINISHED;
2197 }
2198
2199 void SEQUENCER_OT_view_zoom_ratio(wmOperatorType *ot)
2200 {
2201         /* identifiers */
2202         ot->name= "Sequencer View Zoom Ratio";
2203         ot->idname= "SEQUENCER_OT_view_zoom_ratio";
2204         ot->description = "Change zoom ratio of sequencer preview";
2205
2206         /* api callbacks */
2207         ot->exec= sequencer_view_zoom_ratio_exec;
2208         ot->poll= ED_operator_sequencer_active;
2209
2210         /* properties */
2211         RNA_def_float(ot->srna, "ratio", 1.0f, 0.0f, FLT_MAX,
2212                 "Ratio", "Zoom ratio, 1.0 is 1:1, higher is zoomed in, lower is zoomed out.", -FLT_MAX, FLT_MAX);
2213 }
2214
2215
2216 #if 0
2217 static EnumPropertyItem view_type_items[] = {
2218                 {SEQ_VIEW_SEQUENCE, "SEQUENCER", ICON_SEQ_SEQUENCER, "Sequencer", ""},
2219                 {SEQ_VIEW_PREVIEW,  "PREVIEW", ICON_SEQ_PREVIEW, "Image Preview", ""},
2220                 {SEQ_VIEW_SEQUENCE_PREVIEW,  "SEQUENCER_PREVIEW", ICON_SEQ_SEQUENCER, "Sequencer and Image Preview", ""},
2221                 {0, NULL, 0, NULL, NULL}};
2222 #endif
2223
2224 /* view_all operator */
2225 static int sequencer_view_toggle_exec(bContext *C, wmOperator *UNUSED(op))
2226 {
2227         SpaceSeq *sseq= (SpaceSeq *)CTX_wm_space_data(C);
2228
2229         sseq->view++;
2230         if (sseq->view > SEQ_VIEW_SEQUENCE_PREVIEW) sseq->view = SEQ_VIEW_SEQUENCE;
2231
2232         ED_sequencer_update_view(C, sseq->view);
2233
2234         return OPERATOR_FINISHED;
2235 }
2236
2237 void SEQUENCER_OT_view_toggle(wmOperatorType *ot)
2238 {
2239         /* identifiers */
2240         ot->name= "View Toggle";
2241         ot->idname= "SEQUENCER_OT_view_toggle";
2242         ot->description="Toggle between sequencer views (sequence, preview, both)";
2243
2244         /* api callbacks */
2245         ot->exec= sequencer_view_toggle_exec;
2246         ot->poll= ED_operator_sequencer_active;
2247
2248         /* flags */
2249         ot->flag= OPTYPE_REGISTER;
2250 }
2251
2252
2253 /* view_selected operator */
2254 static int sequencer_view_selected_exec(bContext *C, wmOperator *UNUSED(op))
2255 {
2256         Scene *scene= CTX_data_scene(C);
2257         View2D *v2d= UI_view2d_fromcontext(C);
2258         ScrArea *area= CTX_wm_area(C);
2259         bScreen *sc= CTX_wm_screen(C);
2260         Editing *ed= seq_give_editing(scene, FALSE);
2261         Sequence *seq;
2262
2263         int xmin=  MAXFRAME*2;
2264         int xmax= -MAXFRAME*2;
2265         int ymin=  MAXSEQ+1;
2266         int ymax= 0;
2267         int orig_height;
2268         int ymid;
2269         int ymargin= 1;
2270         int xmargin= FPS;
2271
2272         if(ed==NULL)
2273                 return OPERATOR_CANCELLED;
2274
2275         for(seq=ed->seqbasep->first; seq; seq=seq->next) {
2276                 if(seq->flag & SELECT) {
2277                         xmin= MIN2(xmin, seq->startdisp);
2278                         xmax= MAX2(xmax, seq->enddisp);
2279
2280                         ymin= MIN2(ymin, seq->machine);
2281                         ymax= MAX2(ymax, seq->machine);
2282                 }
2283         }
2284
2285         if (ymax != 0) {
2286
2287                 xmax += xmargin;
2288                 xmin -= xmargin;
2289                 ymax += ymargin;
2290                 ymin -= ymargin;
2291
2292                 orig_height= v2d->cur.ymax - v2d->cur.ymin;
2293
2294                 v2d->cur.xmin= xmin;
2295                 v2d->cur.xmax= xmax;
2296
2297                 v2d->cur.ymin= ymin;
2298                 v2d->cur.ymax= ymax;
2299
2300                 /* only zoom out vertically */
2301                 if (orig_height > v2d->cur.ymax - v2d->cur.ymin) {
2302                         ymid= (v2d->cur.ymax + v2d->cur.ymin) / 2;
2303
2304                         v2d->cur.ymin= ymid - (orig_height/2);
2305                         v2d->cur.ymax= ymid + (orig_height/2);
2306                 }
2307
2308                 UI_view2d_curRect_validate(v2d);
2309                 UI_view2d_sync(sc, area, v2d, V2D_LOCK_COPY);
2310
2311                 ED_area_tag_redraw(CTX_wm_area(C));
2312         }
2313
2314         return OPERATOR_FINISHED;
2315 }
2316
2317 void SEQUENCER_OT_view_selected(wmOperatorType *ot)
2318 {
2319         /* identifiers */
2320         ot->name= "View Selected";
2321         ot->idname= "SEQUENCER_OT_view_selected";
2322         ot->description="Zoom the sequencer on the selected strips";
2323
2324         /* api callbacks */
2325         ot->exec= sequencer_view_selected_exec;
2326         ot->poll= ED_operator_sequencer_active;
2327
2328         /* flags */
2329         ot->flag= OPTYPE_REGISTER;
2330 }
2331
2332
2333 static int find_next_prev_edit(Scene *scene, int cfra, int side)
2334 {
2335         Editing *ed= seq_give_editing(scene, FALSE);
2336         Sequence *seq,*best_seq = NULL,*frame_seq = NULL;
2337
2338         int dist, best_dist;
2339         best_dist = MAXFRAME*2;
2340
2341         if(ed==NULL) return cfra;
2342
2343         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
2344                 dist = MAXFRAME*2;
2345
2346                 switch (side) {
2347                         case SEQ_SIDE_LEFT:
2348                                 if (seq->startdisp < cfra) {
2349                                         dist = cfra - seq->startdisp;
2350                                 }
2351                                 break;
2352                         case SEQ_SIDE_RIGHT:
2353                                 if (seq->startdisp > cfra) {
2354                                         dist = seq->startdisp - cfra;
2355                                 } else if (seq->startdisp == cfra) {
2356                                         frame_seq=seq;
2357                                 }
2358                                 break;
2359                 }
2360
2361                 if (dist < best_dist) {
2362                         best_dist = dist;
2363                         best_seq = seq;
2364                 }
2365         }
2366
2367         /* if no sequence to the right is found and the
2368            frame is on the start of the last sequence,
2369            move to the end of the last sequence */
2370         if (frame_seq) cfra = frame_seq->enddisp;
2371
2372         return best_seq ? best_seq->startdisp : cfra;
2373 }
2374
2375 static int next_prev_edit_internal(Scene *scene, int side)
2376 {
2377         int change=0;
2378         int cfra = CFRA;
2379         int nfra= find_next_prev_edit(scene, cfra, side);
2380
2381         if (nfra != cfra) {
2382                 CFRA = nfra;
2383                 change= 1;
2384         }
2385
2386         return change;
2387 }
2388
2389 /* move frame to next edit point operator */
2390 static int sequencer_next_edit_exec(bContext *C, wmOperator *UNUSED(op))
2391 {
2392         Scene *scene= CTX_data_scene(C);
2393
2394         if(!next_prev_edit_internal(scene, SEQ_SIDE_RIGHT))
2395                 return OPERATOR_CANCELLED;
2396
2397         WM_event_add_notifier(C, NC_SCENE|ND_FRAME, scene);
2398
2399         return OPERATOR_FINISHED;
2400 }
2401
2402 void SEQUENCER_OT_next_edit(wmOperatorType *ot)
2403 {
2404         /* identifiers */
2405         ot->name= "Next Edit";
2406         ot->idname= "SEQUENCER_OT_next_edit";
2407         ot->description="Move frame to next edit point";
2408
2409         /* api callbacks */
2410         ot->exec= sequencer_next_edit_exec;
2411         ot->poll= sequencer_edit_poll;
2412
2413         /* flags */
2414         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2415
2416         /* properties */
2417 }
2418
2419 /* move frame to previous edit point operator */
2420 static int sequencer_previous_edit_exec(bContext *C, wmOperator *UNUSED(op))
2421 {
2422         Scene *scene= CTX_data_scene(C);
2423
2424         if(!next_prev_edit_internal(scene, SEQ_SIDE_LEFT))
2425                 return OPERATOR_CANCELLED;
2426
2427         WM_event_add_notifier(C, NC_SCENE|ND_FRAME, scene);
2428
2429         return OPERATOR_FINISHED;
2430 }
2431
2432 void SEQUENCER_OT_previous_edit(wmOperatorType *ot)
2433 {
2434         /* identifiers */
2435         ot->name= "Previous Edit";
2436         ot->idname= "SEQUENCER_OT_previous_edit";
2437         ot->description="Move frame to previous edit point";
2438
2439         /* api callbacks */
2440         ot->exec= sequencer_previous_edit_exec;
2441         ot->poll= sequencer_edit_poll;
2442
2443         /* flags */
2444         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2445
2446         /* properties */
2447 }
2448
2449 static void swap_sequence(Scene* scene, Sequence* seqa, Sequence* seqb)
2450 {
2451         int gap = seqb->startdisp - seqa->enddisp;
2452         seqb->start = (seqb->start - seqb->startdisp) + seqa->startdisp;
2453         calc_sequence(scene, seqb);
2454         seqa->start = (seqa->start - seqa->startdisp) + seqb->enddisp + gap;
2455         calc_sequence(scene, seqa);
2456 }
2457
2458 #if 0
2459 static Sequence* sequence_find_parent(Scene* scene, Sequence* child)
2460 {
2461         Editing *ed= seq_give_editing(scene, FALSE);
2462         Sequence *parent= NULL;
2463         Sequence *seq;
2464
2465         if(ed==NULL) return NULL;
2466
2467         for(seq= ed->seqbasep->first; seq; seq= seq->next) {
2468                 if ( (seq != child) && seq_is_parent(seq, child) ) {
2469                         parent = seq;
2470                         break;
2471                 }
2472         }
2473
2474         return parent;
2475 }
2476 #endif
2477
2478 static int sequencer_swap_exec(bContext *C, wmOperator *op)
2479 {
2480         Scene *scene= CTX_data_scene(C);
2481         Editing *ed= seq_give_editing(scene, FALSE);
2482         Sequence *active_seq = seq_active_get(scene);
2483         Sequence *seq, *iseq;
2484         int side= RNA_enum_get(op->ptr, "side");
2485
2486         if(active_seq==NULL) return OPERATOR_CANCELLED;
2487
2488         seq = find_next_prev_sequence(scene, active_seq, side, -1);
2489
2490         if(seq) {
2491
2492                 /* disallow effect strips */
2493                 if (get_sequence_effect_num_inputs(seq->type) >= 1 && (seq->effectdata || seq->seq1 || seq->seq2 || seq->seq3))
2494                         return OPERATOR_CANCELLED;
2495                 if ((get_sequence_effect_num_inputs(active_seq->type) >= 1) && (active_seq->effectdata || active_seq->seq1 || active_seq->seq2 || active_seq->seq3))
2496                         return OPERATOR_CANCELLED;
2497
2498                 switch (side) {
2499                         case SEQ_SIDE_LEFT:
2500                                 swap_sequence(scene, seq, active_seq);
2501                                 break;
2502                         case SEQ_SIDE_RIGHT:
2503                                 swap_sequence(scene, active_seq, seq);
2504                                 break;
2505                 }
2506
2507                 // XXX - should be a generic function
2508                 for(iseq= scene->ed->seqbasep->first; iseq; iseq= iseq->next) {
2509                         if((iseq->type & SEQ_EFFECT) && (seq_is_parent(iseq, active_seq) || seq_is_parent(iseq, seq))) {
2510                                 calc_sequence(scene, iseq);
2511                         }
2512                 }
2513
2514                 /* do this in a new loop since both effects need to be calculated first */
2515                 for(iseq= scene->ed->seqbasep->first; iseq; iseq= iseq->next) {
2516                         if((iseq->type & SEQ_EFFECT) && (seq_is_parent(iseq, active_seq) || seq_is_parent(iseq, seq))) {
2517                                 /* this may now overlap */
2518                                 if( seq_test_overlap(ed->seqbasep, iseq) ) {
2519                                         shuffle_seq(ed->seqbasep, iseq, scene);
2520                                 }
2521                         }
2522                 }
2523
2524
2525
2526                 sort_seq(scene);
2527
2528                 WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
2529
2530                 return OPERATOR_FINISHED;
2531         }
2532
2533         return OPERATOR_CANCELLED;
2534 }
2535
2536 void SEQUENCER_OT_swap(wmOperatorType *ot)
2537 {
2538         /* identifiers */
2539         ot->name= "Swap Strip";
2540         ot->idname= "SEQUENCER_OT_swap";
2541         ot->description="Swap active strip with strip to the left";
2542
2543         /* api callbacks */
2544         ot->exec= sequencer_swap_exec;
2545         ot->poll= sequencer_edit_poll;
2546
2547         /* flags */
2548         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2549
2550         /* properties */
2551         RNA_def_enum(ot->srna, "side", prop_side_lr_types, SEQ_SIDE_RIGHT, "Side", "Side of the strip to swap");
2552 }
2553
2554 static int sequencer_rendersize_exec(bContext *C, wmOperator *UNUSED(op))
2555 {
2556         int retval = OPERATOR_CANCELLED;
2557         Scene *scene= CTX_data_scene(C);
2558         Sequence *active_seq = seq_active_get(scene);
2559         StripElem *se = NULL;
2560
2561         if(active_seq==NULL)
2562                 return OPERATOR_CANCELLED;
2563
2564
2565         if (active_seq->strip) {
2566                 switch (active_seq->type) {
2567                 case SEQ_IMAGE:
2568                         se = give_stripelem(active_seq, scene->r.cfra);
2569                         break;
2570                 case SEQ_MOVIE:
2571                         se = active_seq->strip->stripdata;
2572                         break;
2573                 case SEQ_SCENE:
2574                 case SEQ_META:
2575                 case SEQ_RAM_SOUND:
2576                 case SEQ_HD_SOUND:
2577                 default:
2578                         break;
2579                 }
2580         }
2581
2582         if (se) {
2583                 // prevent setting the render size if sequence values aren't initialized
2584                 if ( (se->orig_width > 0) && (se->orig_height > 0) ) {
2585                         scene->r.xsch= se->orig_width;
2586                         scene->r.ysch= se->orig_height;
2587                         WM_event_add_notifier(C, NC_SCENE|ND_RENDER_OPTIONS, scene);
2588                         retval = OPERATOR_FINISHED;
2589                 }
2590         }
2591
2592         return retval;
2593 }
2594
2595 void SEQUENCER_OT_rendersize(wmOperatorType *ot)
2596 {
2597         /* identifiers */
2598         ot->name= "Set Render Size";
2599         ot->idname= "SEQUENCER_OT_rendersize";
2600         ot->description="Set render size and aspect from active sequence";
2601
2602         /* api callbacks */
2603         ot->exec= sequencer_rendersize_exec;
2604         ot->poll= sequencer_edit_poll;
2605
2606         /* flags */
2607         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2608
2609         /* properties */
2610 }
2611
2612 static void seq_del_sound(Scene *scene, Sequence *seq)
2613 {
2614         if(seq->type == SEQ_META) {
2615                 Sequence *iseq;
2616                 for(iseq= seq->seqbase.first; iseq; iseq= iseq->next) {
2617                         seq_del_sound(scene, iseq);
2618                 }
2619         }
2620         else if(seq->scene_sound) {
2621                 sound_remove_scene_sound(scene, seq->scene_sound);
2622                 seq->scene_sound = NULL;
2623         }
2624 }
2625
2626 /* TODO, validate scenes */
2627 static int sequencer_copy_exec(bContext *C, wmOperator *op)
2628 {
2629         Scene *scene= CTX_data_scene(C);
2630         Editing *ed= seq_give_editing(scene, FALSE);
2631         Sequence *seq;
2632
2633         seq_free_clipboard();
2634
2635         if(seqbase_isolated_sel_check(ed->seqbasep)==FALSE) {
2636                 BKE_report(op->reports, RPT_ERROR, "Please select all related strips");
2637                 return OPERATOR_CANCELLED;
2638         }
2639
2640         seqbase_dupli_recursive(scene, NULL, &seqbase_clipboard, ed->seqbasep, SEQ_DUPE_UNIQUE_NAME);
2641         seqbase_clipboard_frame= scene->r.cfra;
2642
2643         /* Need to remove anything that references the current scene */
2644         for(seq= seqbase_clipboard.first; seq; seq= seq->next) {
2645                 seq_del_sound(scene, seq);
2646         }
2647
2648         return OPERATOR_FINISHED;
2649 }
2650
2651 void SEQUENCER_OT_copy(wmOperatorType *ot)
2652 {
2653         /* identifiers */
2654         ot->name= "Copy";
2655         ot->idname= "SEQUENCER_OT_copy";
2656         ot->description="";
2657
2658         /* api callbacks */
2659         ot->exec= sequencer_copy_exec;
2660         ot->poll= sequencer_edit_poll;
2661
2662         /* flags */
2663         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2664
2665         /* properties */
2666 }
2667
2668 static void seq_offset(Scene *scene, Sequence *seq, int ofs)
2669 {
2670         if(seq->type == SEQ_META) {
2671                 Sequence *iseq;
2672                 for(iseq= seq->seqbase.first; iseq; iseq= iseq->next) {
2673                         seq_offset(scene, iseq, ofs);
2674                 }
2675         }
2676         else {
2677                 seq->start += ofs;
2678         }
2679
2680         calc_sequence_disp(scene, seq);
2681 }
2682
2683 static int sequencer_paste_exec(bContext *C, wmOperator *UNUSED(op))
2684 {
2685         Scene *scene= CTX_data_scene(C);
2686         Editing *ed= seq_give_editing(scene, TRUE); /* create if needed */
2687         ListBase nseqbase = {NULL, NULL};
2688         int ofs;
2689         Sequence *iseq;
2690
2691         deselect_all_seq(scene);
2692         ofs = scene->r.cfra - seqbase_clipboard_frame;
2693
2694         seqbase_dupli_recursive(scene, NULL, &nseqbase, &seqbase_clipboard, SEQ_DUPE_UNIQUE_NAME);
2695
2696         /* transform pasted strips before adding */
2697         if(ofs) {
2698                 for(iseq= nseqbase.first; iseq; iseq= iseq->next) {
2699                         seq_offset(scene, iseq, ofs);
2700                 }
2701         }
2702
2703         BLI_movelisttolist(ed->seqbasep, &nseqbase);
2704
2705         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
2706
2707         return OPERATOR_FINISHED;
2708 }
2709
2710 void SEQUENCER_OT_paste(wmOperatorType *ot)
2711 {
2712         /* identifiers */
2713         ot->name= "Paste";
2714         ot->idname= "SEQUENCER_OT_paste";
2715         ot->description="";
2716
2717         /* api callbacks */
2718         ot->exec= sequencer_paste_exec;
2719         ot->poll= ED_operator_sequencer_active;
2720
2721         /* flags */
2722         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2723
2724         /* properties */
2725 }
2726
2727 static int sequencer_swap_data_exec(bContext *C, wmOperator *op)
2728 {
2729         Scene *scene= CTX_data_scene(C);
2730         Sequence *seq_act;
2731         Sequence *seq_other;
2732
2733         if(seq_active_pair_get(scene, &seq_act, &seq_other) == 0) {
2734                 BKE_report(op->reports, RPT_ERROR, "Must select 2 strips");
2735                 return OPERATOR_CANCELLED;
2736         }
2737
2738         if(seq_swap(seq_act, seq_other) == 0) {
2739                 BKE_report(op->reports, RPT_ERROR, "Strips were not compatible");
2740                 return OPERATOR_CANCELLED;
2741         }
2742
2743         sound_remove_scene_sound(scene, seq_act->scene_sound);
2744         sound_remove_scene_sound(scene, seq_other->scene_sound);
2745
2746         seq_act->scene_sound= NULL;
2747         seq_other->scene_sound= NULL;
2748
2749         calc_sequence(scene, seq_act);
2750         calc_sequence(scene, seq_other);
2751
2752         if(seq_act->sound)              sound_add_scene_sound(scene, seq_act, seq_act->startdisp, seq_act->enddisp, seq_act->startofs + seq_act->anim_startofs);
2753         if(seq_other->sound)    sound_add_scene_sound(scene, seq_other, seq_other->startdisp, seq_other->enddisp, seq_other->startofs + seq_other->anim_startofs);
2754
2755         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
2756
2757         return OPERATOR_FINISHED;
2758 }
2759
2760 void SEQUENCER_OT_swap_data(wmOperatorType *ot)
2761 {
2762         /* identifiers */
2763         ot->name= "Sequencer Swap Data";
2764         ot->idname= "SEQUENCER_OT_swap_data";
2765         ot->description="Swap 2 sequencer strips";
2766
2767         /* api callbacks */
2768         ot->exec= sequencer_swap_data_exec;
2769         ot->poll= ED_operator_sequencer_active;
2770
2771         /* flags */
2772         ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
2773
2774         /* properties */
2775 }
2776
2777 /* borderselect operator */
2778 static int view_ghost_border_exec(bContext *C, wmOperator *op)
2779 {
2780         Scene *scene= CTX_data_scene(C);
2781         Editing *ed= seq_give_editing(scene, FALSE);
2782         View2D *v2d= UI_view2d_fromcontext(C);
2783
2784         rctf rect;
2785
2786         /* convert coordinates of rect to 'tot' rect coordinates */
2787         UI_view2d_region_to_view(v2d, RNA_int_get(op->ptr, "xmin"), RNA_int_get(op->ptr, "ymin"), &rect.xmin, &rect.ymin);
2788         UI_view2d_region_to_view(v2d, RNA_int_get(op->ptr, "xmax"), RNA_int_get(op->ptr, "ymax"), &rect.xmax, &rect.ymax);
2789
2790         if(ed==NULL)
2791                 return OPERATOR_CANCELLED;
2792
2793         rect.xmin /=  (float)(ABS(v2d->tot.xmax - v2d->tot.xmin));
2794         rect.ymin /=  (float)(ABS(v2d->tot.ymax - v2d->tot.ymin));
2795
2796         rect.xmax /=  (float)(ABS(v2d->tot.xmax - v2d->tot.xmin));
2797         rect.ymax /=  (float)(ABS(v2d->tot.ymax - v2d->tot.ymin));
2798
2799         rect.xmin+=0.5;
2800         rect.xmax+=0.5;
2801         rect.ymin+=0.5;
2802         rect.ymax+=0.5;
2803
2804         CLAMP(rect.xmin, 0.0f, 1.0f);
2805         CLAMP(rect.ymin, 0.0f, 1.0f);
2806         CLAMP(rect.xmax, 0.0f, 1.0f);
2807         CLAMP(rect.ymax, 0.0f, 1.0f);
2808
2809         scene->ed->over_border= rect;
2810
2811         WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, scene);
2812
2813         return OPERATOR_FINISHED;
2814 }
2815
2816 /* ****** Border Select ****** */
2817 void SEQUENCER_OT_view_ghost_border(wmOperatorType *ot)
2818 {
2819         /* identifiers */
2820         ot->name= "Border Offset View";
2821         ot->idname= "SEQUENCER_OT_view_ghost_border";
2822         ot->description="Enable border select mode";
2823
2824         /* api callbacks */
2825         ot->invoke= WM_border_select_invoke;
2826         ot->exec= view_ghost_border_exec;
2827         ot->modal= WM_border_select_modal;
2828         ot->poll= sequencer_view_poll;
2829
2830         /* flags */
2831         ot->flag= 0;
2832
2833         /* rna */
2834         WM_operator_properties_gesture_border(ot, FALSE);
2835 }