Graph Editor: Restoring most tools
[blender.git] / source / blender / editors / space_action / action_edit.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) 2001-2002 by NaN Holding BV.
21  * All rights reserved.
22  *
23  * The Original Code is: all of this file.
24  *
25  * Contributor(s): Joshua Leung
26  *
27  * ***** END GPL LICENSE BLOCK *****
28  */
29
30 #include <math.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <float.h>
34
35 #ifdef HAVE_CONFIG_H
36 #include <config.h>
37 #endif
38
39 #include "MEM_guardedalloc.h"
40
41 #include "BLI_blenlib.h"
42 #include "BLI_arithb.h"
43
44 #include "DNA_anim_types.h"
45 #include "DNA_action_types.h"
46 #include "DNA_armature_types.h"
47 #include "DNA_camera_types.h"
48 #include "DNA_curve_types.h"
49 #include "DNA_object_types.h"
50 #include "DNA_screen_types.h"
51 #include "DNA_scene_types.h"
52 #include "DNA_space_types.h"
53 #include "DNA_constraint_types.h"
54 #include "DNA_key_types.h"
55 #include "DNA_lamp_types.h"
56 #include "DNA_material_types.h"
57 #include "DNA_userdef_types.h"
58 #include "DNA_gpencil_types.h"
59 #include "DNA_windowmanager_types.h"
60
61 #include "RNA_access.h"
62 #include "RNA_define.h"
63
64 #include "BKE_action.h"
65 #include "BKE_depsgraph.h"
66 #include "BKE_fcurve.h"
67 #include "BKE_key.h"
68 #include "BKE_material.h"
69 #include "BKE_object.h"
70 #include "BKE_context.h"
71 #include "BKE_utildefines.h"
72
73 #include "UI_view2d.h"
74
75 #include "ED_anim_api.h"
76 #include "ED_keyframing.h"
77 #include "ED_keyframes_draw.h"
78 #include "ED_keyframes_edit.h"
79 #include "ED_screen.h"
80 #include "ED_space_api.h"
81
82 #include "WM_api.h"
83 #include "WM_types.h"
84
85 #include "action_intern.h"
86
87 /* ************************************************************************** */
88 /* KEYFRAME-RANGE STUFF */
89
90 /* *************************** Calculate Range ************************** */
91
92 /* Get the min/max keyframes*/
93 static void get_keyframe_extents (bAnimContext *ac, float *min, float *max)
94 {
95         ListBase anim_data = {NULL, NULL};
96         bAnimListElem *ale;
97         int filter;
98         
99         /* get data to filter, from Action or Dopesheet */
100         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_SEL | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
101         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
102         
103         /* set large values to try to override */
104         *min= 999999999.0f;
105         *max= -999999999.0f;
106         
107         /* check if any channels to set range with */
108         if (anim_data.first) {
109                 /* go through channels, finding max extents */
110                 for (ale= anim_data.first; ale; ale= ale->next) {
111                         Object *nob= ANIM_nla_mapping_get(ac, ale);
112                         FCurve *fcu= (FCurve *)ale->key_data;
113                         float tmin, tmax;
114                         
115                         /* get range and apply necessary scaling before */
116                         calc_fcurve_range(fcu, &tmin, &tmax);
117                         tmin= tmax= 0.0f; // xxx
118                         
119                         if (nob) {
120                                 tmin= get_action_frame_inv(nob, tmin);
121                                 tmax= get_action_frame_inv(nob, tmax);
122                         }
123                         
124                         /* try to set cur using these values, if they're more extreme than previously set values */
125                         *min= MIN2(*min, tmin);
126                         *max= MAX2(*max, tmax);
127                 }
128                 
129                 /* free memory */
130                 BLI_freelistN(&anim_data);
131         }
132         else {
133                 /* set default range */
134                 if (ac->scene) {
135                         *min= (float)ac->scene->r.sfra;
136                         *max= (float)ac->scene->r.efra;
137                 }
138                 else {
139                         *min= -5;
140                         *max= 100;
141                 }
142         }
143 }
144
145 /* ****************** Automatic Preview-Range Operator ****************** */
146
147 static int actkeys_previewrange_exec(bContext *C, wmOperator *op)
148 {
149         bAnimContext ac;
150         Scene *scene;
151         float min, max;
152         
153         /* get editor data */
154         if (ANIM_animdata_get_context(C, &ac) == 0)
155                 return OPERATOR_CANCELLED;
156         if (ac.scene == NULL)
157                 return OPERATOR_CANCELLED;
158         else
159                 scene= ac.scene;
160         
161         /* set the range directly */
162         get_keyframe_extents(&ac, &min, &max);
163         scene->r.psfra= (int)floor(min + 0.5f);
164         scene->r.pefra= (int)floor(max + 0.5f);
165         
166         /* set notifier that things have changed */
167         // XXX err... there's nothing for frame ranges yet, but this should do fine too
168         WM_event_add_notifier(C, NC_SCENE|ND_FRAME, ac.scene); 
169         
170         return OPERATOR_FINISHED;
171 }
172  
173 void ACT_OT_set_previewrange (wmOperatorType *ot)
174 {
175         /* identifiers */
176         ot->name= "Auto-Set Preview Range";
177         ot->idname= "ACT_OT_set_previewrange";
178         
179         /* api callbacks */
180         ot->exec= actkeys_previewrange_exec;
181         ot->poll= ED_operator_areaactive;
182         
183         /* flags */
184         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
185 }
186
187 /* ****************** View-All Operator ****************** */
188
189 static int actkeys_viewall_exec(bContext *C, wmOperator *op)
190 {
191         bAnimContext ac;
192         View2D *v2d;
193         float extra;
194         
195         /* get editor data */
196         if (ANIM_animdata_get_context(C, &ac) == 0)
197                 return OPERATOR_CANCELLED;
198         v2d= &ac.ar->v2d;
199         
200         /* set the horizontal range, with an extra offset so that the extreme keys will be in view */
201         get_keyframe_extents(&ac, &v2d->cur.xmin, &v2d->cur.xmax);
202         
203         extra= 0.05f * (v2d->cur.xmax - v2d->cur.xmin);
204         v2d->cur.xmin -= extra;
205         v2d->cur.xmax += extra;
206         
207         /* set vertical range */
208         v2d->cur.ymax= 0.0f;
209         v2d->cur.ymin= (float)-(v2d->mask.ymax - v2d->mask.ymin);
210         
211         /* do View2D syncing */
212         UI_view2d_sync(CTX_wm_screen(C), CTX_wm_area(C), v2d, V2D_LOCK_COPY);
213         
214         /* set notifier that things have changed */
215         ED_area_tag_redraw(CTX_wm_area(C));
216         
217         return OPERATOR_FINISHED;
218 }
219  
220 void ACT_OT_view_all (wmOperatorType *ot)
221 {
222         /* identifiers */
223         ot->name= "View All";
224         ot->idname= "ACT_OT_view_all";
225         
226         /* api callbacks */
227         ot->exec= actkeys_viewall_exec;
228         ot->poll= ED_operator_areaactive;
229         
230         /* flags */
231         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
232 }
233
234 /* ************************************************************************** */
235 /* GENERAL STUFF */
236
237 // TODO:
238 //      - insert key
239
240 /* ******************** Copy/Paste Keyframes Operator ************************* */
241 /* - The copy/paste buffer currently stores a set of Action Channels, with temporary
242  *      IPO-blocks, and also temporary IpoCurves which only contain the selected keyframes.
243  * - Only pastes between compatable data is possible (i.e. same achan->name, ipo-curve type, etc.)
244  *      Unless there is only one element in the buffer, names are also tested to check for compatability.
245  * - All pasted frames are offset by the same amount. This is calculated as the difference in the times of
246  *      the current frame and the 'first keyframe' (i.e. the earliest one in all channels).
247  * - The earliest frame is calculated per copy operation.
248  */
249
250 /* globals for copy/paste data (like for other copy/paste buffers) */
251 ListBase actcopybuf = {NULL, NULL};
252 static float actcopy_firstframe= 999999999.0f;
253
254 /* This function frees any MEM_calloc'ed copy/paste buffer data */
255 // XXX find some header to put this in!
256 void free_actcopybuf ()
257 {
258         FCurve *fcu, *fcn;
259         
260         /* free_fcurve() frees F-Curve memory too, but we don't need to do remlink first, as we're freeing all 
261          * channels anyway, and the freeing func only cares about the data it's given
262          */
263         for (fcu= actcopybuf.first; fcu; fcu= fcn) {
264                 fcn= fcu->next;
265                 free_fcurve(fcu);
266         }
267         
268         actcopybuf.first= actcopybuf.last= NULL;
269         actcopy_firstframe= 999999999.0f;
270 }
271
272 /* ------------------- */
273
274 /* This function adds data to the copy/paste buffer, freeing existing data first
275  * Only the selected action channels gets their selected keyframes copied.
276  */
277 static short copy_action_keys (bAnimContext *ac)
278 {       
279 #if 0 // XXX old animation system
280         ListBase anim_data = {NULL, NULL};
281         bAnimListElem *ale;
282         int filter;
283         
284         /* clear buffer first */
285         free_actcopybuf();
286         
287         /* filter data */
288         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_SEL | ANIMFILTER_IPOKEYS);
289         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
290         
291         /* assume that each of these is an ipo-block */
292         for (ale= anim_data.first; ale; ale= ale->next) {
293                 bActionChannel *achan;
294                 Ipo *ipo= ale->key_data;
295                 Ipo *ipn;
296                 IpoCurve *icu, *icn;
297                 BezTriple *bezt;
298                 int i;
299                 
300                 /* coerce an action-channel out of owner */
301                 if (ale->ownertype == ANIMTYPE_ACHAN) {
302                         bActionChannel *achanO= ale->owner;
303                         achan= MEM_callocN(sizeof(bActionChannel), "ActCopyPasteAchan");
304                         strcpy(achan->name, achanO->name);
305                 }
306                 else if (ale->ownertype == ANIMTYPE_SHAPEKEY) {
307                         achan= MEM_callocN(sizeof(bActionChannel), "ActCopyPasteAchan");
308                         strcpy(achan->name, "#ACP_ShapeKey");
309                 }
310                 else
311                         continue;
312                 BLI_addtail(&actcopybuf, achan);
313                 
314                 /* add constraint channel if needed, then add new ipo-block */
315                 if (ale->type == ANIMTYPE_CONCHAN) {
316                         bConstraintChannel *conchanO= ale->data;
317                         bConstraintChannel *conchan;
318                         
319                         conchan= MEM_callocN(sizeof(bConstraintChannel), "ActCopyPasteConchan");
320                         strcpy(conchan->name, conchanO->name);
321                         BLI_addtail(&achan->constraintChannels, conchan);
322                         
323                         conchan->ipo= ipn= MEM_callocN(sizeof(Ipo), "ActCopyPasteIpo");
324                 }
325                 else {
326                         achan->ipo= ipn= MEM_callocN(sizeof(Ipo), "ActCopyPasteIpo");
327                 }
328                 ipn->blocktype = ipo->blocktype;
329                 
330                 /* now loop through curves, and only copy selected keyframes */
331                 for (icu= ipo->curve.first; icu; icu= icu->next) {
332                         /* allocate a new curve */
333                         icn= MEM_callocN(sizeof(IpoCurve), "ActCopyPasteIcu");
334                         icn->blocktype = icu->blocktype;
335                         icn->adrcode = icu->adrcode;
336                         BLI_addtail(&ipn->curve, icn);
337                         
338                         /* find selected BezTriples to add to the buffer (and set first frame) */
339                         for (i=0, bezt=icu->bezt; i < icu->totvert; i++, bezt++) {
340                                 if (BEZSELECTED(bezt)) {
341                                         /* add to buffer ipo-curve */
342                                         //insert_bezt_icu(icn, bezt); // XXX
343                                         
344                                         /* check if this is the earliest frame encountered so far */
345                                         if (bezt->vec[1][0] < actcopy_firstframe)
346                                                 actcopy_firstframe= bezt->vec[1][0];
347                                 }
348                         }
349                 }
350         }
351         
352         /* check if anything ended up in the buffer */
353         if (ELEM(NULL, actcopybuf.first, actcopybuf.last))
354         //      error("Nothing copied to buffer");
355                 return -1;
356         
357         /* free temp memory */
358         BLI_freelistN(&anim_data);
359 #endif // XXX old animation system
360         
361         /* everything went fine */
362         return 0;
363 }
364
365 static short paste_action_keys (bAnimContext *ac)
366 {
367 #if 0 // XXX old animation system
368         ListBase anim_data = {NULL, NULL};
369         bAnimListElem *ale;
370         int filter;
371         
372         const Scene *scene= (ac->scene);
373         const float offset = (float)(CFRA - actcopy_firstframe);
374         char *actname = NULL, *conname = NULL;
375         short no_name= 0;
376         
377         /* check if buffer is empty */
378         if (ELEM(NULL, actcopybuf.first, actcopybuf.last)) {
379                 //error("No data in buffer to paste");
380                 return -1;
381         }
382         /* check if single channel in buffer (disregard names if so)  */
383         if (actcopybuf.first == actcopybuf.last)
384                 no_name= 1;
385         
386         /* filter data */
387         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_SEL | ANIMFILTER_FOREDIT | ANIMFILTER_IPOKEYS);
388         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
389         
390         /* from selected channels */
391         for (ale= anim_data.first; ale; ale= ale->next) {
392                 Ipo *ipo_src = NULL;
393                 bActionChannel *achan;
394                 IpoCurve *ico, *icu;
395                 BezTriple *bezt;
396                 int i;
397                 
398                 /* find suitable IPO-block from buffer to paste from */
399                 for (achan= actcopybuf.first; achan; achan= achan->next) {
400                         /* try to match data */
401                         if (ale->ownertype == ANIMTYPE_ACHAN) {
402                                 bActionChannel *achant= ale->owner;
403                                 
404                                 /* check if we have a corresponding action channel */
405                                 if ((no_name) || (strcmp(achan->name, achant->name)==0)) {
406                                         actname= achant->name;
407                                         
408                                         /* check if this is a constraint channel */
409                                         if (ale->type == ANIMTYPE_CONCHAN) {
410                                                 bConstraintChannel *conchant= ale->data;
411                                                 bConstraintChannel *conchan;
412                                                 
413                                                 for (conchan=achan->constraintChannels.first; conchan; conchan=conchan->next) {
414                                                         if (strcmp(conchan->name, conchant->name)==0) {
415                                                                 conname= conchant->name;
416                                                                 ipo_src= conchan->ipo;
417                                                                 break;
418                                                         }
419                                                 }
420                                                 if (ipo_src) break;
421                                         }
422                                         else {
423                                                 ipo_src= achan->ipo;
424                                                 break;
425                                         }
426                                 }
427                         }
428                         else if (ale->ownertype == ANIMTYPE_SHAPEKEY) {
429                                 /* check if this action channel is "#ACP_ShapeKey" */
430                                 if ((no_name) || (strcmp(achan->name, "#ACP_ShapeKey")==0)) {
431                                         actname= NULL;
432                                         ipo_src= achan->ipo;
433                                         break;
434                                 }
435                         }       
436                 }
437                 
438                 /* this shouldn't happen, but it might */
439                 if (ipo_src == NULL)
440                         continue;
441                 
442                 /* loop over curves, pasting keyframes */
443                 for (ico= ipo_src->curve.first; ico; ico= ico->next) {
444                         /* get IPO-curve to paste to (IPO-curve might not exist for destination, so gets created) */
445                         //icu= verify_ipocurve(ale->id, ico->blocktype, actname, conname, NULL, ico->adrcode, 1);
446                         
447                         
448                         if (icu) {
449                                 /* just start pasting, with the the first keyframe on the current frame, and so on */
450                                 for (i=0, bezt=ico->bezt; i < ico->totvert; i++, bezt++) {                                              
451                                         /* temporarily apply offset to src beztriple while copying */
452                                         bezt->vec[0][0] += offset;
453                                         bezt->vec[1][0] += offset;
454                                         bezt->vec[2][0] += offset;
455                                         
456                                         /* insert the keyframe */
457                                         //insert_bezt_icu(icu, bezt); // XXX
458                                         
459                                         /* un-apply offset from src beztriple after copying */
460                                         bezt->vec[0][0] -= offset;
461                                         bezt->vec[1][0] -= offset;
462                                         bezt->vec[2][0] -= offset;
463                                 }
464                                 
465                                 /* recalculate channel's handles? */
466                                 //calchandles_fcurve(fcu);
467                         }
468                 }
469         }
470         
471         /* free temp memory */
472         BLI_freelistN(&anim_data);
473         
474         /* do depsgraph updates (for 3d-view)? */
475 #if 0
476         if ((ob) && (G.saction->pin==0)) {
477                 if (ob->type == OB_ARMATURE)
478                         DAG_object_flush_update(G.scene, ob, OB_RECALC_OB|OB_RECALC_DATA);
479                 else
480                         DAG_object_flush_update(G.scene, ob, OB_RECALC_OB);
481         }
482 #endif
483
484 #endif // XXX old animation system
485
486         return 0;
487 }
488
489 /* ------------------- */
490
491 static int actkeys_copy_exec(bContext *C, wmOperator *op)
492 {
493         bAnimContext ac;
494         
495         /* get editor data */
496         if (ANIM_animdata_get_context(C, &ac) == 0)
497                 return OPERATOR_CANCELLED;
498         
499         /* copy keyframes */
500         if (ac.datatype == ANIMCONT_GPENCIL) {
501                 // FIXME...
502         }
503         else {
504                 if (copy_action_keys(&ac)) {    
505                         // XXX errors - need a way to inform the user 
506                         printf("Action Copy: No keyframes copied to copy-paste buffer\n");
507                 }
508         }
509         
510         /* set notifier tha things have changed */
511         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
512         
513         return OPERATOR_FINISHED;
514 }
515  
516 void ACT_OT_keyframes_copy (wmOperatorType *ot)
517 {
518         /* identifiers */
519         ot->name= "Copy Keyframes";
520         ot->idname= "ACT_OT_keyframes_copy";
521         
522         /* api callbacks */
523         ot->exec= actkeys_copy_exec;
524         ot->poll= ED_operator_areaactive;
525         
526         /* flags */
527         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
528 }
529
530
531
532 static int actkeys_paste_exec(bContext *C, wmOperator *op)
533 {
534         bAnimContext ac;
535         
536         /* get editor data */
537         if (ANIM_animdata_get_context(C, &ac) == 0)
538                 return OPERATOR_CANCELLED;
539         
540         /* paste keyframes */
541         if (ac.datatype == ANIMCONT_GPENCIL) {
542                 // FIXME...
543         }
544         else {
545                 if (paste_action_keys(&ac)) {
546                         // XXX errors - need a way to inform the user 
547                         printf("Action Paste: Nothing to paste, as Copy-Paste buffer was empty.\n");
548                 }
549         }
550         
551         /* validate keyframes after editing */
552         ANIM_editkeyframes_refresh(&ac);
553         
554         /* set notifier tha things have changed */
555         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
556         
557         return OPERATOR_FINISHED;
558 }
559  
560 void ACT_OT_keyframes_paste (wmOperatorType *ot)
561 {
562         /* identifiers */
563         ot->name= "Paste Keyframes";
564         ot->idname= "ACT_OT_keyframes_paste";
565         
566         /* api callbacks */
567         ot->exec= actkeys_paste_exec;
568         ot->poll= ED_operator_areaactive;
569         
570         /* flags */
571         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
572 }
573
574 /* ******************** Delete Keyframes Operator ************************* */
575
576 static void delete_action_keys (bAnimContext *ac)
577 {
578         ListBase anim_data = {NULL, NULL};
579         bAnimListElem *ale;
580         int filter;
581         
582         /* filter data */
583         if (ac->datatype == ANIMCONT_GPENCIL)
584                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT);
585         else
586                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
587         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
588         
589         /* loop through filtered data and delete selected keys */
590         for (ale= anim_data.first; ale; ale= ale->next) {
591                 //if (ale->type == ANIMTYPE_GPLAYER)
592                 //      delete_gplayer_frames((bGPDlayer *)ale->data);
593                 //else
594                         delete_fcurve_keys((FCurve *)ale->key_data); // XXX... this doesn't delete empty curves anymore
595         }
596         
597         /* free filtered list */
598         BLI_freelistN(&anim_data);
599 }
600
601 /* ------------------- */
602
603 static int actkeys_delete_exec(bContext *C, wmOperator *op)
604 {
605         bAnimContext ac;
606         
607         /* get editor data */
608         if (ANIM_animdata_get_context(C, &ac) == 0)
609                 return OPERATOR_CANCELLED;
610                 
611         /* delete keyframes */
612         delete_action_keys(&ac);
613         
614         /* validate keyframes after editing */
615         ANIM_editkeyframes_refresh(&ac);
616         
617         /* set notifier tha things have changed */
618         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
619         
620         return OPERATOR_FINISHED;
621 }
622  
623 void ACT_OT_keyframes_delete (wmOperatorType *ot)
624 {
625         /* identifiers */
626         ot->name= "Delete Keyframes";
627         ot->idname= "ACT_OT_keyframes_delete";
628         
629         /* api callbacks */
630         ot->invoke= WM_operator_confirm;
631         ot->exec= actkeys_delete_exec;
632         ot->poll= ED_operator_areaactive;
633         
634         /* flags */
635         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
636 }
637
638 /* ******************** Clean Keyframes Operator ************************* */
639
640 static void clean_action_keys (bAnimContext *ac, float thresh)
641 {       
642         ListBase anim_data = {NULL, NULL};
643         bAnimListElem *ale;
644         int filter;
645         
646         /* filter data */
647         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_SEL | ANIMFILTER_CURVESONLY);
648         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
649         
650         /* loop through filtered data and clean curves */
651         for (ale= anim_data.first; ale; ale= ale->next)
652                 clean_fcurve((FCurve *)ale->key_data, thresh);
653         
654         /* free temp data */
655         BLI_freelistN(&anim_data);
656 }
657
658 /* ------------------- */
659
660 static int actkeys_clean_exec(bContext *C, wmOperator *op)
661 {
662         bAnimContext ac;
663         float thresh;
664         
665         /* get editor data */
666         if (ANIM_animdata_get_context(C, &ac) == 0)
667                 return OPERATOR_CANCELLED;
668         if (ac.datatype == ANIMCONT_GPENCIL)
669                 return OPERATOR_PASS_THROUGH;
670                 
671         /* get cleaning threshold */
672         thresh= RNA_float_get(op->ptr, "threshold");
673         
674         /* clean keyframes */
675         clean_action_keys(&ac, thresh);
676         
677         /* validate keyframes after editing */
678         ANIM_editkeyframes_refresh(&ac);
679         
680         /* set notifier tha things have changed */
681         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
682         
683         return OPERATOR_FINISHED;
684 }
685  
686 void ACT_OT_keyframes_clean (wmOperatorType *ot)
687 {
688         /* identifiers */
689         ot->name= "Clean Keyframes";
690         ot->idname= "ACT_OT_keyframes_clean";
691         
692         /* api callbacks */
693         //ot->invoke=  // XXX we need that number popup for this! 
694         ot->exec= actkeys_clean_exec;
695         ot->poll= ED_operator_areaactive;
696         
697         /* flags */
698         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
699         
700         /* properties */
701         RNA_def_float(ot->srna, "threshold", 0.001f, 0.0f, FLT_MAX, "Threshold", "", 0.0f, 1000.0f);
702 }
703
704 /* ******************** Sample Keyframes Operator *********************** */
705
706 /* little cache for values... */
707 typedef struct tempFrameValCache {
708         float frame, val;
709 } tempFrameValCache;
710
711 /* Evaluates the curves between each selected keyframe on each frame, and keys the value  */
712 static void sample_action_keys (bAnimContext *ac)
713 {       
714         ListBase anim_data = {NULL, NULL};
715         bAnimListElem *ale;
716         int filter;
717         
718         /* filter data */
719         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
720         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
721         
722         /* loop through filtered data and add keys between selected keyframes on every frame  */
723         for (ale= anim_data.first; ale; ale= ale->next) {
724                 FCurve *fcu= (FCurve *)ale->key_data;
725                 BezTriple *bezt, *start=NULL, *end=NULL;
726                 tempFrameValCache *value_cache, *fp;
727                 int sfra, range;
728                 int i, n;
729                 
730                 /* find selected keyframes... once pair has been found, add keyframes  */
731                 for (i=0, bezt=fcu->bezt; i < fcu->totvert; i++, bezt++) {
732                         /* check if selected, and which end this is */
733                         if (BEZSELECTED(bezt)) {
734                                 if (start) {
735                                         /* set end */
736                                         end= bezt;
737                                         
738                                         /* cache values then add keyframes using these values, as adding
739                                          * keyframes while sampling will affect the outcome...
740                                          */
741                                         range= (int)( ceil(end->vec[1][0] - start->vec[1][0]) );
742                                         sfra= (int)( floor(start->vec[1][0]) );
743                                         
744                                         if (range) {
745                                                 value_cache= MEM_callocN(sizeof(tempFrameValCache)*range, "IcuFrameValCache");
746                                                 
747                                                 /*      sample values   */
748                                                 for (n=0, fp=value_cache; n<range && fp; n++, fp++) {
749                                                         fp->frame= (float)(sfra + n);
750                                                         fp->val= evaluate_fcurve(fcu, fp->frame);
751                                                 }
752                                                 
753                                                 /*      add keyframes with these        */
754                                                 for (n=0, fp=value_cache; n<range && fp; n++, fp++) {
755                                                         insert_vert_fcurve(fcu, fp->frame, fp->val, 1);
756                                                 }
757                                                 
758                                                 /* free temp cache */
759                                                 MEM_freeN(value_cache);
760                                                 
761                                                 /* as we added keyframes, we need to compensate so that bezt is at the right place */
762                                                 bezt = fcu->bezt + i + range - 1;
763                                                 i += (range - 1);
764                                         }
765                                         
766                                         /* bezt was selected, so it now marks the start of a whole new chain to search */
767                                         start= bezt;
768                                         end= NULL;
769                                 }
770                                 else {
771                                         /* just set start keyframe */
772                                         start= bezt;
773                                         end= NULL;
774                                 }
775                         }
776                 }
777                 
778                 /* recalculate channel's handles? */
779                 calchandles_fcurve(fcu);
780         }
781         
782         /* admin and redraws */
783         BLI_freelistN(&anim_data);
784 }
785
786 /* ------------------- */
787
788 static int actkeys_sample_exec(bContext *C, wmOperator *op)
789 {
790         bAnimContext ac;
791         
792         /* get editor data */
793         if (ANIM_animdata_get_context(C, &ac) == 0)
794                 return OPERATOR_CANCELLED;
795         if (ac.datatype == ANIMCONT_GPENCIL)
796                 return OPERATOR_PASS_THROUGH;
797         
798         /* sample keyframes */
799         sample_action_keys(&ac);
800         
801         /* validate keyframes after editing */
802         ANIM_editkeyframes_refresh(&ac);
803         
804         /* set notifier tha things have changed */
805         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
806         
807         return OPERATOR_FINISHED;
808 }
809  
810 void ACT_OT_keyframes_sample (wmOperatorType *ot)
811 {
812         /* identifiers */
813         ot->name= "Sample Keyframes";
814         ot->idname= "ACT_OT_keyframes_sample";
815         
816         /* api callbacks */
817         ot->exec= actkeys_sample_exec;
818         ot->poll= ED_operator_areaactive;
819         
820         /* flags */
821         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
822 }
823
824 /* ************************************************************************** */
825 /* SETTINGS STUFF */
826
827 /* ******************** Set Extrapolation-Type Operator *********************** */
828
829 /* defines for set extrapolation-type for selected keyframes tool */
830 EnumPropertyItem prop_actkeys_expo_types[] = {
831         {FCURVE_EXTRAPOLATE_CONSTANT, "CONSTANT", "Constant Extrapolation", ""},
832         {FCURVE_EXTRAPOLATE_LINEAR, "LINEAR", "Linear Extrapolation", ""},
833         {0, NULL, NULL, NULL}
834 };
835
836 /* this function is responsible for setting extrapolation mode for keyframes */
837 static void setexpo_action_keys(bAnimContext *ac, short mode) 
838 {
839         ListBase anim_data = {NULL, NULL};
840         bAnimListElem *ale;
841         int filter;
842         
843         /* filter data */
844         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
845         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
846         
847         /* loop through setting mode per F-Curve */
848         for (ale= anim_data.first; ale; ale= ale->next) {
849                 FCurve *fcu= (FCurve *)ale->data;
850                 fcu->extend= mode;
851         }
852         
853         /* cleanup */
854         BLI_freelistN(&anim_data);
855 }
856
857 /* ------------------- */
858
859 static int actkeys_expo_exec(bContext *C, wmOperator *op)
860 {
861         bAnimContext ac;
862         short mode;
863         
864         /* get editor data */
865         if (ANIM_animdata_get_context(C, &ac) == 0)
866                 return OPERATOR_CANCELLED;
867         if (ac.datatype == ANIMCONT_GPENCIL) 
868                 return OPERATOR_PASS_THROUGH;
869                 
870         /* get handle setting mode */
871         mode= RNA_enum_get(op->ptr, "type");
872         
873         /* set handle type */
874         setexpo_action_keys(&ac, mode);
875         
876         /* validate keyframes after editing */
877         ANIM_editkeyframes_refresh(&ac);
878         
879         /* set notifier tha things have changed */
880         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
881         
882         return OPERATOR_FINISHED;
883 }
884  
885 void ACT_OT_keyframes_extrapolation_type (wmOperatorType *ot)
886 {
887         /* identifiers */
888         ot->name= "Set Keyframe Extrapolation";
889         ot->idname= "ACT_OT_keyframes_extrapolation_type";
890         
891         /* api callbacks */
892         ot->invoke= WM_menu_invoke;
893         ot->exec= actkeys_expo_exec;
894         ot->poll= ED_operator_areaactive;
895         
896         /* flags */
897         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
898         
899         /* id-props */
900         RNA_def_enum(ot->srna, "type", prop_actkeys_expo_types, 0, "Type", "");
901 }
902
903 /* ******************** Set Interpolation-Type Operator *********************** */
904
905 /* defines for set ipo-type for selected keyframes tool */
906 EnumPropertyItem prop_actkeys_ipo_types[] = {
907         {BEZT_IPO_CONST, "CONSTANT", "Constant Interpolation", ""},
908         {BEZT_IPO_LIN, "LINEAR", "Linear Interpolation", ""},
909         {BEZT_IPO_BEZ, "BEZIER", "Bezier Interpolation", ""},
910         {0, NULL, NULL, NULL}
911 };
912
913 /* this function is responsible for setting interpolation mode for keyframes */
914 static void setipo_action_keys(bAnimContext *ac, short mode) 
915 {
916         ListBase anim_data = {NULL, NULL};
917         bAnimListElem *ale;
918         int filter;
919         BeztEditFunc set_cb= ANIM_editkeyframes_ipo(mode);
920         
921         /* filter data */
922         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
923         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
924         
925         /* loop through setting BezTriple interpolation
926          * Note: we do not supply BeztEditData to the looper yet. Currently that's not necessary here...
927          */
928         for (ale= anim_data.first; ale; ale= ale->next)
929                 ANIM_fcurve_keys_bezier_loop(NULL, ale->key_data, NULL, set_cb, calchandles_fcurve);
930         
931         /* cleanup */
932         BLI_freelistN(&anim_data);
933 }
934
935 /* ------------------- */
936
937 static int actkeys_ipo_exec(bContext *C, wmOperator *op)
938 {
939         bAnimContext ac;
940         short mode;
941         
942         /* get editor data */
943         if (ANIM_animdata_get_context(C, &ac) == 0)
944                 return OPERATOR_CANCELLED;
945         if (ac.datatype == ANIMCONT_GPENCIL) 
946                 return OPERATOR_PASS_THROUGH;
947                 
948         /* get handle setting mode */
949         mode= RNA_enum_get(op->ptr, "type");
950         
951         /* set handle type */
952         setipo_action_keys(&ac, mode);
953         
954         /* validate keyframes after editing */
955         ANIM_editkeyframes_refresh(&ac);
956         
957         /* set notifier tha things have changed */
958         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
959         
960         return OPERATOR_FINISHED;
961 }
962  
963 void ACT_OT_keyframes_interpolation_type (wmOperatorType *ot)
964 {
965         /* identifiers */
966         ot->name= "Set Keyframe Interpolation";
967         ot->idname= "ACT_OT_keyframes_interpolation_type";
968         
969         /* api callbacks */
970         ot->invoke= WM_menu_invoke;
971         ot->exec= actkeys_ipo_exec;
972         ot->poll= ED_operator_areaactive;
973         
974         /* flags */
975         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
976         
977         /* id-props */
978         RNA_def_enum(ot->srna, "type", prop_actkeys_ipo_types, 0, "Type", "");
979 }
980
981 /* ******************** Set Handle-Type Operator *********************** */
982
983 /* defines for set handle-type for selected keyframes tool */
984 EnumPropertyItem prop_actkeys_handletype_types[] = {
985         {HD_AUTO, "AUTO", "Auto Handles", ""},
986         {HD_VECT, "VECTOR", "Vector Handles", ""},
987         {HD_FREE, "FREE", "Free Handles", ""},
988         {HD_ALIGN, "ALIGN", "Aligned Handles", ""},
989 //      {-1, "TOGGLE", "Toggle between Free and Aligned Handles", ""},
990         {0, NULL, NULL, NULL}
991 };
992
993 /* this function is responsible for setting handle-type of selected keyframes */
994 static void sethandles_action_keys(bAnimContext *ac, short mode) 
995 {
996         ListBase anim_data = {NULL, NULL};
997         bAnimListElem *ale;
998         int filter;
999         BeztEditFunc set_cb= ANIM_editkeyframes_handles(mode);
1000         
1001         /* filter data */
1002         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
1003         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
1004         
1005         /* loop through setting flags for handles 
1006          * Note: we do not supply BeztEditData to the looper yet. Currently that's not necessary here...
1007          */
1008         for (ale= anim_data.first; ale; ale= ale->next) {
1009                 if (mode == -1) {       
1010                         BeztEditFunc toggle_cb;
1011                         
1012                         /* check which type of handle to set (free or aligned) 
1013                          *      - check here checks for handles with free alignment already
1014                          */
1015                         if (ANIM_fcurve_keys_bezier_loop(NULL, ale->key_data, NULL, set_cb, NULL))
1016                                 toggle_cb= ANIM_editkeyframes_handles(HD_FREE);
1017                         else
1018                                 toggle_cb= ANIM_editkeyframes_handles(HD_ALIGN);
1019                                 
1020                         /* set handle-type */
1021                         ANIM_fcurve_keys_bezier_loop(NULL, ale->key_data, NULL, toggle_cb, calchandles_fcurve);
1022                 }
1023                 else {
1024                         /* directly set handle-type */
1025                         ANIM_fcurve_keys_bezier_loop(NULL, ale->key_data, NULL, set_cb, calchandles_fcurve);
1026                 }
1027         }
1028         
1029         /* cleanup */
1030         BLI_freelistN(&anim_data);
1031 }
1032
1033 /* ------------------- */
1034
1035 static int actkeys_handletype_exec(bContext *C, wmOperator *op)
1036 {
1037         bAnimContext ac;
1038         short mode;
1039         
1040         /* get editor data */
1041         if (ANIM_animdata_get_context(C, &ac) == 0)
1042                 return OPERATOR_CANCELLED;
1043         if (ac.datatype == ANIMCONT_GPENCIL) 
1044                 return OPERATOR_PASS_THROUGH;
1045                 
1046         /* get handle setting mode */
1047         mode= RNA_enum_get(op->ptr, "type");
1048         
1049         /* set handle type */
1050         sethandles_action_keys(&ac, mode);
1051         
1052         /* validate keyframes after editing */
1053         ANIM_editkeyframes_refresh(&ac);
1054         
1055         /* set notifier tha things have changed */
1056         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
1057         
1058         return OPERATOR_FINISHED;
1059 }
1060  
1061 void ACT_OT_keyframes_handletype (wmOperatorType *ot)
1062 {
1063         /* identifiers */
1064         ot->name= "Set Keyframe Handle Type";
1065         ot->idname= "ACT_OT_keyframes_handletype";
1066         
1067         /* api callbacks */
1068         ot->invoke= WM_menu_invoke;
1069         ot->exec= actkeys_handletype_exec;
1070         ot->poll= ED_operator_areaactive;
1071         
1072         /* flags */
1073         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
1074         
1075         /* id-props */
1076         RNA_def_enum(ot->srna, "type", prop_actkeys_handletype_types, 0, "Type", "");
1077 }
1078
1079 /* ************************************************************************** */
1080 /* TRANSFORM STUFF */
1081
1082 /* ***************** Snap Current Frame Operator *********************** */
1083
1084 /* helper callback for actkeys_cfrasnap_exec() -> used to help get the average time of all selected beztriples */
1085 // TODO: if some other code somewhere needs this, it'll be time to port this over to keyframes_edit.c!!!
1086 static short bezt_calc_average(BeztEditData *bed, BezTriple *bezt)
1087 {
1088         /* only if selected */
1089         if (bezt->f2 & SELECT) {
1090                 /* store average time in float (only do rounding at last step */
1091                 bed->f1 += bezt->vec[1][0];
1092                 
1093                 /* increment number of items */
1094                 bed->i1++;
1095         }
1096         
1097         return 0;
1098 }
1099
1100 /* snap current-frame indicator to 'average time' of selected keyframe */
1101 static int actkeys_cfrasnap_exec(bContext *C, wmOperator *op)
1102 {
1103         bAnimContext ac;
1104         ListBase anim_data= {NULL, NULL};
1105         bAnimListElem *ale;
1106         int filter;
1107         BeztEditData bed;
1108         
1109         /* get editor data */
1110         if (ANIM_animdata_get_context(C, &ac) == 0)
1111                 return OPERATOR_CANCELLED;
1112         
1113         /* init edit data */
1114         memset(&bed, 0, sizeof(BeztEditData));
1115         
1116         /* loop over action data, averaging values */
1117         filter= (ANIMFILTER_VISIBLE | ANIMFILTER_CURVESONLY);
1118         ANIM_animdata_filter(&ac, &anim_data, filter, ac.data, ac.datatype);
1119         
1120         for (ale= anim_data.first; ale; ale= ale->next)
1121                 ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, bezt_calc_average, NULL);
1122         
1123         BLI_freelistN(&anim_data);
1124         
1125         /* set the new current frame value, based on the average time */
1126         if (bed.i1) {
1127                 Scene *scene= ac.scene;
1128                 CFRA= (int)floor((bed.f1 / bed.i1) + 0.5f);
1129         }
1130         
1131         /* set notifier tha things have changed */
1132         WM_event_add_notifier(C, NC_SCENE|ND_FRAME, ac.scene);
1133         
1134         return OPERATOR_FINISHED;
1135 }
1136
1137 void ACT_OT_keyframes_cfrasnap (wmOperatorType *ot)
1138 {
1139         /* identifiers */
1140         ot->name= "Snap Current Frame to Keys";
1141         ot->idname= "ACT_OT_keyframes_cfrasnap";
1142         
1143         /* api callbacks */
1144         ot->exec= actkeys_cfrasnap_exec;
1145         ot->poll= ED_operator_areaactive;
1146         
1147         /* flags */
1148         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
1149 }
1150
1151 /* ******************** Snap Keyframes Operator *********************** */
1152
1153 /* defines for snap keyframes tool */
1154 EnumPropertyItem prop_actkeys_snap_types[] = {
1155         {ACTKEYS_SNAP_CFRA, "CFRA", "Current frame", ""},
1156         {ACTKEYS_SNAP_NEAREST_FRAME, "NEAREST_FRAME", "Nearest Frame", ""}, // XXX as single entry?
1157         {ACTKEYS_SNAP_NEAREST_SECOND, "NEAREST_SECOND", "Nearest Second", ""}, // XXX as single entry?
1158         {ACTKEYS_SNAP_NEAREST_MARKER, "NEAREST_MARKER", "Nearest Marker", ""},
1159         {0, NULL, NULL, NULL}
1160 };
1161
1162 /* this function is responsible for snapping keyframes to frame-times */
1163 static void snap_action_keys(bAnimContext *ac, short mode) 
1164 {
1165         ListBase anim_data = {NULL, NULL};
1166         bAnimListElem *ale;
1167         int filter;
1168         
1169         BeztEditData bed;
1170         BeztEditFunc edit_cb;
1171         
1172         /* filter data */
1173         if (ac->datatype == ANIMCONT_GPENCIL)
1174                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT);
1175         else
1176                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
1177         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
1178         
1179         /* get beztriple editing callbacks */
1180         edit_cb= ANIM_editkeyframes_snap(mode);
1181         
1182         memset(&bed, 0, sizeof(BeztEditData)); 
1183         bed.scene= ac->scene;
1184         
1185         /* snap keyframes */
1186         for (ale= anim_data.first; ale; ale= ale->next) {
1187                 Object *nob= ANIM_nla_mapping_get(ac, ale);
1188                 
1189                 if (nob) {
1190                         ANIM_nla_mapping_apply_fcurve(nob, ale->key_data, 0, 1); 
1191                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, edit_cb, calchandles_fcurve);
1192                         ANIM_nla_mapping_apply_fcurve(nob, ale->key_data, 1, 1);
1193                 }
1194                 //else if (ale->type == ACTTYPE_GPLAYER)
1195                 //      snap_gplayer_frames(ale->data, mode);
1196                 else 
1197                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, edit_cb, calchandles_fcurve);
1198         }
1199         BLI_freelistN(&anim_data);
1200 }
1201
1202 /* ------------------- */
1203
1204 static int actkeys_snap_exec(bContext *C, wmOperator *op)
1205 {
1206         bAnimContext ac;
1207         short mode;
1208         
1209         /* get editor data */
1210         if (ANIM_animdata_get_context(C, &ac) == 0)
1211                 return OPERATOR_CANCELLED;
1212                 
1213         /* get snapping mode */
1214         mode= RNA_enum_get(op->ptr, "type");
1215         
1216         /* snap keyframes */
1217         snap_action_keys(&ac, mode);
1218         
1219         /* validate keyframes after editing */
1220         ANIM_editkeyframes_refresh(&ac);
1221         
1222         /* set notifier tha things have changed */
1223         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
1224         
1225         return OPERATOR_FINISHED;
1226 }
1227  
1228 void ACT_OT_keyframes_snap (wmOperatorType *ot)
1229 {
1230         /* identifiers */
1231         ot->name= "Snap Keys";
1232         ot->idname= "ACT_OT_keyframes_snap";
1233         
1234         /* api callbacks */
1235         ot->invoke= WM_menu_invoke;
1236         ot->exec= actkeys_snap_exec;
1237         ot->poll= ED_operator_areaactive;
1238         
1239         /* flags */
1240         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
1241         
1242         /* id-props */
1243         RNA_def_enum(ot->srna, "type", prop_actkeys_snap_types, 0, "Type", "");
1244 }
1245
1246 /* ******************** Mirror Keyframes Operator *********************** */
1247
1248 /* defines for mirror keyframes tool */
1249 EnumPropertyItem prop_actkeys_mirror_types[] = {
1250         {ACTKEYS_MIRROR_CFRA, "CFRA", "Current frame", ""},
1251         {ACTKEYS_MIRROR_YAXIS, "YAXIS", "Vertical Axis", ""},
1252         {ACTKEYS_MIRROR_XAXIS, "XAXIS", "Horizontal Axis", ""},
1253         {ACTKEYS_MIRROR_MARKER, "MARKER", "First Selected Marker", ""},
1254         {0, NULL, NULL, NULL}
1255 };
1256
1257 /* this function is responsible for mirroring keyframes */
1258 static void mirror_action_keys(bAnimContext *ac, short mode) 
1259 {
1260         ListBase anim_data = {NULL, NULL};
1261         bAnimListElem *ale;
1262         int filter;
1263         
1264         BeztEditData bed;
1265         BeztEditFunc edit_cb;
1266         
1267         /* get beztriple editing callbacks */
1268         edit_cb= ANIM_editkeyframes_mirror(mode);
1269         
1270         memset(&bed, 0, sizeof(BeztEditData)); 
1271         bed.scene= ac->scene;
1272         
1273         /* for 'first selected marker' mode, need to find first selected marker first! */
1274         // XXX should this be made into a helper func in the API?
1275         if (mode == ACTKEYS_MIRROR_MARKER) {
1276                 Scene *scene= ac->scene;
1277                 TimeMarker *marker= NULL;
1278                 
1279                 /* find first selected marker */
1280                 for (marker= scene->markers.first; marker; marker=marker->next) {
1281                         if (marker->flag & SELECT) {
1282                                 break;
1283                         }
1284                 }
1285                 
1286                 /* store marker's time (if available) */
1287                 if (marker)
1288                         bed.f1= (float)marker->frame;
1289                 else
1290                         return;
1291         }
1292         
1293         /* filter data */
1294         if (ac->datatype == ANIMCONT_GPENCIL)
1295                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT);
1296         else
1297                 filter= (ANIMFILTER_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVESONLY);
1298         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
1299         
1300         /* mirror keyframes */
1301         for (ale= anim_data.first; ale; ale= ale->next) {
1302                 Object *nob= ANIM_nla_mapping_get(ac, ale);
1303                 
1304                 if (nob) {
1305                         ANIM_nla_mapping_apply_fcurve(nob, ale->key_data, 0, 1); 
1306                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, edit_cb, calchandles_fcurve);
1307                         ANIM_nla_mapping_apply_fcurve(nob, ale->key_data, 1, 1);
1308                 }
1309                 //else if (ale->type == ACTTYPE_GPLAYER)
1310                 //      snap_gplayer_frames(ale->data, mode);
1311                 else 
1312                         ANIM_fcurve_keys_bezier_loop(&bed, ale->key_data, NULL, edit_cb, calchandles_fcurve);
1313         }
1314         BLI_freelistN(&anim_data);
1315 }
1316
1317 /* ------------------- */
1318
1319 static int actkeys_mirror_exec(bContext *C, wmOperator *op)
1320 {
1321         bAnimContext ac;
1322         short mode;
1323         
1324         /* get editor data */
1325         if (ANIM_animdata_get_context(C, &ac) == 0)
1326                 return OPERATOR_CANCELLED;
1327                 
1328         /* get mirroring mode */
1329         mode= RNA_enum_get(op->ptr, "type");
1330         
1331         /* mirror keyframes */
1332         mirror_action_keys(&ac, mode);
1333         
1334         /* validate keyframes after editing */
1335         ANIM_editkeyframes_refresh(&ac);
1336         
1337         /* set notifier tha things have changed */
1338         ANIM_animdata_send_notifiers(C, &ac, ANIM_CHANGED_KEYFRAMES_VALUES);
1339         
1340         return OPERATOR_FINISHED;
1341 }
1342  
1343 void ACT_OT_keyframes_mirror (wmOperatorType *ot)
1344 {
1345         /* identifiers */
1346         ot->name= "Mirror Keys";
1347         ot->idname= "ACT_OT_keyframes_mirror";
1348         
1349         /* api callbacks */
1350         ot->invoke= WM_menu_invoke;
1351         ot->exec= actkeys_mirror_exec;
1352         ot->poll= ED_operator_areaactive;
1353         
1354         /* flags */
1355         ot->flag= OPTYPE_REGISTER/*|OPTYPE_UNDO*/;
1356         
1357         /* id-props */
1358         RNA_def_enum(ot->srna, "type", prop_actkeys_mirror_types, 0, "Type", "");
1359 }
1360
1361 /* ************************************************************************** */