1 /* === S Y N F I G ========================================================= */
2 /*! \file valuenode_blinecalctangent.cpp
3 ** \brief Implementation of the "BLine Tangent" valuenode conversion.
8 ** Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
9 ** Copyright (c) 2007 Chris Moore
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.
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.
22 /* ========================================================================= */
24 /* === H E A D E R S ======================================================= */
33 #include "valuenode_blinecalctangent.h"
34 #include "valuenode_bline.h"
35 #include "valuenode_const.h"
36 #include "valuenode_composite.h"
38 #include "exception.h"
39 #include <ETL/hermite>
40 #include <ETL/calculus>
44 /* === U S I N G =========================================================== */
48 using namespace synfig;
50 /* === M A C R O S ========================================================= */
52 /* === G L O B A L S ======================================================= */
54 /* === P R O C E D U R E S ================================================= */
56 /* === M E T H O D S ======================================================= */
58 ValueNode_BLineCalcTangent::ValueNode_BLineCalcTangent(const ValueBase::Type &x):
61 if(x!=ValueBase::TYPE_ANGLE && x!=ValueBase::TYPE_VECTOR)
62 throw Exception::BadType(ValueBase::type_local_name(x));
64 ValueNode_BLine* value_node(new ValueNode_BLine());
65 set_link("bline",value_node);
66 set_link("loop",ValueNode_Const::create(bool(false)));
67 set_link("amount",ValueNode_Const::create(Real(0.5)));
71 ValueNode_BLineCalcTangent::create_new()const
73 return new ValueNode_BLineCalcTangent(get_type());
76 ValueNode_BLineCalcTangent*
77 ValueNode_BLineCalcTangent::create(const ValueBase &x)
79 return new ValueNode_BLineCalcTangent(x.get_type());
82 ValueNode_BLineCalcTangent::~ValueNode_BLineCalcTangent()
88 ValueNode_BLineCalcTangent::operator()(Time t)const
90 const std::vector<ValueBase> bline((*bline_)(t));
91 handle<ValueNode_BLine> bline_value_node(bline_);
92 const bool looped(bline_value_node->get_loop());
93 int size = bline.size(), from_vertex;
94 bool loop((*loop_)(t).get(bool()));
95 Real amount((*amount_)(t).get(Real()));
96 BLinePoint blinepoint0, blinepoint1;
102 case ValueBase::TYPE_ANGLE: return Angle();
103 case ValueBase::TYPE_VECTOR: return Vector();
104 default: assert(0); return ValueBase();
108 amount = amount - int(amount);
109 if (amount < 0) amount++;
113 if (amount < 0) amount = 0;
114 if (amount > 1) amount = 1;
117 vector<ValueBase>::const_iterator iter, next(bline.begin());
119 iter = looped ? --bline.end() : next++;
120 amount = amount * size;
121 from_vertex = int(amount);
122 if (from_vertex > size-1) from_vertex = size-1;
123 blinepoint0 = from_vertex ? *(next+from_vertex-1) : *iter;
124 blinepoint1 = *(next+from_vertex);
126 etl::hermite<Vector> curve(blinepoint0.get_vertex(), blinepoint1.get_vertex(),
127 blinepoint0.get_tangent2(), blinepoint1.get_tangent1());
128 etl::derivative< etl::hermite<Vector> > deriv(curve);
130 #ifdef ETL_FIXED_DERIVATIVE
133 case ValueBase::TYPE_ANGLE: return (deriv(amount-from_vertex)*(0.5)).angle();
134 case ValueBase::TYPE_VECTOR: return deriv(amount-from_vertex)*(0.5);
135 default: assert(0); return ValueBase();
140 case ValueBase::TYPE_ANGLE: return (deriv(amount-from_vertex)*(-0.5)).angle();
141 case ValueBase::TYPE_VECTOR: return deriv(amount-from_vertex)*(-0.5);
142 default: assert(0); return ValueBase();
148 ValueNode_BLineCalcTangent::get_name()const
150 return "blinecalctangent";
154 ValueNode_BLineCalcTangent::get_local_name()const
156 return _("BLine Tangent");
160 ValueNode_BLineCalcTangent::set_link_vfunc(int i,ValueNode::Handle value)
162 assert(i>=0 && i<link_count());
166 case 0: CHECK_TYPE_AND_SET_VALUE(bline_, ValueBase::TYPE_LIST);
167 case 1: CHECK_TYPE_AND_SET_VALUE(loop_, ValueBase::TYPE_BOOL);
168 case 2: CHECK_TYPE_AND_SET_VALUE(amount_, ValueBase::TYPE_REAL);
173 ValueNode::LooseHandle
174 ValueNode_BLineCalcTangent::get_link_vfunc(int i)const
176 assert(i>=0 && i<link_count());
180 case 0: return bline_;
181 case 1: return loop_;
182 case 2: return amount_;
189 ValueNode_BLineCalcTangent::link_count()const
195 ValueNode_BLineCalcTangent::link_name(int i)const
197 assert(i>=0 && i<link_count());
201 case 0: return "bline";
202 case 1: return "loop";
203 case 2: return "amount";
209 ValueNode_BLineCalcTangent::link_local_name(int i)const
211 assert(i>=0 && i<link_count());
215 case 0: return _("BLine");
216 case 1: return _("Loop");
217 case 2: return _("Amount");
223 ValueNode_BLineCalcTangent::get_link_index_from_name(const String &name)const
225 if(name=="bline") return 0;
226 if(name=="loop") return 1;
227 if(name=="amount") return 2;
228 throw Exception::BadLinkName(name);
232 ValueNode_BLineCalcTangent::check_type(ValueBase::Type type)
234 return (type==ValueBase::TYPE_ANGLE ||
235 type==ValueBase::TYPE_VECTOR);