Fix bugs in previous commit that caused FTBFS in synfig and ETL FTBFS with older...
[synfig.git] / synfig-core / tags / 0.61.09 / src / modules / mod_gradient / conicalgradient.cpp
1 /* === S Y N F I G ========================================================= */
2 /*!     \file conicalgradient.cpp
3 **      \brief Implementation of the "Conical Gradient" layer
4 **
5 **      $Id$
6 **
7 **      \legal
8 **      Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
9 **
10 **      This package is free software; you can redistribute it and/or
11 **      modify it under the terms of the GNU General Public License as
12 **      published by the Free Software Foundation; either version 2 of
13 **      the License, or (at your option) any later version.
14 **
15 **      This package is distributed in the hope that it will be useful,
16 **      but WITHOUT ANY WARRANTY; without even the implied warranty of
17 **      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 **      General Public License for more details.
19 **      \endlegal
20 */
21 /* ========================================================================= */
22
23 /* === H E A D E R S ======================================================= */
24
25 #ifdef USING_PCH
26 #       include "pch.h"
27 #else
28 #ifdef HAVE_CONFIG_H
29 #       include <config.h>
30 #endif
31
32 #include <synfig/string.h>
33 #include <synfig/time.h>
34 #include <synfig/context.h>
35 #include <synfig/paramdesc.h>
36 #include <synfig/renddesc.h>
37 #include <synfig/surface.h>
38 #include <synfig/value.h>
39 #include <synfig/valuenode.h>
40 #include <synfig/angle.h>
41
42 #include "conicalgradient.h"
43
44 #endif
45
46 /* === U S I N G =========================================================== */
47
48 using namespace etl;
49 using namespace std;
50 using namespace synfig;
51
52 /* === G L O B A L S ======================================================= */
53
54 SYNFIG_LAYER_INIT(ConicalGradient);
55 SYNFIG_LAYER_SET_NAME(ConicalGradient,"conical_gradient");
56 SYNFIG_LAYER_SET_LOCAL_NAME(ConicalGradient,N_("Conical Gradient"));
57 SYNFIG_LAYER_SET_CATEGORY(ConicalGradient,N_("Gradients"));
58 SYNFIG_LAYER_SET_VERSION(ConicalGradient,"0.1");
59 SYNFIG_LAYER_SET_CVS_ID(ConicalGradient,"$Id$");
60
61 /* === P R O C E D U R E S ================================================= */
62
63 /* === M E T H O D S ======================================================= */
64
65 /* === E N T R Y P O I N T ================================================= */
66
67 ConicalGradient::ConicalGradient():
68         Layer_Composite(1.0,Color::BLEND_STRAIGHT),
69         gradient(Color::black(),Color::white()),
70         center(0,0),
71         angle(Angle::zero()),
72         symmetric(false)
73 {
74 }
75
76 bool
77 ConicalGradient::set_param(const String & param, const ValueBase &value)
78 {
79         IMPORT(gradient);
80         IMPORT(center);
81         IMPORT(angle);
82         IMPORT(symmetric);
83         return Layer_Composite::set_param(param,value);
84 }
85
86 ValueBase
87 ConicalGradient::get_param(const String &param)const
88 {
89         EXPORT(gradient);
90         EXPORT(center);
91         EXPORT(angle);
92         EXPORT(symmetric);
93
94         EXPORT_NAME();
95         EXPORT_VERSION();
96
97         return Layer_Composite::get_param(param);
98 }
99
100 Layer::Vocab
101 ConicalGradient::get_param_vocab()const
102 {
103         Layer::Vocab ret(Layer_Composite::get_param_vocab());
104
105         ret.push_back(ParamDesc("gradient")
106                 .set_local_name(_("Gradient"))
107         );
108
109         ret.push_back(ParamDesc("center")
110                 .set_local_name(_("Center"))
111         );
112
113         ret.push_back(ParamDesc("angle")
114                 .set_local_name(_("Angle"))
115                 .set_origin("center")
116         );
117
118         ret.push_back(ParamDesc("symmetric")
119                 .set_local_name(_("Symmetric"))
120         );
121
122         return ret;
123 }
124
125 inline Color
126 ConicalGradient::color_func(const Point &pos, float supersample)const
127 {
128         const Point centered(pos-center);
129         Angle::rot a=Angle::tan(-centered[1],centered[0]).mod();
130         a+=angle;
131         Real dist(a.mod().get());
132
133         dist-=floor(dist);
134
135         if(symmetric)
136         {
137                 dist*=2.0;
138                 supersample*=2.0;
139                 if(dist>1)dist=2.0-dist;
140         }
141 /*      if(dist+supersample*0.5>1.0)
142         {
143                 Color pool(gradient(dist,supersample*0.5)*(1.0-(dist-supersample*0.5)));
144                 pool+=gradient((dist+supersample*0.5)-1.0,supersample*0.5)*((dist+supersample*0.5)-1.0);
145                 if(pool.get_a() && pool.is_valid())
146                 {
147                         pool.set_r(pool.get_r()/pool.get_a());
148                         pool.set_g(pool.get_g()/pool.get_a());
149                         pool.set_b(pool.get_b()/pool.get_a());
150                         pool.set_a(pool.get_a()/supersample);
151                 }
152                 return pool;
153         }
154
155         if(dist-supersample*0.5<0.0)
156         {
157                 Color pool(gradient(dist,supersample*0.5)*(dist+supersample*0.5));
158                 pool+=gradient(1.0-(dist-supersample*0.5),supersample*0.5)*(-(dist-supersample*0.5));
159                 if(pool.get_a() && pool.is_valid())
160                 {
161                         pool.set_r(pool.get_r()/pool.get_a());
162                         pool.set_g(pool.get_g()/pool.get_a());
163                         pool.set_b(pool.get_b()/pool.get_a());
164                         pool.set_a(pool.get_a()/supersample);
165                         return pool;
166                 }
167         }
168 */
169         if(dist+supersample*0.5>1.0)
170         {
171                 float  left(supersample*0.5-(dist-1.0));
172                 float right(supersample*0.5+(dist-1.0));
173                 Color pool(gradient(1.0-(left*0.5),left).premult_alpha()*left/supersample);
174                 pool+=gradient(right*0.5,right).premult_alpha()*right/supersample;
175                 return pool.demult_alpha();
176         }
177         if(dist-supersample*0.5<0.0)
178         {
179                 float  left(supersample*0.5-dist);
180                 float right(supersample*0.5+dist);
181                 Color pool(gradient(right*0.5,right).premult_alpha()*right/supersample);
182                 pool+=gradient(1.0-left*0.5,left).premult_alpha()*left/supersample;
183                 return pool.demult_alpha();
184         }
185
186         return gradient(dist,supersample);
187 }
188
189 float
190 ConicalGradient::calc_supersample(const synfig::Point &x, float pw,float ph)const
191 {
192         Point adj(x-center);
193         if(abs(adj[0])<abs(pw*0.5) && abs(adj[1])<abs(ph*0.5))
194                 return 0.5;
195         return (pw/Point(x-center).mag())/(PI*2);
196 }
197
198 synfig::Layer::Handle
199 ConicalGradient::hit_check(synfig::Context context, const synfig::Point &point)const
200 {
201         if(get_blend_method()==Color::BLEND_STRAIGHT && get_amount()>=0.5)
202                 return const_cast<ConicalGradient*>(this);
203         if(get_amount()==0.0)
204                 return context.hit_check(point);
205         if((get_blend_method()==Color::BLEND_STRAIGHT || get_blend_method()==Color::BLEND_COMPOSITE) && color_func(point).get_a()>0.5)
206                 return const_cast<ConicalGradient*>(this);
207         return context.hit_check(point);
208 }
209
210 Color
211 ConicalGradient::get_color(Context context, const Point &pos)const
212 {
213         const Color color(color_func(pos));
214
215         if(get_amount()==1.0 && get_blend_method()==Color::BLEND_STRAIGHT)
216                 return color;
217         else
218                 return Color::blend(color,context.get_color(pos),get_amount(),get_blend_method());
219 }
220
221 bool
222 ConicalGradient::accelerated_render(Context context,Surface *surface,int quality, const RendDesc &renddesc, ProgressCallback *cb)const
223 {
224         SuperCallback supercb(cb,0,9500,10000);
225
226         if(get_amount()==1.0 && get_blend_method()==Color::BLEND_STRAIGHT)
227         {
228                 surface->set_wh(renddesc.get_w(),renddesc.get_h());
229         }
230         else
231         {
232                 if(!context.accelerated_render(surface,quality,renddesc,&supercb))
233                         return false;
234                 if(get_amount()==0)
235                         return true;
236         }
237
238
239         int x,y;
240
241         Surface::pen pen(surface->begin());
242         const Real pw(renddesc.get_pw()),ph(renddesc.get_ph());
243         Point pos;
244         Point tl(renddesc.get_tl());
245         const int w(surface->get_w());
246         const int h(surface->get_h());
247
248         if(get_amount()==1.0 && get_blend_method()==Color::BLEND_STRAIGHT)
249         {
250                 if(quality<9)
251                 {
252                         for(y=0,pos[1]=tl[1];y<h;y++,pen.inc_y(),pen.dec_x(x),pos[1]+=ph)
253                                 for(x=0,pos[0]=tl[0];x<w;x++,pen.inc_x(),pos[0]+=pw)
254                                         pen.put_value(color_func(pos,calc_supersample(pos,pw,ph)));
255                 }
256                 else
257                 {
258                         for(y=0,pos[1]=tl[1];y<h;y++,pen.inc_y(),pen.dec_x(x),pos[1]+=ph)
259                                 for(x=0,pos[0]=tl[0];x<w;x++,pen.inc_x(),pos[0]+=pw)
260                                         pen.put_value(color_func(pos,0));
261                 }
262         }
263         else
264         {
265                 if(quality<9)
266                 {
267                         for(y=0,pos[1]=tl[1];y<h;y++,pen.inc_y(),pen.dec_x(x),pos[1]+=ph)
268                                 for(x=0,pos[0]=tl[0];x<w;x++,pen.inc_x(),pos[0]+=pw)
269                                         pen.put_value(Color::blend(color_func(pos,calc_supersample(pos,pw,ph)),pen.get_value(),get_amount(),get_blend_method()));
270                 }
271                 else
272                 {
273                         for(y=0,pos[1]=tl[1];y<h;y++,pen.inc_y(),pen.dec_x(x),pos[1]+=ph)
274                                 for(x=0,pos[0]=tl[0];x<w;x++,pen.inc_x(),pos[0]+=pw)
275                                         pen.put_value(Color::blend(color_func(pos,0),pen.get_value(),get_amount(),get_blend_method()));
276                 }
277         }
278
279         // Mark our progress as finished
280         if(cb && !cb->amount_complete(10000,10000))
281                 return false;
282
283         return true;
284 }