Show position ducks on top of vertex ducks, then tangent ducks, then the rest. Until...
[synfig.git] / synfig-studio / trunk / src / gtkmm / duckmatic.cpp
1 /* === S Y N F I G ========================================================= */
2 /*!     \file duckmatic.cpp
3 **      \brief Template File
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 /* ========================================================================= */
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 #include <fstream>
33 #include <iostream>
34 #include <algorithm>
35
36 #include <ETL/hermite>
37
38 #include "duckmatic.h"
39 #include <synfigapp/value_desc.h>
40 #include <synfig/general.h>
41 #include <synfig/paramdesc.h>
42 #include <synfig/valuenode_timedswap.h>
43 #include <synfig/valuenode_animated.h>
44 #include <synfig/valuenode_composite.h>
45 #include <synfig/valuenode_scale.h>
46 #include <synfig/valuenode_bline.h>
47 #include <synfig/valuenode_blinecalctangent.h>
48 #include <synfig/valuenode_blinecalcvertex.h>
49 #include <synfig/valuenode_blinecalcwidth.h>
50
51 #include <synfig/curve_helper.h>
52
53 #include <sigc++/retype_return.h>
54 #include <sigc++/retype.h>
55 #include <sigc++/hide.h>
56 #include <sigc++/bind.h>
57
58 #include "canvasview.h"
59
60 #include "onemoment.h"
61
62 #include "general.h"
63
64 #endif
65
66 /* === U S I N G =========================================================== */
67
68 using namespace std;
69 using namespace etl;
70 using namespace synfig;
71 using namespace studio;
72
73 /* === M A C R O S ========================================================= */
74
75 /* 0.33333333333333333 makes for nice short tangent handles,
76    1.0 makes them draw as their real length */
77 #define TANGENT_HANDLE_SCALE 0.33333333333333333
78
79 /* leave this alone or the bezier won't lie on top of the bline */
80 #define TANGENT_BEZIER_SCALE 0.33333333333333333
81
82 /* === G L O B A L S ======================================================= */
83
84 /* === P R O C E D U R E S ================================================= */
85
86 /* === M E T H O D S ======================================================= */
87
88 /* === E N T R Y P O I N T ================================================= */
89
90 Duckmatic::Duckmatic():
91         type_mask(Duck::TYPE_ALL-Duck::TYPE_WIDTH),
92         grid_snap(false),
93         guide_snap(false),
94         grid_size(1.0/4.0,1.0/4.0),
95         show_persistent_strokes(true)
96 {
97         axis_lock=false;
98         drag_offset_=Point(0,0);
99         clear_duck_dragger();
100 }
101
102 Duckmatic::~Duckmatic()
103 {
104         clear_ducks();
105
106         if (Duck::duck_count)
107                 synfig::error("%d ducks not yet deleted!", Duck::duck_count);
108
109         if (getenv("SYNFIG_DEBUG_DESTRUCTORS"))
110                 synfig::info("Duckmatic::~Duckmatic(): Deleted");
111 }
112
113 void
114 Duckmatic::clear_ducks()
115 {
116         duck_data_share_map.clear();
117         duck_map.clear();
118
119         //duck_list_.clear();
120         bezier_list_.clear();
121         stroke_list_.clear();
122
123         if(show_persistent_strokes)
124                 stroke_list_=persistent_stroke_list_;
125 }
126
127 //! Returns \a true if the given duck is currently selected
128 bool
129 Duckmatic::duck_is_selected(const etl::handle<Duck> &duck)const
130 {
131         return duck && selected_ducks.count(duck->get_guid());
132 }
133
134 void
135 Duckmatic::set_grid_size(const synfig::Vector &s)
136 {
137         if(grid_size!=s)
138         {
139                 grid_size=s;
140                 signal_grid_changed();
141         }
142 }
143
144 void
145 Duckmatic::set_grid_snap(bool x)
146 {
147         if(grid_snap!=x)
148         {
149                 grid_snap=x;
150                 signal_grid_changed();
151         }
152 }
153
154 void
155 Duckmatic::set_guide_snap(bool x)
156 {
157         if(guide_snap!=x)
158         {
159                 guide_snap=x;
160                 signal_grid_changed();
161         }
162 }
163
164 Duckmatic::GuideList::iterator
165 Duckmatic::find_guide_x(synfig::Point pos, float radius)
166 {
167         GuideList::iterator iter,best(guide_list_x_.end());
168         float dist(radius);
169         for(iter=guide_list_x_.begin();iter!=guide_list_x_.end();++iter)
170         {
171                 float amount(abs(*iter-pos[0]));
172                 if(amount<dist)
173                 {
174                         dist=amount;
175                         best=iter;
176                 }
177         }
178         return best;
179 }
180
181 Duckmatic::GuideList::iterator
182 Duckmatic::find_guide_y(synfig::Point pos, float radius)
183 {
184         GuideList::iterator iter,best(guide_list_y_.end());
185         float dist(radius);
186         for(iter=guide_list_y_.begin();iter!=guide_list_y_.end();++iter)
187         {
188                 float amount(abs(*iter-pos[1]));
189                 if(amount<=dist)
190                 {
191                         dist=amount;
192                         best=iter;
193                 }
194         }
195         return best;
196 }
197
198 void
199 Duckmatic::clear_selected_ducks()
200 {
201         selected_ducks.clear();
202         signal_duck_selection_changed_();
203 }
204
205 etl::handle<Duckmatic::Duck>
206 Duckmatic::get_selected_duck()const
207 {
208         if(selected_ducks.empty() || duck_map.empty())
209                 return 0;
210         return duck_map.find(*selected_ducks.begin())->second;
211 }
212
213 void
214 Duckmatic::refresh_selected_ducks()
215 {
216 /*
217         std::set<etl::handle<Duck> >::iterator iter;
218         std::set<etl::handle<Duck> > new_set;
219         if(duck_list().empty())
220         {
221                 selected_duck_list.clear();
222                 signal_duck_selection_changed_();
223                 return;
224         }
225
226         for(iter=selected_duck_list.begin();iter!=selected_duck_list.end();++iter)
227         {
228                 etl::handle<Duck> similar(find_similar_duck(*iter));
229                 if(similar)
230                 {
231                         new_set.insert(similar);
232                 }
233         }
234         selected_duck_list=new_set;
235 */
236         GUIDSet old_set(selected_ducks);
237         GUIDSet::const_iterator iter;
238
239         for(iter=old_set.begin();iter!=old_set.end();++iter)
240         {
241                 if(duck_map.count(*iter)==0)
242                         selected_ducks.erase(*iter);
243         }
244
245         signal_duck_selection_changed_();
246 }
247
248 bool
249 Duckmatic::is_duck_group_selectable(const etl::handle<Duck>& x)const
250 {
251         const Type type(get_type_mask());
252
253         if (((x->get_type() && (!(type & x->get_type()))) ||
254                  !x->get_editable()))
255                 return false;
256
257         synfigapp::ValueDesc value_desc(x->get_value_desc());
258         if(value_desc.parent_is_layer_param() && type & Duck::TYPE_POSITION)
259         {
260                 Layer::Handle layer(value_desc.get_layer());
261                 String layer_name(layer->get_name());
262
263                 if (layer_name == "outline" || layer_name == "region" || layer_name == "plant" ||
264                         layer_name == "polygon" || layer_name == "curve_gradient")
265                         return false;
266
267                 if((layer_name=="PasteCanvas"|| layer_name=="paste_canvas") &&
268                    !layer->get_param("children_lock").get(bool()))
269                         return false;
270         }
271         else if (value_desc.parent_is_value_node())
272         {
273                 if (ValueNode_BLineCalcVertex::Handle::cast_dynamic(value_desc.get_value_node()))
274                         return false;
275                 if (value_desc.parent_is_linkable_value_node())
276                 {
277                         LinkableValueNode::Handle parent_value_node(value_desc.get_parent_value_node());
278                         if (ValueNode_Composite::Handle::cast_dynamic(parent_value_node))
279                         {
280                                 if (parent_value_node->get_type() == ValueBase::TYPE_BLINEPOINT &&
281                                         ValueNode_BLineCalcVertex::Handle::cast_dynamic(
282                                                 parent_value_node->get_link("point")))
283                                         return false;
284                         }
285                         else if (ValueNode_BLine::Handle::cast_dynamic(parent_value_node))
286                         {
287                                 ValueNode_Composite::Handle composite(ValueNode_Composite::Handle::cast_dynamic(
288                                                                                                                   value_desc.get_value_node()));
289                                 if (composite &&
290                                         ValueNode_BLineCalcVertex::Handle::cast_dynamic(composite->get_link("point")))
291                                         return false;
292                         }
293                 }
294         }
295         return true;
296 }
297
298 void
299 Duckmatic::select_all_ducks()
300 {
301         DuckMap::const_iterator iter;
302         for(iter=duck_map.begin();iter!=duck_map.end();++iter)
303                 if(is_duck_group_selectable(iter->second))
304                         select_duck(iter->second);
305                 else
306                         unselect_duck(iter->second);
307 }
308
309 void
310 Duckmatic::unselect_all_ducks()
311 {
312         DuckMap::const_iterator iter;
313         for(iter=duck_map.begin();iter!=duck_map.end();++iter)
314                 unselect_duck(iter->second);
315 }
316
317 void
318 Duckmatic::toggle_select_ducks_in_box(const synfig::Vector& tl,const synfig::Vector& br)
319 {
320         Vector vmin, vmax;
321         vmin[0]=std::min(tl[0],br[0]);
322         vmin[1]=std::min(tl[1],br[1]);
323         vmax[0]=std::max(tl[0],br[0]);
324         vmax[1]=std::max(tl[1],br[1]);
325
326         DuckMap::const_iterator iter;
327         for(iter=duck_map.begin();iter!=duck_map.end();++iter)
328         {
329                 Point p(iter->second->get_trans_point());
330                 if(p[0]<=vmax[0] && p[0]>=vmin[0] && p[1]<=vmax[1] && p[1]>=vmin[1] &&
331                    is_duck_group_selectable(iter->second))
332                         toggle_select_duck(iter->second);
333         }
334 }
335
336 void
337 Duckmatic::select_ducks_in_box(const synfig::Vector& tl,const synfig::Vector& br)
338 {
339         Vector vmin, vmax;
340         vmin[0]=std::min(tl[0],br[0]);
341         vmin[1]=std::min(tl[1],br[1]);
342         vmax[0]=std::max(tl[0],br[0]);
343         vmax[1]=std::max(tl[1],br[1]);
344
345 //      Type type(get_type_mask());
346
347         DuckMap::const_iterator iter;
348         for(iter=duck_map.begin();iter!=duck_map.end();++iter)
349         {
350                 Point p(iter->second->get_trans_point());
351                 if(p[0]<=vmax[0] && p[0]>=vmin[0] && p[1]<=vmax[1] && p[1]>=vmin[1])
352                 {
353                         if(is_duck_group_selectable(iter->second))
354                                 select_duck(iter->second);
355                 }
356         }
357 }
358
359 int
360 Duckmatic::count_selected_ducks()const
361 {
362         return selected_ducks.size();
363 }
364
365 void
366 Duckmatic::select_duck(const etl::handle<Duck> &duck)
367 {
368         if(duck)
369         {
370                 selected_ducks.insert(duck->get_guid());
371                 signal_duck_selection_changed_();
372         }
373 }
374
375 DuckList
376 Duckmatic::get_selected_ducks()const
377 {
378         DuckList ret;
379         GUIDSet::const_iterator iter;
380         const Type type(get_type_mask());
381
382         for(iter=selected_ducks.begin();iter!=selected_ducks.end();++iter)
383         {
384                 const DuckMap::const_iterator d_iter(duck_map.find(*iter));
385
386                 if(d_iter==duck_map.end())
387                         continue;
388
389                 if(( d_iter->second->get_type() && (!(type & d_iter->second->get_type())) ) )
390                         continue;
391
392                 ret.push_back(d_iter->second);
393         }
394         return ret;
395 }
396
397 DuckList
398 Duckmatic::get_duck_list()const
399 {
400         DuckList ret;
401         DuckMap::const_iterator iter;
402         for(iter=duck_map.begin();iter!=duck_map.end();++iter) if (iter->second->get_type()&Duck::TYPE_POSITION) ret.push_back(iter->second);
403         for(iter=duck_map.begin();iter!=duck_map.end();++iter) if (iter->second->get_type()&Duck::TYPE_VERTEX  ) ret.push_back(iter->second);
404         for(iter=duck_map.begin();iter!=duck_map.end();++iter) if (iter->second->get_type()&Duck::TYPE_TANGENT ) ret.push_back(iter->second);
405         for(iter=duck_map.begin();iter!=duck_map.end();++iter)
406                 if (!(iter->second->get_type()&Duck::TYPE_POSITION) &&
407                         !(iter->second->get_type()&Duck::TYPE_VERTEX) &&
408                         !(iter->second->get_type()&Duck::TYPE_TANGENT))
409                         ret.push_back(iter->second);
410         return ret;
411 }
412
413 void
414 Duckmatic::unselect_duck(const etl::handle<Duck> &duck)
415 {
416         if(duck && selected_ducks.count(duck->get_guid()))
417         {
418                 selected_ducks.erase(duck->get_guid());
419                 signal_duck_selection_changed_();
420         }
421 }
422
423 void
424 Duckmatic::toggle_select_duck(const etl::handle<Duck> &duck)
425 {
426         if(duck_is_selected(duck))
427                 unselect_duck(duck);
428         else
429                 select_duck(duck);
430 }
431
432 void
433 Duckmatic::translate_selected_ducks(const synfig::Vector& vector)
434 {
435         if(duck_dragger_)
436                 duck_dragger_->duck_drag(this,vector);
437 }
438
439 void
440 Duckmatic::start_duck_drag(const synfig::Vector& offset)
441 {
442         if(duck_dragger_)
443                 duck_dragger_->begin_duck_drag(this,offset);
444
445         //drag_offset_=offset;
446         drag_offset_=find_duck(offset)->get_trans_point();
447 }
448
449 bool
450 Duckmatic::end_duck_drag()
451 {
452         if(duck_dragger_)
453                 return duck_dragger_->end_duck_drag(this);
454         return false;
455 }
456
457 Point
458 Duckmatic::snap_point_to_grid(const synfig::Point& x, float radius)const
459 {
460         Point ret(x);
461
462         GuideList::const_iterator guide_x,guide_y;
463         bool has_guide_x(false), has_guide_y(false);
464
465         guide_x=find_guide_x(ret,radius);
466         if(guide_x!=guide_list_x_.end())
467                 has_guide_x=true;
468
469         guide_y=find_guide_y(ret,radius);
470         if(guide_y!=guide_list_y_.end())
471                 has_guide_y=true;
472
473         if(get_grid_snap())
474         {
475                 Point snap(
476                         floor(ret[0]/get_grid_size()[0]+0.5)*get_grid_size()[0],
477                         floor(ret[1]/get_grid_size()[1]+0.5)*get_grid_size()[1]);
478
479                 if(abs(snap[0]-ret[0])<=radius && (!has_guide_x || abs(snap[0]-ret[0])<=abs(*guide_x-ret[0])))
480                         ret[0]=snap[0],has_guide_x=false;
481                 if(abs(snap[1]-ret[1])<=radius && (!has_guide_y || abs(snap[1]-ret[1])<=abs(*guide_y-ret[1])))
482                         ret[1]=snap[1],has_guide_y=false;
483         }
484
485         if(guide_snap)
486         {
487                 if(has_guide_x)
488                         ret[0]=*guide_x;
489                 if(has_guide_y)
490                         ret[1]=*guide_y;
491         }
492
493         if(axis_lock)
494         {
495                 ret-=drag_offset_;
496                 if(abs(ret[0])<abs(ret[1]))
497                         ret[0]=0;
498                 else
499                         ret[1]=0;
500                 ret+=drag_offset_;
501         }
502
503         return ret;
504 }
505
506 void
507 DuckDrag_Translate::begin_duck_drag(Duckmatic* duckmatic, const synfig::Vector& offset)
508 {
509         last_translate_=Vector(0,0);
510         {
511                 drag_offset_=duckmatic->find_duck(offset)->get_trans_point();
512
513                 snap=Vector(0,0);
514         }
515
516         const DuckList selected_ducks(duckmatic->get_selected_ducks());
517         DuckList::const_iterator iter;
518
519         positions.clear();
520         for(iter=selected_ducks.begin();iter!=selected_ducks.end();++iter)
521         {
522                 Point p((*iter)->get_trans_point());
523                 positions.push_back(p);
524         }
525 }
526
527 bool
528 DuckDrag_Translate::end_duck_drag(Duckmatic* duckmatic)
529 {
530         if(last_translate_.mag()>0.0001)
531         {
532                 duckmatic->signal_edited_selected_ducks();
533                 return true;
534         }
535         else
536         {
537                 duckmatic->signal_user_click_selected_ducks(0);
538                 return false;
539         }
540 }
541
542 void
543 DuckDrag_Translate::duck_drag(Duckmatic* duckmatic, const synfig::Vector& vector)
544 {
545         const DuckList selected_ducks(duckmatic->get_selected_ducks());
546         DuckList::const_iterator iter;
547
548         synfig::Vector vect(duckmatic->snap_point_to_grid(vector)-drag_offset_);
549         int i;
550         Time time(duckmatic->get_time());
551
552         // drag the vertex and position ducks first
553         for (i=0,iter=selected_ducks.begin(); iter!=selected_ducks.end(); ++iter,i++)
554         {
555                 etl::handle<Duck> duck(*iter);
556                 if(duck->get_type() == Duck::TYPE_VERTEX || duck->get_type() == Duck::TYPE_POSITION)
557                 {
558                         duck->set_trans_point(positions[i]+vect);
559
560                         ValueNode_BLineCalcVertex::Handle bline_vertex;
561                         ValueNode_Composite::Handle composite;
562
563                         if ((bline_vertex = ValueNode_BLineCalcVertex::Handle::cast_dynamic(duck->get_value_desc().get_value_node())) ||
564                                 ((composite = ValueNode_Composite::Handle::cast_dynamic(duck->get_value_desc().get_value_node())) &&
565                                  composite->get_type() == ValueBase::TYPE_BLINEPOINT &&
566                                  (bline_vertex = ValueNode_BLineCalcVertex::Handle::cast_dynamic(composite->get_link("point")))))
567                         {
568                                 synfig::Point closest_point = duck->get_point();
569                                 synfig::Real radius = 0.0;
570                                 ValueNode_BLine::Handle bline = ValueNode_BLine::Handle::cast_dynamic(bline_vertex->get_link(bline_vertex->get_link_index_from_name("bline")));
571                                 synfig::find_closest_point(
572                                         (*bline)(time),
573                                         duck->get_point(),
574                                         radius,
575                                         bline->get_loop(),
576                                         &closest_point);
577                                 duck->set_point(closest_point);
578                         }
579                 }
580         }
581
582         // then drag the others
583         for (i=0,iter=selected_ducks.begin(); iter!=selected_ducks.end(); ++iter,i++)
584                 if ((*iter)->get_type() != Duck::TYPE_VERTEX && (*iter)->get_type() != Duck::TYPE_POSITION)
585                         (*iter)->set_trans_point(positions[i]+vect);
586
587         // then patch up the tangents for the vertices we've moved
588         DuckList duck_list(duckmatic->get_duck_list());
589         for (iter=selected_ducks.begin(); iter!=selected_ducks.end(); ++iter)
590         {
591                 etl::handle<Duck> duck(*iter);
592                 if (duck->get_type() == Duck::TYPE_VERTEX || duck->get_type() == Duck::TYPE_POSITION)
593                 {
594                         ValueNode_BLineCalcVertex::Handle bline_vertex;
595                         ValueNode_Composite::Handle composite;
596
597                         if ((bline_vertex = ValueNode_BLineCalcVertex::Handle::cast_dynamic(duck->get_value_desc().get_value_node())) ||
598                                 ((composite = ValueNode_Composite::Handle::cast_dynamic(duck->get_value_desc().get_value_node())) &&
599                                  composite->get_type() == ValueBase::TYPE_BLINEPOINT &&
600                                  (bline_vertex = ValueNode_BLineCalcVertex::Handle::cast_dynamic(composite->get_link("point")))))
601                         {
602                                 synfig::Real radius = 0.0;
603                                 ValueNode_BLine::Handle bline(ValueNode_BLine::Handle::cast_dynamic(bline_vertex->get_link(bline_vertex->get_link_index_from_name("bline"))));
604                                 Real amount = synfig::find_closest_point((*bline)(time), duck->get_point(), radius, bline->get_loop());
605
606                                 int vertex_amount_index(bline_vertex->get_link_index_from_name("amount"));
607                                 ValueNode::Handle vertex_amount_value_node(bline_vertex->get_link(vertex_amount_index));
608
609                                 DuckList::iterator iter;
610                                 for (iter=duck_list.begin(); iter!=duck_list.end(); iter++)
611                                 {
612                                         ValueNode::Handle duck_value_node((*iter)->get_value_desc().get_value_node());
613                                         if (ValueNode_BLineCalcTangent::Handle bline_tangent = ValueNode_BLineCalcTangent::Handle::cast_dynamic(duck_value_node))
614                                         {
615                                                 if (bline_tangent->get_link(bline_tangent->get_link_index_from_name("amount")) == vertex_amount_value_node)
616                                                 {
617                                                         switch (bline_tangent->get_type())
618                                                         {
619                                                         case ValueBase::TYPE_ANGLE:
620                                                         {
621                                                                 Angle angle((*bline_tangent)(time, amount).get(Angle()));
622                                                                 (*iter)->set_point(Point(Angle::cos(angle).get(), Angle::sin(angle).get()));
623                                                                 break;
624                                                         }
625                                                         case ValueBase::TYPE_REAL:
626                                                                 (*iter)->set_point(Point((*bline_tangent)(time, amount).get(Real()), 0));
627                                                                 break;
628                                                         case ValueBase::TYPE_VECTOR:
629                                                                 (*iter)->set_point((*bline_tangent)(time, amount).get(Vector()));
630                                                                 break;
631                                                         default:
632                                                                 break;
633                                                         }
634                                                 }
635                                         }
636                                         else if (ValueNode_BLineCalcWidth::Handle bline_width = ValueNode_BLineCalcWidth::Handle::cast_dynamic(duck_value_node))
637                                         {
638                                                 if (bline_width->get_link(bline_width->get_link_index_from_name("amount")) == vertex_amount_value_node)
639                                                         (*iter)->set_point(Point((*bline_width)(time, amount).get(Real()), 0));
640                                         }
641                                 }
642                         }
643                 }
644         }
645
646         last_translate_=vect;
647 }
648
649 void
650 Duckmatic::signal_edited_selected_ducks()
651 {
652         const DuckList ducks(get_selected_ducks());
653         DuckList::const_iterator iter;
654
655         synfig::GUIDSet old_set(selected_ducks);
656
657         // If we have more than 20 things to move, then display
658         // something to explain that it may take a moment
659         smart_ptr<OneMoment> wait; if(ducks.size()>20)wait.spawn();
660
661         // Go ahead and call everyone's signals
662         for(iter=ducks.begin();iter!=ducks.end();++iter)
663         {
664                 if ((*iter)->get_type() == Duck::TYPE_ANGLE)
665                 {
666                         if(!(*iter)->signal_edited_angle()((*iter)->get_rotations()))
667                         {
668                                 selected_ducks=old_set;
669                                 throw String("Bad edit");
670                         }
671                 }
672                 else if (App::restrict_radius_ducks &&
673                                  (*iter)->is_radius())
674                 {
675                         Point point((*iter)->get_point());
676                         bool changed = false;
677
678                         if (point[0] < 0)
679                         {
680                                 point[0] = 0;
681                                 changed = true;
682                         }
683                         if (point[1] < 0)
684                         {
685                                 point[1] = 0;
686                                 changed = true;
687                         }
688
689                         if (changed) (*iter)->set_point(point);
690
691                         if(!(*iter)->signal_edited()(point))
692                         {
693                                 selected_ducks=old_set;
694                                 throw String("Bad edit");
695                         }
696                 }
697                 else
698                 {
699                         if(!(*iter)->signal_edited()((*iter)->get_point()))
700                         {
701                                 selected_ducks=old_set;
702                                 throw String("Bad edit");
703                         }
704                 }
705         }
706         selected_ducks=old_set;
707 }
708
709 void
710 Duckmatic::signal_user_click_selected_ducks(int button)
711 {
712         const DuckList ducks(get_selected_ducks());
713         DuckList::const_iterator iter;
714
715         for(iter=ducks.begin();iter!=ducks.end();++iter)
716         {
717                 (*iter)->signal_user_click(button)();
718         }
719 }
720
721 void
722 Duckmatic::add_duck(const etl::handle<Duck> &duck)
723 {
724         //if(!duck_map.count(duck->get_guid()))
725         {
726                 if(duck_data_share_map.count(duck->get_data_guid()))
727                 {
728                         duck->set_shared_point(duck_data_share_map[duck->get_data_guid()]);
729                 }
730                 else
731                 {
732                         etl::smart_ptr<synfig::Point> point(new Point(duck->get_point()));
733                         duck->set_shared_point(point);
734                         duck_data_share_map[duck->get_data_guid()]=point;
735                 }
736
737                 duck_map.insert(duck);
738         }
739
740         last_duck_guid=duck->get_guid();
741 }
742
743 void
744 Duckmatic::add_bezier(const etl::handle<Bezier> &bezier)
745 {
746         bezier_list_.push_back(bezier);
747 }
748
749 void
750 Duckmatic::add_stroke(etl::smart_ptr<std::list<synfig::Point> > stroke_point_list, const synfig::Color& color)
751 {
752         assert(stroke_point_list);
753
754         std::list<etl::handle<Stroke> >::iterator iter;
755
756         for(iter=stroke_list_.begin();iter!=stroke_list_.end();++iter)
757         {
758                 if((*iter)->stroke_data==stroke_point_list)
759                         return;
760         }
761
762         etl::handle<Stroke> stroke(new Stroke());
763
764         stroke->stroke_data=stroke_point_list;
765         stroke->color=color;
766
767         stroke_list_.push_back(stroke);
768 }
769
770 void
771 Duckmatic::add_persistent_stroke(etl::smart_ptr<std::list<synfig::Point> > stroke_point_list, const synfig::Color& color)
772 {
773         add_stroke(stroke_point_list,color);
774         persistent_stroke_list_.push_back(stroke_list_.back());
775 }
776
777 void
778 Duckmatic::clear_persistent_strokes()
779 {
780         persistent_stroke_list_.clear();
781 }
782
783 void
784 Duckmatic::set_show_persistent_strokes(bool x)
785 {
786         if(x!=show_persistent_strokes)
787         {
788                 show_persistent_strokes=x;
789                 if(x)
790                         stroke_list_=persistent_stroke_list_;
791                 else
792                         stroke_list_.clear();
793         }
794 }
795
796 void
797 Duckmatic::erase_duck(const etl::handle<Duck> &duck)
798 {
799         duck_map.erase(duck->get_guid());
800 }
801
802 etl::handle<Duckmatic::Duck>
803 Duckmatic::find_similar_duck(etl::handle<Duck> duck)
804 {
805         DuckMap::const_iterator iter(duck_map.find(duck->get_guid()));
806         if(iter!=duck_map.end())
807                 return iter->second;
808         return 0;
809
810 /*      std::list<handle<Duck> >::reverse_iterator iter;
811
812         for(iter=duck_list_.rbegin();iter!=duck_list_.rend();++iter)
813         {
814                 if(*iter!=duck && **iter==*duck)
815                 {
816                         //synfig::info("Found similar duck! (iter:%08x vs. duck:%08x)",iter->get(), duck.get());
817                         return *iter;
818                 }
819         }
820         return 0;
821 */
822 }
823
824 etl::handle<Duckmatic::Duck>
825 Duckmatic::add_similar_duck(etl::handle<Duck> duck)
826 {
827         etl::handle<Duck> similar(find_similar_duck(duck));
828         if(!similar)
829         {
830                 add_duck(duck);
831                 return duck;
832         }
833         return similar;
834 }
835
836 void
837 Duckmatic::erase_bezier(const etl::handle<Bezier> &bezier)
838 {
839         std::list<handle<Bezier> >::iterator iter;
840
841         for(iter=bezier_list_.begin();iter!=bezier_list_.end();++iter)
842         {
843                 if(*iter==bezier)
844                 {
845                         bezier_list_.erase(iter);
846                         return;
847                 }
848         }
849         synfig::warning("Unable to find bezier to erase!");
850 }
851
852 etl::handle<Duckmatic::Duck>
853 Duckmatic::last_duck()const
854 {
855         DuckMap::const_iterator iter(duck_map.find(last_duck_guid));
856         if(iter!=duck_map.end())
857                 return iter->second;
858         return 0;
859 }
860
861 etl::handle<Duckmatic::Bezier>
862 Duckmatic::last_bezier()const
863 {
864         return bezier_list_.back();
865 }
866
867 etl::handle<Duckmatic::Duck>
868 Duckmatic::find_duck(synfig::Point point, synfig::Real radius, Duck::Type type)
869 {
870         if(radius==0)radius=10000000;
871
872         if(type==Duck::TYPE_DEFAULT)
873                 type=get_type_mask();
874
875         Real closest(10000000);
876         etl::handle<Duck> ret;
877
878         DuckMap::const_iterator iter;
879
880         for(iter=duck_map.begin();iter!=duck_map.end();++iter)
881         {
882                 const Duck::Handle& duck(iter->second);
883
884                 if(duck->get_ignore())
885                         continue;
886                 Real dist((duck->get_trans_point()-point).mag_squared());
887
888                 if(duck->get_type()&Duck::TYPE_VERTEX)
889                         dist*=1.0001;
890                 else if(duck->get_type()&Duck::TYPE_TANGENT && duck->get_scalar()>0)
891                         dist*=1.00005;
892                 else if(duck->get_type()&Duck::TYPE_RADIUS)
893                         dist*=0.9999;
894
895                 if(dist<closest && !( duck->get_type() && (!(type & duck->get_type())) ) )
896                 {
897                         closest=dist;
898                         ret=duck;
899                 }
900         }
901
902         if(radius==0 || closest<radius*radius)
903                 return ret;
904
905         return 0;
906 }
907
908 etl::handle<Duckmatic::Bezier>
909 Duckmatic::find_bezier(synfig::Point point, synfig::Real radius,float* location)
910 {
911         return find_bezier(point,radius,radius,location);
912 }
913
914 etl::handle<Duckmatic::Bezier>
915 Duckmatic::find_bezier(synfig::Point pos, synfig::Real scale, synfig::Real radius, float* location)
916 {
917         if(radius==0)radius=10000000;
918         Real closest(10000000);
919         etl::handle<Bezier> ret;
920
921         bezier<Point>   curve;
922
923         Real    d,step;
924         float   time = 0;
925         float   best_time = 0;
926
927         for(std::list<handle<Bezier> >::const_iterator iter=bezier_list().begin();iter!=bezier_list().end();++iter)
928         {
929                 curve[0] = (*iter)->p1->get_trans_point();
930                 curve[1] = (*iter)->c1->get_trans_point();
931                 curve[2] = (*iter)->c2->get_trans_point();
932                 curve[3] = (*iter)->p2->get_trans_point();
933                 curve.sync();
934
935 #if 0
936                 // I don't know why this doesn't work
937                 time=curve.find_closest(pos,6);
938                 d=((curve(time)-pos).mag_squared());
939
940 #else
941                 //set the step size based on the size of the picture
942                 d = (curve[1] - curve[0]).mag() + (curve[2]-curve[1]).mag()     + (curve[3]-curve[2]).mag();
943
944                 step = d/(2*scale); //want to make the distance between lines happy
945
946                 step = max(step,0.01); //100 samples should be plenty
947                 step = min(step,0.1); //10 is minimum
948
949                 d = find_closest(curve,pos,step,&closest,&time);
950 #endif
951
952                 if(d < closest)
953                 {
954                         closest = d;
955                         ret = *iter;
956                         best_time=time;
957                 }
958         }
959
960         if(closest < radius*radius)
961         {
962                 if(location)
963                         *location = best_time;  // We need to square-root this because we were dealing with squared distances
964
965                 return ret;
966         }
967
968         return 0;
969 }
970
971 bool
972 Duckmatic::save_sketch(const synfig::String& filename)const
973 {
974         ChangeLocale change_locale(LC_NUMERIC, "C");
975         std::ofstream file(filename.c_str());
976
977         if(!file)return false;
978
979         file<<"SKETCH"<<endl;
980
981         std::list<etl::handle<Stroke> >::const_iterator iter;
982
983         for(iter=persistent_stroke_list_.begin();iter!=persistent_stroke_list_.end();++iter)
984         {
985                 file<<"C "
986                         <<(*iter)->color.get_r()<<' '
987                         <<(*iter)->color.get_g()<<' '
988                         <<(*iter)->color.get_b()
989                 <<endl;
990                 std::list<synfig::Point>::const_iterator viter;
991                 for(viter=(*iter)->stroke_data->begin();viter!=(*iter)->stroke_data->end();++viter)
992                 {
993                         file<<"V "
994                                 <<(*viter)[0]<<' '
995                                 <<(*viter)[1]
996                         <<endl;
997                 }
998         }
999         if(!file)return false;
1000         sketch_filename_=filename;
1001         signal_sketch_saved_();
1002         return true;
1003 }
1004
1005 bool
1006 Duckmatic::load_sketch(const synfig::String& filename)
1007 {
1008         ChangeLocale change_locale(LC_NUMERIC, "C");
1009         std::ifstream file(filename.c_str());
1010
1011         if(!file)
1012                 return false;
1013
1014         std::string line;
1015         getline(file,line);
1016
1017         if(line!="SKETCH")
1018         {
1019                 synfig::error("Not a sketch");
1020                 return false;
1021         }
1022
1023         etl::smart_ptr<std::list<synfig::Point> > stroke_data;
1024
1025         while(file)
1026         {
1027                 getline(file,line);
1028
1029                 if(line.empty())
1030                         continue;
1031
1032                 switch(line[0])
1033                 {
1034                 case 'C':
1035                 case 'c':
1036                         {
1037                                 stroke_data.spawn();
1038                                 float r,g,b;
1039                                 if(!strscanf(line,"C %f %f %f",&r, &g, &b))
1040                                 {
1041                                         synfig::warning("Bad color line \"%s\"",line.c_str());
1042                                         r=0;g=0;b=0;
1043                                 }
1044                                 add_persistent_stroke(stroke_data, synfig::Color(r,g,b));
1045                         }
1046                         break;
1047                 case 'V':
1048                 case 'v':
1049                         if(!stroke_data)
1050                         {
1051                                 stroke_data.spawn();
1052                                 add_persistent_stroke(stroke_data, synfig::Color(0,0,0));
1053                         }
1054                         float x,y;
1055                         if(!strscanf(line,"V %f %f",&x, &y))
1056                                 synfig::warning("Bad vertex \"%s\"",line.c_str());
1057                         else
1058                                 stroke_data->push_back(synfig::Vector(x,y));
1059                         break;
1060                 default:
1061                         synfig::warning("Unexpected sketch token '%c'",line[0]);
1062                         break;
1063                 }
1064         }
1065
1066         sketch_filename_=filename;
1067         return true;
1068 }
1069
1070 Duckmatic::Push::Push(Duckmatic *duckmatic_):
1071         duckmatic_(duckmatic_)
1072 {
1073         duck_map=duckmatic_->duck_map;
1074         bezier_list_=duckmatic_->bezier_list_;
1075         duck_data_share_map=duckmatic_->duck_data_share_map;
1076         stroke_list_=duckmatic_->stroke_list_;
1077         duck_dragger_=duckmatic_->duck_dragger_;
1078         needs_restore=true;
1079 }
1080
1081 Duckmatic::Push::~Push()
1082 {
1083         if(needs_restore)
1084                 restore();
1085 }
1086
1087 void
1088 Duckmatic::Push::restore()
1089 {
1090         duckmatic_->duck_map=duck_map;
1091         duckmatic_->bezier_list_=bezier_list_;
1092         duckmatic_->duck_data_share_map=duck_data_share_map;
1093         duckmatic_->stroke_list_=stroke_list_;
1094         duckmatic_->duck_dragger_=duck_dragger_;
1095         needs_restore=false;
1096 }
1097
1098 inline String guid_string(const synfigapp::ValueDesc& x)
1099 {
1100         if(x.parent_is_layer_param())
1101                 return strprintf("%s",x.get_layer()->get_guid().get_string().c_str())+x.get_param_name();
1102         //if(x.is_value_node())
1103                 return strprintf("%s",x.get_value_node()->get_guid().get_string().c_str());
1104 }
1105
1106 inline synfig::GUID calc_duck_guid(const synfigapp::ValueDesc& x,const synfig::TransformStack& transform_stack)
1107 {
1108         synfig::GUID ret(0);
1109
1110         if(x.parent_is_layer_param())
1111         {
1112                 ret=x.get_layer()->get_guid()^synfig::GUID::hasher(x.get_param_name());
1113         }
1114         else
1115         {
1116                 ret=x.get_value_node()->get_guid();
1117         }
1118
1119         ret^=transform_stack.get_guid();
1120         return ret;
1121 }
1122
1123 /*
1124 Duck::Handle
1125 Duckmatic::create_duck_from(const synfigapp::ValueDesc& value_desc,etl::handle<CanvasView> canvas_view, const synfig::TransformStack& transform_stack, int modifier, synfig::ParamDesc *param_desc)
1126 {
1127         synfig::GUID duck_guid(calc_duck_guid(value_desc,transform_stack)^synfig::GUID::hasher(modifier));
1128         etl::handle<Duck> duck=new Duck();
1129
1130         return duck;
1131 }
1132 */
1133
1134 bool
1135 Duckmatic::add_to_ducks(const synfigapp::ValueDesc& value_desc,etl::handle<CanvasView> canvas_view, const synfig::TransformStack& transform_stack, synfig::ParamDesc *param_desc, int multiple)
1136 {
1137         ValueBase::Type type=value_desc.get_value_type();
1138 #define REAL_COOKIE             reinterpret_cast<synfig::ParamDesc*>(28)
1139         switch(type)
1140         {
1141         case ValueBase::TYPE_REAL:
1142
1143                 if(!param_desc || param_desc==REAL_COOKIE || !param_desc->get_origin().empty())
1144                 {
1145                         etl::handle<Duck> duck=new Duck();
1146                         duck->set_transform_stack(transform_stack);
1147                         duck->set_radius(true);
1148                         duck->set_type(Duck::TYPE_RADIUS);
1149
1150                         // put the duck on the right hand side of the center
1151                         duck->set_point(Point(value_desc.get_value(get_time()).get(Real()), 0));
1152                         duck->set_name(guid_string(value_desc));
1153                         if(value_desc.is_value_node())
1154                         {
1155                                 // If the ValueNode can be directly manipulated,
1156                                 // then set it as so.
1157                                 duck->set_editable(synfigapp::is_editable(value_desc.get_value_node()));
1158                         }
1159                         else
1160                         {
1161                                 duck->set_editable(true);
1162                         }
1163
1164                         if(param_desc && param_desc!=REAL_COOKIE)
1165                         {
1166                                 if(!param_desc->get_origin().empty())
1167                                 {
1168                                         synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1169                                         /*
1170                                         duck->set_origin(value_desc_origin.get_value(get_time()).get(synfig::Point()));
1171                                         */
1172                                         add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1173                                         duck->set_origin(last_duck());
1174                                 }
1175                                 duck->set_scalar(param_desc->get_scalar());
1176                         }
1177
1178                         duck->signal_edited().clear(); // value_desc.get_value_type() == ValueBase::TYPE_REAL:
1179                         duck->signal_edited().connect(
1180                                 sigc::bind(
1181                                         sigc::mem_fun(
1182                                                 *canvas_view,
1183                                                 &studio::CanvasView::on_duck_changed),
1184                                         value_desc));
1185                         duck->set_value_desc(value_desc);
1186
1187                         duck->signal_user_click(2).connect(
1188                                 sigc::bind(
1189                                         sigc::bind(
1190                                                 sigc::bind(
1191                                                         sigc::mem_fun(
1192                                                                 *canvas_view,
1193                                                                 &studio::CanvasView::popup_param_menu),
1194                                                         false),
1195                                                 0.0f),
1196                                         value_desc));
1197
1198                         duck->set_guid(calc_duck_guid(value_desc,transform_stack)^synfig::GUID::hasher(multiple));
1199
1200                         add_duck(duck);
1201
1202                         return true;
1203                 }
1204                 break;
1205
1206         case ValueBase::TYPE_ANGLE:
1207
1208                 if(!param_desc || param_desc==REAL_COOKIE || !param_desc->get_origin().empty())
1209                 {
1210                         etl::handle<Duck> duck=new Duck();
1211                         duck->set_type(Duck::TYPE_ANGLE);
1212                         duck->set_transform_stack(transform_stack);
1213                         synfig::Angle angle;
1214
1215                         angle=value_desc.get_value(get_time()).get(Angle());
1216                         duck->set_point(Point(Angle::cos(angle).get(),Angle::sin(angle).get()));
1217                         duck->set_name(guid_string(value_desc));
1218                         if(value_desc.is_value_node())
1219                         {
1220                                 ValueNode::Handle value_node=value_desc.get_value_node();
1221                                 //duck->set_name(strprintf("%x",value_node.get()));
1222
1223                                 // If the ValueNode can be directly manipulated,
1224                                 // then set it as so.
1225                                 duck->set_editable(synfigapp::is_editable(value_desc.get_value_node()));
1226                         }
1227                         else
1228                         {
1229                                 //angle=(value_desc.get_value().get(Angle()));
1230                                 //duck->set_point(Point(Angle::cos(angle).get(),Angle::sin(angle).get()));
1231                                 //duck->set_name(strprintf("%x",value_desc.get_layer().get())+value_desc.get_param_name());
1232                                 duck->set_editable(true);
1233                         }
1234
1235                         if(param_desc && param_desc!=REAL_COOKIE)
1236                         {
1237                                 if(!param_desc->get_origin().empty())
1238                                 {
1239                                         synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1240                                         /*
1241                                         duck->set_origin(value_desc_origin.get_value(get_time()).get(synfig::Point()));
1242                                         */
1243                                         add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1244                                         duck->set_origin(last_duck());
1245                                 }
1246                                 duck->set_scalar(param_desc->get_scalar());
1247                         }
1248
1249                         duck->signal_edited().clear(); // value_desc.get_value_type() == ValueBase::TYPE_ANGLE:
1250                         duck->signal_edited_angle().clear();
1251                         duck->signal_edited_angle().connect(
1252                                 sigc::bind(
1253                                         sigc::mem_fun(
1254                                                 *canvas_view,
1255                                                 &studio::CanvasView::on_duck_angle_changed),
1256                                         value_desc));
1257                         duck->set_value_desc(value_desc);
1258
1259                         duck->signal_user_click(2).connect(
1260                                 sigc::bind(
1261                                         sigc::bind(
1262                                                 sigc::bind(
1263                                                         sigc::mem_fun(
1264                                                                 *canvas_view,
1265                                                                 &studio::CanvasView::popup_param_menu),
1266                                                         false),
1267                                                 0.0f),
1268                                         value_desc));
1269                         duck->set_guid(calc_duck_guid(value_desc,transform_stack)^synfig::GUID::hasher(multiple));
1270
1271                         add_duck(duck);
1272
1273                         return true;
1274                 }
1275                 break;
1276
1277         case ValueBase::TYPE_VECTOR:
1278                 {
1279                         etl::handle<Duck> duck=new Duck();
1280                         duck->set_transform_stack(transform_stack);
1281
1282                         duck->set_point(value_desc.get_value(get_time()).get(Point()));
1283                         duck->set_name(guid_string(value_desc));
1284                         if(value_desc.is_value_node())
1285                         {
1286                                 //duck->set_name(strprintf("%x",value_desc.get_value_node().get()));
1287
1288                                 // If the ValueNode can be directly manipulated,
1289                                 // then set it as so.
1290                                 duck->set_editable(synfigapp::is_editable(value_desc.get_value_node()));
1291                         }
1292                         else
1293                         {
1294                                 //duck->set_point(value_desc.get_value().get(Point()));
1295                                 //duck->set_name(strprintf("%x",value_desc.get_layer().get())+value_desc.get_param_name());
1296                                 duck->set_editable(true);
1297                         }
1298
1299                         // If we were passed a parameter description
1300                         if(param_desc)
1301                         {
1302                                 if(!param_desc->get_connect().empty())
1303                                 {
1304                                         synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_connect());
1305                                         Duck::Handle connect_duck;
1306                                         if(duck_map.find(calc_duck_guid(value_desc_origin,transform_stack)^synfig::GUID::hasher(0))!=duck_map.end())
1307                                         {
1308                                                 connect_duck=duck_map[calc_duck_guid(value_desc_origin,transform_stack)^synfig::GUID::hasher(0)];
1309                                         }
1310                                         else
1311                                         {
1312                                                 add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1313                                                 connect_duck=last_duck();
1314                                         }
1315                                         duck->set_connect_duck(connect_duck);
1316                                 }
1317                                 if(!param_desc->get_box().empty())
1318                                 {
1319                                         synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_box());
1320                                         add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1321                                         duck->set_box_duck(last_duck());
1322                                 }
1323
1324                                 // If we have an origin
1325                                 if(!param_desc->get_origin().empty())
1326                                 {
1327                                         synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1328                                         /*
1329                                         duck->set_origin(value_desc_origin.get_value(get_time()).get(synfig::Point()));
1330                                         */
1331                                         add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1332                                         duck->set_origin(last_duck());
1333                                         duck->set_type(Duck::TYPE_VERTEX);
1334                                 }
1335                                 else
1336                                         duck->set_type(Duck::TYPE_POSITION);
1337
1338                                 duck->set_scalar(param_desc->get_scalar());
1339                         }
1340                         else
1341                                 duck->set_type(Duck::TYPE_POSITION);
1342
1343                         duck->signal_edited().clear(); // value_desc.get_value_type() == ValueBase::TYPE_VECTOR:
1344                         duck->signal_edited().connect(
1345                                 sigc::bind(
1346                                         sigc::mem_fun(
1347                                                 *canvas_view,
1348                                                 &studio::CanvasView::on_duck_changed),
1349                                         value_desc));
1350                         duck->set_value_desc(value_desc);
1351
1352                         duck->signal_user_click(2).connect(
1353                                 sigc::bind(
1354                                         sigc::bind(
1355                                                 sigc::bind(
1356                                                         sigc::mem_fun(
1357                                                                 *canvas_view,
1358                                                                 &studio::CanvasView::popup_param_menu),
1359                                                         false),
1360                                                 1.0f),
1361                                         value_desc));
1362                         duck->set_guid(calc_duck_guid(value_desc,transform_stack)^synfig::GUID::hasher(multiple));
1363                         add_duck(duck);
1364
1365                         return true;
1366                 }
1367                 break;
1368         case ValueBase::TYPE_SEGMENT:
1369                 {
1370                         etl::handle<Bezier> bezier(new Bezier());
1371                         ValueNode_Composite::Handle value_node;
1372
1373                         if(value_desc.is_value_node() &&
1374                                 (value_node=ValueNode_Composite::Handle::cast_dynamic(value_desc.get_value_node())))
1375                         {
1376                                 if(!add_to_ducks(synfigapp::ValueDesc(value_node,0),canvas_view,transform_stack))
1377                                         return false;
1378                                 bezier->p1=last_duck();
1379                                 bezier->p1->set_type(Duck::TYPE_VERTEX);
1380                                 if(!add_to_ducks(synfigapp::ValueDesc(value_node,1),canvas_view,transform_stack))
1381                                         return false;
1382                                 bezier->c1=last_duck();
1383                                 bezier->c1->set_type(Duck::TYPE_TANGENT);
1384                                 bezier->c1->set_origin(bezier->p1);
1385                                 bezier->c1->set_scalar(TANGENT_BEZIER_SCALE);
1386                                 bezier->c1->set_tangent(true);
1387
1388                                 if(!add_to_ducks(synfigapp::ValueDesc(value_node,2),canvas_view,transform_stack))
1389                                         return false;
1390                                 bezier->p2=last_duck();
1391                                 bezier->p2->set_type(Duck::TYPE_VERTEX);
1392                                 if(!add_to_ducks(synfigapp::ValueDesc(value_node,3),canvas_view,transform_stack))
1393                                         return false;
1394                                 bezier->c2=last_duck();
1395                                 bezier->c2->set_type(Duck::TYPE_TANGENT);
1396                                 bezier->c2->set_origin(bezier->p2);
1397                                 bezier->c2->set_scalar(-TANGENT_BEZIER_SCALE);
1398                                 bezier->c2->set_tangent(true);
1399
1400                                 bezier->signal_user_click(2).connect(
1401                                         sigc::bind(
1402                                                 sigc::mem_fun(
1403                                                         *canvas_view,
1404                                                         &studio::CanvasView::popup_param_menu_bezier),
1405                                                 value_desc));
1406
1407                                 add_bezier(bezier);
1408                         }
1409                         else if(value_desc.get_value().is_valid())
1410                         {
1411                                 Segment segment=value_desc.get_value();
1412                                 etl::handle<Duck> duck_p,duck_c;
1413                                 synfig::String name;
1414                                 if(param_desc)
1415                                 {
1416                                         name=param_desc->get_local_name();
1417                                 }
1418                                 else
1419                                 {
1420                                         name=guid_string(value_desc);
1421                                 }
1422
1423                                 duck_p=new Duck(segment.p1);
1424                                 duck_p->set_name(name+".P1");
1425                                 duck_p->set_type(Duck::TYPE_VERTEX);
1426                                 add_duck(duck_p);
1427
1428                                 duck_c=new Duck(segment.t1);
1429                                 duck_c->set_name(name+".T1");
1430                                 duck_c->set_type(Duck::TYPE_TANGENT);
1431                                 add_duck(duck_c);
1432                                 duck_c->set_origin(duck_p);
1433                                 duck_c->set_scalar(TANGENT_HANDLE_SCALE);
1434                                 duck_c->set_tangent(true);
1435
1436                                 bezier->p1=duck_p;
1437                                 bezier->c1=duck_c;
1438
1439                                 duck_p=new Duck(segment.p2);
1440                                 duck_p->set_name(name+".P2");
1441                                 duck_p->set_type(Duck::TYPE_VERTEX);
1442                                 add_duck(duck_p);
1443
1444                                 duck_c=new Duck(segment.t2);
1445                                 duck_c->set_type(Duck::TYPE_TANGENT);
1446                                 duck_c->set_name(name+".T2");
1447                                 add_duck(duck_c);
1448                                 duck_c->set_origin(duck_p);
1449                                 duck_c->set_scalar(-TANGENT_HANDLE_SCALE);
1450                                 duck_c->set_tangent(true);
1451
1452                                 bezier->p2=duck_p;
1453                                 bezier->c2=duck_c;
1454                                 add_bezier(bezier);
1455                         }
1456
1457                         return true;
1458                 }
1459                 break;
1460         case ValueBase::TYPE_BLINEPOINT:
1461         {
1462
1463                 if(value_desc.is_value_node() &&
1464                         ValueNode_Composite::Handle::cast_dynamic(value_desc.get_value_node()))
1465                 {
1466                         ValueNode_Composite::Handle value_node;
1467                         value_node=ValueNode_Composite::Handle::cast_dynamic(value_desc.get_value_node());
1468
1469                         if(!add_to_ducks(synfigapp::ValueDesc(value_node,0),canvas_view,transform_stack))
1470                                 return false;
1471                         etl::handle<Duck> vertex_duck(last_duck());
1472                         vertex_duck->set_type(Duck::TYPE_VERTEX);
1473                         if(!add_to_ducks(synfigapp::ValueDesc(value_node,4),canvas_view,transform_stack))
1474                                 return false;
1475                         etl::handle<Duck> t1_duck(last_duck());
1476
1477                         t1_duck->set_origin(vertex_duck);
1478                         t1_duck->set_scalar(-TANGENT_HANDLE_SCALE);
1479                         t1_duck->set_tangent(true);
1480
1481                         etl::handle<Duck> t2_duck;
1482
1483                         // If the tangents are split
1484                         if((*value_node->get_link("split"))(get_time()).get(bool()))
1485                         {
1486                                 if(!add_to_ducks(synfigapp::ValueDesc(value_node,5),canvas_view,transform_stack))
1487                                         return false;
1488                                 t2_duck=last_duck();
1489                                 t2_duck->set_origin(vertex_duck);
1490                                 t2_duck->set_scalar(TANGENT_HANDLE_SCALE);
1491                                 t2_duck->set_tangent(true);
1492                         }
1493                         else
1494                         {
1495                                 if(!add_to_ducks(synfigapp::ValueDesc(value_node,4),canvas_view,transform_stack))
1496                                         return false;
1497                                 t2_duck=last_duck();
1498                                 t2_duck->set_origin(vertex_duck);
1499                                 t2_duck->set_scalar(TANGENT_HANDLE_SCALE);
1500                                 t2_duck->set_tangent(true);
1501                         }
1502                         return true;
1503                 }
1504
1505         }
1506         break;
1507         case ValueBase::TYPE_LIST:
1508         {
1509                 // Check for BLine
1510                 if (value_desc.is_value_node() &&
1511                         ValueNode_BLine::Handle::cast_dynamic(value_desc.get_value_node()))
1512                 {
1513                         ValueNode_BLine::Handle value_node;
1514                         value_node=ValueNode_BLine::Handle::cast_dynamic(value_desc.get_value_node());
1515
1516                         int i,first=-1;
1517
1518                         etl::handle<Bezier> bezier;
1519                         etl::handle<Duck> first_duck;
1520                         etl::handle<Duck> duck, tduck;
1521
1522                         for (i = 0; i < value_node->link_count(); i++)
1523                         {
1524                                 float amount(value_node->list[i].amount_at_time(get_time()));
1525
1526                                 // skip vertices that aren't fully on
1527                                 if (amount < 0.9999f)
1528                                         continue;
1529
1530                                 // remember the index of the first vertex we didn't skip
1531                                 if (first == -1)
1532                                         first = i;
1533
1534                                 BLinePoint bline_point((*value_node->get_link(i))(get_time()));
1535
1536                                 // try casting the vertex to Composite - this tells us whether it is composite or not
1537                                 ValueNode_Composite::Handle composite_vertex_value_node(
1538                                         ValueNode_Composite::Handle::cast_dynamic(value_node->get_link(i)));
1539
1540                                 // add the vertex duck - it's a composite
1541                                 if(composite_vertex_value_node)
1542                                 {
1543                                         if (add_to_ducks(synfigapp::ValueDesc(composite_vertex_value_node,0),canvas_view,transform_stack))
1544                                         {
1545                                                 duck=last_duck();
1546                                                 if(i==first)
1547                                                         first_duck=duck;
1548                                                 duck->set_type(Duck::TYPE_VERTEX);
1549
1550                                                 duck->signal_user_click(2).clear();
1551                                                 duck->signal_user_click(2).connect(
1552                                                         sigc::bind(
1553                                                                 sigc::bind(
1554                                                                         sigc::bind(
1555                                                                                 sigc::mem_fun(
1556                                                                                         *canvas_view,
1557                                                                                         &studio::CanvasView::popup_param_menu),
1558                                                                                 false),
1559                                                                         1.0f),
1560                                                                 synfigapp::ValueDesc(value_node,i)));
1561                                                 duck->set_value_desc(synfigapp::ValueDesc(value_node,i));
1562
1563                                                 if(param_desc)
1564                                                 {
1565                                                         if(!param_desc->get_origin().empty())
1566                                                         {
1567                                                                 synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1568                                                                 add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1569                                                                 duck->set_origin(last_duck());
1570 /*
1571                                                                 ValueBase value(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_origin()).get_value(get_time()));
1572                                                                 if(value.same_type_as(synfig::Point()))
1573                                                                         duck->set_origin(value.get(synfig::Point()));
1574 */
1575                                                         }
1576                                                 }
1577                                         }
1578                                         else
1579                                                 return false;
1580                                 }
1581                                 // else it's not a composite
1582                                 else
1583                                 {
1584                                         duck=new Duck(bline_point.get_vertex());
1585                                         if(i==first)
1586                                                 first_duck=duck;
1587                                         duck->set_transform_stack(transform_stack);
1588                                         duck->set_editable(false);
1589                                         //duck->set_name(strprintf("%x-vertex",value_node->get_link(i).get()));
1590                                         duck->set_name(guid_string(synfigapp::ValueDesc(value_node,i))+".v");
1591
1592                                         duck->set_type(Duck::TYPE_VERTEX);
1593                                         if(param_desc)
1594                                         {
1595                                                 if(!param_desc->get_origin().empty())
1596                                                 {
1597                                                         synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1598                                                         add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1599                                                         duck->set_origin(last_duck());
1600 /*
1601                                                         ValueBase value(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_origin()).get_value(get_time()));
1602                                                         if(value.same_type_as(synfig::Point()))
1603                                                                 duck->set_origin(value.get(synfig::Point()));
1604 */
1605                                                 }
1606                                         }
1607                                         duck->set_guid(calc_duck_guid(synfigapp::ValueDesc(value_node,i),transform_stack)^synfig::GUID::hasher(".v"));
1608                                         duck=add_similar_duck(duck);
1609 //                                      add_duck(duck);
1610                                 }
1611
1612                                 // Add the width duck if it is a parameter with a hint (ie. "width") or if it isn't a parameter
1613                                 if ((param_desc && !param_desc->get_hint().empty()) ||
1614                                         !param_desc)
1615                                 {
1616                                         etl::handle<Duck> width;
1617                                         if (add_to_ducks(synfigapp::ValueDesc(composite_vertex_value_node,1),canvas_view,transform_stack,REAL_COOKIE))
1618                                         {
1619                                                 width=last_duck();
1620                                                 width->set_origin(duck);
1621                                                 width->set_type(Duck::TYPE_WIDTH);
1622                                                 width->set_name(guid_string(synfigapp::ValueDesc(value_node,i))+".w");
1623
1624                                                 // if the bline is a layer's parameter, scale the width duck by the layer's "width" parameter
1625                                                 if (param_desc)
1626                                                 {
1627                                                         ValueBase value(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_hint()).get_value(get_time()));
1628                                                         if(value.same_type_as(synfig::Real()))
1629                                                                 width->set_scalar(value.get(synfig::Real())*0.5f);
1630                                                         // if it doesn't have a "width" parameter, scale by 0.5f instead
1631                                                         else
1632                                                                 width->set_scalar(0.5f);
1633                                                 }
1634                                                 // otherwise just present the raw unscaled width
1635                                                 else
1636                                                         width->set_scalar(0.5f);
1637                                         }
1638                                         else
1639                                                 synfig::error("Unable to add width duck!");
1640                                 }
1641
1642                                 // each bezier uses t2 of one point and t1 of the next
1643                                 // the first time through this loop we won't have the t2 duck from the previous vertex
1644                                 // and so we don't make a bezier.  instead we skip on to t2 for this point
1645                                 if(bezier)
1646                                 {
1647                                         // Add the tangent1 duck
1648                                         if(composite_vertex_value_node)
1649                                         {
1650                                                 if(!add_to_ducks(synfigapp::ValueDesc(composite_vertex_value_node,4),canvas_view,transform_stack))
1651                                                         return false;
1652                                                 tduck=last_duck();
1653                                         }
1654                                         else
1655                                         {
1656                                                 tduck=new Duck(bline_point.get_tangent1());
1657                                                 tduck->set_transform_stack(transform_stack);
1658                                                 tduck->set_editable(false);
1659                                                 tduck->set_name(guid_string(synfigapp::ValueDesc(value_node,i))+".t1");
1660 //                                              tduck->set_name(strprintf("%x-tangent1",value_node->get_link(i).get()));
1661                                                 tduck->set_guid(calc_duck_guid(synfigapp::ValueDesc(value_node,i),transform_stack)^synfig::GUID::hasher(".t1"));
1662                                                 tduck=add_similar_duck(tduck);
1663 //                                              add_duck(duck);
1664                                         }
1665
1666                                         tduck->set_origin(duck);
1667                                         tduck->set_scalar(-TANGENT_BEZIER_SCALE);
1668                                         tduck->set_tangent(true);
1669
1670                                         bezier->p2=duck;
1671                                         bezier->c2=tduck;
1672
1673                                         bezier->signal_user_click(2).connect(
1674                                                 sigc::bind(
1675                                                         sigc::mem_fun(
1676                                                                 *canvas_view,
1677                                                                 &studio::CanvasView::popup_param_menu_bezier),
1678                                                         synfigapp::ValueDesc(value_node,i)));
1679
1680                                         duck->signal_user_click(2).clear();
1681                                         duck->signal_user_click(2).connect(
1682                                                 sigc::bind(
1683                                                         sigc::bind(
1684                                                                 sigc::bind(
1685                                                                         sigc::mem_fun(
1686                                                                                 *canvas_view,
1687                                                                                 &studio::CanvasView::popup_param_menu),
1688                                                                         false),
1689                                                                 1.0f),
1690                                                         synfigapp::ValueDesc(value_node,i)));
1691                                         duck->set_value_desc(synfigapp::ValueDesc(value_node,i));
1692
1693                                         add_bezier(bezier);
1694                                         bezier=0;
1695                                 }
1696
1697                                 // don't start a new bezier for the last point in the line if we're not looped
1698                                 if(i+1>=value_node->link_count() && !value_node->get_loop())
1699                                         continue;
1700
1701                                 bezier=new Bezier();
1702
1703                                 // Add the tangent2 duck
1704                                 if(composite_vertex_value_node)
1705                                 {
1706                                         int i=bline_point.get_split_tangent_flag()?5:4;
1707                                         if(!add_to_ducks(synfigapp::ValueDesc(composite_vertex_value_node,i),canvas_view,transform_stack,0,2))
1708                                                 return false;
1709                                         tduck=last_duck();
1710                                 }
1711                                 else
1712                                 {
1713                                         if(bline_point.get_split_tangent_flag())
1714                                                 tduck=new Duck(bline_point.get_tangent2());
1715                                         else
1716                                                 tduck=new Duck(bline_point.get_tangent1());
1717
1718                                         tduck->set_transform_stack(transform_stack);
1719                                         tduck->set_name(guid_string(synfigapp::ValueDesc(value_node,i))+".t2");
1720                                         tduck->set_guid(calc_duck_guid(synfigapp::ValueDesc(value_node,i),transform_stack)^synfig::GUID::hasher(".t2"));
1721                                         tduck->set_editable(false);
1722                                         tduck=add_similar_duck(tduck);
1723 //                                      add_duck(duck);
1724                                         if(param_desc)
1725                                         {
1726                                                 synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1727                                                 add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1728                                                 duck->set_origin(last_duck());
1729 /*
1730                                                 ValueBase value(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_origin()).get_value(get_time()));
1731                                                 if(value.same_type_as(synfig::Point()))
1732                                                         duck->set_origin(value.get(synfig::Point()));
1733 */
1734 //                                              if(!param_desc->get_origin().empty())
1735 //                                                      duck->set_origin(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_origin()).get_value(get_time()).get(synfig::Point()));
1736                                         }
1737                                         duck->signal_user_click(2).clear();
1738                                         duck->signal_user_click(2).connect(
1739                                                 sigc::bind(
1740                                                         sigc::bind(
1741                                                                 sigc::bind(
1742                                                                         sigc::mem_fun(
1743                                                                                 *canvas_view,
1744                                                                                 &studio::CanvasView::popup_param_menu),
1745                                                                         false),
1746                                                                 1.0f),
1747                                                         synfigapp::ValueDesc(value_node,i)));
1748                                         duck->set_value_desc(synfigapp::ValueDesc(value_node,i));
1749
1750                                 }
1751
1752                                 tduck->set_origin(duck);
1753                                 tduck->set_scalar(TANGENT_BEZIER_SCALE);
1754                                 tduck->set_tangent(true);
1755
1756                                 bezier->p1=duck;
1757                                 bezier->c1=tduck;
1758                         }
1759
1760                         // Loop if necessary
1761                         if(bezier && value_node->get_loop())
1762                         {
1763                                 BLinePoint bline_point((*value_node->get_link(first))(get_time()));
1764
1765                                 ValueNode_Composite::Handle composite_vertex_value_node(
1766                                         ValueNode_Composite::Handle::cast_dynamic(
1767                                                 value_node->get_link(first)));
1768
1769                                 // Add the vertex duck
1770                                 duck=first_duck;
1771
1772                                 // Add the tangent1 duck
1773                                 if(composite_vertex_value_node)
1774                                 {
1775                                         if(!add_to_ducks(synfigapp::ValueDesc(composite_vertex_value_node,4),canvas_view,transform_stack))
1776                                                 return false;
1777                                         tduck=last_duck();
1778                                 }
1779                                 else
1780                                 {
1781                                         tduck=new Duck(bline_point.get_tangent1());
1782                                         tduck->set_transform_stack(transform_stack);
1783                                         tduck->set_editable(false);
1784                                         tduck->set_name(guid_string(synfigapp::ValueDesc(value_node,first))+".t1");
1785                                         //tduck->set_name(strprintf("%x-tangent1",value_node->get_link(first).get()));
1786                                         tduck=add_similar_duck(tduck);
1787                                         tduck->set_guid(calc_duck_guid(synfigapp::ValueDesc(value_node,first),transform_stack)^synfig::GUID::hasher(".t1"));
1788                                         //add_duck(duck);
1789                                 }
1790
1791                                 tduck->set_origin(duck);
1792                                 tduck->set_scalar(-TANGENT_BEZIER_SCALE);
1793                                 tduck->set_tangent(true);
1794
1795                                 bezier->p2=duck;
1796                                 bezier->c2=tduck;
1797
1798                                 bezier->signal_user_click(2).connect(
1799                                         sigc::bind(
1800                                                 sigc::mem_fun(
1801                                                         *canvas_view,
1802                                                         &studio::CanvasView::popup_param_menu_bezier),
1803                                                 synfigapp::ValueDesc(value_node,first)));
1804
1805                                 duck->signal_user_click(2).clear();
1806                                 duck->signal_user_click(2).connect(
1807                                         sigc::bind(
1808                                                 sigc::bind(
1809                                                         sigc::bind(
1810                                                                 sigc::mem_fun(
1811                                                                         *canvas_view,
1812                                                                         &studio::CanvasView::popup_param_menu),
1813                                                                 false),
1814                                                         1.0f),
1815                                                 synfigapp::ValueDesc(value_node,first)));
1816                                 duck->set_value_desc(synfigapp::ValueDesc(value_node,first));
1817
1818                                 add_bezier(bezier);
1819                                 bezier=0;
1820                         }
1821                         return true;
1822                 }
1823                 else // Check for DynamicList
1824                 if(value_desc.is_value_node() &&
1825                         ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_value_node()))
1826                 {
1827                         ValueNode_DynamicList::Handle value_node;
1828                         value_node=ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_value_node());
1829                         int i;
1830
1831                         if(value_node->get_contained_type()==ValueBase::TYPE_VECTOR)
1832                         {
1833                                 Bezier bezier;
1834                                 etl::handle<Duck> first_duck, duck;
1835                                 int first = -1;
1836                                 for(i=0;i<value_node->link_count();i++)
1837                                 {
1838                                         if(!value_node->list[i].status_at_time(get_time()))
1839                                                 continue;
1840                                         if(!add_to_ducks(synfigapp::ValueDesc(value_node,i),canvas_view,transform_stack))
1841                                                 return false;
1842                                         duck = last_duck();
1843
1844                                         // remember the index of the first vertex we didn't skip
1845                                         if (first == -1)
1846                                         {
1847                                                 first = i;
1848                                                 first_duck = duck;
1849                                         }
1850
1851                                         if(param_desc && !param_desc->get_origin().empty())
1852                                         {
1853                                                 synfigapp::ValueDesc value_desc_origin(value_desc.get_layer(),param_desc->get_origin());
1854                                                 add_to_ducks(value_desc_origin,canvas_view, transform_stack);
1855                                                 duck->set_origin(last_duck());
1856 /*
1857                                                 ValueBase value(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_origin()).get_value(get_time()));
1858                                                 if(value.same_type_as(synfig::Point()))
1859                                                         duck->set_origin(value.get(synfig::Point()));
1860 */
1861 //                                              if(!param_desc->get_origin().empty())
1862 //                                                      last_duck()->set_origin(synfigapp::ValueDesc(value_desc.get_layer(),param_desc->get_origin()).get_value(get_time()).get(synfig::Point()));
1863                                         }
1864                                         duck->set_type(Duck::TYPE_VERTEX);
1865                                         bezier.p1=bezier.p2;bezier.c1=bezier.c2;
1866                                         bezier.p2=bezier.c2=duck;
1867
1868                                         if (first != i)
1869                                         {
1870                                                 handle<Bezier> bezier_(new Bezier());
1871                                                 bezier_->p1=bezier.p1;
1872                                                 bezier_->c1=bezier.c1;
1873                                                 bezier_->p2=bezier.p2;
1874                                                 bezier_->c2=bezier.c2;
1875                                                 add_bezier(bezier_);
1876                                                 last_bezier()->signal_user_click(2).connect(
1877                                                         sigc::bind(
1878                                                                 sigc::mem_fun(
1879                                                                         *canvas_view,
1880                                                                         &studio::CanvasView::popup_param_menu_bezier),
1881                                                                 synfigapp::ValueDesc(value_node,i)));
1882                                         }
1883                                 }
1884
1885                                 if (value_node->get_loop() && first != -1 && first_duck != duck)
1886                                 {
1887                                         duck = first_duck;
1888
1889                                         bezier.p1=bezier.p2;bezier.c1=bezier.c2;
1890                                         bezier.p2=bezier.c2=duck;
1891
1892                                         handle<Bezier> bezier_(new Bezier());
1893                                         bezier_->p1=bezier.p1;
1894                                         bezier_->c1=bezier.c1;
1895                                         bezier_->p2=bezier.p2;
1896                                         bezier_->c2=bezier.c2;
1897                                         add_bezier(bezier_);
1898                                         last_bezier()->signal_user_click(2).connect(
1899                                                 sigc::bind(
1900                                                         sigc::mem_fun(
1901                                                                 *canvas_view,
1902                                                                 &studio::CanvasView::popup_param_menu_bezier),
1903                                                         synfigapp::ValueDesc(value_node,first)));
1904                                 }
1905                         }
1906                         else if(value_node->get_contained_type()==ValueBase::TYPE_SEGMENT)
1907                         {
1908                                 for(i=0;i<value_node->link_count();i++)
1909                                 {
1910                                         if(!value_node->list[i].status_at_time(get_time()))
1911                                                 continue;
1912                                         if(!add_to_ducks(synfigapp::ValueDesc(value_node,i),canvas_view,transform_stack))
1913                                                 return false;
1914                                 }
1915                         }
1916                         else
1917                                 return false;
1918                 }
1919                 else
1920                 {
1921                         // WRITEME
1922                 }
1923
1924                 return true;
1925         }
1926
1927         break;
1928         default:
1929                 break;
1930         }
1931         return false;
1932 }