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