Radians vs Degrees: The Second Attempt
[blender-staging.git] / source / blender / editors / space_graph / graph_draw.c
1 /**
2  * $Id$
3  *
4  * ***** BEGIN GPL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19  *
20  * The Original Code is Copyright (C) Blender Foundation
21  *
22  * Contributor(s): Joshua Leung (2009 Recode)
23  *
24  * ***** END GPL LICENSE BLOCK *****
25  */
26
27 #include <stdio.h>
28 #include <math.h>
29 #include <string.h>
30 #include <float.h>
31
32 #ifdef HAVE_CONFIG_H
33 #include <config.h>
34 #endif
35
36 #ifndef _WIN32
37 #include <unistd.h>
38 #else
39 #include <io.h>
40 #endif
41
42 #include "MEM_guardedalloc.h"
43
44 #include "BLI_blenlib.h"
45 #include "BLI_math.h"
46
47 #include "DNA_anim_types.h"
48 #include "DNA_action_types.h"
49 #include "DNA_camera_types.h"
50 #include "DNA_curve_types.h"
51 #include "DNA_key_types.h"
52 #include "DNA_lamp_types.h"
53 #include "DNA_material_types.h"
54 #include "DNA_meta_types.h"
55 #include "DNA_object_types.h"
56 #include "DNA_particle_types.h"
57 #include "DNA_scene_types.h"
58 #include "DNA_screen_types.h"
59 #include "DNA_space_types.h"
60 #include "DNA_sequence_types.h"
61 #include "DNA_userdef_types.h"
62 #include "DNA_view2d_types.h"
63 #include "DNA_windowmanager_types.h"
64 #include "DNA_world_types.h"
65
66 #include "BKE_animsys.h"
67 #include "BKE_context.h"
68 #include "BKE_curve.h"
69 #include "BKE_depsgraph.h"
70 #include "BKE_fcurve.h"
71 #include "BKE_global.h"
72 #include "BKE_key.h"
73 #include "BKE_object.h"
74 #include "BKE_screen.h"
75 #include "BKE_utildefines.h"
76
77 #include "BIF_gl.h"
78 #include "BIF_glutil.h"
79
80 #include "ED_anim_api.h"
81 #include "ED_util.h"
82
83 #include "graph_intern.h"
84
85 #include "UI_interface.h"
86 #include "UI_interface_icons.h"
87 #include "UI_resources.h"
88 #include "UI_view2d.h"
89
90 /* *************************** */
91 /* Utility Drawing Defines */
92
93 /* determine the alpha value that should be used when 
94  * drawing components for some F-Curve (fcu)
95  *      - selected F-Curves should be more visible than partially visible ones
96  */
97 #define drawFCurveFade(fcu) ( ((fcu)->flag & FCURVE_SELECTED)? 1.0f : 0.5f )
98
99 /* set the colour for some point from some value given packed into an int 
100  *      - intV: integer value containing color info packed into an int
101  *      - alpha: float value describing the 
102  */
103 #define cpackA(intVC, alpha) \
104         { \
105                 float _cpackCol[3]; \
106                 cpack_to_rgb(intVC, &_cpackCol[0], &_cpackCol[1], &_cpackCol[2]); \
107                 glColor4f(_cpackCol[0], _cpackCol[1], _cpackCol[2], alpha); \
108         }
109
110 /* *************************** */
111 /* F-Curve Modifier Drawing */
112
113 /* Envelope -------------- */
114
115 // TODO: draw a shaded poly showing the region of influence too!!!
116 static void draw_fcurve_modifier_controls_envelope (FCurve *fcu, FModifier *fcm, View2D *v2d)
117 {
118         FMod_Envelope *env= (FMod_Envelope *)fcm->data;
119         FCM_EnvelopeData *fed;
120         const float fac= 0.05f * (v2d->cur.xmax - v2d->cur.xmin);
121         int i;
122         
123         /* draw two black lines showing the standard reference levels */
124         glColor3f(0.0f, 0.0f, 0.0f);
125         setlinestyle(5);
126         
127         glBegin(GL_LINES);
128                 glVertex2f(v2d->cur.xmin, env->midval+env->min);
129                 glVertex2f(v2d->cur.xmax, env->midval+env->min);
130                 
131                 glVertex2f(v2d->cur.xmin, env->midval+env->max);
132                 glVertex2f(v2d->cur.xmax, env->midval+env->max);
133         glEnd(); // GL_LINES
134         setlinestyle(0);
135         
136         /* set size of vertices (non-adjustable for now) */
137         glPointSize(2.0f);
138         
139         // for now, point color is fixed, and is white
140         glColor3f(1.0f, 1.0f, 1.0f);
141         
142         /* we use bgl points not standard gl points, to workaround vertex 
143          * drawing bugs that some drivers have (probably legacy ones only though)
144          */
145         bglBegin(GL_POINTS);
146         for (i=0, fed=env->data; i < env->totvert; i++, fed++) {
147                 /* only draw if visible
148                  *      - min/max here are fixed, not relative
149                  */
150                 if IN_RANGE(fed->time, (v2d->cur.xmin - fac), (v2d->cur.xmax + fac)) {
151                         glVertex2f(fed->time, fed->min);
152                         glVertex2f(fed->time, fed->max);
153                 }
154         }
155         bglEnd(); // GL_POINTS
156         
157         glPointSize(1.0f);
158 }
159
160 /* *************************** */
161 /* F-Curve Drawing */
162
163 /* Points ---------------- */
164
165 /* helper func - draw keyframe vertices only for an F-Curve */
166 static void draw_fcurve_vertices_keyframes (bAnimContext *ac, FCurve *fcu, View2D *v2d, short edit, short sel)
167 {
168         BezTriple *bezt= fcu->bezt;
169         const float fac= 0.05f * (v2d->cur.xmax - v2d->cur.xmin);
170         int i;
171         
172         /* we use bgl points not standard gl points, to workaround vertex 
173          * drawing bugs that some drivers have (probably legacy ones only though)
174          */
175         bglBegin(GL_POINTS);
176         
177         for (i = 0; i < fcu->totvert; i++, bezt++) {
178                 /* as an optimisation step, only draw those in view 
179                  *      - we apply a correction factor to ensure that points don't pop in/out due to slight twitches of view size
180                  */
181                 if IN_RANGE(bezt->vec[1][0], (v2d->cur.xmin - fac), (v2d->cur.xmax + fac)) {
182                         if (edit) {
183                                 /* 'Keyframe' vertex only, as handle lines and handles have already been drawn
184                                  *      - only draw those with correct selection state for the current drawing color
185                                  *      - 
186                                  */
187                                 if ((bezt->f2 & SELECT) == sel)
188                                         bglVertex3fv(bezt->vec[1]);
189                         }
190                         else {
191                                 /* no check for selection here, as curve is not editable... */
192                                 // XXX perhaps we don't want to even draw points?   maybe add an option for that later
193                                 bglVertex3fv(bezt->vec[1]);
194                         }
195                 }
196         }
197         
198         bglEnd(); // GL_POINTS
199 }
200
201
202 /* helper func - draw handle vertex for an F-Curve as a round unfilled circle 
203  * NOTE: the caller MUST HAVE GL_LINE_SMOOTH & GL_BLEND ENABLED, otherwise, the controls don't 
204  * have a consistent appearance (due to off-pixel alignments)...
205  */
206 static void draw_fcurve_handle_control (float x, float y, float xscale, float yscale, float hsize)
207 {
208         static GLuint displist=0;
209         
210         /* initialise round circle shape */
211         if (displist == 0) {
212                 GLUquadricObj *qobj;
213                 
214                 displist= glGenLists(1);
215                 glNewList(displist, GL_COMPILE);
216                 
217                 qobj    = gluNewQuadric(); 
218                 gluQuadricDrawStyle(qobj, GLU_SILHOUETTE); 
219                 gluDisk(qobj, 0,  0.7, 8, 1);
220                 gluDeleteQuadric(qobj);  
221                 
222                 glEndList();
223         }
224         
225         /* adjust view transform before starting */
226         glTranslatef(x, y, 0.0f);
227         glScalef(1.0f/xscale*hsize, 1.0f/yscale*hsize, 1.0f);
228         
229         /* draw! */
230         glCallList(displist);
231         
232         /* restore view transform */
233         glScalef(xscale/hsize, yscale/hsize, 1.0);
234         glTranslatef(-x, -y, 0.0f);
235 }
236
237 /* helper func - draw handle vertices only for an F-Curve (if it is not protected) */
238 static void draw_fcurve_vertices_handles (bAnimContext *ac, SpaceIpo *sipo, FCurve *fcu, View2D *v2d, short sel)
239 {
240         BezTriple *bezt= fcu->bezt;
241         BezTriple *prevbezt = NULL;
242         float hsize, xscale, yscale;
243         int i;
244         
245         /* get view settings */
246         hsize= UI_GetThemeValuef(TH_HANDLE_VERTEX_SIZE);
247         UI_view2d_getscale(v2d, &xscale, &yscale);
248         
249         /* set handle color */
250         if (sel) UI_ThemeColor(TH_HANDLE_VERTEX_SELECT);
251         else UI_ThemeColor(TH_HANDLE_VERTEX);
252         
253         /* anti-aliased lines for more consistent appearance */
254         glEnable(GL_LINE_SMOOTH);
255         glEnable(GL_BLEND);
256         
257         for (i=0; i < fcu->totvert; i++, prevbezt=bezt, bezt++) {
258                 /* Draw the editmode handles for a bezier curve (others don't have handles) 
259                  * if their selection status matches the selection status we're drawing for
260                  *      - first handle only if previous beztriple was bezier-mode
261                  *      - second handle only if current beztriple is bezier-mode
262                  *
263                  * Also, need to take into account whether the keyframe was selected
264                  * if a Graph Editor option to only show handles of selected keys is on.
265                  */
266                 if ( !(sipo->flag & SIPO_SELVHANDLESONLY) || BEZSELECTED(bezt) ) {
267                         if ( (!prevbezt && (bezt->ipo==BEZT_IPO_BEZ)) || (prevbezt && (prevbezt->ipo==BEZT_IPO_BEZ)) ) {
268                                 if ((bezt->f1 & SELECT) == sel)/* && v2d->cur.xmin < bezt->vec[0][0] < v2d->cur.xmax)*/
269                                         draw_fcurve_handle_control(bezt->vec[0][0], bezt->vec[0][1], xscale, yscale, hsize);
270                         }
271                         
272                         if (bezt->ipo==BEZT_IPO_BEZ) {
273                                 if ((bezt->f3 & SELECT) == sel)/* && v2d->cur.xmin < bezt->vec[2][0] < v2d->cur.xmax)*/
274                                         draw_fcurve_handle_control(bezt->vec[2][0], bezt->vec[2][1], xscale, yscale, hsize);
275                         }
276                 }
277         }
278         
279         glDisable(GL_LINE_SMOOTH);
280         glDisable(GL_BLEND);
281 }
282
283 /* helper func - set color to draw F-Curve data with */
284 static void set_fcurve_vertex_color (SpaceIpo *sipo, FCurve *fcu, short sel)
285 {
286         /* Fade the 'intensity' of the vertices based on the selection of the curves too */
287         int alphaOffset= (int)((drawFCurveFade(fcu) - 1.0f) * 255);
288         
289         /* Set color of curve vertex based on state of curve (i.e. 'Edit' Mode) */
290         if ((fcu->flag & FCURVE_PROTECTED)==0) {
291                 /* Curve's points ARE BEING edited */
292                 if (sel) UI_ThemeColorShadeAlpha(TH_VERTEX_SELECT, 0, alphaOffset); 
293                 else UI_ThemeColorShadeAlpha(TH_VERTEX, 0, alphaOffset);
294         } 
295         else {
296                 /* Curve's points CANNOT BE edited */
297                 if (sel) UI_ThemeColorShadeAlpha(TH_TEXT_HI, 0, alphaOffset);
298                 else UI_ThemeColorShadeAlpha(TH_TEXT, 0, alphaOffset);
299         }
300 }
301
302
303 void draw_fcurve_vertices (bAnimContext *ac, SpaceIpo *sipo, ARegion *ar, FCurve *fcu)
304 {
305         View2D *v2d= &ar->v2d;
306         
307         /* only draw points if curve is visible 
308          *      - draw unselected points before selected points as separate passes to minimise color-changing overhead
309          *         (XXX dunno if this is faster than drawing all in one pass though) 
310          *         and also to make sure in the case of overlapping points that the selected is always visible
311          *      - draw handles before keyframes, so that keyframes will overlap handles (keyframes are more important for users)
312          */
313         
314         glPointSize(UI_GetThemeValuef(TH_VERTEX_SIZE));
315         
316         /* draw the two handles first (if they're shown, the curve doesn't have just a single keyframe, and the curve is being edited) */
317         if ((fcu->flag & FCURVE_PROTECTED)==0 && (fcu->flag & FCURVE_INT_VALUES)==0 && 
318                 (sipo->flag & SIPO_NOHANDLES)==0 && (fcu->totvert > 1)) 
319         {
320                 set_fcurve_vertex_color(sipo, fcu, 0);
321                 draw_fcurve_vertices_handles(ac, sipo, fcu, v2d, 0);
322                 
323                 set_fcurve_vertex_color(sipo, fcu, 1);
324                 draw_fcurve_vertices_handles(ac, sipo, fcu, v2d, 1);
325         }
326                 
327         /* draw keyframes over the handles */
328         set_fcurve_vertex_color(sipo, fcu, 0);
329         draw_fcurve_vertices_keyframes(ac, fcu, v2d, !(fcu->flag & FCURVE_PROTECTED), 0);
330         
331         set_fcurve_vertex_color(sipo, fcu, 1);
332         draw_fcurve_vertices_keyframes(ac, fcu, v2d, !(fcu->flag & FCURVE_PROTECTED), 1);
333         
334         glPointSize(1.0f);
335 }
336
337 /* Handles ---------------- */
338
339 /* draw lines for F-Curve handles only (this is only done in EditMode) */
340 static void draw_fcurve_handles (bAnimContext *ac, SpaceIpo *sipo, ARegion *ar, FCurve *fcu)
341 {
342         extern unsigned int nurbcol[];
343         int sel, b;
344         
345         /* don't draw handle lines if handles are not shown */
346         if ((sipo->flag & SIPO_NOHANDLES) || (fcu->flag & FCURVE_PROTECTED) || (fcu->flag & FCURVE_INT_VALUES))
347                 return;
348         
349         /* a single call to GL_LINES here around these calls should be sufficient to still
350          * get separate line segments, but which aren't wrapped with GL_LINE_STRIP everytime we
351          * want a single line
352          */
353         glBegin(GL_LINES);
354         
355         /* slightly hacky, but we want to draw unselected points before selected ones 
356          * so that selected points are clearly visible
357          */
358         for (sel= 0; sel < 2; sel++) {
359                 BezTriple *bezt=fcu->bezt, *prevbezt=NULL;
360                 unsigned int *col= (sel)? (nurbcol+4) : (nurbcol);
361                 float *fp;
362                 
363                 /* if only selected keyframes have handles shown, skip the first round */
364                 if ((sel == 0) && (sipo->flag & SIPO_SELVHANDLESONLY))
365                         continue;
366                 
367                 for (b= 0; b < fcu->totvert; b++, prevbezt=bezt, bezt++) {
368                         /* if only selected keyframes can get their handles shown, 
369                          * check that keyframe is selected
370                          */
371                         if (sipo->flag & SIPO_SELVHANDLESONLY) {
372                                 if (BEZSELECTED(bezt) == 0)
373                                         continue;
374                         }
375                         
376                         /* draw handle with appropriate set of colors if selection is ok */
377                         if ((bezt->f2 & SELECT)==sel) {
378                                 fp= bezt->vec[0];
379                                 
380                                 /* only draw first handle if previous segment had handles */
381                                 if ( (!prevbezt && (bezt->ipo==BEZT_IPO_BEZ)) || (prevbezt && (prevbezt->ipo==BEZT_IPO_BEZ)) ) 
382                                 {
383                                         cpackA(col[(unsigned char)bezt->h1], drawFCurveFade(fcu));
384                                         
385                                         glVertex2fv(fp); glVertex2fv(fp+3); 
386                                 }
387                                 
388                                 /* only draw second handle if this segment is bezier */
389                                 if (bezt->ipo == BEZT_IPO_BEZ) 
390                                 {
391                                         cpackA(col[(unsigned char)bezt->h2], drawFCurveFade(fcu));
392                                         glVertex2fv(fp+3); glVertex2fv(fp+6); 
393                                 }
394                         }
395                         else {
396                                 /* only draw first handle if previous segment was had handles, and selection is ok */
397                                 if ( ((bezt->f1 & SELECT)==sel) && 
398                                          ( (!prevbezt && (bezt->ipo==BEZT_IPO_BEZ)) || (prevbezt && (prevbezt->ipo==BEZT_IPO_BEZ)) ) ) 
399                                 {
400                                         fp= bezt->vec[0];
401                                         cpackA(col[(unsigned char)bezt->h1], drawFCurveFade(fcu));
402                                         
403                                         glVertex2fv(fp); glVertex2fv(fp+3); 
404                                 }
405                                 
406                                 /* only draw second handle if this segment is bezier, and selection is ok */
407                                 if ( ((bezt->f3 & SELECT)==sel) &&
408                                          (bezt->ipo == BEZT_IPO_BEZ) )
409                                 {
410                                         fp= bezt->vec[1];
411                                         cpackA(col[(unsigned char)bezt->h2], drawFCurveFade(fcu));
412                                         
413                                         glVertex2fv(fp); glVertex2fv(fp+3); 
414                                 }
415                         }
416                 }
417         }
418         
419         glEnd(); // GL_LINES
420 }
421
422 /* Samples ---------------- */
423
424 /* helper func - draw sample-range marker for an F-Curve as a cross 
425  * NOTE: the caller MUST HAVE GL_LINE_SMOOTH & GL_BLEND ENABLED, otherwise, the controls don't 
426  * have a consistent appearance (due to off-pixel alignments)...
427  */
428 static void draw_fcurve_sample_control (float x, float y, float xscale, float yscale, float hsize)
429 {
430         static GLuint displist=0;
431         
432         /* initialise X shape */
433         if (displist == 0) {
434                 displist= glGenLists(1);
435                 glNewList(displist, GL_COMPILE);
436                 
437                 glBegin(GL_LINES);
438                         glVertex2f(-0.7f, -0.7f);
439                         glVertex2f(+0.7f, +0.7f);
440                         
441                         glVertex2f(-0.7f, +0.7f);
442                         glVertex2f(+0.7f, -0.7f);
443                 glEnd(); // GL_LINES
444                 
445                 glEndList();
446         }
447         
448         /* adjust view transform before starting */
449         glTranslatef(x, y, 0.0f);
450         glScalef(1.0f/xscale*hsize, 1.0f/yscale*hsize, 1.0f);
451         
452         /* draw! */
453         glCallList(displist);
454         
455         /* restore view transform */
456         glScalef(xscale/hsize, yscale/hsize, 1.0);
457         glTranslatef(-x, -y, 0.0f);
458 }
459
460 /* helper func - draw keyframe vertices only for an F-Curve */
461 static void draw_fcurve_samples (bAnimContext *ac, SpaceIpo *sipo, ARegion *ar, FCurve *fcu)
462 {
463         FPoint *first, *last;
464         float hsize, xscale, yscale;
465         
466         /* get view settings */
467         hsize= UI_GetThemeValuef(TH_VERTEX_SIZE);
468         UI_view2d_getscale(&ar->v2d, &xscale, &yscale);
469         
470         /* set vertex color */
471         if (fcu->flag & (FCURVE_ACTIVE|FCURVE_SELECTED)) UI_ThemeColor(TH_TEXT_HI);
472         else UI_ThemeColor(TH_TEXT);
473         
474         /* get verts */
475         first= fcu->fpt;
476         last= (first) ? (first + (fcu->totvert-1)) : (NULL);
477         
478         /* draw */
479         if (first && last) {
480                 /* anti-aliased lines for more consistent appearance */
481                 glEnable(GL_LINE_SMOOTH);
482                 glEnable(GL_BLEND);
483                 
484                 draw_fcurve_sample_control(first->vec[0], first->vec[1], xscale, yscale, hsize);
485                 draw_fcurve_sample_control(last->vec[0], last->vec[1], xscale, yscale, hsize);
486                 
487                 glDisable(GL_BLEND);
488                 glDisable(GL_LINE_SMOOTH);
489         }
490 }
491
492 /* Curve ---------------- */
493
494 /* minimum pixels per gridstep 
495  * XXX: defined in view2d.c - must keep these in sync or relocate to View2D header!
496  */
497 #define MINGRIDSTEP     35
498
499 /* helper func - just draw the F-Curve by sampling the visible region (for drawing curves with modifiers) */
500 static void draw_fcurve_curve (bAnimContext *ac, ID *id, FCurve *fcu, SpaceIpo *sipo, View2D *v2d, View2DGrid *grid)
501 {
502         ChannelDriver *driver;
503         float samplefreq, ctime;
504         float stime, etime;
505         float unitFac;
506         
507         /* disable any drivers temporarily */
508         driver= fcu->driver;
509         fcu->driver= NULL;
510         
511         /* compute unit correction factor */
512         unitFac= ANIM_unit_mapping_get_factor(ac->scene, id, fcu, 0);
513         
514         /* Note about sampling frequency:
515          *      Ideally, this is chosen such that we have 1-2 pixels = 1 segment
516          *      which means that our curves can be as smooth as possible. However,
517          *      this does mean that curves may not be fully accurate (i.e. if they have
518          *      sudden spikes which happen at the sampling point, we may have problems).
519          *      Also, this may introduce lower performance on less densely detailed curves,'
520          *      though it is impossible to predict this from the modifiers!
521          *
522          *      If the automatically determined sampling frequency is likely to cause an infinite
523          *      loop (i.e. too close to FLT_EPSILON), fall back to default of 0.001
524          */
525                 /* grid->dx is the first float in View2DGrid struct, so just cast to float pointer, and use it
526                  * It represents the number of 'frames' between gridlines, but we divide by MINGRIDSTEP to get pixels-steps
527                  */
528                 // TODO: perhaps we should have 1.0 frames as upper limit so that curves don't get too distorted?
529         samplefreq= *((float *)grid) / MINGRIDSTEP;
530         if (IS_EQ(samplefreq, 0)) samplefreq= 0.001f;
531         
532         
533         /* the start/end times are simply the horizontal extents of the 'cur' rect */
534         stime= v2d->cur.xmin;
535         etime= v2d->cur.xmax;
536         
537         
538         /* at each sampling interval, add a new vertex 
539          *      - apply the unit correction factor to the calculated values so that 
540          *        the displayed values appear correctly in the viewport
541          */
542         glBegin(GL_LINE_STRIP);
543         
544         for (ctime= stime; ctime <= etime; ctime += samplefreq)
545                 glVertex2f( ctime, evaluate_fcurve(fcu, ctime)*unitFac );
546         
547         glEnd();
548         
549         /* restore driver */
550         fcu->driver= driver;
551 }
552
553 /* helper func - draw a samples-based F-Curve */
554 static void draw_fcurve_curve_samples (bAnimContext *ac, ID *id, FCurve *fcu, View2D *v2d)
555 {
556         FPoint *prevfpt= fcu->fpt;
557         FPoint *fpt= prevfpt + 1;
558         float fac, v[2];
559         int b= fcu->totvert-1;
560         
561         glBegin(GL_LINE_STRIP);
562         
563         /* apply unit mapping */
564         ANIM_unit_mapping_apply_fcurve(ac->scene, id, fcu, 0, 0);
565         
566         /* extrapolate to left? - left-side of view comes before first keyframe? */
567         if (prevfpt->vec[0] > v2d->cur.xmin) {
568                 v[0]= v2d->cur.xmin;
569                 
570                 /* y-value depends on the interpolation */
571                 if ((fcu->extend==FCURVE_EXTRAPOLATE_CONSTANT) || (fcu->flag & FCURVE_INT_VALUES) || (fcu->totvert==1)) {
572                         /* just extend across the first keyframe's value */
573                         v[1]= prevfpt->vec[1];
574                 } 
575                 else {
576                         /* extrapolate linear dosnt use the handle, use the next points center instead */
577                         fac= (prevfpt->vec[0]-fpt->vec[0])/(prevfpt->vec[0]-v[0]);
578                         if (fac) fac= 1.0f/fac;
579                         v[1]= prevfpt->vec[1]-fac*(prevfpt->vec[1]-fpt->vec[1]);
580                 }
581                 
582                 glVertex2fv(v);
583         }
584         
585         /* if only one sample, add it now */
586         if (fcu->totvert == 1)
587                 glVertex2fv(prevfpt->vec);
588         
589         /* loop over samples, drawing segments */
590         /* draw curve between first and last keyframe (if there are enough to do so) */
591         while (b--) {
592                 /* Linear interpolation: just add one point (which should add a new line segment) */
593                 glVertex2fv(prevfpt->vec);
594                 
595                 /* get next pointers */
596                 prevfpt= fpt; 
597                 fpt++;
598                 
599                 /* last point? */
600                 if (b == 0)
601                         glVertex2fv(prevfpt->vec);
602         }
603         
604         /* extrapolate to right? (see code for left-extrapolation above too) */
605         if (prevfpt->vec[0] < v2d->cur.xmax) {
606                 v[0]= v2d->cur.xmax;
607                 
608                 /* y-value depends on the interpolation */
609                 if ((fcu->extend==FCURVE_EXTRAPOLATE_CONSTANT) || (fcu->flag & FCURVE_INT_VALUES) || (fcu->totvert==1)) {
610                         /* based on last keyframe's value */
611                         v[1]= prevfpt->vec[1];
612                 } 
613                 else {
614                         /* extrapolate linear dosnt use the handle, use the previous points center instead */
615                         fpt = prevfpt-1;
616                         fac= (prevfpt->vec[0]-fpt->vec[0])/(prevfpt->vec[0]-v[0]);
617                         if (fac) fac= 1.0f/fac;
618                         v[1]= prevfpt->vec[1]-fac*(prevfpt->vec[1]-fpt->vec[1]);
619                 }
620                 
621                 glVertex2fv(v);
622         }
623         
624         /* unapply unit mapping */
625         ANIM_unit_mapping_apply_fcurve(ac->scene, id, fcu, 1, 0);
626         
627         glEnd();
628 }
629
630 /* helper func - draw one repeat of an F-Curve */
631 static void draw_fcurve_curve_bezts (bAnimContext *ac, ID *id, FCurve *fcu, View2D *v2d, View2DGrid *grid)
632 {
633         BezTriple *prevbezt= fcu->bezt;
634         BezTriple *bezt= prevbezt+1;
635         float v1[2], v2[2], v3[2], v4[2];
636         float *fp, data[120];
637         float fac= 0.0f;
638         int b= fcu->totvert-1;
639         int resol;
640         
641         glBegin(GL_LINE_STRIP);
642         
643         /* apply unit mapping */
644         ANIM_unit_mapping_apply_fcurve(ac->scene, id, fcu, 0, 0);
645         
646         /* extrapolate to left? */
647         if (prevbezt->vec[1][0] > v2d->cur.xmin) {
648                 /* left-side of view comes before first keyframe, so need to extend as not cyclic */
649                 v1[0]= v2d->cur.xmin;
650                 
651                 /* y-value depends on the interpolation */
652                 if ((fcu->extend==FCURVE_EXTRAPOLATE_CONSTANT) || (prevbezt->ipo==BEZT_IPO_CONST) || (fcu->totvert==1)) {
653                         /* just extend across the first keyframe's value */
654                         v1[1]= prevbezt->vec[1][1];
655                 } 
656                 else if (prevbezt->ipo==BEZT_IPO_LIN) {
657                         /* extrapolate linear dosnt use the handle, use the next points center instead */
658                         fac= (prevbezt->vec[1][0]-bezt->vec[1][0])/(prevbezt->vec[1][0]-v1[0]);
659                         if (fac) fac= 1.0f/fac;
660                         v1[1]= prevbezt->vec[1][1]-fac*(prevbezt->vec[1][1]-bezt->vec[1][1]);
661                 } 
662                 else {
663                         /* based on angle of handle 1 (relative to keyframe) */
664                         fac= (prevbezt->vec[0][0]-prevbezt->vec[1][0])/(prevbezt->vec[1][0]-v1[0]);
665                         if (fac) fac= 1.0f/fac;
666                         v1[1]= prevbezt->vec[1][1]-fac*(prevbezt->vec[0][1]-prevbezt->vec[1][1]);
667                 }
668                 
669                 glVertex2fv(v1);
670         }
671         
672         /* if only one keyframe, add it now */
673         if (fcu->totvert == 1) {
674                 v1[0]= prevbezt->vec[1][0];
675                 v1[1]= prevbezt->vec[1][1];
676                 glVertex2fv(v1);
677         }
678         
679         /* draw curve between first and last keyframe (if there are enough to do so) */
680         while (b--) {
681                 if (prevbezt->ipo==BEZT_IPO_CONST) {
682                         /* Constant-Interpolation: draw segment between previous keyframe and next, but holding same value */
683                         v1[0]= prevbezt->vec[1][0];
684                         v1[1]= prevbezt->vec[1][1];
685                         glVertex2fv(v1);
686                         
687                         v1[0]= bezt->vec[1][0];
688                         v1[1]= prevbezt->vec[1][1];
689                         glVertex2fv(v1);
690                 }
691                 else if (prevbezt->ipo==BEZT_IPO_LIN) {
692                         /* Linear interpolation: just add one point (which should add a new line segment) */
693                         v1[0]= prevbezt->vec[1][0];
694                         v1[1]= prevbezt->vec[1][1];
695                         glVertex2fv(v1);
696                 }
697                 else {
698                         /* Bezier-Interpolation: draw curve as series of segments between keyframes 
699                          *      - resol determines number of points to sample in between keyframes
700                          */
701                         
702                         /* resol not depending on horizontal resolution anymore, drivers for example... */
703                         // TODO: would be nice to make this depend on the scale of the graph too...
704                         if (fcu->driver) 
705                                 resol= 32;
706                         else 
707                                 resol= (int)(3.0*sqrt(bezt->vec[1][0] - prevbezt->vec[1][0]));
708                         
709                         if (resol < 2) {
710                                 /* only draw one */
711                                 v1[0]= prevbezt->vec[1][0];
712                                 v1[1]= prevbezt->vec[1][1];
713                                 glVertex2fv(v1);
714                         }
715                         else {
716                                 /* clamp resolution to max of 32 */
717                                 if (resol > 32) resol= 32;
718                                 
719                                 v1[0]= prevbezt->vec[1][0];
720                                 v1[1]= prevbezt->vec[1][1];
721                                 v2[0]= prevbezt->vec[2][0];
722                                 v2[1]= prevbezt->vec[2][1];
723                                 
724                                 v3[0]= bezt->vec[0][0];
725                                 v3[1]= bezt->vec[0][1];
726                                 v4[0]= bezt->vec[1][0];
727                                 v4[1]= bezt->vec[1][1];
728                                 
729                                 correct_bezpart(v1, v2, v3, v4);
730                                 
731                                 forward_diff_bezier(v1[0], v2[0], v3[0], v4[0], data, resol, sizeof(float)*3);
732                                 forward_diff_bezier(v1[1], v2[1], v3[1], v4[1], data+1, resol, sizeof(float)*3);
733                                 
734                                 for (fp= data; resol; resol--, fp+= 3)
735                                         glVertex2fv(fp);
736                         }
737                 }
738                 
739                 /* get next pointers */
740                 prevbezt= bezt; 
741                 bezt++;
742                 
743                 /* last point? */
744                 if (b == 0) {
745                         v1[0]= prevbezt->vec[1][0];
746                         v1[1]= prevbezt->vec[1][1];
747                         glVertex2fv(v1);
748                 }
749         }
750         
751         /* extrapolate to right? (see code for left-extrapolation above too) */
752         if (prevbezt->vec[1][0] < v2d->cur.xmax) {
753                 v1[0]= v2d->cur.xmax;
754                 
755                 /* y-value depends on the interpolation */
756                 if ((fcu->extend==FCURVE_EXTRAPOLATE_CONSTANT) || (fcu->flag & FCURVE_INT_VALUES) || (prevbezt->ipo==BEZT_IPO_CONST) || (fcu->totvert==1)) {
757                         /* based on last keyframe's value */
758                         v1[1]= prevbezt->vec[1][1];
759                 } 
760                 else if (prevbezt->ipo==BEZT_IPO_LIN) {
761                         /* extrapolate linear dosnt use the handle, use the previous points center instead */
762                         bezt = prevbezt-1;
763                         fac= (prevbezt->vec[1][0]-bezt->vec[1][0])/(prevbezt->vec[1][0]-v1[0]);
764                         if (fac) fac= 1.0f/fac;
765                         v1[1]= prevbezt->vec[1][1]-fac*(prevbezt->vec[1][1]-bezt->vec[1][1]);
766                 } 
767                 else {
768                         /* based on angle of handle 1 (relative to keyframe) */
769                         fac= (prevbezt->vec[2][0]-prevbezt->vec[1][0])/(prevbezt->vec[1][0]-v1[0]);
770                         if (fac) fac= 1.0f/fac;
771                         v1[1]= prevbezt->vec[1][1]-fac*(prevbezt->vec[2][1]-prevbezt->vec[1][1]);
772                 }
773                 
774                 glVertex2fv(v1);
775         }
776         
777         /* unapply unit mapping */
778         ANIM_unit_mapping_apply_fcurve(ac->scene, id, fcu, 1, 0);
779         
780         glEnd();
781
782
783 /* Public Curve-Drawing API  ---------------- */
784
785 /* Draw the 'ghost' F-Curves (i.e. snapshots of the curve) 
786  * NOTE: unit mapping has already been applied to the values, so do not try and apply again
787  */
788 void graph_draw_ghost_curves (bAnimContext *ac, SpaceIpo *sipo, ARegion *ar, View2DGrid *grid)
789 {
790         FCurve *fcu;
791         
792         /* draw with thick dotted lines */
793         setlinestyle(10);
794         glLineWidth(3.0f);
795         
796         /* anti-aliased lines for less jagged appearance */
797         glEnable(GL_LINE_SMOOTH);
798         glEnable(GL_BLEND);
799         
800         /* the ghost curves are simply sampled F-Curves stored in sipo->ghostCurves */
801         for (fcu= sipo->ghostCurves.first; fcu; fcu= fcu->next) {
802                 /* set whatever color the curve has set 
803                  *      - this is set by the function which creates these
804                  *      - draw with a fixed opacity of 2
805                  */
806                 glColor4f(fcu->color[0], fcu->color[1], fcu->color[2], 0.5f);
807                 
808                 /* simply draw the stored samples */
809                 draw_fcurve_curve_samples(ac, NULL, fcu, &ar->v2d);
810         }
811         
812         /* restore settings */
813         setlinestyle(0);
814         glLineWidth(1.0f);
815         
816         glDisable(GL_LINE_SMOOTH);
817         glDisable(GL_BLEND);
818 }
819
820 /* This is called twice from space_graph.c -> graph_main_area_draw()
821  * Unselected then selected F-Curves are drawn so that they do not occlude each other.
822  */
823 void graph_draw_curves (bAnimContext *ac, SpaceIpo *sipo, ARegion *ar, View2DGrid *grid, short sel)
824 {
825         ListBase anim_data = {NULL, NULL};
826         bAnimListElem *ale;
827         int filter;
828         
829         /* build list of curves to draw */
830         filter= (ANIMFILTER_VISIBLE|ANIMFILTER_CURVESONLY|ANIMFILTER_CURVEVISIBLE);
831         filter |= ((sel) ? (ANIMFILTER_SEL) : (ANIMFILTER_UNSEL));
832         ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
833                 
834         /* for each curve:
835          *      draw curve, then handle-lines, and finally vertices in this order so that 
836          *      the data will be layered correctly
837          */
838         for (ale=anim_data.first; ale; ale=ale->next) {
839                 FCurve *fcu= (FCurve *)ale->key_data;
840                 FModifier *fcm= find_active_fmodifier(&fcu->modifiers);
841                 AnimData *adt= ANIM_nla_mapping_get(ac, ale);
842                 
843                 /* map keyframes for drawing if scaled F-Curve */
844                 if (adt)
845                         ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 0, 0); 
846                 
847                 /* draw curve:
848                  *      - curve line may be result of one or more destructive modifiers or just the raw data,
849                  *        so we need to check which method should be used
850                  *      - controls from active modifier take precidence over keyframes
851                  *        (XXX! editing tools need to take this into account!)
852                  */
853                  
854                 /* 1) draw curve line */
855                 {
856                         /* set color/drawing style for curve itself */
857                         if ( ((fcu->grp) && (fcu->grp->flag & AGRP_PROTECTED)) || (fcu->flag & FCURVE_PROTECTED) ) {
858                                 /* protected curves (non editable) are drawn with dotted lines */
859                                 setlinestyle(2);
860                         }
861                         if ( ((fcu->grp) && (fcu->grp->flag & AGRP_MUTED)) || (fcu->flag & FCURVE_MUTED) ) {
862                                 /* muted curves are drawn in a greyish hue */
863                                 // XXX should we have some variations?
864                                 UI_ThemeColorShade(TH_HEADER, 50);
865                         }
866                         else {
867                                 /* set whatever color the curve has set 
868                                  *      - unselected curves draw less opaque to help distinguish the selected ones
869                                  */
870                                 glColor4f(fcu->color[0], fcu->color[1], fcu->color[2], drawFCurveFade(fcu));
871                         }
872                         
873                         /* anti-aliased lines for less jagged appearance */
874                         glEnable(GL_LINE_SMOOTH);
875                         glEnable(GL_BLEND);
876                         
877                         /* draw F-Curve */
878                         if ((fcu->modifiers.first) || (fcu->flag & FCURVE_INT_VALUES)) {
879                                 /* draw a curve affected by modifiers or only allowed to have integer values 
880                                  * by sampling it at various small-intervals over the visible region 
881                                  */
882                                 draw_fcurve_curve(ac, ale->id, fcu, sipo, &ar->v2d, grid);
883                         }
884                         else if ( ((fcu->bezt) || (fcu->fpt)) && (fcu->totvert) ) { 
885                                 /* just draw curve based on defined data (i.e. no modifiers) */
886                                 if (fcu->bezt)
887                                         draw_fcurve_curve_bezts(ac, ale->id, fcu, &ar->v2d, grid);
888                                 else if (fcu->fpt)
889                                         draw_fcurve_curve_samples(ac, ale->id, fcu, &ar->v2d);
890                         }
891                         
892                         /* restore settings */
893                         setlinestyle(0);
894                         
895                         glDisable(GL_LINE_SMOOTH);
896                         glDisable(GL_BLEND);
897                 }
898                 
899                 /* 2) draw handles and vertices as appropriate based on active 
900                  *      - if the option to only show controls if the F-Curve is selected is enabled, we must obey this
901                  */
902                 if (!(sipo->flag & SIPO_SELCUVERTSONLY) || (fcu->flag & FCURVE_SELECTED)) {
903                         if (fcurve_needs_draw_fmodifier_controls(fcu, fcm)) {
904                                 /* only draw controls if this is the active modifier */
905                                 if ((fcu->flag & FCURVE_ACTIVE) && (fcm)) {
906                                         switch (fcm->type) {
907                                                 case FMODIFIER_TYPE_ENVELOPE: /* envelope */
908                                                         draw_fcurve_modifier_controls_envelope(fcu, fcm, &ar->v2d);
909                                                         break;
910                                         }
911                                 }
912                         }
913                         else if ( ((fcu->bezt) || (fcu->fpt)) && (fcu->totvert) ) { 
914                                 /* apply unit mapping */
915                                 ANIM_unit_mapping_apply_fcurve(ac->scene, ale->id, fcu, 0, 0);
916                                 
917                                 if (fcu->bezt) {
918                                         /* only draw handles/vertices on keyframes */
919                                         glEnable(GL_BLEND);
920                                                 draw_fcurve_handles(ac, sipo, ar, fcu);
921                                         glDisable(GL_BLEND);
922                                         
923                                         draw_fcurve_vertices(ac, sipo, ar, fcu);
924                                 }
925                                 else {
926                                         /* samples: only draw two indicators at either end as indicators */
927                                         draw_fcurve_samples(ac, sipo, ar, fcu);
928                                 }
929                                 
930                                 /* unapply unit mapping */
931                                 ANIM_unit_mapping_apply_fcurve(ac->scene, ale->id, fcu, 1, 0);
932                         }
933                 }
934                 
935                 /* undo mapping of keyframes for drawing if scaled F-Curve */
936                 if (adt)
937                         ANIM_nla_mapping_apply_fcurve(adt, ale->key_data, 1, 0); 
938         }
939         
940         /* free list of curves */
941         BLI_freelistN(&anim_data);
942 }
943
944 /* ************************************************************************* */
945 /* Channel List */
946
947 /* left hand part */
948 void graph_draw_channel_names(bContext *C, bAnimContext *ac, SpaceIpo *sipo, ARegion *ar) 
949 {
950         ListBase anim_data = {NULL, NULL};
951         bAnimListElem *ale;
952         int filter;
953         
954         View2D *v2d= &ar->v2d;
955         float y= 0.0f, height;
956         int items, i=0;
957         
958         /* build list of channels to draw */
959         filter= (ANIMFILTER_VISIBLE|ANIMFILTER_CHANNELS);
960         items= ANIM_animdata_filter(ac, &anim_data, filter, ac->data, ac->datatype);
961         
962         /* Update max-extent of channels here (taking into account scrollers):
963          *      - this is done to allow the channel list to be scrollable, but must be done here
964          *        to avoid regenerating the list again and/or also because channels list is drawn first
965          *      - offset of ACHANNEL_HEIGHT*2 is added to the height of the channels, as first is for 
966          *        start of list offset, and the second is as a correction for the scrollers.
967          */
968         height= (float)((items*ACHANNEL_STEP) + (ACHANNEL_HEIGHT*2));
969         UI_view2d_totRect_set(v2d, ar->winx, height);
970         
971         /* loop through channels, and set up drawing depending on their type  */        
972         {       /* first pass: just the standard GL-drawing for backdrop + text */
973                 y= (float)ACHANNEL_FIRST;
974                 
975                 for (ale= anim_data.first, i=0; ale; ale= ale->next, i++) {
976                         const float yminc= (float)(y - ACHANNEL_HEIGHT_HALF);
977                         const float ymaxc= (float)(y + ACHANNEL_HEIGHT_HALF);
978                         
979                         /* check if visible */
980                         if ( IN_RANGE(yminc, v2d->cur.ymin, v2d->cur.ymax) ||
981                                  IN_RANGE(ymaxc, v2d->cur.ymin, v2d->cur.ymax) ) 
982                         {
983                                 /* draw all channels using standard channel-drawing API */
984                                 ANIM_channel_draw(ac, ale, yminc, ymaxc);
985                         }
986                         
987                         /* adjust y-position for next one */
988                         y -= ACHANNEL_STEP;
989                 }
990         }
991         {       /* second pass: widgets */
992                 uiBlock *block= uiBeginBlock(C, ar, "graph channel buttons", UI_EMBOSS);
993                 
994                 y= (float)ACHANNEL_FIRST;
995                 
996                 /* set blending again, as may not be set in previous step */
997                 glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
998                 glEnable(GL_BLEND);
999                 
1000                 for (ale= anim_data.first, i=0; ale; ale= ale->next, i++) {
1001                         const float yminc= (float)(y - ACHANNEL_HEIGHT_HALF);
1002                         const float ymaxc= (float)(y + ACHANNEL_HEIGHT_HALF);
1003                         
1004                         /* check if visible */
1005                         if ( IN_RANGE(yminc, v2d->cur.ymin, v2d->cur.ymax) ||
1006                                  IN_RANGE(ymaxc, v2d->cur.ymin, v2d->cur.ymax) ) 
1007                         {
1008                                 /* draw all channels using standard channel-drawing API */
1009                                 ANIM_channel_draw_widgets(ac, ale, block, yminc, ymaxc);
1010                         }
1011                         
1012                         /* adjust y-position for next one */
1013                         y -= ACHANNEL_STEP;
1014                 }
1015                 
1016                 uiEndBlock(C, block);
1017                 uiDrawBlock(C, block);
1018                 
1019                 glDisable(GL_BLEND);
1020         }
1021         
1022         /* free tempolary channels */
1023         BLI_freelistN(&anim_data);
1024 }