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