synfig-core/trunk/src/synfig/valuenode_blinecalctangent.cpp

   1 /* === S Y N F I G ========================================================= */
   2 /*!     \file valuenode_blinecalctangent.cpp
   3 **      \brief Implementation of the "BLine Tangent" valuenode conversion.
   4 **
   5 **      $Id$
   6 **
   7 **      \legal
   8 **      Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
   9 **      Copyright (c) 2007 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 /* ========================================================================= */
  23
  24 /* === H E A D E R S ======================================================= */
  25
  26 #ifdef USING_PCH
  27 #       include "pch.h"
  28 #else
  29 #ifdef HAVE_CONFIG_H
  30 #       include <config.h>
  31 #endif
  32
  33 #include "valuenode_blinecalctangent.h"
  34 #include "valuenode_bline.h"
  35 #include "valuenode_const.h"
  36 #include "valuenode_composite.h"
  37 #include "general.h"
  38 #include "exception.h"
  39 #include <ETL/hermite>
  40 #include <ETL/calculus>
  41
  42 #endif
  43
  44 /* === U S I N G =========================================================== */
  45
  46 using namespace std;
  47 using namespace etl;
  48 using namespace synfig;
  49
  50 /* === M A C R O S ========================================================= */
  51
  52 /* === G L O B A L S ======================================================= */
  53
  54 /* === P R O C E D U R E S ================================================= */
  55
  56 /* === M E T H O D S ======================================================= */
  57
  58 ValueNode_BLineCalcTangent::ValueNode_BLineCalcTangent(const ValueBase::Type &x):
  59         LinkableValueNode(x)
  60 {
  61         if(x!=ValueBase::TYPE_ANGLE && x!=ValueBase::TYPE_VECTOR)
  62                 throw Exception::BadType(ValueBase::type_local_name(x));
  63
  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)));
  68 }
  69
  70 LinkableValueNode*
  71 ValueNode_BLineCalcTangent::create_new()const
  72 {
  73         return new ValueNode_BLineCalcTangent(get_type());
  74 }
  75
  76 ValueNode_BLineCalcTangent*
  77 ValueNode_BLineCalcTangent::create(const ValueBase &x)
  78 {
  79         return new ValueNode_BLineCalcTangent(x.get_type());
  80 }
  81
  82 ValueNode_BLineCalcTangent::~ValueNode_BLineCalcTangent()
  83 {
  84         unlink_all();
  85 }
  86
  87 ValueBase
  88 ValueNode_BLineCalcTangent::operator()(Time t)const
  89 {
  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;
  97
  98         if (!looped) size--;
  99         if (size < 1)
 100                 switch (get_type())
 101                 {
 102                         case ValueBase::TYPE_ANGLE:  return Angle();
 103                         case ValueBase::TYPE_VECTOR: return Vector();
 104                         default: assert(0); return ValueBase();
 105                 }
 106         if (loop)
 107         {
 108                 amount = amount - int(amount);
 109                 if (amount < 0) amount++;
 110         }
 111         else
 112         {
 113                 if (amount < 0) amount = 0;
 114                 if (amount > 1) amount = 1;
 115         }
 116
 117         vector<ValueBase>::const_iterator iter, next(bline.begin());
 118
 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);
 125
 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);
 129
 130 #ifdef ETL_FIXED_DERIVATIVE
 131         switch (get_type())
 132         {
 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();
 136         }
 137 #else
 138         switch (get_type())
 139         {
 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();
 143         }
 144 #endif
 145 }
 146
 147 String
 148 ValueNode_BLineCalcTangent::get_name()const
 149 {
 150         return "blinecalctangent";
 151 }
 152
 153 String
 154 ValueNode_BLineCalcTangent::get_local_name()const
 155 {
 156         return _("BLine Tangent");
 157 }
 158
 159 bool
 160 ValueNode_BLineCalcTangent::set_link_vfunc(int i,ValueNode::Handle value)
 161 {
 162         assert(i>=0 && i<link_count());
 163
 164         switch(i)
 165         {
 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);
 169         }
 170         return false;
 171 }
 172
 173 ValueNode::LooseHandle
 174 ValueNode_BLineCalcTangent::get_link_vfunc(int i)const
 175 {
 176         assert(i>=0 && i<link_count());
 177
 178         switch(i)
 179         {
 180                 case 0: return bline_;
 181                 case 1: return loop_;
 182                 case 2: return amount_;
 183         }
 184
 185         return 0;
 186 }
 187
 188 int
 189 ValueNode_BLineCalcTangent::link_count()const
 190 {
 191         return 3;
 192 }
 193
 194 String
 195 ValueNode_BLineCalcTangent::link_name(int i)const
 196 {
 197         assert(i>=0 && i<link_count());
 198
 199         switch(i)
 200         {
 201                 case 0: return "bline";
 202                 case 1: return "loop";
 203                 case 2: return "amount";
 204         }
 205         return String();
 206 }
 207
 208 String
 209 ValueNode_BLineCalcTangent::link_local_name(int i)const
 210 {
 211         assert(i>=0 && i<link_count());
 212
 213         switch(i)
 214         {
 215                 case 0: return _("BLine");
 216                 case 1: return _("Loop");
 217                 case 2: return _("Amount");
 218         }
 219         return String();
 220 }
 221
 222 int
 223 ValueNode_BLineCalcTangent::get_link_index_from_name(const String &name)const
 224 {
 225         if(name=="bline")  return 0;
 226         if(name=="loop")   return 1;
 227         if(name=="amount") return 2;
 228         throw Exception::BadLinkName(name);
 229 }
 230
 231 bool
 232 ValueNode_BLineCalcTangent::check_type(ValueBase::Type type)
 233 {
 234         return (type==ValueBase::TYPE_ANGLE ||
 235                         type==ValueBase::TYPE_VECTOR);
 236 }