Use the current value of a parameter when converting it, rather than its value at...
[synfig.git] / synfig-studio / trunk / src / synfigapp / canvasinterface.cpp
1 /* === S Y N F I G ========================================================= */
2 /*!     \file canvasinterface.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 Chris Moore
10 **
11 **      This package is free software; you can redistribute it and/or
12 **      modify it under the terms of the GNU General Public License as
13 **      published by the Free Software Foundation; either version 2 of
14 **      the License, or (at your option) any later version.
15 **
16 **      This package is distributed in the hope that it will be useful,
17 **      but WITHOUT ANY WARRANTY; without even the implied warranty of
18 **      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 **      General Public License for more details.
20 **      \endlegal
21 */
22 /* ========================================================================= */
23
24 /* === H E A D E R S ======================================================= */
25
26 #ifdef USING_PCH
27 #       include "pch.h"
28 #else
29 #ifdef HAVE_CONFIG_H
30 #       include <config.h>
31 #endif
32
33 //#include <iostream>
34
35 #include <ETL/clock>
36 #include <synfig/valuenode_scale.h>
37 #include <synfig/valuenode_timedswap.h>
38 #include <synfig/valuenode_composite.h>
39 #include <synfig/valuenode_subtract.h>
40 #include <synfig/valuenode_linear.h>
41 #include <synfig/valuenode_reference.h>
42 #include <synfig/valuenode_twotone.h>
43 #include <synfig/valuenode_stripes.h>
44
45 #include <synfig/waypoint.h>
46 #include <synfig/loadcanvas.h>
47 #include <synfig/importer.h>
48 #include <synfig/guidset.h>
49
50 #include "canvasinterface.h"
51 #include "instance.h"
52
53 #include "actions/layeradd.h"
54 #include "actions/valuedescconvert.h"
55 #include "actions/valuenodeadd.h"
56 #include "actions/editmodeset.h"
57 #include "action_system.h"
58
59 #include "main.h"
60
61 #include <synfig/gradient.h>
62
63 #include "general.h"
64
65 #endif
66
67 /* === U S I N G =========================================================== */
68
69 using namespace std;
70 using namespace etl;
71 using namespace synfig;
72 using namespace synfigapp;
73
74 /* === M A C R O S ========================================================= */
75
76 /* === G L O B A L S ======================================================= */
77
78 /* === P R O C E D U R E S ================================================= */
79
80 /* === M E T H O D S ======================================================= */
81
82 CanvasInterface::CanvasInterface(etl::loose_handle<Instance> instance,etl::handle<synfig::Canvas> canvas):
83         instance_(instance),
84         canvas_(canvas),
85         cur_time_(canvas->rend_desc().get_frame_start()),
86         mode_(MODE_NORMAL|MODE_ANIMATE_PAST|MODE_ANIMATE_FUTURE)
87 {
88         set_selection_manager(get_instance()->get_selection_manager());
89         set_ui_interface(get_instance()->get_ui_interface());
90 }
91
92 CanvasInterface::~CanvasInterface()
93 {
94         synfig::info("synfigapp::CanvasInterface::~CanvasInterface(): Deleted");
95 }
96
97 void
98 CanvasInterface::set_time(synfig::Time x)
99 {
100         if(get_canvas()->rend_desc().get_frame_rate())
101         {
102                 float fps(get_canvas()->rend_desc().get_frame_rate());
103                 Time r(x.round(fps));
104                 //synfig::info("CanvasInterface::set_time(): %s rounded to %s\n",x.get_string(fps).c_str(),r.get_string(fps).c_str());
105                 x=r;
106         }
107         if(cur_time_.is_equal(x))
108                 return;
109         get_canvas()->set_time(cur_time_=x);
110
111         // update the time in all the child canvases
112         Canvas::Children children = get_canvas()->get_root()->children();
113         handle<CanvasInterface> interface;
114         for (Canvas::Children::iterator iter = children.begin(); iter != children.end(); iter++)
115                 if ((interface = get_instance()->find_canvas_interface(*iter)) != this)
116                         interface->set_time(interface->get_canvas()->get_time());
117
118         signal_time_changed()();
119         signal_dirty_preview()();
120 }
121
122 synfig::Time
123 CanvasInterface::get_time()const
124 {
125         return cur_time_;
126 }
127
128 void
129 CanvasInterface::refresh_current_values()
130 {
131         get_canvas()->set_time(cur_time_);
132         signal_time_changed()();
133         signal_dirty_preview()();
134 }
135
136 etl::handle<CanvasInterface>
137 CanvasInterface::create(etl::loose_handle<Instance> instance, etl::handle<synfig::Canvas> canvas)
138 {
139         etl::handle<CanvasInterface> intrfc;
140         intrfc=new CanvasInterface(instance,canvas);
141         instance->canvas_interface_list().push_front(intrfc);
142         return intrfc;
143 }
144
145 void
146 CanvasInterface::set_mode(Mode x)
147 {
148         Action::Handle  action(Action::EditModeSet::create());
149
150         assert(action);
151
152         action->set_param("canvas",get_canvas());
153         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
154         action->set_param("edit_mode",x);
155
156         if(!action->is_ready())
157         {
158                 get_ui_interface()->error(_("Action Not Ready, unable to change mode"));
159                 assert(0);
160                 return;
161         }
162
163         if(!get_instance()->perform_action(action))
164                 get_ui_interface()->error(_("Unable to change mode"));
165
166 //      mode_=x;
167 //      signal_mode_changed_(x);
168 }
169
170 CanvasInterface::Mode
171 CanvasInterface::get_mode()const
172 {
173         return mode_;
174 }
175
176
177
178 Layer::Handle
179 CanvasInterface::add_layer_to(synfig::String name, synfig::Canvas::Handle canvas, int depth)
180 {
181         synfigapp::Action::PassiveGrouper group(get_instance().get(),_("Add Layer To"));
182
183         Layer::Handle   layer(Layer::create(name));
184
185         assert(layer);
186
187         if(!layer)
188                 return 0;
189
190         if(canvas!=get_canvas() && !canvas->is_inline())
191         {
192                 synfig::error("Bad canvas passed to \"add_layer_to\"");
193                 return 0;
194         }
195
196         layer->set_canvas(canvas);
197
198         // Apply some defaults
199         if(layer->set_param("fg",synfigapp::Main::get_foreground_color()))
200                 layer->set_param("bg",synfigapp::Main::get_background_color());
201         else
202                 layer->set_param("color",synfigapp::Main::get_foreground_color());
203
204         layer->set_param("width",synfigapp::Main::get_bline_width().units(get_canvas()->rend_desc()));
205         layer->set_param("gradient",synfigapp::Main::get_gradient());
206         if(name!="zoom")
207                 layer->set_param("amount",synfigapp::Main::get_opacity());
208         layer->set_param("blend_method",synfigapp::Main::get_blend_method());
209
210         {
211                 // Grab the layer's list of parameters
212                 Layer::ParamList paramlist=layer->get_param_list();
213                 Layer::ParamList::iterator iter;
214                 for(iter=paramlist.begin();iter!=paramlist.end();++iter)
215                 {
216                         ValueNode::Handle value_node;
217
218                         if(iter->second.get_type()==ValueBase::TYPE_LIST)
219                                 value_node=LinkableValueNode::create("dynamic_list",iter->second);
220                         else if(LinkableValueNode::check_type("composite",iter->second.get_type()) &&
221                                 (iter->second.get_type()!=ValueBase::TYPE_COLOR && iter->second.get_type()!=ValueBase::TYPE_VECTOR)
222                         )
223                                 value_node=LinkableValueNode::create("composite",iter->second);
224
225                         if(value_node)
226                                 layer->connect_dynamic_param(iter->first,value_node);
227                 }
228         }
229
230         // Action to add the layer
231         Action::Handle  action(Action::LayerAdd::create());
232
233         assert(action);
234         if(!action)
235                 return 0;
236
237         action->set_param("canvas",canvas);
238         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
239         action->set_param("new",layer);
240
241         if(!action->is_ready())
242         {
243                 get_ui_interface()->error(_("Action Not Ready"));
244                 return 0;
245         }
246
247         if(!get_instance()->perform_action(action))
248         {
249                 get_ui_interface()->error(_("Action Failed."));
250                 return 0;
251         }
252
253         synfig::info("DEPTH=%d",depth);
254         // Action to move the layer (if necessary)
255         if(depth>0)
256         {
257                 Action::Handle  action(Action::create("layer_move"));
258
259                 assert(action);
260                 if(!action)
261                         return 0;
262
263                 action->set_param("canvas",canvas);
264                 action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
265                 action->set_param("layer",layer);
266                 action->set_param("new_index",depth);
267
268                 if(!action->is_ready())
269                 {
270                         get_ui_interface()->error(_("Move Action Not Ready"));
271                         return 0;
272                 }
273
274                 if(!get_instance()->perform_action(action))
275                 {
276                         get_ui_interface()->error(_("Move Action Failed."));
277                         return 0;
278                 }
279         }
280
281
282         return layer;
283 }
284
285
286 bool
287 CanvasInterface::convert(ValueDesc value_desc, synfig::String type)
288 {
289         Action::Handle  action(Action::ValueDescConvert::create());
290
291         assert(action);
292         if(!action)
293                 return 0;
294
295         action->set_param("canvas",get_canvas());
296         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
297         action->set_param("value_desc",value_desc);
298         action->set_param("type",type);
299         action->set_param("time",get_time());
300
301         if(!action->is_ready())
302         {
303                 get_ui_interface()->error(_("Action Not Ready"));
304                 return 0;
305         }
306
307         if(get_instance()->perform_action(action))
308                 return true;
309
310         get_ui_interface()->error(_("Action Failed."));
311         return false;
312 }
313
314 bool
315 CanvasInterface::add_value_node(synfig::ValueNode::Handle value_node, synfig::String name)
316 {
317         if(name.empty())
318         {
319                 get_ui_interface()->error(_("Empty name!"));
320                 return false;
321         }
322
323         Action::Handle  action(Action::ValueNodeAdd::create());
324
325         assert(action);
326         if(!action)
327                 return 0;
328
329         action->set_param("canvas",get_canvas());
330         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
331         action->set_param("new",value_node);
332         action->set_param("name",name);
333
334         if(!action->is_ready())
335         {
336                 get_ui_interface()->error(_("Action Not Ready"));
337                 return 0;
338         }
339
340         if(get_instance()->perform_action(action))
341                 return true;
342
343         get_ui_interface()->error(_("Action Failed."));
344         return false;
345 }
346
347 Action::ParamList
348 CanvasInterface::generate_param_list(const ValueDesc &value_desc)
349 {
350         synfigapp::Action::ParamList param_list;
351         param_list.add("time",get_time());
352         param_list.add("canvas_interface",etl::handle<CanvasInterface>(this));
353         param_list.add("canvas",get_canvas());
354
355         param_list.add("value_desc",value_desc);
356
357         if(value_desc.parent_is_value_node())
358                 param_list.add("parent_value_node",value_desc.get_parent_value_node());
359
360         if(value_desc.is_value_node())
361                 param_list.add("value_node",value_desc.get_value_node());
362
363         if(value_desc.is_const())
364                 param_list.add("value",value_desc.get_value());
365
366         if(value_desc.parent_is_layer_param())
367         {
368                 param_list.add("parent_layer",value_desc.get_layer());
369                 param_list.add("parent_layer_param",value_desc.get_param_name());
370         }
371
372         {
373                 synfigapp::SelectionManager::ChildrenList children_list;
374                 children_list=get_selection_manager()->get_selected_children();
375                 if(!value_desc.parent_is_canvas() && children_list.size()==1)
376                 {
377                         param_list.add("dest",value_desc);
378                         param_list.add("src",children_list.front().get_value_node());
379                 }
380         }
381         return param_list;
382 }
383
384 Action::ParamList
385 CanvasInterface::generate_param_list(const std::list<synfigapp::ValueDesc> &value_desc_list)
386 {
387         synfigapp::Action::ParamList param_list;
388         param_list.add("time",get_time());
389         param_list.add("canvas_interface",etl::handle<CanvasInterface>(this));
390         param_list.add("canvas",get_canvas());
391
392         std::list<synfigapp::ValueDesc>::const_iterator iter;
393         for(iter=value_desc_list.begin();iter!=value_desc_list.end();++iter)
394         {
395                 param_list.add("value_desc",*iter);
396                 if(iter->is_value_node())
397                 {
398                         param_list.add("value_node",iter->get_value_node());
399                 }
400         }
401
402
403         return param_list;
404 }
405
406 void
407 CanvasInterface::set_rend_desc(const synfig::RendDesc &rend_desc)
408 {
409         Action::Handle  action(Action::create("canvas_rend_desc_set"));
410
411         assert(action);
412         if(!action)
413                 return;
414
415         action->set_param("canvas",get_canvas());
416         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
417         action->set_param("rend_desc",rend_desc);
418
419         if(!get_instance()->perform_action(action))
420                 get_ui_interface()->error(_("Action Failed."));
421 }
422
423 bool
424 CanvasInterface::set_name(const synfig::String &x)
425 {
426         //! \todo This needs to be converted into an action
427         get_canvas()->set_name(x);
428         signal_id_changed_();
429         return true;
430 }
431
432 bool
433 CanvasInterface::set_description(const synfig::String &x)
434 {
435         //! \todo This needs to be converted into an action
436         get_canvas()->set_description(x);
437         return true;
438 }
439
440 bool
441 CanvasInterface::set_id(const synfig::String &x)
442 {
443         //! \todo This needs to be converted into an action
444         get_canvas()->set_id(x);
445         signal_id_changed_();
446         return true;
447 }
448
449
450 void
451 CanvasInterface::jump_to_next_keyframe()
452 {
453         synfig::info("Current time: %s",get_time().get_string().c_str());
454         try
455         {
456                 synfig::Keyframe keyframe(*get_canvas()->keyframe_list().find_next(get_time()));
457                 synfig::info("Jumping to keyframe \"%s\" at %s",keyframe.get_description().c_str(),keyframe.get_time().get_string().c_str());
458                 set_time(keyframe.get_time());
459         }
460         catch(...) { synfig::warning("Unable to find next keyframe"); }
461 }
462
463 void
464 CanvasInterface::jump_to_prev_keyframe()
465 {
466         synfig::info("Current time: %s",get_time().get_string().c_str());
467         try
468         {
469                 synfig::Keyframe keyframe(*get_canvas()->keyframe_list().find_prev(get_time()));
470                 synfig::info("Jumping to keyframe \"%s\" at %s",keyframe.get_description().c_str(),keyframe.get_time().get_string().c_str());
471                 set_time(keyframe.get_time());
472         }
473         catch(...) { synfig::warning("Unable to find prev keyframe"); }
474 }
475
476 bool
477 CanvasInterface::import(const synfig::String &filename, bool /*copy*/)
478 {
479         Action::PassiveGrouper group(get_instance().get(),_("Import Image"));
480
481         synfig::info("Attempting to import "+filename);
482
483         if (filename_extension(filename) == "")
484         {
485                 get_ui_interface()->error(_("Filename must have an extension!"));
486                 return false;
487         }
488
489         String ext(filename_extension(filename));
490         if (ext.size()) ext = ext.substr(1); // skip initial '.'
491         std::transform(ext.begin(),ext.end(),ext.begin(),&::tolower);
492
493         // If this is a SIF file, then we need to do things slightly differently
494         if(ext=="sif" || ext=="sifz")try
495         {
496
497                 Canvas::Handle outside_canvas(synfig::open_canvas(filename));
498                 if(!outside_canvas)
499                         throw String(_("Unable to open this composition"));
500
501                 Layer::Handle layer(add_layer_to("PasteCanvas",get_canvas()));
502                 if(!layer)
503                         throw String(_("Unable to create \"Paste Canvas\" layer"));
504                 if(!layer->set_param("canvas",ValueBase(outside_canvas)))
505                         throw int();
506
507                 //layer->set_description(basename(filename));
508                 signal_layer_new_description()(layer,filename);
509                 return true;
510         }
511         catch(String x)
512         {
513                 get_ui_interface()->error(x+" -- "+filename);
514                 return false;
515         }
516         catch(...)
517         {
518                 get_ui_interface()->error(_("Uncaught exception when attempting\nto open this composition -- ")+filename);
519                 return false;
520         }
521
522         if(!Importer::book().count(ext))
523         {
524                 get_ui_interface()->error(_("I don't know how to open images of this type -- ")+ext);
525                 return false;
526         }
527
528         try
529         {
530                 Layer::Handle layer(add_layer_to("Import",get_canvas()));
531                 int w,h;
532                 if(!layer)
533                         throw int();
534                 if(!layer->set_param("filename",ValueBase(filename)))
535                         throw int();
536                 w=layer->get_param("_width").get(int());
537                 h=layer->get_param("_height").get(int());
538                 if(w&&h)
539                 {
540                         Vector size=ValueBase(get_canvas()->rend_desc().get_br()-get_canvas()->rend_desc().get_tl());
541                         Vector x;
542                         if(size[0]<size[1])
543                         {
544                                 x[0]=size[0];
545                                 x[1]=size[0]/w*h;
546                                 if(size[0]<0 ^ size[1]<0)
547                                         x[1]=-x[1];
548                         }
549                         else
550                         {
551                                 x[1]=size[1];
552                                 x[0]=size[1]/h*w;
553                                 if(size[0]<0 ^ size[1]<0)
554                                         x[0]=-x[0];
555                         }
556                         if(!layer->set_param("tl",ValueBase(-x/2)))
557                                 throw int();
558                         if(!layer->set_param("br",ValueBase(x/2)))
559                                 throw int();
560                 }
561                 else
562                 {
563                         if(!layer->set_param("tl",ValueBase(get_canvas()->rend_desc().get_tl())))
564                                 throw int();
565                         if(!layer->set_param("br",ValueBase(get_canvas()->rend_desc().get_br())))
566                                 throw int();
567                 }
568
569                 layer->set_description(basename(filename));
570                 signal_layer_new_description()(layer,filename);
571
572                 return true;
573         }
574         catch(...)
575         {
576                 get_ui_interface()->error("Unable to import "+filename);
577                 group.cancel();
578                 return false;
579         }
580 }
581
582
583 void
584 CanvasInterface::waypoint_duplicate(synfigapp::ValueDesc value_desc,synfig::Waypoint waypoint)
585 {
586         Action::Handle  action(Action::create("waypoint_set_smart"));
587
588         assert(action);
589         if(!action)
590                 return;
591
592         waypoint.make_unique();
593         waypoint.set_time(get_time());
594
595         ValueNode::Handle value_node(value_desc.get_value_node());
596
597         action->set_param("canvas",get_canvas());
598         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
599         action->set_param("waypoint",waypoint);
600         action->set_param("time",get_time());
601         action->set_param("value_node",value_node);
602
603         if(!get_instance()->perform_action(action))
604                 get_ui_interface()->error(_("Action Failed."));
605 }
606
607 void
608 CanvasInterface::waypoint_remove(synfigapp::ValueDesc value_desc,synfig::Waypoint waypoint)
609 {
610         Action::Handle  action(Action::create("waypoint_remove"));
611
612         assert(action);
613         if(!action)
614                 return;
615
616         ValueNode::Handle value_node(value_desc.get_value_node());
617
618         action->set_param("canvas",get_canvas());
619         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
620         action->set_param("waypoint",waypoint);
621         action->set_param("value_node",value_node);
622
623         if(!get_instance()->perform_action(action))
624                 get_ui_interface()->error(_("Action Failed."));
625 }
626
627
628 void
629 CanvasInterface::auto_export(synfig::ValueNode::Handle /*value_node*/)
630 {
631 /*
632         // Check to see if we are already exported.
633         if(value_node->is_exported())
634                 return;
635
636         Action::Handle  action(Action::create("value_node_add"));
637
638         assert(action);
639         if(!action)
640                 return;
641
642         String name(strprintf(_("Unnamed%08d"),synfig::UniqueID().get_uid()));
643
644         action->set_param("canvas",get_canvas());
645         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
646         action->set_param("new",value_node);
647         action->set_param("name",name);
648
649         if(!get_instance()->perform_action(action))
650                 get_ui_interface()->error(_("Action Failed."));
651 */
652 }
653
654 void
655 CanvasInterface::auto_export(const ValueDesc& /*value_desc*/)
656 {
657         // THIS FUNCTION IS DEPRECATED, AND IS NOW A STUB.
658 #if 0
659         // Check to see if we are already exported.
660         if(value_desc.is_exported())
661                 return;
662
663         Action::Handle  action(Action::create("value_desc_export"));
664
665         assert(action);
666         if(!action)
667                 return;
668
669         String name(strprintf(_("Unnamed%08d"),synfig::UniqueID().get_uid()));
670
671         action->set_param("canvas",get_canvas());
672         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
673         action->set_param("value_desc",value_desc);
674         action->set_param("name",name);
675
676         if(!get_instance()->perform_action(action))
677                 get_ui_interface()->error(_("Action Failed."));
678 #endif
679 }
680
681 bool
682 CanvasInterface::change_value(synfigapp::ValueDesc value_desc,synfig::ValueBase new_value)
683 {
684         // If this isn't really a change, then don't bother
685         if(new_value==value_desc.get_value(get_time()))
686                 return true;
687
688         // If this change needs to take place elsewhere, then so be it.
689         if(value_desc.get_canvas() && value_desc.get_canvas()->get_root()!=get_canvas()->get_root())do
690         {
691                 etl::handle<Instance> instance;
692                 instance=find_instance(value_desc.get_canvas()->get_root());
693
694                 if(instance)
695                         return instance->find_canvas_interface(value_desc.get_canvas())->change_value(value_desc,new_value);
696                 else
697                 {
698                         get_ui_interface()->error(_("The value you are trying to edit is in a composition\nwhich doesn't seem to be open. Open that composition and you\nshould be able to edit this value as normal."));
699                         return false;
700                 }
701         }while(0);
702 #ifdef _DEBUG
703         else
704         { synfig::warning("Can't get canvas from value desc...?"); }
705 #endif
706
707         synfigapp::Action::Handle action(synfigapp::Action::create("value_desc_set"));
708         if(!action)
709         {
710                 return false;
711         }
712
713         action->set_param("canvas",get_canvas());
714         action->set_param("canvas_interface",etl::loose_handle<CanvasInterface>(this));
715         action->set_param("time",get_time());
716         action->set_param("value_desc",value_desc);
717         action->set_param("new_value",new_value);
718
719         return get_instance()->perform_action(action);
720 }
721
722 void
723 CanvasInterface::set_meta_data(const synfig::String& key,const synfig::String& data)
724 {
725         get_canvas()->set_meta_data(key,data);
726 }
727
728
729 // this function goes with find_important_value_descs()
730 static int
731 _process_value_desc(const synfigapp::ValueDesc& value_desc,std::vector<synfigapp::ValueDesc>& out, synfig::GUIDSet& guid_set)
732 {
733         int ret(0);
734
735         if(value_desc.get_value_type()==ValueBase::TYPE_CANVAS)
736         {
737                 Canvas::Handle canvas;
738                 canvas=value_desc.get_value().get(canvas);
739                 if(!canvas || !canvas->is_inline())
740                         return ret;
741                 ret+=CanvasInterface::find_important_value_descs(canvas,out,guid_set);
742         }
743
744         if(value_desc.is_value_node())
745         {
746                 ValueNode::Handle value_node(value_desc.get_value_node());
747
748                 if(guid_set.count(value_node->get_guid()))
749                         return ret;
750                 guid_set.insert(value_node->get_guid());
751
752                 if(LinkableValueNode::Handle::cast_dynamic(value_node))
753                 {
754                         if(ValueNode_DynamicList::Handle::cast_dynamic(value_node))
755                         {
756                                 out.push_back(value_desc);
757                                 ret++;
758                         }
759                         // Process the linkable ValueNode's children
760                         LinkableValueNode::Handle value_node_copy(LinkableValueNode::Handle::cast_dynamic(value_node));
761                         int i;
762                         for(i=0;i<value_node_copy->link_count();i++)
763                         {
764                                 ValueNode::Handle link(value_node_copy->get_link(i));
765                                 if(!link->is_exported())
766                                         ret+=_process_value_desc(ValueDesc(value_node_copy,i),out,guid_set);
767                         }
768                 }
769                 else if(ValueNode_Animated::Handle::cast_dynamic(value_node))
770                 {
771                         out.push_back(value_desc);
772                         ret++;
773                 }
774         }
775
776         return ret;
777 }
778
779 int
780 CanvasInterface::find_important_value_descs(synfig::Canvas::Handle canvas,std::vector<synfigapp::ValueDesc>& out,synfig::GUIDSet& guid_set)
781 {
782         int ret(0);
783         if(!canvas->is_inline())
784         {
785                 ValueNodeList::const_iterator iter;
786
787                 for(
788                         iter=canvas->value_node_list().begin();
789                         iter!=canvas->value_node_list().end();
790                         ++iter)
791                         ret+=_process_value_desc(ValueDesc(canvas,(*iter)->get_id()),out,guid_set);
792         }
793
794         Canvas::const_iterator iter;
795
796         for(iter=canvas->begin();iter!=canvas->end();++iter)
797         {
798                 Layer::Handle layer(*iter);
799
800                 Layer::DynamicParamList::const_iterator iter;
801                 for(
802                         iter=layer->dynamic_param_list().begin();
803                         iter!=layer->dynamic_param_list().end();
804                         ++iter)
805                 {
806                         if(!iter->second->is_exported())
807                                 ret+=_process_value_desc(ValueDesc(layer,iter->first),out,guid_set);
808                 }
809                 ValueBase value(layer->get_param("canvas"));
810                 if(value.is_valid())
811                         ret+=_process_value_desc(ValueDesc(layer,"canvas"),out,guid_set);
812         }
813
814         return ret;
815 }
816
817 int
818 CanvasInterface::find_important_value_descs(std::vector<synfigapp::ValueDesc>& out)
819 {
820         synfig::GUIDSet tmp;
821         return find_important_value_descs(get_canvas(),out,tmp);
822 }
823
824 void
825 CanvasInterface::seek_frame(int frames)
826 {
827         if(!frames)
828                 return;
829         float fps(get_canvas()->rend_desc().get_frame_rate());
830         Time newtime(get_time()+(float)frames/fps);
831         newtime=newtime.round(fps);
832
833         if(newtime<=get_canvas()->rend_desc().get_time_start())
834                 newtime=get_canvas()->rend_desc().get_time_start();
835         if(newtime>=get_canvas()->rend_desc().get_time_end())
836                 newtime=get_canvas()->rend_desc().get_time_end();
837         set_time(newtime);
838 }
839
840 void
841 CanvasInterface::seek_time(synfig::Time time)
842 {
843         if(!time)
844                 return;
845
846         float fps(get_canvas()->rend_desc().get_frame_rate());
847
848         if(time>=synfig::Time::end())
849         {
850                 set_time(get_canvas()->rend_desc().get_time_end());
851                 return;
852         }
853         if(time<=synfig::Time::begin())
854         {
855                 set_time(get_canvas()->rend_desc().get_time_start());
856                 return;
857         }
858
859         Time newtime(get_time()+time);
860         newtime=newtime.round(fps);
861
862         if(newtime<=get_canvas()->rend_desc().get_time_start())
863                 newtime=get_canvas()->rend_desc().get_time_start();
864         if(newtime>=get_canvas()->rend_desc().get_time_end())
865                 newtime=get_canvas()->rend_desc().get_time_end();
866         set_time(newtime);
867 }