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