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