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