NLA: fix keyframes getting messed up when making strips longer. For drawing
[blender.git] / source / blender / editors / space_graph / graph_select.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., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19  *
20  * The Original Code is Copyright (C) 2008 Blender Foundation
21  *
22  * Contributor(s): Joshua Leung
23  *
24  * ***** END GPL LICENSE BLOCK *****
25  */
26
27 #include <math.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #include <float.h>
31
32 #ifdef HAVE_CONFIG_H
33 #include <config.h>
34 #endif
35
36 #include "MEM_guardedalloc.h"
37
38 #include "BLI_blenlib.h"
39 #include "BLI_math.h"
40
41 #include "DNA_anim_types.h"
42 #include "DNA_action_types.h"
43 #include "DNA_armature_types.h"
44 #include "DNA_camera_types.h"
45 #include "DNA_curve_types.h"
46 #include "DNA_object_types.h"
47 #include "DNA_screen_types.h"
48 #include "DNA_scene_types.h"
49 #include "DNA_space_types.h"
50 #include "DNA_constraint_types.h"
51 #include "DNA_key_types.h"
52 #include "DNA_lamp_types.h"
53 #include "DNA_material_types.h"
54 #include "DNA_userdef_types.h"
55 #include "DNA_gpencil_types.h"
56 #include "DNA_windowmanager_types.h"
57
58 #include "RNA_access.h"
59 #include "RNA_define.h"
60
61 #include "BKE_action.h"
62 #include "BKE_depsgraph.h"
63 #include "BKE_fcurve.h"
64 #include "BKE_key.h"
65 #include "BKE_material.h"
66 #include "BKE_nla.h"
67 #include "BKE_object.h"
68 #include "BKE_context.h"
69 #include "BKE_utildefines.h"
70
71 #include "UI_view2d.h"
72
73 #include "ED_anim_api.h"
74 #include "ED_keyframing.h"
75 #include "ED_keyframes_draw.h"
76 #include "ED_keyframes_edit.h"
77 #include "ED_markers.h"
78 #include "ED_screen.h"
79 #include "ED_space_api.h"
80
81 #include "WM_api.h"
82 #include "WM_types.h"
83
84 #include "graph_intern.h"
85
86
87 /* ************************************************************************** */
88 /* KEYFRAMES STUFF */
89
90 /* ******************** Deselect All Operator ***************************** */
91 /* This operator works in one of three ways:
92  *      1) (de)select all (AKEY) - test if select all or deselect all
93  *      2) invert all (CTRL-IKEY) - invert selection of all keyframes
94  *      3) (de)select all - no testing is done; only for use internal tools as normal function...
95  */
96
97 /* Deselects keyframes in the Graph Editor
98  *      - This is called by the deselect all operator, as well as other ones!
99  *
100  *      - test: check if select or deselect all
101  *      - sel: how to select keyframes 
102  *              0 = deselect
103  *              1 = select
104  *              2 = invert
105  */
106 static void deselect_graph_keys (bAnimContext *ac, short test, short sel)
107 {
108         ListBase anim_data = {NULL, NULL};
109         bAnimListElem *ale;
110         int filter;
111         
112         BeztEditData bed;
113         BeztEditFunc test_cb, sel_cb;
114         
115         /* determine type-based settings */
116         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
117         
118         /* filter data */
119         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
120         
121         /* init BezTriple looping data */
122         memset(&bed, 0, sizeof(BeztEditData));
123         test_cb= ANIM_editkeyframes_ok(BEZT_OK_SELECTED);
124         
125         /* See if we should be selecting or deselecting */
126         if (test) {
127                 for (ale= anim_data.first; ale; ale= ale->next) {
128                         if (ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, test_cb, NULL)) {
129                                 sel= SELECT_SUBTRACT;
130                                 break;
131                         }
132                 }
133         }
134         
135         /* convert sel to selectmode, and use that to get editor */
136         sel_cb= ANIM_editkeyframes_select(sel);
137         
138         /* Now set the flags */
139         for (ale= anim_data.first; ale; ale= ale->next) {
140                 FCurve *fcu= (FCurve *)ale->key_data;
141                 
142                 /* Keyframes First */
143                 ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, sel_cb, NULL);
144                 
145                 /* deactivate the F-Curve, and deselect if deselecting keyframes.
146                  * otherwise select the F-Curve too since we've selected all the keyframes
147                  */
148                 if (sel == SELECT_SUBTRACT) 
149                         fcu->flag &= ~FCURVE_SELECTED;
150                 else
151                         fcu->flag |= FCURVE_SELECTED;
152                 fcu->flag &= ~FCURVE_ACTIVE;
153         }
154         
155         /* Cleanup */
156         BLI_freelistN(&anim_data);
157 }
158
159 /* ------------------- */
160
161 static int graphkeys_deselectall_exec(bContext *C, wmOperator *op)
162 {
163         bAnimContext ac;
164         
165         /* get editor data */
166         if (ANIM_animdata_get_context(C, &ac) == 0)
167                 return OPERATOR_CANCELLED;
168                 
169         /* 'standard' behaviour - check if selected, then apply relevant selection */
170         if (RNA_boolean_get(op->ptr, "invert"))
171                 deselect_graph_keys(&ac, 0, SELECT_INVERT);
172         else
173                 deselect_graph_keys(&ac, 1, SELECT_ADD);
174         
175         /* set notifier that things have changed */
176         WM_event_add_notifier(C, NC_ANIMATION|ND_KEYFRAME_SELECT, NULL);
177         
178         return OPERATOR_FINISHED;
179 }
180  
181 void GRAPH_OT_select_all_toggle (wmOperatorType *ot)
182 {
183         /* identifiers */
184         ot->name= "Select All";
185         ot->idname= "GRAPH_OT_select_all_toggle";
186         ot->description= "Toggle selection of all keyframes.";
187         
188         /* api callbacks */
189         ot->exec= graphkeys_deselectall_exec;
190         ot->poll= graphop_visible_keyframes_poll;
191         
192         /* flags */
193         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
194         
195         /* props */
196         RNA_def_boolean(ot->srna, "invert", 0, "Invert", "");
197 }
198
199 /* ******************** Border Select Operator **************************** */
200 /* This operator currently works in one of three ways:
201  *      -> BKEY         - 1) all keyframes within region are selected (validation with BEZT_OK_REGION)
202  *      -> ALT-BKEY - depending on which axis of the region was larger...
203  *              -> 2) x-axis, so select all frames within frame range (validation with BEZT_OK_FRAMERANGE)
204  *              -> 3) y-axis, so select all frames within channels that region included (validation with BEZT_OK_VALUERANGE)
205  */
206
207 /* Borderselect only selects keyframes now, as overshooting handles often get caught too,
208  * which means that they may be inadvertantly moved as well.
209  * Also, for convenience, handles should get same status as keyframe (if it was within bounds)
210  */
211 static void borderselect_graphkeys (bAnimContext *ac, rcti rect, short mode, short selectmode)
212 {
213         ListBase anim_data = {NULL, NULL};
214         bAnimListElem *ale;
215         int filter;
216         
217         BeztEditData bed;
218         BeztEditFunc ok_cb, select_cb;
219         View2D *v2d= &ac->ar->v2d;
220         rctf rectf;
221         
222         /* convert mouse coordinates to frame ranges and channel coordinates corrected for view pan/zoom */
223         UI_view2d_region_to_view(v2d, rect.xmin, rect.ymin, &rectf.xmin, &rectf.ymin);
224         UI_view2d_region_to_view(v2d, rect.xmax, rect.ymax, &rectf.xmax, &rectf.ymax);
225         
226         /* filter data */
227         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVESONLY | ANIMFILTER_CURVEVISIBLE);
228         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
229         
230         /* get beztriple editing/validation funcs  */
231         select_cb= ANIM_editkeyframes_select(selectmode);
232         ok_cb= ANIM_editkeyframes_ok(mode);
233         
234         /* init editing data */
235         memset(&bed, 0, sizeof(BeztEditData));
236         bed.data= &rectf;
237         
238         /* loop over data, doing border select */
239         for (ale= anim_data.first; ale; ale= ale->next) {
240                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
241                 FCurve *fcu= (FCurve *)ale->key_data;
242                 
243                 /* set horizontal range (if applicable) */
244                 if (mode != BEZT_OK_VALUERANGE) {
245                         /* if channel is mapped in NLA, apply correction */
246                         if (adt) {
247                                 bed.f1= BKE_nla_tweakedit_remap(adt, rectf.xmin, NLATIME_CONVERT_UNMAP);
248                                 bed.f2= BKE_nla_tweakedit_remap(adt, rectf.xmax, NLATIME_CONVERT_UNMAP);
249                         }
250                         else {
251                                 bed.f1= rectf.xmin;
252                                 bed.f2= rectf.xmax;
253                         }
254                 }
255                 else {
256                         bed.f1= rectf.ymin;
257                         bed.f2= rectf.ymax;
258                 }
259                 
260                 /* select keyframes that are in the appropriate places */
261                 ANIM_fcurve_keys_bezier_loop(&bed, fcu, ok_cb, select_cb, NULL);
262                 
263                 /* select the curve too 
264                  * NOTE: this should really only happen if the curve got touched...
265                  */
266                 if (selectmode == SELECT_ADD) {
267                         fcu->flag |= FCURVE_SELECTED;
268                 }
269         }
270         
271         /* cleanup */
272         BLI_freelistN(&anim_data);
273 }
274
275 /* ------------------- */
276
277 static int graphkeys_borderselect_exec(bContext *C, wmOperator *op)
278 {
279         bAnimContext ac;
280         rcti rect;
281         short mode=0, selectmode=0;
282         
283         /* get editor data */
284         if (ANIM_animdata_get_context(C, &ac) == 0)
285                 return OPERATOR_CANCELLED;
286
287         if(RNA_int_get(op->ptr, "gesture_mode")==GESTURE_MODAL_SELECT)
288                 selectmode= SELECT_ADD;
289         else
290                 selectmode= SELECT_SUBTRACT;
291
292         /* get settings from operator */
293         rect.xmin= RNA_int_get(op->ptr, "xmin");
294         rect.ymin= RNA_int_get(op->ptr, "ymin");
295         rect.xmax= RNA_int_get(op->ptr, "xmax");
296         rect.ymax= RNA_int_get(op->ptr, "ymax");
297         
298         /* selection 'mode' depends on whether borderselect region only matters on one axis */
299         if (RNA_boolean_get(op->ptr, "axis_range")) {
300                 /* mode depends on which axis of the range is larger to determine which axis to use 
301                  *      - checking this in region-space is fine, as it's fundamentally still going to be a different rect size
302                  *      - the frame-range select option is favoured over the channel one (x over y), as frame-range one is often
303                  *        used for tweaking timing when "blocking", while channels is not that useful...
304                  */
305                 if ((rect.xmax - rect.xmin) >= (rect.ymax - rect.ymin))
306                         mode= BEZT_OK_FRAMERANGE;
307                 else
308                         mode= BEZT_OK_VALUERANGE;
309         }
310         else 
311                 mode= BEZT_OK_REGION;
312         
313         /* apply borderselect action */
314         borderselect_graphkeys(&ac, rect, mode, selectmode);
315         
316         /* send notifier that keyframe selection has changed */
317         WM_event_add_notifier(C, NC_ANIMATION|ND_KEYFRAME_SELECT, NULL);
318         
319         return OPERATOR_FINISHED;
320
321
322 void GRAPH_OT_select_border(wmOperatorType *ot)
323 {
324         /* identifiers */
325         ot->name= "Border Select";
326         ot->idname= "GRAPH_OT_select_border";
327         ot->description= "Select all keyframes within the specified region.";
328         
329         /* api callbacks */
330         ot->invoke= WM_border_select_invoke;
331         ot->exec= graphkeys_borderselect_exec;
332         ot->modal= WM_border_select_modal;
333         
334         ot->poll= graphop_visible_keyframes_poll;
335         
336         /* flags */
337         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
338         
339         /* rna */
340         WM_operator_properties_gesture_border(ot, FALSE);
341         
342         RNA_def_boolean(ot->srna, "axis_range", 0, "Axis Range", "");
343 }
344
345 /* ******************** Column Select Operator **************************** */
346 /* This operator works in one of four ways:
347  *      - 1) select all keyframes in the same frame as a selected one  (KKEY)
348  *      - 2) select all keyframes in the same frame as the current frame marker (CTRL-KKEY)
349  *      - 3) select all keyframes in the same frame as a selected markers (SHIFT-KKEY)
350  *      - 4) select all keyframes that occur between selected markers (ALT-KKEY)
351  */
352
353 /* defines for column-select mode */
354 static EnumPropertyItem prop_column_select_types[] = {
355         {GRAPHKEYS_COLUMNSEL_KEYS, "KEYS", 0, "On Selected Keyframes", ""},
356         {GRAPHKEYS_COLUMNSEL_CFRA, "CFRA", 0, "On Current Frame", ""},
357         {GRAPHKEYS_COLUMNSEL_MARKERS_COLUMN, "MARKERS_COLUMN", 0, "On Selected Markers", ""},
358         {GRAPHKEYS_COLUMNSEL_MARKERS_BETWEEN, "MARKERS_BETWEEN", 0, "Between Min/Max Selected Markers", ""},
359         {0, NULL, 0, NULL, NULL}
360 };
361
362 /* ------------------- */ 
363
364 /* Selects all visible keyframes between the specified markers */
365 static void markers_selectkeys_between (bAnimContext *ac)
366 {
367         ListBase anim_data = {NULL, NULL};
368         bAnimListElem *ale;
369         int filter;
370         
371         BeztEditFunc ok_cb, select_cb;
372         BeztEditData bed;
373         float min, max;
374         
375         /* get extreme markers */
376         ED_markers_get_minmax(ac->markers, 1, &min, &max);
377         min -= 0.5f;
378         max += 0.5f;
379         
380         /* get editing funcs + data */
381         ok_cb= ANIM_editkeyframes_ok(BEZT_OK_FRAMERANGE);
382         select_cb= ANIM_editkeyframes_select(SELECT_ADD);
383         
384         memset(&bed, 0, sizeof(BeztEditData));
385         bed.f1= min; 
386         bed.f2= max;
387         
388         /* filter data */
389         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
390         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
391         
392         /* select keys in-between */
393         for (ale= anim_data.first; ale; ale= ale->next) {
394                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
395                 
396                 if (adt) {      
397                         ListBase nlabackup;
398
399                         ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 0, 1, &nlabackup);
400                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, ok_cb, select_cb, NULL);
401                         ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 1, 1, &nlabackup);
402                 }
403                 else {
404                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, ok_cb, select_cb, NULL);
405                 }
406         }
407         
408         /* Cleanup */
409         BLI_freelistN(&anim_data);
410 }
411
412
413 /* Selects all visible keyframes in the same frames as the specified elements */
414 static void columnselect_graph_keys (bAnimContext *ac, short mode)
415 {
416         ListBase anim_data= {NULL, NULL};
417         bAnimListElem *ale;
418         int filter;
419         
420         Scene *scene= ac->scene;
421         CfraElem *ce;
422         BeztEditFunc select_cb, ok_cb;
423         BeztEditData bed;
424         
425         /* initialise keyframe editing data */
426         memset(&bed, 0, sizeof(BeztEditData));
427         
428         /* build list of columns */
429         switch (mode) {
430                 case GRAPHKEYS_COLUMNSEL_KEYS: /* list of selected keys */
431                         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
432                         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
433                         
434                         for (ale= anim_data.first; ale; ale= ale->next)
435                                 ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, bezt_to_cfraelem, NULL);
436                         
437                         BLI_freelistN(&anim_data);
438                         break;
439                         
440                 case GRAPHKEYS_COLUMNSEL_CFRA: /* current frame */
441                         /* make a single CfraElem for storing this */
442                         ce= MEM_callocN(sizeof(CfraElem), "cfraElem");
443                         BLI_addtail(&bed.list, ce);
444                         
445                         ce->cfra= (float)CFRA;
446                         break;
447                         
448                 case GRAPHKEYS_COLUMNSEL_MARKERS_COLUMN: /* list of selected markers */
449                         ED_markers_make_cfra_list(ac->markers, &bed.list, 1);
450                         break;
451                         
452                 default: /* invalid option */
453                         return;
454         }
455         
456         /* set up BezTriple edit callbacks */
457         select_cb= ANIM_editkeyframes_select(SELECT_ADD);
458         ok_cb= ANIM_editkeyframes_ok(BEZT_OK_FRAME);
459         
460         /* loop through all of the keys and select additional keyframes
461          * based on the keys found to be selected above
462          */
463         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
464         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
465         
466         for (ale= anim_data.first; ale; ale= ale->next) {
467                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
468                 
469                 /* loop over cfraelems (stored in the BeztEditData->list)
470                  *      - we need to do this here, as we can apply fewer NLA-mapping conversions
471                  */
472                 for (ce= bed.list.first; ce; ce= ce->next) {
473                         /* set frame for validation callback to refer to */
474                         if (ale)
475                                 bed.f1= BKE_nla_tweakedit_remap(adt, ce->cfra, NLATIME_CONVERT_UNMAP);
476                         else
477                                 bed.f1= ce->cfra;
478                         
479                         /* select elements with frame number matching cfraelem */
480                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, ok_cb, select_cb, NULL);
481                 }
482         }
483         
484         /* free elements */
485         BLI_freelistN(&bed.list);
486         BLI_freelistN(&anim_data);
487 }
488
489 /* ------------------- */
490
491 static int graphkeys_columnselect_exec(bContext *C, wmOperator *op)
492 {
493         bAnimContext ac;
494         short mode;
495         
496         /* get editor data */
497         if (ANIM_animdata_get_context(C, &ac) == 0)
498                 return OPERATOR_CANCELLED;
499                 
500         /* action to take depends on the mode */
501         mode= RNA_enum_get(op->ptr, "mode");
502         
503         if (mode == GRAPHKEYS_COLUMNSEL_MARKERS_BETWEEN)
504                 markers_selectkeys_between(&ac);
505         else
506                 columnselect_graph_keys(&ac, mode);
507         
508         /* set notifier that keyframe selection has changed */
509         WM_event_add_notifier(C, NC_ANIMATION|ND_KEYFRAME_SELECT, NULL);
510         
511         return OPERATOR_FINISHED;
512 }
513  
514 void GRAPH_OT_select_column (wmOperatorType *ot)
515 {
516         /* identifiers */
517         ot->name= "Select All";
518         ot->idname= "GRAPH_OT_select_column";
519         ot->description= "Select all keyframes on the specified frame(s).";
520         
521         /* api callbacks */
522         ot->exec= graphkeys_columnselect_exec;
523         ot->poll= graphop_visible_keyframes_poll;
524         
525         /* flags */
526         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
527         
528         /* props */
529         RNA_def_enum(ot->srna, "mode", prop_column_select_types, 0, "Mode", "");
530 }
531
532 /* ******************** Mouse-Click Select Operator *********************** */
533 /* This operator works in one of three ways:
534  *      - 1) keyframe under mouse - no special modifiers
535  *      - 2) all keyframes on the same side of current frame indicator as mouse - ALT modifier
536  *      - 3) column select all keyframes in frame under mouse - CTRL modifier
537  *
538  * In addition to these basic options, the SHIFT modifier can be used to toggle the 
539  * selection mode between replacing the selection (without) and inverting the selection (with).
540  */
541
542 /* defines for left-right select tool */
543 static EnumPropertyItem prop_graphkeys_leftright_select_types[] = {
544         {GRAPHKEYS_LRSEL_TEST, "CHECK", 0, "Check if Select Left or Right", ""},
545         {GRAPHKEYS_LRSEL_NONE, "OFF", 0, "Don't select", ""},
546         {GRAPHKEYS_LRSEL_LEFT, "LEFT", 0, "Before current frame", ""},
547         {GRAPHKEYS_LRSEL_RIGHT, "RIGHT", 0, "After current frame", ""},
548         {0, NULL, 0, NULL, NULL}
549 };
550
551 /* ------------------- */
552
553 enum {
554         NEAREST_HANDLE_LEFT     = 0,
555         NEAREST_HANDLE_KEY,
556         NEAREST_HANDLE_RIGHT
557 } eHandleIndex; 
558  
559 /* Find the vertex (either handle (0/2) or the keyframe (1)) that is nearest to the mouse cursor (in area coordinates)  
560  * Selected verts get a disadvantage, to make it easier to select handles behind.
561  * Returns eHandleIndex
562  */
563 static short findnearest_fcurve_vert (bAnimContext *ac, int mval[2], FCurve **fcurve, BezTriple **bezt)
564 {
565         ListBase anim_data = {NULL, NULL};
566         bAnimListElem *ale;
567         int filter;
568         
569         SpaceIpo *sipo= (SpaceIpo *)ac->sa->spacedata.first;
570         View2D *v2d= &ac->ar->v2d;
571         int hpoint=0, sco[3][2];
572         int dist= 100, temp, i;
573         
574         /* clear pointers first */
575         *fcurve= 0;
576         *bezt= 0;
577         
578         /* get curves to search through 
579          *      - if the option to only show keyframes that belong to selected F-Curves is enabled,
580          *        include the 'only selected' flag...
581          */
582         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
583         if (sipo->flag & SIPO_SELCUVERTSONLY) 
584                 filter |= ANIMFILTER_SEL;
585         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
586         
587         for (ale= anim_data.first; ale; ale= ale->next) {
588                 FCurve *fcu= (FCurve *)ale->key_data;
589                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
590                 
591                 /* try to progressively get closer to the right point... */
592                 if (fcu->bezt) {
593                         BezTriple *bezt1=fcu->bezt, *prevbezt=NULL;
594                         ListBase nlabackup;
595                         
596                         /* apply NLA mapping to all the keyframes */
597                         if (adt)
598                                 ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 0, 1, &nlabackup);
599                         
600                         for (i=0; i < fcu->totvert; i++, prevbezt=bezt1, bezt1++) {
601                                 /* convert beztriple points to screen-space */
602                                 UI_view2d_to_region_no_clip(v2d, bezt1->vec[0][0], bezt1->vec[0][1], &sco[0][0], &sco[0][1]);
603                                 UI_view2d_to_region_no_clip(v2d, bezt1->vec[1][0], bezt1->vec[1][1], &sco[1][0], &sco[1][1]);
604                                 UI_view2d_to_region_no_clip(v2d, bezt1->vec[2][0], bezt1->vec[2][1], &sco[2][0], &sco[2][1]);
605                                 
606                                 /* keyframe - do select? */
607                                 temp= abs(mval[0] - sco[1][0]) + abs(mval[1] - sco[1][1]);
608                                 
609                                 if (bezt1->f2 & SELECT) 
610                                         temp += 5;
611                                 
612                                 if (temp < dist) { 
613                                         hpoint= NEAREST_HANDLE_KEY; 
614                                         *bezt= bezt1; 
615                                         dist= temp; 
616                                         *fcurve= fcu; 
617                                 }
618                                 
619                                 /* handles - only do them if they're visible */
620                                 // XXX also need to check for int-values only?
621                                 if ((sipo->flag & SIPO_NOHANDLES)==0) {
622                                         /* first handle only visible if previous segment had handles */
623                                         if ( (!prevbezt && (bezt1->ipo==BEZT_IPO_BEZ)) || (prevbezt && (prevbezt->ipo==BEZT_IPO_BEZ)) )
624                                         {
625                                                 temp= -3 + abs(mval[0] - sco[0][0]) + abs(mval[1] - sco[0][1]);
626                                                 if (bezt1->f1 & SELECT) 
627                                                         temp += 5;
628                                                         
629                                                 if (temp < dist) { 
630                                                         hpoint= NEAREST_HANDLE_LEFT; 
631                                                         *bezt= bezt1; 
632                                                         dist= temp; 
633                                                         *fcurve= fcu; 
634                                                 }
635                                         }
636                                         
637                                         /* second handle only visible if this segment is bezier */
638                                         if (bezt1->ipo == BEZT_IPO_BEZ) 
639                                         {
640                                                 temp= abs(mval[0] - sco[2][0]) + abs(mval[1] - sco[2][1]);
641                                                 if (bezt1->f3 & SELECT) 
642                                                         temp += 5;
643                                                 
644                                                 if (temp < dist) { 
645                                                         hpoint= NEAREST_HANDLE_RIGHT; 
646                                                         *bezt=bezt1; 
647                                                         dist= temp; 
648                                                         *fcurve= fcu; 
649                                                 }
650                                         }
651                                 }
652                         }
653                         
654                         /* un-apply NLA mapping from all the keyframes */
655                         if (adt)
656                                 ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 1, 1, &nlabackup);
657                 }
658         }
659         
660         /* free channels */
661         BLI_freelistN(&anim_data);
662         
663         /* return handle */
664         return hpoint;
665 }
666  
667 /* option 1) select keyframe directly under mouse */
668 static void mouse_graph_keys (bAnimContext *ac, int mval[], short select_mode, short curves_only)
669 {
670         FCurve *fcu;
671         BezTriple *bezt;
672         short handle;
673         int filter;
674         
675         /* find the beztriple that we're selecting, and the handle that was clicked on */
676         handle= findnearest_fcurve_vert(ac, mval, &fcu, &bezt);
677         
678         /* check if anything to select */
679         if (fcu == NULL)        
680                 return;
681         
682         /* deselect all other curves? */
683         if (select_mode == SELECT_REPLACE) {
684                 /* reset selection mode */
685                 select_mode= SELECT_ADD;
686                 
687                 /* deselect all other channels and keyframes */
688                 //ANIM_deselect_anim_channels(ac->data, ac->datatype, 0, ACHANNEL_SETFLAG_CLEAR);
689                 deselect_graph_keys(ac, 0, SELECT_SUBTRACT);
690         }
691         
692         /* if points can be selected on this F-Curve */
693         // TODO: what about those with no keyframes?
694         if ((curves_only == 0) && ((fcu->flag & FCURVE_PROTECTED)==0)) {
695                 /* only if there's keyframe */
696                 if (bezt) {
697                         /* depends on selection mode */
698                         if (select_mode == SELECT_INVERT) {
699                                 /* keyframe - invert select of all */
700                                 if (handle == NEAREST_HANDLE_KEY) {
701                                         if (BEZSELECTED(bezt)) {
702                                                 BEZ_DESEL(bezt);
703                                         }
704                                         else {
705                                                 BEZ_SEL(bezt);
706                                         }
707                                 }
708                                 
709                                 /* handles - toggle selection of relevant handle */
710                                 else if (handle == NEAREST_HANDLE_LEFT) {
711                                         /* toggle selection */
712                                         bezt->f1 ^= SELECT;
713                                 }
714                                 else {
715                                         /* toggle selection */
716                                         bezt->f3 ^= SELECT;
717                                 }
718                         }
719                         else {
720                                 /* if the keyframe was clicked on, select all verts of given beztriple */
721                                 if (handle == NEAREST_HANDLE_KEY) {
722                                         BEZ_SEL(bezt);
723                                 }
724                                 /* otherwise, select the handle that applied */
725                                 else if (handle == NEAREST_HANDLE_LEFT) 
726                                         bezt->f1 |= SELECT;
727                                 else 
728                                         bezt->f3 |= SELECT;
729                         }
730                 }
731         }
732         else {
733                 BeztEditFunc select_cb;
734                 BeztEditData bed;
735                 
736                 /* initialise keyframe editing data */
737                 memset(&bed, 0, sizeof(BeztEditData));
738                 
739                 /* set up BezTriple edit callbacks */
740                 select_cb= ANIM_editkeyframes_select(select_mode);
741                 
742                 /* select all keyframes */
743                 ANIM_fcurve_keys_bezier_loop(&bed, fcu, NULL, select_cb, NULL);
744         }
745         
746         /* select or deselect curve? */
747         if (select_mode == SELECT_INVERT)
748                 fcu->flag ^= FCURVE_SELECTED;
749         else if (select_mode == SELECT_ADD)
750                 fcu->flag |= FCURVE_SELECTED;
751                 
752         /* set active F-Curve (NOTE: sync the filter flags with findnearest_fcurve_vert) */
753         if (fcu->flag & FCURVE_SELECTED) {
754                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
755                 ANIM_set_active_channel(ac, ac->data, ac->datatype, filter, fcu, ANIMTYPE_FCURVE);
756         }
757 }
758
759 /* Option 2) Selects all the keyframes on either side of the current frame (depends on which side the mouse is on) */
760 static void graphkeys_mselect_leftright (bAnimContext *ac, short leftright, short select_mode)
761 {
762         ListBase anim_data = {NULL, NULL};
763         bAnimListElem *ale;
764         int filter;
765         
766         BeztEditFunc ok_cb, select_cb;
767         BeztEditData bed;
768         Scene *scene= ac->scene;
769         
770         /* if select mode is replace, deselect all keyframes (and channels) first */
771         if (select_mode==SELECT_REPLACE) {
772                 /* reset selection mode to add to selection */
773                 select_mode= SELECT_ADD;
774                 
775                 /* deselect all other channels and keyframes */
776                 ANIM_deselect_anim_channels(ac->data, ac->datatype, 0, ACHANNEL_SETFLAG_CLEAR);
777                 deselect_graph_keys(ac, 0, SELECT_SUBTRACT);
778         }
779         
780         /* set callbacks and editing data */
781         ok_cb= ANIM_editkeyframes_ok(BEZT_OK_FRAMERANGE);
782         select_cb= ANIM_editkeyframes_select(select_mode);
783         
784         memset(&bed, 0, sizeof(BeztEditFunc));
785         if (leftright == GRAPHKEYS_LRSEL_LEFT) {
786                 bed.f1 = MINAFRAMEF;
787                 bed.f2 = (float)(CFRA + 0.1f);
788         } 
789         else {
790                 bed.f1 = (float)(CFRA - 0.1f);
791                 bed.f2 = MAXFRAMEF;
792         }
793         
794         /* filter data */
795         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
796         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
797                 
798         /* select keys on the side where most data occurs */
799         for (ale= anim_data.first; ale; ale= ale->next) {
800                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
801                 
802                 if (adt) {
803                         ListBase nlabackup;
804
805                         ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 0, 1, &nlabackup);
806                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, ok_cb, select_cb, NULL);
807                         ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 1, 1, &nlabackup);
808                 }
809                 else
810                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, ok_cb, select_cb, NULL);
811         }
812         
813         /* Cleanup */
814         BLI_freelistN(&anim_data);
815 }
816
817 /* Option 3) Selects all visible keyframes in the same frame as the mouse click */
818 static void graphkeys_mselect_column (bAnimContext *ac, int mval[2], short select_mode)
819 {
820         ListBase anim_data= {NULL, NULL};
821         bAnimListElem *ale;
822         int filter;
823         
824         BeztEditFunc select_cb, ok_cb;
825         BeztEditData bed;
826         FCurve *fcu;
827         BezTriple *bezt;
828         float selx = (float)ac->scene->r.cfra;
829         
830         /* find the beztriple that occurs on this frame, and use his as the frame number we're using */
831         findnearest_fcurve_vert(ac, mval, &fcu, &bezt);
832         
833         /* check if anything to select */
834         if (ELEM(NULL, fcu, bezt))      
835                 return;
836         selx= bezt->vec[1][0];
837         
838         /* if select mode is replace, deselect all keyframes (and channels) first */
839         if (select_mode==SELECT_REPLACE) {
840                 /* reset selection mode to add to selection */
841                 select_mode= SELECT_ADD;
842                 
843                 /* deselect all other channels and keyframes */
844                 ANIM_deselect_anim_channels(ac->data, ac->datatype, 0, ACHANNEL_SETFLAG_CLEAR);
845                 deselect_graph_keys(ac, 0, SELECT_SUBTRACT);
846         }
847         
848         /* initialise keyframe editing data */
849         memset(&bed, 0, sizeof(BeztEditData));
850         
851         /* set up BezTriple edit callbacks */
852         select_cb= ANIM_editkeyframes_select(select_mode);
853         ok_cb= ANIM_editkeyframes_ok(BEZT_OK_FRAME);
854         
855         /* loop through all of the keys and select additional keyframes
856          * based on the keys found to be selected above
857          */
858         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVEVISIBLE | ANIMFILTER_CURVESONLY);
859         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
860         
861         for (ale= anim_data.first; ale; ale= ale->next) {
862                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
863                 
864                 /* set frame for validation callback to refer to */
865                 if (adt)
866                         bed.f1= BKE_nla_tweakedit_remap(adt, selx, NLATIME_CONVERT_UNMAP);
867                 else
868                         bed.f1= selx;
869                 
870                 /* select elements with frame number matching cfra */
871                 ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, ok_cb, select_cb, NULL);
872         }
873         
874         /* free elements */
875         BLI_freelistN(&bed.list);
876         BLI_freelistN(&anim_data);
877 }
878  
879 /* ------------------- */
880
881 /* handle clicking */
882 static int graphkeys_clickselect_invoke(bContext *C, wmOperator *op, wmEvent *event)
883 {
884         bAnimContext ac;
885         Scene *scene;
886         ARegion *ar;
887         View2D *v2d;
888         short selectmode;
889         int mval[2];
890         
891         /* get editor data */
892         if (ANIM_animdata_get_context(C, &ac) == 0)
893                 return OPERATOR_CANCELLED;
894         
895         /* get useful pointers from animation context data */
896         scene= ac.scene;
897         ar= ac.ar;
898         v2d= &ar->v2d;
899         
900         /* get mouse coordinates (in region coordinates) */
901         mval[0]= (event->x - ar->winrct.xmin);
902         mval[1]= (event->y - ar->winrct.ymin);
903         
904         /* select mode is either replace (deselect all, then add) or add/extend */
905         if (RNA_boolean_get(op->ptr, "extend"))
906                 selectmode= SELECT_INVERT;
907         else
908                 selectmode= SELECT_REPLACE;
909         
910         /* figure out action to take */
911         if (RNA_enum_get(op->ptr, "left_right")) {
912                 /* select all keys on same side of current frame as mouse */
913                 float x;
914                 
915                 UI_view2d_region_to_view(v2d, mval[0], mval[1], &x, NULL);
916                 if (x < CFRA)
917                         RNA_int_set(op->ptr, "left_right", GRAPHKEYS_LRSEL_LEFT);
918                 else    
919                         RNA_int_set(op->ptr, "left_right", GRAPHKEYS_LRSEL_RIGHT);
920                 
921                 graphkeys_mselect_leftright(&ac, RNA_enum_get(op->ptr, "left_right"), selectmode);
922         }
923         else if (RNA_boolean_get(op->ptr, "column")) {
924                 /* select all keyframes in the same frame as the one that was under the mouse */
925                 graphkeys_mselect_column(&ac, mval, selectmode);
926         }
927         else if (RNA_boolean_get(op->ptr, "curves")) {
928                 /* select all keyframes in F-Curve under mouse */
929                 mouse_graph_keys(&ac, mval, selectmode, 1);
930         }
931         else {
932                 /* select keyframe under mouse */
933                 mouse_graph_keys(&ac, mval, selectmode, 0);
934         }
935         
936         /* set notifier that keyframe selection (and also channel selection in some cases) has changed */
937         WM_event_add_notifier(C, NC_ANIMATION|ND_KEYFRAME_SELECT|ND_ANIMCHAN_SELECT, NULL);
938         
939         /* for tweak grab to work */
940         return OPERATOR_FINISHED|OPERATOR_PASS_THROUGH;
941 }
942  
943 void GRAPH_OT_clickselect (wmOperatorType *ot)
944 {
945         /* identifiers */
946         ot->name= "Mouse Select Keys";
947         ot->idname= "GRAPH_OT_clickselect";
948         ot->description= "Select keyframes by clicking on them.";
949         
950         /* api callbacks */
951         ot->invoke= graphkeys_clickselect_invoke;
952         ot->poll= graphop_visible_keyframes_poll;
953         
954         /* id-props */
955         // XXX should we make this into separate operators?
956         RNA_def_enum(ot->srna, "left_right", prop_graphkeys_leftright_select_types, 0, "Left Right", ""); // CTRLKEY
957         RNA_def_boolean(ot->srna, "extend", 0, "Extend Select", ""); // SHIFTKEY
958         RNA_def_boolean(ot->srna, "column", 0, "Column Select", "Select all keyframes that occur on the same frame as the one under the mouse"); // ALTKEY
959         RNA_def_boolean(ot->srna, "curves", 0, "Only Curves", "Select all the keyframes in the curve"); // CTRLKEY + ALTKEY
960 }
961
962 /* ************************************************************************** */