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