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