2d018a681b73bcdff0dc676c5d4c701531e8e1b7
[synfig.git] / radialblur.cpp
1 /* === S Y N F I G ========================================================= */
2 /*!     \file radialblur.cpp
3 **      \brief Implementation of the "Radial Blur" layer
4 **
5 **      $Id$
6 **
7 **      \legal
8 **      Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
9 **      Copyright (c) 2007, 2008 Chris Moore
10 **
11 **      This package is free software; you can redistribute it and/or
12 **      modify it under the terms of the GNU General Public License as
13 **      published by the Free Software Foundation; either version 2 of
14 **      the License, or (at your option) any later version.
15 **
16 **      This package is distributed in the hope that it will be useful,
17 **      but WITHOUT ANY WARRANTY; without even the implied warranty of
18 **      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 **      General Public License for more details.
20 **      \endlegal
21 **
22 ** === N O T E S ===========================================================
23 **
24 ** ========================================================================= */
25
26 /* === H E A D E R S ======================================================= */
27
28 #ifdef USING_PCH
29 #       include "pch.h"
30 #else
31 #ifdef HAVE_CONFIG_H
32 #       include <config.h>
33 #endif
34
35 #include "radialblur.h"
36 #include <synfig/string.h>
37 #include <synfig/time.h>
38 #include <synfig/context.h>
39 #include <synfig/paramdesc.h>
40 #include <synfig/renddesc.h>
41 #include <synfig/surface.h>
42 #include <synfig/value.h>
43 #include <synfig/valuenode.h>
44 #include <synfig/transform.h>
45 #include <ETL/misc>
46
47 #endif
48
49 /* === M A C R O S ========================================================= */
50
51 /* === G L O B A L S ======================================================= */
52
53 SYNFIG_LAYER_INIT(RadialBlur);
54 SYNFIG_LAYER_SET_NAME(RadialBlur,"radial_blur");
55 SYNFIG_LAYER_SET_LOCAL_NAME(RadialBlur,N_("Radial Blur"));
56 SYNFIG_LAYER_SET_CATEGORY(RadialBlur,N_("Blurs"));
57 SYNFIG_LAYER_SET_VERSION(RadialBlur,"0.1");
58 SYNFIG_LAYER_SET_CVS_ID(RadialBlur,"$Id$");
59
60 /* === P R O C E D U R E S ================================================= */
61
62 /* === M E T H O D S ======================================================= */
63
64 /* === E N T R Y P O I N T ================================================= */
65
66 RadialBlur::RadialBlur():
67         Layer_Composite(1.0,Color::BLEND_STRAIGHT),
68         origin  (0,0),
69         size    (0.2),
70         fade_out(false)
71 {
72 }
73
74 RadialBlur::~RadialBlur()
75 {
76 }
77
78 bool
79 RadialBlur::set_param(const String & param, const ValueBase &value)
80 {
81         IMPORT(origin);
82         IMPORT(size);
83         IMPORT(fade_out);
84
85         return Layer_Composite::set_param(param,value);
86 }
87
88 ValueBase
89 RadialBlur::get_param(const String &param)const
90 {
91         EXPORT(origin);
92         EXPORT(size);
93         EXPORT(fade_out);
94
95         EXPORT_NAME();
96         EXPORT_VERSION();
97
98         return Layer_Composite::get_param(param);
99 }
100
101 Layer::Vocab
102 RadialBlur::get_param_vocab()const
103 {
104         Layer::Vocab ret(Layer_Composite::get_param_vocab());
105
106         ret.push_back(ParamDesc("origin")
107                 .set_local_name(_("Origin"))
108                 .set_description(_("Point where you want the origin to be"))
109         );
110
111         ret.push_back(ParamDesc("size")
112                 .set_local_name(_("Size"))
113                 .set_description(_("Size of blur"))
114                 .set_origin("origin")
115         );
116
117         ret.push_back(ParamDesc("fade_out")
118                 .set_local_name(_("Fade Out"))
119         );
120
121         return ret;
122 }
123
124 Color
125 RadialBlur::get_color(Context context, const Point &p)const
126 {
127         //! \writeme
128         return context.get_color(p);
129 }
130
131 bool
132 RadialBlur::accelerated_render(Context context,Surface *surface,int quality, const RendDesc &renddesc, ProgressCallback *cb)const
133 {
134         // don't do anything at quality 10
135         if (quality == 10)
136                 return context.accelerated_render(surface,quality,renddesc,cb);
137
138         if(cb && !cb->amount_complete(0,10000))
139                 return false;
140
141         Surface tmp_surface;
142         const Point tl(renddesc.get_tl()), br(renddesc.get_br());
143         const int w(renddesc.get_w()), h(renddesc.get_h());
144         const Real pw(renddesc.get_pw()),ph(renddesc.get_ph());
145
146         Rect rect(tl, br);
147         Point pos;
148
149         // find how far towards the origin of the blur we are going to
150         // wander for each of the 4 corners of our tile, expanding the
151         // render description for each of them if necessary
152         int x, y;
153         for(y=0,pos[1]=tl[1];y<h;y+=(h-1),pos[1]+=ph*(h-1))
154                 for(x=0,pos[0]=tl[0];x<w;x+=(w-1),pos[0]+=pw*(w-1))
155                         rect.expand((pos-origin)*(1.0f-size) + origin);
156
157         // round out to the nearest pixel
158         Point tmp_surface_tl = Point(tl[0] - pw*(int((tl[0]-rect.get_min()[0])/pw+1-1e-6)),
159                                                                  tl[1] - ph*(int((tl[1]-rect.get_max()[1])/ph+1-1e-6)));
160         Point tmp_surface_br = Point(br[0] + pw*(int((rect.get_max()[0]-br[0])/pw+2-1e-6)),
161                                                                  br[1] + ph*(int((rect.get_min()[1]-br[1])/ph+2-1e-6)));
162
163         // round to nearest integer width and height (should be very
164         // nearly whole numbers already, but don't want to round 5.99999
165         // down to 5)
166         int tmp_surface_width = int((tmp_surface_br[0]-tmp_surface_tl[0])/pw + 0.5);
167         int tmp_surface_height = int((tmp_surface_br[1]-tmp_surface_tl[1])/ph + 0.5);
168
169         RendDesc desc(renddesc);
170         desc.clear_flags();
171         desc.set_wh(tmp_surface_width,tmp_surface_height);
172         desc.set_tl(tmp_surface_tl);
173         desc.set_br(tmp_surface_br);
174
175         // render the layers beneath us
176         if(!context.accelerated_render(&tmp_surface,quality,desc,cb))
177                 return false;
178
179         // copy the part of the layers beneath us that corresponds to this tile
180         surface->set_wh(w, h);
181         Surface::pen pen(surface->get_pen(0, 0));
182         tmp_surface.blit_to(pen,
183                                                 int((tl[0] - tmp_surface_tl[0])/pw + 0.5),
184                                                 int((tl[1] - tmp_surface_tl[1])/ph + 0.5),
185                                                 w, h);
186
187         Surface::alpha_pen apen(surface->begin());
188
189         apen.set_alpha(get_amount());
190         apen.set_blend_method(get_blend_method());
191
192 /*
193         int steps(5);
194
195         if(quality>=9)steps=20;
196         else if(quality>=5)steps=30;
197         else if(quality>=4)steps=60;
198         else if(quality>=3)steps=100;
199         else steps=120;
200 */
201
202         Surface::value_prep_type cooker;
203
204         // loop through the pixels
205         for(y=0,pos[1]=tl[1];y<h;y++,apen.inc_y(),apen.dec_x(x),pos[1]+=ph)
206                 for(x=0,pos[0]=tl[0];x<w;x++,apen.inc_x(),pos[0]+=pw)
207                 {
208                         Point
209                                 begin(pos-tmp_surface_tl),
210                                 end((pos-origin)*(1.0f-size) + origin-tmp_surface_tl);
211                         begin[0]/=pw;begin[1]/=ph;
212                         end[0]/=pw;end[1]/=ph;
213
214                         Color pool(Color::alpha());
215                         int poolsize(0);
216
217                         int x0(round_to_int(begin[0])),
218                                 y0(round_to_int(begin[1])),
219                                 x1(round_to_int(end[0])),
220                                 y1(round_to_int(end[1]));
221
222                         int i;
223                         int steep = 1;
224                         int sx, sy;  /* step positive or negative (1 or -1) */
225                         int dx, dy;  /* delta (difference in X and Y between points) */
226                         int e;
227                         int w(tmp_surface_width), h(tmp_surface_height);
228
229                         dx = abs(x1 - x0);
230                         sx = ((x1 - x0) > 0) ? 1 : -1;
231                         dy = abs(y1 - y0);
232                         sy = ((y1 - y0) > 0) ? 1 : -1;
233                         if (dy > dx)
234                         {
235                                 steep = 0;
236                                 swap(x0, y0);
237                                 swap(dx, dy);
238                                 swap(sx, sy);
239                                 swap(w,h);
240                         }
241                         e = (dy << 1) - dx;
242                         for (i = 0; i < dx; i++)
243                         {
244                                 if(y0>=0 && x0>=0 && y0<h && x0<w)
245                                 {
246                                         if(fade_out)
247                                         {
248                                                 if (steep)
249                                                         pool+=cooker.cook(tmp_surface[y0][x0])*(i-dx);
250                                                 else
251                                                         pool+=cooker.cook(tmp_surface[x0][y0])*(i-dx);
252                                                 poolsize+=(i-dx);
253                                         }
254                                         else
255                                         {
256                                                 if (steep)
257                                                         pool+=cooker.cook(tmp_surface[y0][x0]);
258                                                 else
259                                                         pool+=cooker.cook(tmp_surface[x0][y0]);
260                                                 poolsize+=1;
261                                         }
262                                 } else
263                                         printf("%s:%d unexpected %d >= %d or %d >= %d?\n", __FILE__, __LINE__, x0, w, y0, h);
264
265                                 while (e >= 0)
266                                 {
267                                         y0 += sy;
268                                         e -= (dx << 1);
269                                 }
270                                 x0 += sx;
271                                 e += (dy << 1);
272                         }
273                         if(poolsize)
274                         {
275                                 pool/=poolsize;
276                                 apen.put_value(cooker.uncook(pool));
277                         }
278 /*
279                         Point begin,end;
280                         begin=pos;
281                         end=(pos-origin)*(1.0f-size)+origin;
282
283                         Color pool(Color::alpha());
284                         float f,poolsize(0);
285                         int i;
286                         int steps(steps*size);
287                         for(f=0,i=0;i<steps;i++,f+=1.0f/(steps-1))
288                         {
289                                 Point loc((end-begin)*f+begin-tl);
290                                 loc[0]/=pw;loc[1]/=ph;
291
292                                 if(fade_out)
293                                         pool+=tmp_surface.linear_sample(loc[0],loc[1])*(i-steps),poolsize+=(i-steps);
294                                 else
295                                         pool+=tmp_surface.linear_sample(loc[0],loc[1]),poolsize+=1;
296                         }
297                         pool/=poolsize;
298                         apen.put_value(pool);
299 */
300                 }
301
302
303         if(cb && !cb->amount_complete(10000,10000)) return false;
304
305 // #define DRAW_TILE_OUTLINES
306 #ifdef DRAW_TILE_OUTLINES
307         // draw red lines to show tiles
308         {
309                 int x, y;
310                 if (w != 0 && h != 0) {
311                         Surface::alpha_pen apen(surface->begin());
312                         apen.set_alpha(get_amount());
313                         apen.set_blend_method(get_blend_method());
314                         apen.set_value(Color(1, 0, 0, .1));
315                         for (x = 0; x < w; x++) { apen.put_value(); apen.inc_x(); } apen.dec_x(w);
316                         for (y = 0; y < h; y++) { apen.put_value(); apen.inc_y(); } apen.dec_y(h);
317                 }
318         }
319 #endif // DRAW_TILE_OUTLINES
320
321         return true;
322 }