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