code cleanup: use const events for modal and invoke operators.
[blender.git] / source / blender / editors / space_nla / nla_select.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version. 
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * The Original Code is Copyright (C) 2009 Blender Foundation, Joshua Leung
19  * All rights reserved.
20  *
21  * 
22  * Contributor(s): Joshua Leung (major recode)
23  *
24  * ***** END GPL LICENSE BLOCK *****
25  */
26
27 /** \file blender/editors/space_nla/nla_select.c
28  *  \ingroup spnla
29  */
30
31
32 #include <string.h>
33 #include <stdio.h>
34
35 #include "DNA_anim_types.h"
36 #include "DNA_scene_types.h"
37
38 #include "MEM_guardedalloc.h"
39
40 #include "BLI_blenlib.h"
41 #include "BLI_math.h"
42 #include "BLI_rand.h"
43
44 #include "BKE_nla.h"
45 #include "BKE_context.h"
46 #include "BKE_screen.h"
47
48 #include "ED_anim_api.h"
49 #include "ED_keyframes_edit.h"
50 #include "ED_screen.h"
51
52 #include "RNA_access.h"
53 #include "RNA_define.h"
54
55 #include "WM_api.h"
56 #include "WM_types.h"
57
58 #include "UI_view2d.h"
59
60 #include "nla_intern.h" // own include
61
62 /* ******************** Utilities ***************************************** */
63
64 /* Convert SELECT_* flags to ACHANNEL_SETFLAG_* flags */
65 static short selmodes_to_flagmodes(short sel)
66 {
67         /* convert selection modes to selection modes */
68         switch (sel) {
69                 case SELECT_SUBTRACT:
70                         return ACHANNEL_SETFLAG_CLEAR;
71                         break;
72                         
73                 case SELECT_INVERT:
74                         return ACHANNEL_SETFLAG_INVERT;
75                         break;
76                         
77                 case SELECT_ADD:
78                 default:
79                         return ACHANNEL_SETFLAG_ADD;
80                         break;
81         }
82 }
83
84
85 /* ******************** Deselect All Operator ***************************** */
86 /* This operator works in one of three ways:
87  *      1) (de)select all (AKEY) - test if select all or deselect all
88  *      2) invert all (CTRL-IKEY) - invert selection of all keyframes
89  *      3) (de)select all - no testing is done; only for use internal tools as normal function...
90  */
91
92 enum {
93         DESELECT_STRIPS_NOTEST = 0,
94         DESELECT_STRIPS_TEST,
95         DESELECT_STRIPS_CLEARACTIVE,
96 } /*eDeselectNlaStrips*/;
97  
98 /* Deselects strips in the NLA Editor
99  *      - This is called by the deselect all operator, as well as other ones!
100  *
101  *  - test: check if select or deselect all (1) or clear all active (2)
102  *      - sel: how to select keyframes 
103  *              0 = deselect
104  *              1 = select
105  *              2 = invert
106  */
107 static void deselect_nla_strips(bAnimContext *ac, short test, short sel)
108 {
109         ListBase anim_data = {NULL, NULL};
110         bAnimListElem *ale;
111         int filter;
112         short smode;
113         
114         /* determine type-based settings */
115         // FIXME: double check whether ANIMFILTER_LIST_VISIBLE is needed!
116         filter = (ANIMFILTER_DATA_VISIBLE);
117         
118         /* filter data */
119         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
120         
121         /* See if we should be selecting or deselecting */
122         if (test == DESELECT_STRIPS_TEST) {
123                 for (ale = anim_data.first; ale; ale = ale->next) {
124                         NlaTrack *nlt = (NlaTrack *)ale->data;
125                         NlaStrip *strip;
126                         
127                         /* if any strip is selected, break out, since we should now be deselecting */
128                         for (strip = nlt->strips.first; strip; strip = strip->next) {
129                                 if (strip->flag & NLASTRIP_FLAG_SELECT) {
130                                         sel = SELECT_SUBTRACT;
131                                         break;
132                                 }
133                         }
134                         
135                         if (sel == SELECT_SUBTRACT)
136                                 break;
137                 }
138         }
139         
140         /* convert selection modes to selection modes */
141         smode = selmodes_to_flagmodes(sel);
142         
143         /* Now set the flags */
144         for (ale = anim_data.first; ale; ale = ale->next) {
145                 NlaTrack *nlt = (NlaTrack *)ale->data;
146                 NlaStrip *strip;
147                 
148                 /* apply same selection to all strips */
149                 for (strip = nlt->strips.first; strip; strip = strip->next) {
150                         /* set selection */
151                         if (test != DESELECT_STRIPS_CLEARACTIVE)
152                                 ACHANNEL_SET_FLAG(strip, smode, NLASTRIP_FLAG_SELECT);
153                         
154                         /* clear active flag */
155                         // TODO: for clear active, do we want to limit this to only doing this on a certain set of tracks though?
156                         strip->flag &= ~NLASTRIP_FLAG_ACTIVE;
157                 }
158         }
159         
160         /* Cleanup */
161         BLI_freelistN(&anim_data);
162 }
163
164 /* ------------------- */
165
166 static int nlaedit_deselectall_exec(bContext *C, wmOperator *op)
167 {
168         bAnimContext ac;
169         
170         /* get editor data */
171         if (ANIM_animdata_get_context(C, &ac) == 0)
172                 return OPERATOR_CANCELLED;
173                 
174         /* 'standard' behavior - check if selected, then apply relevant selection */
175         if (RNA_boolean_get(op->ptr, "invert"))
176                 deselect_nla_strips(&ac, DESELECT_STRIPS_NOTEST, SELECT_INVERT);
177         else
178                 deselect_nla_strips(&ac, DESELECT_STRIPS_TEST, SELECT_ADD);
179         
180         /* set notifier that things have changed */
181         WM_event_add_notifier(C, NC_ANIMATION | ND_NLA | NA_SELECTED, NULL);
182         
183         return OPERATOR_FINISHED;
184 }
185  
186 void NLA_OT_select_all_toggle(wmOperatorType *ot)
187 {
188         /* identifiers */
189         ot->name = "(De)select All";
190         ot->idname = "NLA_OT_select_all_toggle";
191         ot->description = "Select or deselect all NLA-Strips";
192         
193         /* api callbacks */
194         ot->exec = nlaedit_deselectall_exec;
195         ot->poll = nlaop_poll_tweakmode_off;
196         
197         /* flags */
198         ot->flag = OPTYPE_REGISTER /*|OPTYPE_UNDO*/;
199         
200         /* props */
201         ot->prop = RNA_def_boolean(ot->srna, "invert", 0, "Invert", "");
202         RNA_def_property_flag(ot->prop, PROP_SKIP_SAVE);
203 }
204
205 /* ******************** Border Select Operator **************************** */
206 /* This operator currently works in one of three ways:
207  *  -> BKEY     - 1) all strips within region are selected (NLAEDIT_BORDERSEL_ALLSTRIPS)
208  *  -> ALT-BKEY - depending on which axis of the region was larger...
209  *      -> 2) x-axis, so select all frames within frame range (NLAEDIT_BORDERSEL_FRAMERANGE)
210  *      -> 3) y-axis, so select all frames within channels that region included (NLAEDIT_BORDERSEL_CHANNELS)
211  */
212
213 /* defines for borderselect mode */
214 enum {
215         NLA_BORDERSEL_ALLSTRIPS = 0,
216         NLA_BORDERSEL_FRAMERANGE,
217         NLA_BORDERSEL_CHANNELS,
218 } /* eNLAEDIT_BorderSelect_Mode */;
219
220
221 static void borderselect_nla_strips(bAnimContext *ac, rcti rect, short mode, short selectmode)
222 {
223         ListBase anim_data = {NULL, NULL};
224         bAnimListElem *ale;
225         int filter;
226         
227         SpaceNla *snla = (SpaceNla *)ac->sl;
228         View2D *v2d = &ac->ar->v2d;
229         rctf rectf;
230         float ymin /* =(float)(-NLACHANNEL_HEIGHT(snla)) */ /* UNUSED */, ymax = 0;
231         
232         /* convert border-region to view coordinates */
233         UI_view2d_region_to_view(v2d, rect.xmin, rect.ymin + 2, &rectf.xmin, &rectf.ymin);
234         UI_view2d_region_to_view(v2d, rect.xmax, rect.ymax - 2, &rectf.xmax, &rectf.ymax);
235         
236         /* filter data */
237         filter = (ANIMFILTER_DATA_VISIBLE | ANIMFILTER_LIST_VISIBLE | ANIMFILTER_LIST_CHANNELS);
238         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
239         
240         /* convert selection modes to selection modes */
241         selectmode = selmodes_to_flagmodes(selectmode);
242         
243         /* loop over data, doing border select */
244         for (ale = anim_data.first; ale; ale = ale->next) {
245                 ymin = ymax - NLACHANNEL_STEP(snla);
246                 
247                 /* perform vertical suitability check (if applicable) */
248                 if ((mode == NLA_BORDERSEL_FRAMERANGE) ||
249                     !((ymax < rectf.ymin) || (ymin > rectf.ymax)))
250                 {
251                         /* loop over data selecting (only if NLA-Track) */
252                         if (ale->type == ANIMTYPE_NLATRACK) {
253                                 NlaTrack *nlt = (NlaTrack *)ale->data;
254                                 NlaStrip *strip;
255                                 
256                                 /* only select strips if they fall within the required ranges (if applicable) */
257                                 for (strip = nlt->strips.first; strip; strip = strip->next) {
258                                         if ((mode == NLA_BORDERSEL_CHANNELS) ||
259                                             BKE_nlastrip_within_bounds(strip, rectf.xmin, rectf.xmax))
260                                         {
261                                                 /* set selection */
262                                                 ACHANNEL_SET_FLAG(strip, selectmode, NLASTRIP_FLAG_SELECT);
263                                                 
264                                                 /* clear active flag */
265                                                 strip->flag &= ~NLASTRIP_FLAG_ACTIVE;
266                                         }
267                                 }
268                         }
269                 }
270                 
271                 /* set minimum extent to be the maximum of the next channel */
272                 ymax = ymin;
273         }
274         
275         /* cleanup */
276         BLI_freelistN(&anim_data);
277 }
278
279 /* ------------------- */
280
281 static int nlaedit_borderselect_exec(bContext *C, wmOperator *op)
282 {
283         bAnimContext ac;
284         rcti rect;
285         short mode = 0, selectmode = 0;
286         int extend;
287         
288         /* get editor data */
289         if (ANIM_animdata_get_context(C, &ac) == 0)
290                 return OPERATOR_CANCELLED;
291
292         /* clear all selection if not extending selection */
293         extend = RNA_boolean_get(op->ptr, "extend");
294         if (!extend)
295                 deselect_nla_strips(&ac, DESELECT_STRIPS_TEST, SELECT_SUBTRACT);
296
297         /* get settings from operator */
298         WM_operator_properties_border_to_rcti(op, &rect);
299                 
300         if (RNA_int_get(op->ptr, "gesture_mode") == GESTURE_MODAL_SELECT)
301                 selectmode = SELECT_ADD;
302         else
303                 selectmode = SELECT_SUBTRACT;
304         
305         /* selection 'mode' depends on whether borderselect region only matters on one axis */
306         if (RNA_boolean_get(op->ptr, "axis_range")) {
307                 /* mode depends on which axis of the range is larger to determine which axis to use 
308                  *      - checking this in region-space is fine, as it's fundamentally still going to be a different rect size
309                  *      - the frame-range select option is favored over the channel one (x over y), as frame-range one is often
310                  *        used for tweaking timing when "blocking", while channels is not that useful...
311                  */
312                 if (BLI_rcti_size_x(&rect) >= BLI_rcti_size_y(&rect))
313                         mode = NLA_BORDERSEL_FRAMERANGE;
314                 else
315                         mode = NLA_BORDERSEL_CHANNELS;
316         }
317         else 
318                 mode = NLA_BORDERSEL_ALLSTRIPS;
319         
320         /* apply borderselect action */
321         borderselect_nla_strips(&ac, rect, mode, selectmode);
322         
323         /* set notifier that things have changed */
324         WM_event_add_notifier(C, NC_ANIMATION | ND_NLA | NA_SELECTED, NULL);
325         
326         return OPERATOR_FINISHED;
327
328
329 void NLA_OT_select_border(wmOperatorType *ot)
330 {
331         /* identifiers */
332         ot->name = "Border Select";
333         ot->idname = "NLA_OT_select_border";
334         ot->description = "Use box selection to grab NLA-Strips";
335         
336         /* api callbacks */
337         ot->invoke = WM_border_select_invoke;
338         ot->exec = nlaedit_borderselect_exec;
339         ot->modal = WM_border_select_modal;
340         ot->cancel = WM_border_select_cancel;
341         
342         ot->poll = nlaop_poll_tweakmode_off;
343         
344         /* flags */
345         ot->flag = OPTYPE_REGISTER | OPTYPE_UNDO;
346         
347         /* rna */
348         WM_operator_properties_gesture_border(ot, 1);
349         
350         RNA_def_boolean(ot->srna, "axis_range", 0, "Axis Range", "");
351 }
352
353 /* ******************** Select Left/Right Operator ************************* */
354 /* Select keyframes left/right of the current frame indicator */
355
356 /* defines for left-right select tool */
357 static EnumPropertyItem prop_nlaedit_leftright_select_types[] = {
358         {NLAEDIT_LRSEL_TEST, "CHECK", 0, "Check if Select Left or Right", ""},
359         {NLAEDIT_LRSEL_LEFT, "LEFT", 0, "Before current frame", ""},
360         {NLAEDIT_LRSEL_RIGHT, "RIGHT", 0, "After current frame", ""},
361         {0, NULL, 0, NULL, NULL}
362 };
363
364 /* ------------------- */
365
366 static void nlaedit_select_leftright(bContext *C, bAnimContext *ac, short leftright, short select_mode)
367 {
368         ListBase anim_data = {NULL, NULL};
369         bAnimListElem *ale;
370         int filter;
371         
372         Scene *scene = ac->scene;
373         float xmin, xmax;
374         
375         /* if currently in tweakmode, exit tweakmode first */
376         if (scene->flag & SCE_NLA_EDIT_ON)
377                 WM_operator_name_call(C, "NLA_OT_tweakmode_exit", WM_OP_EXEC_DEFAULT, NULL);
378         
379         /* if select mode is replace, deselect all keyframes (and channels) first */
380         if (select_mode == SELECT_REPLACE) {
381                 select_mode = SELECT_ADD;
382                 
383                 /* - deselect all other keyframes, so that just the newly selected remain
384                  * - channels aren't deselected, since we don't re-select any as a consequence
385                  */
386                 deselect_nla_strips(ac, 0, SELECT_SUBTRACT);
387         }
388         
389         /* get range, and get the right flag-setting mode */
390         if (leftright == NLAEDIT_LRSEL_LEFT) {
391                 xmin = MINAFRAMEF;
392                 xmax = (float)(CFRA + 0.1f);
393         }
394         else {
395                 xmin = (float)(CFRA - 0.1f);
396                 xmax = MAXFRAMEF;
397         }
398         
399         select_mode = selmodes_to_flagmodes(select_mode);
400         
401         
402         /* filter data */
403         filter = (ANIMFILTER_DATA_VISIBLE | ANIMFILTER_LIST_VISIBLE);
404         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
405         
406         /* select strips on the side where most data occurs */
407         for (ale = anim_data.first; ale; ale = ale->next) {
408                 NlaTrack *nlt = (NlaTrack *)ale->data;
409                 NlaStrip *strip;
410                 
411                 /* check each strip to see if it is appropriate */
412                 for (strip = nlt->strips.first; strip; strip = strip->next) {
413                         if (BKE_nlastrip_within_bounds(strip, xmin, xmax)) {
414                                 ACHANNEL_SET_FLAG(strip, select_mode, NLASTRIP_FLAG_SELECT);
415                         }
416                 }
417         }
418         
419         /* Cleanup */
420         BLI_freelistN(&anim_data);
421 }
422
423 /* ------------------- */
424
425 static int nlaedit_select_leftright_exec(bContext *C, wmOperator *op)
426 {
427         bAnimContext ac;
428         short leftright = RNA_enum_get(op->ptr, "mode");
429         short selectmode;
430         
431         /* get editor data */
432         if (ANIM_animdata_get_context(C, &ac) == 0)
433                 return OPERATOR_CANCELLED;
434         
435         /* select mode is either replace (deselect all, then add) or add/extend */
436         if (RNA_boolean_get(op->ptr, "extend"))
437                 selectmode = SELECT_INVERT;
438         else
439                 selectmode = SELECT_REPLACE;
440                 
441         /* if "test" mode is set, we don't have any info to set this with */
442         if (leftright == NLAEDIT_LRSEL_TEST)
443                 return OPERATOR_CANCELLED;
444         
445         /* do the selecting now */
446         nlaedit_select_leftright(C, &ac, leftright, selectmode);
447         
448         /* set notifier that keyframe selection (and channels too) have changed */
449         WM_event_add_notifier(C, NC_ANIMATION | ND_KEYFRAME | ND_ANIMCHAN | NA_SELECTED, NULL);
450         
451         return OPERATOR_FINISHED;
452 }
453
454 static int nlaedit_select_leftright_invoke(bContext *C, wmOperator *op, const wmEvent *event)
455 {
456         bAnimContext ac;
457         short leftright = RNA_enum_get(op->ptr, "mode");
458         
459         /* get editor data */
460         if (ANIM_animdata_get_context(C, &ac) == 0)
461                 return OPERATOR_CANCELLED;
462                 
463         /* handle mode-based testing */
464         if (leftright == NLAEDIT_LRSEL_TEST) {
465                 Scene *scene = ac.scene;
466                 ARegion *ar = ac.ar;
467                 View2D *v2d = &ar->v2d;
468                 float x;
469                 
470                 /* determine which side of the current frame mouse is on */
471                 UI_view2d_region_to_view(v2d, event->mval[0], event->mval[1], &x, NULL);
472                 if (x < CFRA)
473                         RNA_int_set(op->ptr, "mode", NLAEDIT_LRSEL_LEFT);
474                 else
475                         RNA_int_set(op->ptr, "mode", NLAEDIT_LRSEL_RIGHT);
476         }
477         
478         /* perform selection */
479         return nlaedit_select_leftright_exec(C, op);
480 }
481
482 void NLA_OT_select_leftright(wmOperatorType *ot)
483 {
484         PropertyRNA *prop;
485         
486         /* identifiers */
487         ot->name = "Select Left/Right";
488         ot->idname = "NLA_OT_select_leftright";
489         ot->description = "Select strips to the left or the right of the current frame";
490         
491         /* api callbacks  */
492         ot->invoke = nlaedit_select_leftright_invoke;
493         ot->exec = nlaedit_select_leftright_exec;
494         ot->poll = ED_operator_nla_active;
495         
496         /* flags */
497         ot->flag = OPTYPE_REGISTER | OPTYPE_UNDO;
498         
499         /* properties */
500         ot->prop = RNA_def_enum(ot->srna, "mode", prop_nlaedit_leftright_select_types, NLAEDIT_LRSEL_TEST, "Mode", "");
501         RNA_def_property_flag(ot->prop, PROP_SKIP_SAVE);
502         
503         prop = RNA_def_boolean(ot->srna, "extend", 0, "Extend Select", "");
504         RNA_def_property_flag(prop, PROP_SKIP_SAVE);
505 }
506
507
508 /* ******************** Mouse-Click Select Operator *********************** */
509
510 /* select strip directly under mouse */
511 static void mouse_nla_strips(bContext *C, bAnimContext *ac, const int mval[2], short select_mode)
512 {
513         ListBase anim_data = {NULL, NULL};
514         bAnimListElem *ale = NULL;
515         int filter;
516         
517         SpaceNla *snla = (SpaceNla *)ac->sl;
518         View2D *v2d = &ac->ar->v2d;
519         Scene *scene = ac->scene;
520         NlaStrip *strip = NULL;
521         int channel_index;
522         float xmin, xmax, dummy;
523         float x, y;
524         
525         
526         /* use View2D to determine the index of the channel (i.e a row in the list) where keyframe was */
527         UI_view2d_region_to_view(v2d, mval[0], mval[1], &x, &y);
528         UI_view2d_listview_view_to_cell(v2d, 0, NLACHANNEL_STEP(snla), 0, (float)NLACHANNEL_HEIGHT_HALF(snla), x, y, NULL, &channel_index);
529         
530         /* x-range to check is +/- 7 (in screen/region-space) on either side of mouse click 
531          * (that is the size of keyframe icons, so user should be expecting similar tolerances) 
532          */
533         UI_view2d_region_to_view(v2d, mval[0] - 7, mval[1], &xmin, &dummy);
534         UI_view2d_region_to_view(v2d, mval[0] + 7, mval[1], &xmax, &dummy);
535         
536         /* filter data */
537         filter = (ANIMFILTER_DATA_VISIBLE | ANIMFILTER_LIST_VISIBLE | ANIMFILTER_LIST_CHANNELS);
538         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
539         
540         /* try to get channel */
541         ale = BLI_findlink(&anim_data, channel_index);
542         if (ale == NULL) {
543                 /* channel not found */
544                 printf("Error: animation channel (index = %d) not found in mouse_nla_strips()\n", channel_index);
545                 BLI_freelistN(&anim_data);
546                 return;
547         }
548         else {
549                 /* found some channel - we only really should do somethign when its an Nla-Track */
550                 if (ale->type == ANIMTYPE_NLATRACK) {
551                         NlaTrack *nlt = (NlaTrack *)ale->data;
552                         
553                         /* loop over NLA-strips in this track, trying to find one which occurs in the necessary bounds */
554                         for (strip = nlt->strips.first; strip; strip = strip->next) {
555                                 if (BKE_nlastrip_within_bounds(strip, xmin, xmax))
556                                         break;
557                         }
558                 }
559                 
560                 /* remove active channel from list of channels for separate treatment (since it's needed later on) */
561                 BLI_remlink(&anim_data, ale);
562                 
563                 /* free list of channels, since it's not used anymore */
564                 BLI_freelistN(&anim_data);
565         }
566         
567         /* if currently in tweakmode, exit tweakmode before changing selection states
568          * now that we've found our target...
569          */
570         if (scene->flag & SCE_NLA_EDIT_ON)
571                 WM_operator_name_call(C, "NLA_OT_tweakmode_exit", WM_OP_EXEC_DEFAULT, NULL);
572         
573         /* for replacing selection, firstly need to clear existing selection */
574         if (select_mode == SELECT_REPLACE) {
575                 /* reset selection mode for next steps */
576                 select_mode = SELECT_ADD;
577                 
578                 /* deselect all strips */
579                 deselect_nla_strips(ac, 0, SELECT_SUBTRACT);
580                 
581                 /* deselect all other channels first */
582                 ANIM_deselect_anim_channels(ac, ac->data, ac->datatype, 0, ACHANNEL_SETFLAG_CLEAR);
583                 
584                 /* Highlight NLA-Track */
585                 if (ale->type == ANIMTYPE_NLATRACK) {
586                         NlaTrack *nlt = (NlaTrack *)ale->data;
587                         
588                         nlt->flag |= NLATRACK_SELECTED;
589                         ANIM_set_active_channel(ac, ac->data, ac->datatype, filter, nlt, ANIMTYPE_NLATRACK);
590                 }
591         }
592         
593         /* only select strip if we clicked on a valid channel and hit something */
594         if (ale) {
595                 /* select the strip accordingly (if a matching one was found) */
596                 if (strip) {
597                         select_mode = selmodes_to_flagmodes(select_mode);
598                         ACHANNEL_SET_FLAG(strip, select_mode, NLASTRIP_FLAG_SELECT);
599                         
600                         /* if we selected it, we can make it active too
601                          *      - we always need to clear the active strip flag though... 
602                          */
603                         deselect_nla_strips(ac, DESELECT_STRIPS_CLEARACTIVE, 0);
604                         if (strip->flag & NLASTRIP_FLAG_SELECT)
605                                 strip->flag |= NLASTRIP_FLAG_ACTIVE;
606                 }
607                 
608                 /* free this channel */
609                 MEM_freeN(ale);
610         }
611 }
612
613 /* ------------------- */
614
615 /* handle clicking */
616 static int nlaedit_clickselect_invoke(bContext *C, wmOperator *op, const wmEvent *event)
617 {
618         bAnimContext ac;
619         /* Scene *scene; */ /* UNUSED */
620         /* ARegion *ar; */ /* UNUSED */
621         // View2D *v2d; /*UNUSED*/
622         short selectmode;
623
624         /* get editor data */
625         if (ANIM_animdata_get_context(C, &ac) == 0)
626                 return OPERATOR_CANCELLED;
627                 
628         /* get useful pointers from animation context data */
629         /* scene= ac.scene; */ /* UNUSED */
630         /* ar= ac.ar; */ /* UNUSED */
631         // v2d= &ar->v2d;
632
633         /* select mode is either replace (deselect all, then add) or add/extend */
634         if (RNA_boolean_get(op->ptr, "extend"))
635                 selectmode = SELECT_INVERT;
636         else
637                 selectmode = SELECT_REPLACE;
638                 
639         /* select strips based upon mouse position */
640         mouse_nla_strips(C, &ac, event->mval, selectmode);
641         
642         /* set notifier that things have changed */
643         WM_event_add_notifier(C, NC_ANIMATION | ND_NLA | NA_SELECTED, NULL);
644         
645         /* for tweak grab to work */
646         return OPERATOR_FINISHED | OPERATOR_PASS_THROUGH;
647 }
648  
649 void NLA_OT_click_select(wmOperatorType *ot)
650 {
651         PropertyRNA *prop;
652         
653         /* identifiers */
654         ot->name = "Mouse Select";
655         ot->idname = "NLA_OT_click_select";
656         ot->description = "Handle clicks to select NLA Strips";
657         
658         /* api callbacks - absolutely no exec() this yet... */
659         ot->invoke = nlaedit_clickselect_invoke;
660         ot->poll = ED_operator_nla_active;
661         
662         /* flags */
663         ot->flag = OPTYPE_REGISTER | OPTYPE_UNDO;
664         
665         /* properties */
666         prop = RNA_def_boolean(ot->srna, "extend", 0, "Extend Select", ""); // SHIFTKEY
667         RNA_def_property_flag(prop, PROP_SKIP_SAVE);
668 }
669
670 /* *********************************************** */