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