Fix closepath problems
[synfig.git] / synfig-core / src / modules / mod_svg / svg_parser.cpp
1 /* === S Y N F I G ========================================================= */
2 /*!     \file svg_parser.cpp
3 **      \brief Implementation of the Svg parser
4 **      \brief Based on SVG XML specification 1.1
5 **      \brief See: http://www.w3.org/TR/xml11/ for deatils
6 **
7 **      $Id:$
8 **
9 **      \legal
10 **      Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
11 **      Copyright (c) 2008 Chris Moore
12 **      Copyright (c) 2009 Carlos A. Sosa Navarro
13 **
14 **      This package is free software; you can redistribute it and/or
15 **      modify it under the terms of the GNU General Public License as
16 **      published by the Free Software Foundation; either version 2 of
17 **      the License, or (at your option) any later version.
18 **
19 **      This package is distributed in the hope that it will be useful,
20 **      but WITHOUT ANY WARRANTY; without even the implied warranty of
21 **      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
22 **      General Public License for more details.
23 **      \endlegal
24 */
25 /* ========================================================================= */
26
27 /* === H E A D E R S ======================================================= */
28
29 #ifdef HAVE_CONFIG_H
30 #include <config.h>
31 #endif
32
33 #include <iostream>
34 #include "svg_parser.h"
35
36 /* === U S I N G =========================================================== */
37
38 using namespace synfig;
39
40 /* === G L O B A L S ======================================================= */
41
42 /* === P R O C E D U R E S ================================================= */
43
44 Canvas::Handle
45 synfig::open_svg(std::string _filepath,String &errors, String &warnings){
46         Canvas::Handle canvas;
47         Svg_parser parser;
48         try
49         {
50                 canvas=parser.load_svg_canvas(_filepath,errors,warnings);
51                 //canvas->set_id(parser.get_id());
52         }catch(...){
53                 std::cout<<"error"<<std::endl;
54         }
55         return canvas;
56 }
57
58 Canvas::Handle
59 Svg_parser::load_svg_canvas(std::string _filepath,String &errors, String &warnings){
60         filepath = _filepath;
61         #ifdef LIBXMLCPP_EXCEPTIONS_ENABLED
62         try{
63         #endif //LIBXMLCPP_EXCEPTIONS_ENABLED
64                 //load parser
65                 parser.set_substitute_entities();
66                 parser.parse_file(filepath);
67                 //set_id(filepath);
68                 if(parser){
69                         const xmlpp::Node* pNode = parser.get_document()->get_root_node();
70                         parser_node(pNode);
71                 }
72         #ifdef LIBXMLCPP_EXCEPTIONS_ENABLED
73         }catch(const std::exception& ex){
74         std::cout << "Exception caught: " << ex.what() << std::endl;
75         }
76         #endif //LIBXMLCPP_EXCEPTIONS_ENABLED
77         Canvas::Handle canvas;
78         if(nodeRoot){
79                 //canvas=synfig::open_canvas(nodeRoot,_filepath,errors,warnings);
80                 canvas=synfig::open_canvas(nodeRoot,errors,warnings);
81         }
82         return canvas;
83 }
84
85 Svg_parser::Svg_parser(){
86         uid=0;
87         kux=60;
88         set_canvas=0;//we must run parser_canvas method
89         // 0.5 in gamma parameter of color correct layer is 1/0.5 = 2 (thinking) it must be 2.2!!!!
90         gamma.set_gamma(2.2);
91 }
92 /*
93 String
94 Svg_parser::get_id(){
95         if(!id_name.empty()) return id_name;
96         return "random_id";
97 }
98 void
99 Svg_parser::set_id(String source){
100         const char bad_chars[]=" :#@$^&()*";
101         int start=      source.find_last_of('/')+1;
102         int end=        source.find_last_of('.');
103         String x=source.substr(start,end-start);
104         if(!x.empty()){
105                 for(unsigned int i=0;i<sizeof(bad_chars);i++){
106                         unsigned int pos=x.find_first_of(bad_chars[i]);
107                         if(pos!=String::npos)
108                                 x.erase(pos,1);
109                 }
110         }
111         if(!x.empty()){
112                 id_name=x;
113         }else{
114                 id_name="id_arbitrario";
115         }
116 }
117 */
118 //UPDATE
119
120 void
121 Svg_parser::parser_node(const xmlpp::Node* node){
122         const xmlpp::ContentNode* nodeContent = dynamic_cast<const xmlpp::ContentNode*>(node);
123         const xmlpp::TextNode* nodeText = dynamic_cast<const xmlpp::TextNode*>(node);
124         const xmlpp::CommentNode* nodeComment = dynamic_cast<const xmlpp::CommentNode*>(node);
125
126         if(nodeText && nodeText->is_white_space()) //Let's ignore the indenting - you don't always want to do this.
127         return;
128
129         Glib::ustring nodename = node->get_name();
130         if(!nodeText && !nodeComment && !nodename.empty()){
131                 if(nodename.compare("svg")==0){
132                         parser_svg (node);
133                 }else if(nodename.compare("namedview")==0){
134                         parser_canvas(node);
135                 }else if(nodename.compare("defs")==0){
136                         parser_defs (node);
137                 }else{
138                         if(set_canvas==0) parser_canvas (node);
139                         parser_graphics(node,nodeRoot,"",NULL);
140                         if(nodename.compare("g")==0) return;
141                 }
142         }
143         if(!nodeContent){
144         xmlpp::Node::NodeList list = node->get_children();
145         for(xmlpp::Node::NodeList::iterator iter = list.begin(); iter != list.end(); ++iter){
146                 parser_node(*iter); //recursive
147         }
148         }
149 }
150
151 //parser elements
152 void
153 Svg_parser::parser_svg (const xmlpp::Node* node){
154         if(const xmlpp::Element* nodeElement = dynamic_cast<const xmlpp::Element*>(node)){
155                 width   =etl::strprintf("%f",getDimension(nodeElement->get_attribute_value("width")));
156                 height  =etl::strprintf("%f",getDimension(nodeElement->get_attribute_value("height")));
157                 docname=nodeElement->get_attribute_value("docname","");
158         }
159 }
160 void
161 Svg_parser::parser_canvas (const xmlpp::Node* node){
162         if(const xmlpp::Element* nodeElement = dynamic_cast<const xmlpp::Element*>(node)){
163                 if(width.compare("")==0){
164                         width=nodeElement->get_attribute_value("width","");
165                 }
166                 if(height.compare("")==0){
167                         height=nodeElement->get_attribute_value("height","");
168                 }
169                 if(width.compare("")==0 && height.compare("")!=0){
170                         width=height;
171                 }
172                 if(width.compare("")!=0 && height.compare("")==0){
173                         height=width;
174                 }
175                 if(height.compare("")==0 && width.compare("")==0){
176                         width="1024";
177                         height="768";
178                 }
179                 //build
180                 nodeRoot=document.create_root_node("canvas", "", "");
181                 nodeRoot->set_attribute("version","0.5");
182                 nodeRoot->set_attribute("width",width);
183                 nodeRoot->set_attribute("height",height);
184                 nodeRoot->set_attribute("xres","2834.645752");
185                 nodeRoot->set_attribute("yres","2834.645752");
186                 float view_x;
187                 float view_y;
188                 view_x=atof(width.c_str())/kux;
189                 view_y=atof(height.c_str())/kux;
190                 view_x=view_x/2.0;
191                 view_y=view_y/2.0;
192                 char attr_view_box[60];
193                 sprintf(attr_view_box,"%f %f %f %f",-1.0*view_x,view_y,view_x,-1.0*view_y);
194                 nodeRoot->set_attribute("view-box",attr_view_box);
195                 ox=atof(width.c_str() )/2;
196                 oy=atof(height.c_str())/2;
197                 nodeRoot->set_attribute("antialias","1");
198                 nodeRoot->set_attribute("fps","24.000");
199                 nodeRoot->set_attribute("begin-time","0f");
200                 nodeRoot->set_attribute("end-time","5s");
201                 nodeRoot->set_attribute("bgcolor","0.500000 0.500000 0.500000 1.000000");
202                 if(!id_name.empty()) nodeRoot->add_child("name")->set_child_text(id_name);
203                 else nodeRoot->add_child("name")->set_child_text("Synfig Animation 1");
204         }
205         set_canvas=1;
206         AdjustPointUrl ();
207 }
208 //Toplevel parser
209
210 //parser preferences
211 //Seperate transformations: apply transformations on a per-layer basis, rather than on canvases
212 //Resolve BLine transformations: resolve transformations instead of creating transformation layers
213 #define SVG_SEP_TRANSFORMS 1
214 #define SVG_RESOLVE_BLINE 1
215
216 void
217 Svg_parser::parser_graphics(const xmlpp::Node* node,xmlpp::Element* root,String parent_style,Matrix* mtx_parent){
218         if(const xmlpp::Element* nodeElement = dynamic_cast<const xmlpp::Element*>(node)){
219                 Glib::ustring nodename = node->get_name();
220                 if (nodename.compare("g")==0 || nodename.compare("path")==0 || nodename.compare("polygon")==0 || nodename.compare("rect")==0){} else return;
221
222                 //load sub-attributes
223                 Glib::ustring id                        =nodeElement->get_attribute_value("id");
224                 Glib::ustring transform =nodeElement->get_attribute_value("transform");
225
226                 //resolve transformations
227                 Matrix* mtx=NULL;
228                 if(!transform.empty())
229                         mtx=build_transform (transform);
230                 if (SVG_SEP_TRANSFORMS)
231                 {
232                         if(mtx_parent){
233                                 if(mtx)
234                                         composeMatrix(&mtx,mtx_parent,mtx);
235                                 else
236                                         mtx=newMatrix(mtx_parent);
237                         }
238                 }
239                 if(nodename.compare("g")==0){
240                         parser_layer (node,root->add_child("layer"),parent_style,mtx);
241                         return;
242                 }
243
244                 Glib::ustring obj_style =nodeElement->get_attribute_value("style");
245                 Glib::ustring obj_fill                  =nodeElement->get_attribute_value("fill");
246
247                 //style
248                 String fill                         =loadAttribute("fill",obj_style,parent_style,obj_fill,"none");
249                 String fill_rule                =loadAttribute("fill-rule",obj_style,parent_style,"evenodd");
250                 String stroke                   =loadAttribute("stroke",obj_style,parent_style,"none");
251                 String stroke_width             =loadAttribute("stroke-width",obj_style,parent_style,"1px");
252                 String stroke_linecap   =loadAttribute("stroke-linecap",obj_style,parent_style,"butt");
253                 String stroke_linejoin  =loadAttribute("stroke-linejoin",obj_style,parent_style,"miter");
254                 String stroke_opacity   =loadAttribute("stroke-opacity",obj_style,parent_style,"1");
255                 String fill_opacity             =loadAttribute("fill-opacity",obj_style,parent_style,"1");
256                 String opacity                  =loadAttribute("opacity",obj_style,parent_style,"1");
257
258
259                 //Fill
260                 int typeFill=0; //nothing
261
262                 if(fill.compare("none")!=0){
263                         typeFill=1; //simple
264                 }
265                 if(typeFill==1 && fill.compare(0,3,"url")==0){
266                         typeFill=2;     //gradient
267                 }
268                 //Stroke
269                 int typeStroke=0;//nothing
270
271                 if(stroke.compare("none")!=0){
272                         typeStroke=1; //simple
273                 }
274                 if(typeStroke==1 && stroke.compare(0,3,"url")==0){
275                         typeStroke=2;   //gradient
276                 }
277                 
278                 xmlpp::Element* child_layer = nodeStartBasicLayer(root->add_child("layer"));
279                 xmlpp::Element* child_fill = child_layer;
280                 xmlpp::Element* child_stroke = child_layer;
281                 if(typeFill==2){
282                         child_fill=nodeStartBasicLayer(child_fill->add_child("layer"));
283                 }
284                 if(typeStroke==2){
285                         child_stroke=nodeStartBasicLayer(child_stroke->add_child("layer"));
286                 }
287
288                 //make simple fills
289                 if(nodename.compare("rect")==0 && typeFill!=0){
290                         rect_simple(nodeElement,child_fill,fill,fill_opacity,opacity);
291                         if(typeFill==2){
292                                 build_url (child_fill->add_child("layer"),fill,NULL);
293                         }
294                         parser_effects(nodeElement,child_layer,parent_style,mtx);
295                         return;
296                 }
297
298
299                 //=======================================================================
300                 std::list<std::list<Vertice*> > k;
301                 //if we are creating a bline
302
303                 //First, create the list of vertices
304                 if (SVG_RESOLVE_BLINE) {
305                         if(nodename.compare("path")==0){
306                                 k=parser_path_d (nodeElement->get_attribute_value("d"),mtx);
307                         } else if(nodename.compare("polygon")==0){
308                                 k=parser_polygon_path (nodeElement->get_attribute_value("points"),mtx);
309                         }
310                 } else {
311                         if(nodename.compare("path")==0){
312                                 k=parser_path_d (nodeElement->get_attribute_value("d"),NULL);
313                         } else if(nodename.compare("polygon")==0){
314                                 k=parser_polygon_path (nodeElement->get_attribute_value("points"),NULL);
315                         }
316                 }
317                 
318                 int n = k.size();
319                 String bline_id[n];
320                 String offset_id[n];
321                 for (int i=0;i<n;i++){
322                         bline_id[i]=new_guid();
323                         offset_id[i]=new_guid();
324                 }
325
326                 std::list<std::list<Vertice*> >::iterator aux = k.begin();
327                 if(typeFill!=0){//region layer
328                         for (int i=0; aux!=k.end(); aux++){
329                                 xmlpp::Element *child_region=child_fill->add_child("layer");
330                                 child_region->set_attribute("type","region");
331                                 child_region->set_attribute("active","true");
332                                 child_region->set_attribute("version","0.1");
333                                 child_region->set_attribute("desc",id);
334                                 build_param (child_region->add_child("param"),"z_depth","real","0.0000000000");
335                                 build_param (child_region->add_child("param"),"amount","real","1.0000000000");
336                                 build_param (child_region->add_child("param"),"blend_method","integer","0");
337                                 build_color (child_region->add_child("param"),getRed(fill),getGreen(fill),getBlue(fill),atof(fill_opacity.data())*atof(opacity.data()));
338                                 build_vector (child_region->add_child("param"),"offset",0,0,offset_id[i]);
339                                 build_param (child_region->add_child("param"),"invert","bool","false");
340                                 build_param (child_region->add_child("param"),"antialias","bool","true");
341                                 build_param (child_region->add_child("param"),"feather","real","0.0000000000");
342                                 build_param (child_region->add_child("param"),"blurtype","integer","1");
343                                 if(fill_rule.compare("evenodd")==0) build_param (child_region->add_child("param"),"winding_style","integer","1");
344                                 else build_param (child_region->add_child("param"),"winding_style","integer","0");
345
346                                 build_bline (child_region->add_child("param"),*aux,loop,bline_id[i]);
347                                 i++;
348                         }
349                 }
350                 if(typeFill==2){ //gradient in onto mode (fill)
351                         if (SVG_RESOLVE_BLINE)
352                                 build_url(child_fill->add_child("layer"),fill,mtx);
353                         else
354                                 build_url(child_fill->add_child("layer"),fill,NULL);
355                 }
356
357                 if(typeStroke!=0){//outline layer
358                         int i=0;
359                         for (aux=k.begin(); aux!=k.end(); aux++){
360                                 xmlpp::Element *child_outline=child_stroke->add_child("layer");
361                                 child_outline->set_attribute("type","outline");
362                                 child_outline->set_attribute("active","true");
363                                 child_outline->set_attribute("version","0.2");
364                                 child_outline->set_attribute("desc",id);
365                                 build_param (child_outline->add_child("param"),"z_depth","real","0.0000000000");
366                                 build_param (child_outline->add_child("param"),"amount","real","1.0000000000");
367                                 build_param (child_outline->add_child("param"),"blend_method","integer","0");
368                                 build_color (child_outline->add_child("param"),getRed(stroke),getGreen(stroke),getBlue(stroke),atof(stroke_opacity.data())*atof(opacity.data()));
369                                 build_vector (child_outline->add_child("param"),"offset",0,0,offset_id[i]);
370                                 build_param (child_outline->add_child("param"),"invert","bool","false");
371                                 build_param (child_outline->add_child("param"),"antialias","bool","true");
372                                 build_param (child_outline->add_child("param"),"feather","real","0.0000000000");
373                                 build_param (child_outline->add_child("param"),"blurtype","integer","1");
374                                 //outline in nonzero
375                                 build_param (child_outline->add_child("param"),"winding_style","integer","0");
376
377                                 build_bline (child_outline->add_child("param"),*aux,loop,bline_id[i]);
378
379                                 stroke_width=etl::strprintf("%f",getDimension(stroke_width)/kux);
380                                 build_param (child_outline->add_child("param"),"width","real",stroke_width);
381                                 build_param (child_outline->add_child("param"),"expand","real","0.0000000000");
382                                 if(stroke_linejoin.compare("miter")==0) build_param (child_outline->add_child("param"),"sharp_cusps","bool","true");
383                                 else build_param (child_outline->add_child("param"),"sharp_cusps","bool","false");
384                                 if(stroke_linecap.compare("butt")==0){
385                                         build_param (child_outline->add_child("param"),"round_tip[0]","bool","false");
386                                         build_param (child_outline->add_child("param"),"round_tip[1]","bool","false");
387                                 }else{
388                                         build_param (child_outline->add_child("param"),"round_tip[0]","bool","true");
389                                         build_param (child_outline->add_child("param"),"round_tip[1]","bool","true");
390                                 }
391                                 build_param (child_outline->add_child("param"),"loopyness","real","1.0000000000");
392                                 build_param (child_outline->add_child("param"),"homogeneous_width","bool","true");
393
394
395                                 i++;
396                         }
397
398                         if(typeStroke==2){ //gradient in onto mode (stroke)
399                         if (SVG_RESOLVE_BLINE)
400                                 build_url(child_stroke->add_child("layer"),fill,mtx);
401                         else
402                                 build_url(child_stroke->add_child("layer"),fill,NULL);
403                         }
404                         if (SVG_RESOLVE_BLINE)
405                                 parser_effects(nodeElement,child_layer,parent_style,NULL);
406                         else
407                                 parser_effects(nodeElement,child_layer,parent_style,mtx);
408                 
409                 }
410         }
411 }
412
413 void
414 Svg_parser::rect_simple(const xmlpp::Element* nodeElement,xmlpp::Element* root,String fill, String fill_opacity, String opacity){
415         Glib::ustring rect_id           =nodeElement->get_attribute_value("id");
416         Glib::ustring rect_x            =nodeElement->get_attribute_value("x");
417         Glib::ustring rect_y            =nodeElement->get_attribute_value("y");
418         Glib::ustring rect_width        =nodeElement->get_attribute_value("width");
419         Glib::ustring rect_height       =nodeElement->get_attribute_value("height");
420
421         xmlpp::Element *child_rect=root->add_child("layer");
422         child_rect->set_attribute("type","rectangle");
423         child_rect->set_attribute("active","true");
424         child_rect->set_attribute("version","0.2");
425         child_rect->set_attribute("desc",rect_id);
426
427         build_real(child_rect->add_child("param"),"z_depth",0.0);
428         build_real(child_rect->add_child("param"),"amount",1.0);
429         build_integer(child_rect->add_child("param"),"blend_method",0);
430         build_color (child_rect->add_child("param"),getRed (fill),getGreen (fill),getBlue(fill),atof(opacity.data())*atof(fill_opacity.data()));
431
432         float auxx=atof(rect_x.c_str());
433         float auxy=atof(rect_y.c_str());
434         coor2vect(&auxx,&auxy);
435         build_vector (child_rect->add_child("param"),"point1",auxx,auxy);
436         auxx= atof(rect_x.c_str()) + atof(rect_width.c_str());
437         auxy= atof(rect_y.c_str()) + atof(rect_height.c_str());
438         coor2vect(&auxx,&auxy);
439         build_vector (child_rect->add_child("param"),"point2",auxx,auxy);
440
441
442 }
443
444 void
445 Svg_parser::parser_layer(const xmlpp::Node* node,xmlpp::Element* root,String parent_style,Matrix* mtx){
446         if(const xmlpp::Element* nodeElement = dynamic_cast<const xmlpp::Element*>(node)){
447                 Glib::ustring label             =nodeElement->get_attribute_value("label");
448                 Glib::ustring style             =nodeElement->get_attribute_value("style");
449                 Glib::ustring fill              =nodeElement->get_attribute_value("fill");
450
451                 String layer_style;
452                 if(!style.empty()){
453                         layer_style=style;
454                 }else if(!fill.empty()){
455                         layer_style.append("fill:");
456                         layer_style.append(fill);
457                 }else if(!parent_style.empty()){
458                         layer_style=parent_style;
459                 }
460                 //build
461                 root->set_attribute("type","PasteCanvas");
462                 root->set_attribute("active","true");
463                 root->set_attribute("version","0.1");
464                 if(!label.empty())      root->set_attribute("desc",label);
465                 else            root->set_attribute("desc","Inline Canvas");
466
467                 build_real(root->add_child("param"),"z_depth",0.0);
468                 build_real(root->add_child("param"),"amount",1.0);
469                 build_integer(root->add_child("param"),"blend_method",0);
470                 build_vector (root->add_child("param"),"origin",0,0);
471
472                 //printf(" canvas attributes ");
473                 //canvas
474                 xmlpp::Element *child_canvas=root->add_child("param");
475                 child_canvas->set_attribute("name","canvas");
476                 child_canvas=child_canvas->add_child("canvas");
477                 const xmlpp::ContentNode* nodeContent = dynamic_cast<const xmlpp::ContentNode*>(node);
478                 if(!nodeContent){
479                 xmlpp::Node::NodeList list = node->get_children();
480                 for(xmlpp::Node::NodeList::iterator iter = list.begin(); iter != list.end(); ++iter){
481                                 Glib::ustring name =(*iter)->get_name();
482                                 parser_graphics (*iter,child_canvas,layer_style,mtx);
483                 }
484                 }
485                 if (! SVG_SEP_TRANSFORMS) parser_effects(nodeElement,child_canvas,parent_style,mtx);
486         }
487 }
488
489 std::list<std::list<Vertice*> >
490 Svg_parser::parser_polygon_path(Glib::ustring polygon_points, Matrix* mtx){
491         std::list<std::list<Vertice*> > k0;
492         if(polygon_points.empty())
493                 return k0;
494         std::list<Vertice*> k;
495         std::vector<String> tokens=get_tokens_path (polygon_points);
496         unsigned int i;
497         float ax,ay; ax=ay=0;
498         for(i=0;i<tokens.size();i++){
499                 ax=atof(tokens.at(i).data());
500                 i++; if(tokens.at(i).compare(",")==0) i++;
501                 ay=atof(tokens.at(i).data());
502                 //mtx
503                 if(mtx) transformPoint2D(mtx,&ax,&ay);
504                 //adjust
505                 coor2vect(&ax,&ay);
506                 //save
507                 k.push_back(newVertice(ax,ay));
508         }
509         k0.push_front(k);
510         return k0;
511 }
512
513 std::vector<String>
514 Svg_parser::get_tokens_path(String path){ //mini path lexico-parser
515         std::vector<String> tokens;
516         String buffer;
517         int e=0;
518         unsigned int i=0;
519         char a;
520         while(i<path.size()){
521                 a=path.at(i);
522                 switch(e){
523                         case 0: //initial state
524                                         if(a=='m'){ e=1; i++;}
525                                         else if(a=='c'){ e= 2; i++;}
526                                         else if(a=='q'){ e= 3; i++;}
527                                         else if(a=='t'){ e= 4; i++;}
528                                         else if(a=='a'){ e= 5; i++;}
529                                         else if(a=='l'){ e= 6; i++;}
530                                         else if(a=='v'){ e= 7; i++;}
531                                         else if(a=='h'){ e= 8; i++;}
532                                         else if(a=='M'){ e= 9; i++;}
533                                         else if(a=='C'){ e=10; i++;}
534                                         else if(a=='Q'){ e=11; i++;}
535                                         else if(a=='T'){ e=12; i++;}
536                                         else if(a=='A'){ e=13; i++;}
537                                         else if(a=='L'){ e=14; i++;}
538                                         else if(a=='V'){ e=15; i++;}
539                                         else if(a=='H'){ e=16; i++;}
540                                         else if(a=='z' || a=='Z'){ e=17; i++;}
541                                         else if(a=='-' ||a=='.'|| isdigit (a)){ e=18;}
542                                         else if(a==','){ e=19; i++;}
543                                         else if(a==' '){i++;}
544                                         break;
545                         //relative
546                         case 1 : tokens.push_back("m"); e=0; break;//move
547                         case 2 : tokens.push_back("c"); e=0; break;//curve
548                         case 3 : tokens.push_back("q"); e=0; break;//quadratic
549                         case 4 : tokens.push_back("t"); e=0; break;//smooth quadratic
550                         case 5 : tokens.push_back("a"); e=0; break;//elliptic arc
551                         case 6 : tokens.push_back("l"); e=0; break;//line to
552                         case 7 : tokens.push_back("v"); e=0; break;//vertical
553                         case 8 : tokens.push_back("h"); e=0; break;//horizontal
554                         //absolute
555                         case 9 : tokens.push_back("M"); e=0; break;
556                         case 10: tokens.push_back("C"); e=0; break;
557                         case 11: tokens.push_back("Q"); e=0; break;
558                         case 12: tokens.push_back("T"); e=0; break;
559                         case 13: tokens.push_back("A"); e=0; break;
560                         case 14: tokens.push_back("L"); e=0; break;
561                         case 15: tokens.push_back("V"); e=0; break;
562                         case 16: tokens.push_back("H"); e=0; break;
563
564                         case 17: tokens.push_back("z"); e=0; break;//loop
565                         case 18: if(a=='-'||a=='.'|| isdigit (a)){
566                                                 buffer.append(path.substr(i,1));i++;
567                                         }else{
568                                                 e=20;
569                                         }
570                                         break;
571                         case 19: tokens.push_back(","); e=0; break;
572                         case 20: tokens.push_back(buffer);
573                                         buffer.clear();
574                                         e=0; break;
575                         default: break;
576                 }
577         }
578         switch(e){//last element
579                 case 1 : tokens.push_back("m"); break;
580                 case 2 : tokens.push_back("c"); break;
581                 case 3 : tokens.push_back("q"); break;
582                 case 4 : tokens.push_back("t"); break;
583                 case 5 : tokens.push_back("a"); break;
584                 case 6 : tokens.push_back("l"); break;
585                 case 7 : tokens.push_back("v"); break;
586                 case 8 : tokens.push_back("h"); break;
587                 case 9 : tokens.push_back("M"); break;
588                 case 10: tokens.push_back("C"); break;
589                 case 11: tokens.push_back("Q"); break;
590                 case 12: tokens.push_back("T"); break;
591                 case 13: tokens.push_back("A"); break;
592                 case 14: tokens.push_back("L"); break;
593                 case 15: tokens.push_back("V"); break;
594                 case 16: tokens.push_back("H"); break;
595                 case 17: tokens.push_back("z"); break;
596                 case 18: tokens.push_back(buffer); break;
597                 case 19: tokens.push_back(","); break;
598                 case 20: tokens.push_back(buffer); break;
599                 default: break;
600         }
601         return tokens;
602 }
603
604 std::list<std::list<Vertice*> >
605 Svg_parser::parser_path_d(String path_d,Matrix* mtx){
606         std::list<std::list<Vertice*> > k;
607         std::list<Vertice*> k1;
608         std::vector<String> tokens=get_tokens_path(path_d);
609         String command="M"; //the current command
610         float ax,ay,tgx,tgy,tgx2,tgy2;//each method
611         ax=ay=0;
612         float actual_x=0,actual_y=0; //in svg coordinate space
613         float old_x=0,old_y=0; //needed in rare cases
614         float init_x=0,init_y=0; //for closepath commands
615         loop=false;
616
617         for(unsigned int i=0;i<tokens.size();i++){
618                 //if the token is a command, change the current command
619                 if(tokens.at(i).compare("M")==0 || tokens.at(i).compare("m")==0 || tokens.at(i).compare("L")==0 || tokens.at(i).compare("l")==0 || tokens.at(i).compare("H")==0 || tokens.at(i).compare("h")==0 || tokens.at(i).compare("V")==0 || tokens.at(i).compare("v")==0 || tokens.at(i).compare("C")==0 || tokens.at(i).compare("c")==0 || tokens.at(i).compare("S")==0 || tokens.at(i).compare("s")==0 || tokens.at(i).compare("Q")==0 || tokens.at(i).compare("q")==0 || tokens.at(i).compare("T")==0 || tokens.at(i).compare("t")==0 || tokens.at(i).compare("A")==0 || tokens.at(i).compare("a")==0 || tokens.at(i).compare("z")==0) {
620                         command=tokens.at(i);
621                         i++;
622                 }
623                 
624                 old_x=actual_x;
625                 old_y=actual_y;
626                 //if command is absolute, set actual_x/y to zero
627                 if(command.compare("M")==0 || command.compare("L")==0 || command.compare("C")==0 || command.compare("S")==0 || command.compare("Q")==0 || command.compare("T")==0 || command.compare("A")==0 || command.compare("H")==0 || command.compare("V")==0) {
628                         actual_x=0;
629                         actual_y=0;
630                 }
631
632                 //now parse the commands
633                 if(command.compare("M")==0 || command.compare("m")==0){ //move to
634                         if(!k1.empty())
635                                 k.push_front(k1);
636                         k1.clear();
637                         //read
638                         actual_x+=atof(tokens.at(i).data());
639                         i++; if(tokens.at(i).compare(",")==0) i++;
640                         actual_y+=atof(tokens.at(i).data());
641
642                         init_x=actual_x;
643                         init_y=actual_y;
644                         ax=actual_x;
645                         ay=actual_y;
646                         //operate and save
647                         if(mtx) transformPoint2D(mtx,&ax,&ay);
648                         coor2vect(&ax,&ay);
649                         k1.push_back(newVertice (ax,ay)); //first element
650                         setSplit(k1.back(),TRUE);
651                         //"If a moveto is followed by multiple pairs of coordinates,
652                         // the subsequent pairs are treated as implicit lineto commands."
653                         if (command.compare("M")==0)
654                                 command="L";
655                         else
656                                 command="l";
657                 }else if(command.compare("C")==0 || command.compare("c")==0){ //curve
658                         //tg2
659                         tgx2=actual_x+atof(tokens.at(i).data());
660                         i++; if(tokens.at(i).compare(",")==0) i++;
661                         tgy2=actual_y+atof(tokens.at(i).data());
662                         //tg1
663                         i++; tgx=actual_x+atof(tokens.at(i).data());
664                         i++; if(tokens.at(i).compare(",")==0) i++;
665                         tgy=actual_y+atof(tokens.at(i).data());
666                         //point
667                         i++; actual_x+=atof(tokens.at(i).data());
668                         i++; if(tokens.at(i).compare(",")==0) i++;
669                         actual_y+=atof(tokens.at(i).data());
670
671                         ax=actual_x;
672                         ay=actual_y;
673                         //mtx
674                         if(mtx){
675                                 transformPoint2D(mtx,&tgx2,&tgy2);
676                                 transformPoint2D(mtx,&ax,&ay);
677                                 transformPoint2D(mtx,&tgx,&tgy);
678                         }
679                         //adjust
680                         coor2vect(&tgx2,&tgy2);
681                         coor2vect(&ax,&ay);
682                         coor2vect(&tgx,&tgy);
683                         //save
684                         setTg2(k1.back(),k1.back()->x,k1.back()->y,tgx2,tgy2);
685                         if(isFirst(k1.front(),ax,ay)){
686                                 setTg1(k1.front(),k1.front()->x,k1.front()->y,tgx,tgy);
687                         }else{
688                                 k1.push_back(newVertice (ax,ay));
689                                 setTg1(k1.back(),k1.back()->x,k1.back()->y,tgx,tgy);
690                                 setSplit(k1.back(),TRUE);
691                         }
692                 }else if(command.compare("Q")==0 || command.compare("q")==0){ //quadractic curve
693                         //tg1 and tg2
694                         tgx=actual_x+atof(tokens.at(i).data());
695                         i++; if(tokens.at(i).compare(",")==0) i++;
696                         tgy=actual_y+atof(tokens.at(i).data());
697                         //point
698                         i++; actual_x+=atof(tokens.at(i).data());
699                         i++; if(tokens.at(i).compare(",")==0) i++;
700                         actual_y+=atof(tokens.at(i).data());
701
702                         ax=actual_x;
703                         ay=actual_y;
704                         //mtx
705                         if(mtx){
706                                 transformPoint2D(mtx,&ax,&ay);
707                                 transformPoint2D(mtx,&tgx,&tgy);
708                         }
709                         //adjust
710                         coor2vect(&ax,&ay);
711                         coor2vect(&tgx,&tgy);
712                         //save
713                         setTg1(k1.back(),k1.back()->x,k1.back()->y,tgx,tgy);
714                         setSplit(k1.back(),FALSE);
715                         k1.push_back(newVertice (ax,ay));
716                         setTg1(k1.back(),k1.back()->x,k1.back()->y,tgx,tgy);
717                 }else if(command.compare("L")==0 || command.compare("l")==0){ //line to
718                         //point
719                         actual_x+=atof(tokens.at(i).data());
720                         i++; if(tokens.at(i).compare(",")==0) i++;
721                         actual_y+=atof(tokens.at(i).data());
722
723                         ax=actual_x;
724                         ay=actual_y;
725                         //mtx
726                         if(mtx) transformPoint2D(mtx,&ax,&ay);
727                         //adjust
728                         coor2vect(&ax,&ay);
729                         //save
730                         setTg2(k1.back(),k1.back()->x,k1.back()->y,k1.back()->x,k1.back()->y);
731                         if(isFirst(k1.front(),ax,ay)){
732                                 setTg1(k1.front(),k1.front()->x,k1.front()->y,k1.front()->x,k1.front()->y);
733                         }else{
734                                 k1.push_back(newVertice(ax,ay));
735                                 setTg1(k1.back(),k1.back()->x,k1.back()->y,k1.back()->x,k1.back()->y);
736                         }
737                 }else if(command.compare("H")==0 || command.compare("h")==0){// horizontal move
738                         //the same that L but only Horizontal movement
739                         //point
740                         actual_x+=atof(tokens.at(i).data());
741
742                         ax=actual_x;
743                         ay=old_y;
744                         //mtx
745                         if(mtx) transformPoint2D(mtx,&ax,&ay);
746                         //adjust
747                         coor2vect(&ax,&ay);
748                         //save
749                         setTg2(k1.back(),k1.back()->x,k1.back()->y,k1.back()->x,k1.back()->y);
750                         if(isFirst(k1.front(),ax,ay)){
751                                 setTg1(k1.front(),k1.front()->x,k1.front()->y,k1.front()->x,k1.front()->y);
752                         }else{
753                                 k1.push_back(newVertice(ax,ay));
754                                 setTg1(k1.back(),k1.back()->x,k1.back()->y,k1.back()->x,k1.back()->y);
755                         }
756                 }else if(command.compare("V")==0 || command.compare("v")==0){//vertical
757                         //point
758                         actual_y+=atof(tokens.at(i).data());
759
760                         ax=old_x;
761                         ay=actual_y;
762                         //mtx
763                         if(mtx) transformPoint2D(mtx,&ax,&ay);
764                         //adjust
765                         coor2vect(&ax,&ay);
766                         //save
767                         setTg2(k1.back(),k1.back()->x,k1.back()->y,k1.back()->x,k1.back()->y);
768                         if(isFirst(k1.front(),ax,ay)){
769                                 setTg1(k1.front(),k1.front()->x,k1.front()->y,k1.front()->x,k1.front()->y);
770                         }else{
771                                 k1.push_back(newVertice(ax,ay));
772                                 setTg1(k1.back(),k1.back()->x,k1.back()->y,k1.back()->x,k1.back()->y);
773                         }
774                 }else if(command.compare("T")==0 || command.compare("t")==0){// I don't know what does it
775                         actual_x+=atof(tokens.at(i).data());
776                         i++; if(tokens.at(i).compare(",")==0) i++;
777                         actual_y+=atof(tokens.at(i).data());
778                 }else if(command.compare("A")==0 || command.compare("a")==0){//elliptic arc
779
780                         //isn't complete support, is only for circles
781
782                         //this curve have 6 parameters
783                         //radio
784                         float radio_x,radio_y;
785                         float angle;
786                         bool sweep,large;
787                         //radio
788                         radio_x=atof(tokens.at(i).data());
789                         i++; if(tokens.at(i).compare(",")==0) i++;
790                         radio_y=atof(tokens.at(i).data());
791                         //angle
792                         i++; angle=atof(tokens.at(i).data());
793                         //flags
794                         i++; large=atoi(tokens.at(i).data());
795                         i++; sweep=atoi(tokens.at(i).data());
796                         //point
797                         i++; actual_x+=atof(tokens.at(i).data());
798                         i++; if(tokens.at(i).compare(",")==0) i++;
799                         actual_y+=atof(tokens.at(i).data());
800                         //how to draw?
801                         if(!large && !sweep){
802                                 //points
803                                 tgx2 = old_x + radio_x*0.5;
804                                 tgy2 = old_y ;
805                                 tgx  = actual_x;
806                                 tgy  = actual_y + radio_y*0.5;
807
808                                 ax=actual_x;
809                                 ay=actual_y;
810                                 //transformations
811                                 if(mtx){
812                                         transformPoint2D(mtx,&tgx2,&tgy2);
813                                         transformPoint2D(mtx,&ax,&ay);
814                                         transformPoint2D(mtx,&tgx,&tgy);
815                                 }
816                                 //adjust
817                                 coor2vect(&tgx2,&tgy2);
818                                 coor2vect(&ax,&ay);
819                                 coor2vect(&tgx,&tgy);
820                                 //save
821                                 setTg2(k1.back(),k1.back()->x,k1.back()->y,tgx2,tgy2);
822                                 if(isFirst(k1.front(),ax,ay)){
823                                         setTg1(k1.front(),k1.front()->x,k1.front()->y,tgx,tgy);
824                                 }else{
825                                         k1.push_back(newVertice (ax,ay));
826                                         setTg1(k1.back(),k1.back()->x,k1.back()->y,tgx,tgy);
827                                         setSplit(k1.back(),TRUE);
828                                 }
829                         }else if(!large &&  sweep){
830                                 //points
831                                 tgx2 = old_x;
832                                 tgy2 = old_y + radio_y*0.5;
833                                 tgx  = actual_x + radio_x*0.5;
834                                 tgy  = actual_y ;
835
836                                 ax=actual_x;
837                                 ay=actual_y;
838                                 //transformations
839                                 if(mtx){
840                                         transformPoint2D(mtx,&tgx2,&tgy2);
841                                         transformPoint2D(mtx,&ax,&ay);
842                                         transformPoint2D(mtx,&tgx,&tgy);
843                                 }
844                                 //adjust
845                                 coor2vect(&tgx2,&tgy2);
846                                 coor2vect(&ax,&ay);
847                                 coor2vect(&tgx,&tgy);
848                                 //save
849                                 setTg2(k1.back(),k1.back()->x,k1.back()->y,tgx2,tgy2);
850                                 if(isFirst(k1.front(),ax,ay)){
851                                         setTg1(k1.front(),k1.front()->x,k1.front()->y,tgx,tgy);
852                                 }else{
853                                         k1.push_back(newVertice (ax,ay));
854                                         setTg1(k1.back(),k1.back()->x,k1.back()->y,tgx,tgy);
855                                         setSplit(k1.back(),TRUE);
856                                 }
857                         }else if( large && !sweep){//rare
858                                 //this need more than one vertex
859                         }else if( large &&  sweep){//circles in inkscape are made with this kind of arc
860                                 //intermediate point
861                                 int sense=1;
862                                 if(old_x>actual_x) sense =-1;
863                                 float in_x,in_y,in_tgx1,in_tgy1,in_tgx2,in_tgy2;
864                                 in_x = (old_x+actual_x)/2;
865                                 in_y = old_y - sense*radio_y;
866                                 in_tgx1 = in_x - sense*(radio_x*0.5);
867                                 in_tgx2 = in_x + sense*(radio_x*0.5);
868                                 in_tgy1 = in_y;
869                                 in_tgy2 = in_y;
870                                 //start/end points
871                                 tgx2=old_x;
872                                 tgy2=actual_y - sense*(radio_y*0.5);
873                                 tgx =actual_x;
874                                 tgy =actual_y - sense*(radio_y*0.5);
875
876                                 ax=actual_x;
877                                 ay=actual_y;
878                                 //transformations
879                                 if(mtx){
880                                         transformPoint2D(mtx,&tgx2,&tgy2);
881                                         transformPoint2D(mtx,&tgx ,&tgy );
882                                         transformPoint2D(mtx,&ax,&ay);
883
884                                         transformPoint2D(mtx,&in_tgx2,&in_tgy2);
885                                         transformPoint2D(mtx,&in_tgx1,&in_tgy1);
886                                         transformPoint2D(mtx,&in_x,&in_y);
887                                 }
888                                 //adjust
889                                 coor2vect(&tgx2 , &tgy2);
890                                 coor2vect(&ax   , &ay  );
891                                 coor2vect(&tgx  , &tgy );
892
893                                 coor2vect(&in_tgx2 , &in_tgy2);
894                                 coor2vect(&in_tgx1 , &in_tgy1);
895                                 coor2vect(&in_x    , &in_y   );
896
897                                 //save the last tg2
898                                 setTg2(k1.back(),k1.back()->x,k1.back()->y,tgx2,tgy2);
899                                 //save the intermediate point
900                                 k1.push_back(newVertice (in_x,in_y));
901                                 setTg1(k1.back(),k1.back()->x,k1.back()->y, in_tgx1 , in_tgy1);
902                                 setTg2(k1.back(),k1.back()->x,k1.back()->y, in_tgx2 , in_tgy2);
903                                 setSplit(k1.back(),TRUE); //this could be changed
904                                 //save the new point
905                                 if(isFirst(k1.front(),ax,ay)){
906                                         setTg1(k1.front(),k1.front()->x,k1.front()->y,tgx,tgy);
907                                 }else{
908                                         k1.push_back(newVertice (ax,ay));
909                                         setTg1(k1.back(),k1.back()->x,k1.back()->y,tgx,tgy);
910                                         setSplit(k1.back(),TRUE);
911                                 }
912                         }
913                 }else if(command.compare("z")==0){
914                         loop=true;
915                         if(!k1.empty())
916                                 k.push_front(k1);
917                         k1.clear();
918                         if (i<tokens.size() && tokens.at(i).compare("M")!=0 && tokens.at(i).compare("m")!=0) {
919                                 //starting a new path, but not with a moveto
920                                 actual_x=init_x;
921                                 actual_y=init_y;
922                                 ax=actual_x;
923                                 ay=actual_y;
924                                 //operate and save
925                                 if(mtx) transformPoint2D(mtx,&ax,&ay);
926                                 coor2vect(&ax,&ay);
927                                 k1.push_back(newVertice (ax,ay)); //first element
928                                 setSplit(k1.back(),TRUE);
929                         }
930                         i--; //decrement i to balance "i++" at command change
931                 }else{
932                         std::cout<<"unsupported path token: "<<tokens.at(i)<<std::endl;
933                 }
934         }
935         if(!k1.empty())
936                 k.push_front(k1); //last element
937         return k;
938 }
939
940 void
941 Svg_parser::parser_effects(const xmlpp::Element* nodeElement,xmlpp::Element* root,String parent_style,Matrix* mtx){
942         if (mtx) {
943                 xmlpp::Element *child_transform=root->add_child("layer");
944                 child_transform->set_attribute("type","warp");
945                 child_transform->set_attribute("active","true");
946                 child_transform->set_attribute("version","0.1");
947                 child_transform->set_attribute("desc","Transform");
948
949                 float x,y;
950                 x=100;y=100;coor2vect(&x,&y);
951                 build_vector (child_transform->add_child("param"),"src_tl",x,y);
952
953                 x=200;y=200;coor2vect(&x,&y);
954                 build_vector (child_transform->add_child("param"),"src_br",x,y);
955                 
956
957                 x=100;y=100;
958                 transformPoint2D(mtx,&x,&y);coor2vect(&x,&y);
959                 build_vector (child_transform->add_child("param"),"dest_tl",x,y);
960
961                 x=200;y=100;
962                 transformPoint2D(mtx,&x,&y);coor2vect(&x,&y);
963                 build_vector (child_transform->add_child("param"),"dest_tr",x,y);
964
965                 x=200;y=200;
966                 transformPoint2D(mtx,&x,&y);coor2vect(&x,&y);
967                 build_vector (child_transform->add_child("param"),"dest_br",x,y);
968
969                 x=100;y=200;
970                 transformPoint2D(mtx,&x,&y);coor2vect(&x,&y);
971                 build_vector (child_transform->add_child("param"),"dest_bl",x,y);
972
973                 build_param (child_transform->add_child("param"),"clip","bool","false");
974                 build_param (child_transform->add_child("param"),"horizon","real","4.0");
975         }
976 }
977
978
979 void
980 Svg_parser::parser_defs(const xmlpp::Node* node){
981         const xmlpp::ContentNode* nodeContent = dynamic_cast<const xmlpp::ContentNode*>(node);
982         if(!nodeContent){
983                 xmlpp::Node::NodeList list = node->get_children();
984                 for(xmlpp::Node::NodeList::iterator iter = list.begin(); iter != list.end(); ++iter){
985                         Glib::ustring name =(*iter)->get_name();
986                         if(name.compare("linearGradient")==0){
987                                 parser_linearGradient(*iter);
988                         }else if(name.compare("radialGradient")==0){
989                                 parser_radialGradient(*iter);
990                         }
991                 }
992         }
993 }
994
995 void
996 Svg_parser::AdjustPointUrl(){
997 /*
998         if(!lg.empty()){//linealgradient
999                 std::list<LinearGradient*>::iterator aux=lg.begin();
1000                 while(aux!=lg.end()){
1001                         LinearGradient* auxlg=*aux;
1002                         coor2vect (&auxlg->x1,&auxlg->y1);
1003                         coor2vect (&auxlg->x2,&auxlg->y2);
1004                         aux++;
1005                 }
1006         }
1007         if(!rg.empty()){//radialgradient
1008                 std::list<RadialGradient*>::iterator aux=rg.begin();
1009                 while(aux!=rg.end()){
1010                         RadialGradient* auxrg=*aux;
1011                         coor2vect (&auxrg->cx,&auxrg->cy);
1012                         auxrg->r= auxrg->r/kux;
1013                         aux++;
1014                 }
1015         }
1016 */
1017 }
1018 std::list<ColorStop*>*
1019 Svg_parser::find_colorStop(String name){
1020         if(!name.empty()){
1021                 if(lg.empty()&& rg.empty())
1022                         return NULL;
1023
1024                 String find= name;
1025                 if(find.at(0)=='#') find.erase(0,1);
1026                 else return NULL;
1027                 std::list<LinearGradient*>::iterator aux=lg.begin();
1028                 while(aux!=lg.end()){//only find into linear gradients
1029                         if(find.compare((*aux)->name)==0){
1030                                 return (*aux)->stops;
1031                         }
1032                         aux++;
1033                 }
1034         }
1035         return NULL;
1036 }
1037 void
1038 Svg_parser::build_url(xmlpp::Element* root, String name,Matrix *mtx){
1039         if(!name.empty()){
1040                 if(lg.empty()&& rg.empty())
1041                         root->get_parent()->remove_child(root);
1042
1043                 int start=name.find_first_of("#")+1;
1044                 int end=name.find_first_of(")");
1045                 String find= name.substr(start,end-start);
1046                 bool encounter=false;
1047                 if(!lg.empty()){
1048                         std::list<LinearGradient*>::iterator aux=lg.begin();
1049                         while(aux!=lg.end()){
1050                                 if(find.compare((*aux)->name)==0){
1051                                         build_linearGradient (root,*aux,mtx);
1052                                         encounter=true;
1053                                 }
1054                                 aux++;
1055                         }
1056                 }
1057                 if(!encounter && !rg.empty()){
1058                         std::list<RadialGradient*>::iterator aux=rg.begin();
1059                         while(aux!=rg.end()){
1060                                 if(find.compare((*aux)->name)==0){
1061                                         build_radialGradient (root,*aux,mtx);
1062                                         encounter=true;
1063                                 }
1064                                 aux++;
1065                         }
1066                 }
1067                 if(!encounter)
1068                         root->get_parent()->remove_child(root);
1069         }else{
1070                 root->get_parent()->remove_child(root);
1071         }
1072 }
1073 void
1074 Svg_parser::build_stop_color(xmlpp::Element* root, std::list<ColorStop*> *stops){
1075         std::list<ColorStop*>::iterator aux_stop=stops->begin();
1076         while(aux_stop!=stops->end()){
1077                 xmlpp::Element *child=root->add_child("color");
1078                 child->set_attribute("pos",etl::strprintf("%f",(*aux_stop)->pos));
1079                 child->add_child("r")->set_child_text(etl::strprintf("%f",(*aux_stop)->r));
1080                 child->add_child("g")->set_child_text(etl::strprintf("%f",(*aux_stop)->g));
1081                 child->add_child("b")->set_child_text(etl::strprintf("%f",(*aux_stop)->b));
1082                 child->add_child("a")->set_child_text(etl::strprintf("%f",(*aux_stop)->a));
1083                 aux_stop++;
1084         }
1085 }
1086 void
1087 Svg_parser::build_linearGradient(xmlpp::Element* root,LinearGradient* data,Matrix* mtx){
1088         if(data){
1089                 root->set_attribute("type","linear_gradient");
1090                 root->set_attribute("active","true");
1091                 root->set_attribute("desc","Gradient004");
1092                 build_param (root->add_child("param"),"z_depth","real","0");
1093                 build_param (root->add_child("param"),"amount","real","1");
1094                 //straight onto
1095                 build_param (root->add_child("param"),"blend_method","integer","21");
1096                 float x1,y1,x2,y2;
1097                 x1=data->x1;
1098                 y1=data->y1;
1099                 x2=data->x2;
1100                 y2=data->y2;
1101                 if(mtx){
1102                         transformPoint2D(mtx,&x1,&y1);
1103                         transformPoint2D(mtx,&x2,&y2);
1104                 }
1105                 coor2vect (&x1,&y1);
1106                 coor2vect (&x2,&y2);
1107
1108                 build_vector (root->add_child("param"),"p1",x1,y1);
1109                 build_vector (root->add_child("param"),"p2",x2,y2);
1110                 //gradient link
1111                 xmlpp::Element *child=root->add_child("param");
1112                 child->set_attribute("name","gradient");
1113                 build_stop_color (child->add_child("gradient"),data->stops);
1114                 build_param (root->add_child("param"),"loop","bool","false");
1115                 build_param (root->add_child("param"),"zigzag","bool","false");
1116         }
1117 }
1118 void
1119 Svg_parser::build_radialGradient(xmlpp::Element* root,RadialGradient* data,Matrix* mtx){
1120 //not completed
1121         if(data){
1122                 root->set_attribute("type","radial_gradient");
1123                 root->set_attribute("active","true");
1124                 build_param (root->add_child("param"),"z_depth","real","0");
1125                 build_param (root->add_child("param"),"amount","real","1");
1126                 //straight onto
1127                 build_param (root->add_child("param"),"blend_method","integer","21");
1128                 //gradient link
1129                 xmlpp::Element *child=root->add_child("param");
1130                 child->set_attribute("name","gradient");
1131                 build_stop_color (child->add_child("gradient"),data->stops);
1132                 //here the center point and radio
1133                 float cx=data->cx;
1134                 float cy=data->cy;
1135                 float r =data->r;
1136                 //transform
1137                 if(mtx){
1138                         transformPoint2D(mtx,&cx,&cy);
1139                 }
1140                 //adjust
1141                 coor2vect (&cx,&cy);
1142                 r=r/kux;
1143                 build_vector (root->add_child("param"),"center",cx,cy);
1144                 build_param (root->add_child("param"),"radius","real",r);
1145
1146                 build_param (root->add_child("param"),"loop","bool","false");
1147                 build_param (root->add_child("param"),"zigzag","bool","false");
1148         }
1149 }
1150
1151 void
1152 Svg_parser::parser_linearGradient(const xmlpp::Node* node){
1153         if(const xmlpp::Element* nodeElement = dynamic_cast<const xmlpp::Element*>(node)){
1154                 Glib::ustring id        =nodeElement->get_attribute_value("id");
1155                 float x1                        =atof(nodeElement->get_attribute_value("x1").data());
1156                 float y1                        =atof(nodeElement->get_attribute_value("y1").data());
1157                 float x2                        =atof(nodeElement->get_attribute_value("x2").data());
1158                 float y2                        =atof(nodeElement->get_attribute_value("y2").data());
1159                 Glib::ustring link      =nodeElement->get_attribute_value("href");
1160
1161                 std::list<ColorStop*> *stops;
1162                 if(!link.empty()){
1163                         stops=find_colorStop (link);
1164                 }else{
1165                         //color stops
1166                         stops=new std::list<ColorStop*>();
1167                         const xmlpp::ContentNode* nodeContent = dynamic_cast<const xmlpp::ContentNode*>(node);
1168                         if(!nodeContent){
1169                         xmlpp::Node::NodeList list = node->get_children();
1170                         for(xmlpp::Node::NodeList::iterator iter = list.begin(); iter != list.end(); ++iter){
1171                                         Glib::ustring name =(*iter)->get_name();
1172                                         if(name.compare("stop")==0){
1173                                                 const xmlpp::Element* nodeIter = dynamic_cast<const xmlpp::Element*>(*iter);
1174                                                 Glib::ustring style     =nodeIter->get_attribute_value("style");
1175                                                 float offset=atof(nodeIter->get_attribute_value("offset").data());
1176                                                 String stop_color;
1177                                                 String opacity;
1178                                                 if(!style.empty()){
1179                                                         extractSubAttribute (style,"stop-color",&stop_color);
1180                                                         extractSubAttribute (style,"stop-opacity",&opacity);
1181                                                 }
1182                                                 if(opacity.empty()) opacity="1";
1183                                                 if(stop_color.empty()) stop_color="#000000";//black for default :S
1184                                                 stops->push_back(newColorStop(stop_color,atof(opacity.data()),offset));
1185                                         }
1186                         }
1187                         }
1188                 }
1189                 if(stops)
1190                         lg.push_back(newLinearGradient(id,x1,y1,x2,y2,stops));
1191         }
1192 }
1193
1194 void
1195 Svg_parser::parser_radialGradient(const xmlpp::Node* node){
1196         if(const xmlpp::Element* nodeElement = dynamic_cast<const xmlpp::Element*>(node)){
1197                 Glib::ustring id        =nodeElement->get_attribute_value("id");
1198                 float cx                        =atof(nodeElement->get_attribute_value("cx").data());
1199                 float cy                        =atof(nodeElement->get_attribute_value("cy").data());
1200                 float r                         =atof(nodeElement->get_attribute_value("r").data());
1201                 Glib::ustring link      =nodeElement->get_attribute_value("href");//basic
1202                 std::list<ColorStop*> *stops=NULL;
1203                 if(!link.empty()){
1204                         //inkscape always use link, i dont need parser stops here, but it's posible
1205                         stops=find_colorStop (link);
1206                 }
1207                 if(stops)
1208                         rg.push_back(newRadialGradient(id,cx,cy,r,stops));
1209         }
1210 }
1211
1212 ColorStop*
1213 Svg_parser::newColorStop(String color,float opacity,float pos){
1214         ColorStop* _stop;
1215         _stop=(ColorStop*)malloc(sizeof(ColorStop));
1216         float r=getRed(color);
1217         float g=getGreen(color);
1218         float b=getBlue(color);
1219         float a=opacity;
1220         Color ret=adjustGamma(r/255,g/255,b/255,a);
1221         _stop->r=ret.get_r();
1222         _stop->g=ret.get_g();
1223         _stop->b=ret.get_b();
1224         _stop->a=ret.get_a();
1225         _stop->pos=pos;
1226         return _stop;
1227 }
1228 Color
1229 Svg_parser::adjustGamma(float r,float g,float b,float a){
1230         Color ret(r,g,b,a);
1231         if(gamma.get_gamma_r()!=1.0){
1232                 if(ret.get_r() < 0)
1233                         ret.set_r(-gamma.r_F32_to_F32(-ret.get_r()));
1234                 else
1235                         ret.set_r(gamma.r_F32_to_F32(ret.get_r()));
1236         }
1237         if(gamma.get_gamma_g()!=1.0){
1238                 if(ret.get_g() < 0)
1239                         ret.set_g(-gamma.g_F32_to_F32(-ret.get_g()));
1240                 else
1241                         ret.set_g(gamma.g_F32_to_F32(ret.get_g()));
1242         }
1243         if(gamma.get_gamma_b()!=1.0){
1244                 if(ret.get_b() < 0)
1245                         ret.set_b(-gamma.b_F32_to_F32(-ret.get_b()));
1246                 else
1247                         ret.set_b(gamma.b_F32_to_F32(ret.get_b()));
1248         }
1249         return ret;
1250 }
1251
1252 LinearGradient*
1253 Svg_parser::newLinearGradient(String name,float x1,float y1, float x2,float y2,std::list<ColorStop*> *stops){
1254         LinearGradient* data;
1255         data=(LinearGradient*)malloc(sizeof(LinearGradient));
1256         sprintf(data->name,"%s",name.data());
1257         data->x1=x1;
1258         data->y1=y1;
1259         data->x2=x2;
1260         data->y2=y2;
1261         data->stops=stops;
1262         return data;
1263 }
1264
1265 RadialGradient*
1266 Svg_parser::newRadialGradient(String name,float cx,float cy,float r,std::list<ColorStop*> *stops){
1267         RadialGradient* data;
1268         data=(RadialGradient*)malloc(sizeof(RadialGradient));
1269         sprintf(data->name,"%s",name.data());
1270         data->cx=cx;
1271         data->cy=cy;
1272         data->r=r;
1273         data->stops=stops;
1274         return data;
1275 }
1276
1277 //builds
1278 void
1279 Svg_parser::build_gamma(xmlpp::Element* root,float gamma){
1280         root->set_attribute("type","colorcorrect");
1281         root->set_attribute("active","true");
1282         root->set_attribute("version","0.1");
1283         root->set_attribute("desc","Gamma");
1284         build_real (root->add_child("param"),"gamma",gamma);
1285 }
1286 Matrix*
1287 Svg_parser::build_transform(const String transform){
1288         Matrix* a=NULL;
1289         String tf(transform);
1290         removeIntoS(&tf);
1291         std::vector<String> tokens=tokenize(tf," ");
1292         std::vector<String>::iterator aux=tokens.begin();
1293         while(aux!=tokens.end()){
1294                 if((*aux).compare(0,9,"translate")==0){
1295                         float dx,dy;
1296                         int start,end;
1297                         start   =(*aux).find_first_of("(")+1;
1298                         end             =(*aux).find_first_of(",");
1299                         dx              =atof((*aux).substr(start,end-start).data());
1300                         start   =(*aux).find_first_of(",")+1;
1301                         end             =(*aux).size()-1;
1302                         dy              =atof((*aux).substr(start,end-start).data());
1303                         if(matrixIsNull(a))
1304                                 a=newMatrix(1,0,0,1,dx,dy);
1305                         else
1306                                 multiplyMatrix(&a,newMatrix(1,0,0,1,dx,dy));
1307                 }else if((*aux).compare(0,5,"scale")==0){
1308                         if(matrixIsNull(a))
1309                                 a=newMatrix(1,0,0,1,0,0);
1310                 }else if((*aux).compare(0,6,"rotate")==0){
1311                         float angle,seno,coseno;
1312                         int start,end;
1313                         start   =(*aux).find_first_of("(")+1;
1314                         end             =(*aux).size()-1;
1315                         angle=getRadian (atof((*aux).substr(start,end-start).data()));
1316                         seno   =sin(angle);
1317                         coseno =cos(angle);
1318                         if(matrixIsNull(a))
1319                                 a=newMatrix(coseno,seno,-1*seno,coseno,0,0);
1320                         else
1321                                 multiplyMatrix(&a,newMatrix(coseno,seno,-1*seno,coseno,0,0));
1322                 }else if((*aux).compare(0,6,"matrix")==0){
1323                         int start       =(*aux).find_first_of('(')+1;
1324                         int end         =(*aux).find_first_of(')');
1325                         if(matrixIsNull(a))
1326                                 a=newMatrix((*aux).substr(start,end-start));
1327                         else
1328                                 multiplyMatrix(&a,newMatrix((*aux).substr(start,end-start)));
1329                 }else{
1330                         a=newMatrix(1,0,0,1,0,0);
1331                 }
1332                 aux++;
1333         }
1334         return a;
1335 }
1336
1337 void
1338 Svg_parser::build_translate(xmlpp::Element* root,float dx,float dy){
1339         root->set_attribute("type","translate");
1340         root->set_attribute("active","true");
1341         root->set_attribute("version","0.1");
1342         build_vector (root->add_child("param"),"origin",dx,dy);
1343 }
1344 void
1345 Svg_parser::build_rotate(xmlpp::Element* root,float dx,float dy,float angle){
1346         root->set_attribute("type","rotate");
1347         root->set_attribute("active","true");
1348         root->set_attribute("version","0.1");
1349         build_vector (root->add_child("param"),"origin",dx,dy);
1350         build_real   (root->add_child("param"),"amount",angle);
1351 }
1352 void
1353 Svg_parser::build_points(xmlpp::Element* root,std::list<Vertice*> p){
1354         root->set_attribute("name","vector_list");
1355         xmlpp::Element *child=root->add_child("dynamic_list");
1356         child->set_attribute("type","vector");
1357         std::list<Vertice*>::iterator aux = p.begin();
1358         while(aux!=p.end()){
1359                 xmlpp::Element *child_entry=child->add_child("entry");
1360                 xmlpp::Element *child_vector=child_entry->add_child("vector");
1361                 child_vector->add_child("x")->set_child_text(etl::strprintf("%f",(*aux)->x));
1362                 child_vector->add_child("y")->set_child_text(etl::strprintf("%f",(*aux)->y));
1363                 aux++;
1364         }
1365 }
1366 void
1367 Svg_parser::build_vertice(xmlpp::Element* root , Vertice *p){
1368         xmlpp::Element *child_comp=root->add_child("composite");
1369         child_comp->set_attribute("type","bline_point");
1370         build_vector (child_comp->add_child("param"),"point",p->x,p->y);
1371         build_param (child_comp->add_child("width"),"","real","1.0000000000");
1372         build_param (child_comp->add_child("origin"),"","real","0.5000000000");
1373         if(p->split) build_param (child_comp->add_child("split"),"","bool","true");
1374         else build_param (child_comp->add_child("split"),"","bool","false");
1375         //tangent 1
1376         xmlpp::Element *child_t1=child_comp->add_child("t1");
1377         xmlpp::Element *child_rc=child_t1->add_child("radial_composite");
1378         child_rc->set_attribute("type","vector");
1379         build_param (child_rc->add_child("radius"),"","real",p->radio1);
1380         build_param (child_rc->add_child("theta"),"","angle",p->angle1);
1381         //tangent 2
1382         xmlpp::Element *child_t2=child_comp->add_child("t2");
1383         xmlpp::Element *child_rc2=child_t2->add_child("radial_composite");
1384         child_rc2->set_attribute("type","vector");
1385         build_param (child_rc2->add_child("radius"),"","real",p->radio2);
1386         build_param (child_rc2->add_child("theta"),"","angle",p->angle2);
1387
1388 }
1389 void
1390 Svg_parser::build_bline(xmlpp::Element* root,std::list<Vertice*> p,bool loop,String blineguid){
1391         root->set_attribute("name","bline");
1392         xmlpp::Element *child=root->add_child("bline");
1393         child->set_attribute("type","bline_point");
1394         if(loop)
1395                 child->set_attribute("loop","true");
1396         else
1397                 child->set_attribute("loop","false");
1398         if(!blineguid.empty())  child->set_attribute("guid",blineguid);
1399         std::list<Vertice*>::iterator aux = p.begin();
1400         while(aux!=p.end()){
1401                 if(*aux) build_vertice (child->add_child("entry"),*aux);
1402                 aux++;
1403         }
1404 }
1405
1406 void
1407 Svg_parser::build_param(xmlpp::Element* root,String name,String type,String value){
1408         if(!type.empty() && !value.empty()){
1409                 if(!name.empty())       root->set_attribute("name",name);
1410                 xmlpp::Element *child=root->add_child(type);
1411                 child->set_attribute("value",value);
1412         }else{
1413                 root->get_parent()->remove_child(root);
1414         }
1415 }
1416 void
1417 Svg_parser::build_param(xmlpp::Element* root,String name,String type,float value){
1418         if(!type.empty()){
1419                 if(!name.empty()) root->set_attribute("name",name);
1420                 xmlpp::Element *child=root->add_child(type);
1421                 child->set_attribute("value",etl::strprintf ("%f",value));
1422         }else{
1423                 root->get_parent()->remove_child(root);
1424         }
1425 }
1426 void
1427 Svg_parser::build_param(xmlpp::Element* root,String name,String type,int value){
1428         if(!type.empty()){
1429                         if(!name.empty()) root->set_attribute("name",name);
1430                         xmlpp::Element *child=root->add_child(type);
1431                         char *enteroc=new char[10];
1432                         sprintf(enteroc,"%d",value);
1433                         child->set_attribute("value",enteroc);
1434                         delete [] enteroc;
1435         }else{
1436                 root->get_parent()->remove_child(root);
1437         }
1438 }
1439
1440 void
1441 Svg_parser::build_integer(xmlpp::Element* root,String name,int value){
1442         if(name.compare("")!=0) root->set_attribute("name",name);
1443         xmlpp::Element *child=root->add_child("integer");
1444         char *enteroc=new char[10];
1445         sprintf(enteroc,"%d",value);
1446         child->set_attribute("value",enteroc);
1447 }
1448 void
1449 Svg_parser::build_real(xmlpp::Element* root,String name,float value){
1450         if(name.compare("")!=0) root->set_attribute("name",name);
1451         xmlpp::Element *child=root->add_child("real");
1452         char *realc=new char[20];
1453         sprintf(realc,"%f",value);
1454         child->set_attribute("value",realc);
1455 }
1456
1457 void
1458 Svg_parser::build_color(xmlpp::Element* root,float r,float g,float b,float a){
1459         if(r>255 || g>255 || b>255 || a>1 || r<0 || g<0 || b<0 || a<0){
1460                 root->get_parent()->remove_child(root);
1461                 printf("Color aborted\n");
1462                 return;
1463         }
1464         Color ret=adjustGamma(r/255,g/255,b/255,a);
1465
1466         root->set_attribute("name","color");
1467         xmlpp::Element *child=root->add_child("color");
1468         child->add_child("r")->set_child_text(etl::strprintf("%f",ret.get_r()));
1469         child->add_child("g")->set_child_text(etl::strprintf("%f",ret.get_g()));
1470         child->add_child("b")->set_child_text(etl::strprintf("%f",ret.get_b()));
1471         child->add_child("a")->set_child_text(etl::strprintf("%f",ret.get_a()));
1472 }
1473 void
1474 Svg_parser::build_vector(xmlpp::Element* root,String name,float x,float y){
1475
1476         if(name.compare("")!=0) root->set_attribute("name",name);
1477         xmlpp::Element *child=root->add_child("vector");
1478         child->add_child("x")->set_child_text(etl::strprintf("%f",x));
1479         child->add_child("y")->set_child_text(etl::strprintf("%f",y));
1480
1481 }
1482 void
1483 Svg_parser::build_vector (xmlpp::Element* root,String name,float x,float y,String guid){
1484         if(name.compare("")!=0) root->set_attribute("name",name);
1485         xmlpp::Element *child=root->add_child("vector");
1486         if(!guid.empty()) child->set_attribute("guid",guid);
1487         child->add_child("x")->set_child_text(etl::strprintf("%f",x));
1488         child->add_child("y")->set_child_text(etl::strprintf("%f",y));
1489 }
1490
1491 xmlpp::Element*
1492 Svg_parser::nodeStartBasicLayer(xmlpp::Element* root){
1493         root->set_attribute("type","PasteCanvas");
1494         root->set_attribute("active","true");
1495         root->set_attribute("version","0.1");
1496         root->set_attribute("desc","Composite");
1497         build_param (root->add_child("param"),"z_depth","real","0");
1498         build_param (root->add_child("param"),"amount","real","1");
1499         build_param (root->add_child("param"),"blend_method","integer","0");
1500         build_vector (root->add_child("param"),"origin",0,0);
1501         xmlpp::Element *child=root->add_child("param");
1502         child->set_attribute("name","canvas");
1503         return child->add_child("canvas");
1504 }
1505
1506 //extra methods
1507 void
1508 Svg_parser::coor2vect(float *x,float *y){
1509         float sx, sy;
1510         sx=*x;
1511         sy=*y;
1512         sy= atof(height.c_str())-sy;
1513         sx= sx - ox;
1514         sy= sy - oy;
1515         sx= sx / kux;
1516         sy= sy / kux;
1517         *x=sx; *y=sy;
1518 }
1519
1520 void
1521 Svg_parser::setTg1(Vertice *p,float p1x,float p1y,float p2x,float p2y){
1522         float rd=0,ag=0;
1523         float d1x,d1y,d2x,d2y,dx,dy;
1524         d1x=p1x*60;
1525         d1y=p1y*60;
1526         d2x=p2x*60;
1527         d2y=p2y*60;
1528         dx=d2x-d1x;
1529         dy=d2y-d1y;
1530         dx=dx*3;
1531         dy=dy*3;
1532         dx=dx/60;
1533         dy=dy/60;
1534         rd=sqrt(dx*dx + dy*dy);
1535         if(dx>0 && dy>0){
1536                 ag=PI + atan(dy/dx);
1537         }else if(dx>0 && dy<0){
1538                 ag=PI + atan(dy/dx);
1539         }else if(dx<0 && dy<0){
1540                 ag=atan(dy/dx);
1541         }else if(dx<0 && dy>0){
1542                 ag= 2*PI+atan(dy/dx);
1543         }else if(dx==0 && dy>0){
1544                 ag=-1*PI/2;
1545         }else if(dx==0 && dy<0){
1546                 ag=PI/2;
1547         }else if(dx==0 && dy==0){
1548                 ag=0;
1549         }else if(dx<0 && dy==0){
1550                 ag=0;
1551         }else if(dx>0 && dy==0){
1552                 ag=PI;
1553         }
1554         ag= (ag*180)/PI;
1555         p->radio1=rd;
1556         p->angle1=ag;
1557 }
1558 void
1559 Svg_parser::setTg2(Vertice* p,float p1x,float p1y,float p2x,float p2y){
1560         float rd=0,ag=0;
1561         float d1x,d1y,d2x,d2y,dx,dy;
1562         d1x=p1x*60;
1563         d1y=p1y*60;
1564         d2x=p2x*60;
1565         d2y=p2y*60;
1566         dx=d2x-d1x;
1567         dy=d2y-d1y;
1568         dx=dx*3;
1569         dy=dy*3;
1570         dx=dx/60;
1571         dy=dy/60;
1572
1573         rd=sqrt(dx*dx + dy*dy);
1574         if(dx>0 && dy>0){
1575                 ag=PI + atan(dy/dx);
1576         //      printf("case 180-270\n");
1577         }else if(dx>0 && dy<0){
1578                 ag=PI + atan(dy/dx);
1579         //      printf("case 90-180\n");
1580         }else if(dx<0 && dy<0){
1581                 ag=atan(dy/dx);
1582         //      printf("case 0-90\n");
1583         }else if(dx<0 && dy>0){
1584                 ag= 2*PI+atan(dy/dx);
1585         //      printf("case 270-360\n");
1586         }else if(dx==0 && dy>0){
1587                 ag=-1*PI/2;
1588         }else if(dx==0 && dy<0){
1589                 ag=PI/2;
1590         }else if(dx==0 && dy==0){
1591                 ag=0;
1592         }else if(dx<0 && dy==0){
1593                 ag=0;
1594         }else if(dx>0 && dy==0){
1595                 ag=PI;
1596         }
1597         ag= (ag*180)/PI;
1598         ag=ag-180;
1599         p->radio2=rd;
1600         p->angle2=ag;
1601 }
1602
1603 void
1604 Svg_parser::setSplit(Vertice* p,bool val){
1605         if(p!=NULL){
1606                 p->split=val;
1607         }
1608 }
1609 int
1610 Svg_parser::isFirst(Vertice* nodo,float a, float b){
1611         if(nodo->x==a && nodo->y==b)
1612                 return 1;
1613         return 0;
1614 }
1615
1616 Vertice*
1617 Svg_parser::newVertice(float x,float y){
1618         Vertice* vert;
1619         vert=(Vertice*)malloc(sizeof(Vertice));
1620         vert->x=x;
1621         vert->y=y;
1622         vert->radio1=vert->radio2=vert->angle1=vert->angle2=0;
1623         return vert;
1624 }
1625
1626 int
1627 Svg_parser::extractSubAttribute(const String attribute, String name,String* value){
1628         int encounter=0;
1629         if(!attribute.empty()){
1630                 String str(attribute);
1631                 removeS(&str);
1632                 std::vector<String> tokens=tokenize(str,";");
1633                 std::vector<String>::iterator aux=tokens.begin();
1634                 while(aux!=tokens.end()){
1635                         int mid= (*aux).find_first_of(":");
1636                         if((*aux).substr(0,mid).compare(name)==0){
1637                                 int end=(*aux).size();
1638                                 *value=(*aux).substr(mid+1,end-mid);
1639                                 return 1;
1640                         }
1641                         aux++;
1642                 }
1643         }
1644         return encounter;
1645 }
1646 String
1647 Svg_parser::loadAttribute(String name,const String path_style,const String master_style,const String defaultVal){
1648         String value;
1649         int fnd=0;
1650         if(!path_style.empty())
1651                 fnd=extractSubAttribute(path_style,name,&value);
1652         if(fnd==0){
1653                 if(!master_style.empty())
1654                         fnd=extractSubAttribute(master_style,name,&value);
1655                 if(fnd==0)
1656                         value=defaultVal;
1657         }
1658         return value;
1659 }
1660 String
1661 Svg_parser::loadAttribute(String name,const String path_style,const String master_style,const String subattribute,const String defaultVal){
1662         String value;
1663         int fnd=0;
1664         if(!path_style.empty())
1665                 fnd=extractSubAttribute(path_style,name,&value);
1666         if(fnd==0 && !master_style.empty())
1667                         fnd=extractSubAttribute(master_style,name,&value);
1668         if(fnd==0){
1669                 if(!subattribute.empty())
1670                         value=subattribute;
1671                 else
1672                         value=defaultVal;
1673         }
1674         return value;
1675 }
1676
1677 int
1678 Svg_parser::randomLetter(){
1679         int a=rand()%2;
1680         if(a) return (49 + rand()%9);
1681         else return  (65 + rand()%24);
1682 }
1683
1684 int
1685 Svg_parser::getRed(String hex){
1686         if(hex.at(0)=='#'){
1687                 return hextodec(hex.substr(1,2));
1688         }else if(hex.compare(0,3,"rgb")==0 || hex.compare(0,3,"RGB")==0){
1689                 int start=hex.find_first_of("(")+1;
1690                 int end =hex.find_last_of(")");
1691                 String aux=tokenize(hex.substr(start,end-start),",").at(0);
1692                 return atoi(aux.data());
1693         }
1694         return 0;
1695 }
1696 int
1697 Svg_parser::getGreen(String hex){
1698         if(hex.at(0)=='#'){
1699                 return hextodec(hex.substr(3,2));
1700         }else if(hex.compare(0,3,"rgb")==0 || hex.compare(0,3,"RGB")==0){
1701                 int start=hex.find_first_of("(")+1;
1702                 int end =hex.find_last_of(")");
1703                 String aux=tokenize(hex.substr(start,end-start),",").at(1);
1704                 return atoi(aux.data());
1705         }
1706         return 0;
1707 }
1708 int
1709 Svg_parser::getBlue(String hex){
1710         if(hex.at(0)=='#'){
1711                 return hextodec(hex.substr(5,2));
1712         }else if(hex.compare(0,3,"rgb")==0 || hex.compare(0,3,"RGB")==0){
1713                 int start=hex.find_first_of("(")+1;
1714                 int end =hex.find_last_of(")");
1715                 String aux=tokenize(hex.substr(start,end-start),",").at(2);
1716                 return atoi(aux.data());
1717         }
1718         return 0;
1719 }
1720 int
1721 Svg_parser::hextodec(String hex){
1722         int result=0;
1723         if(!hex.empty()){
1724                 int top=hex.size();
1725                 int ihex[top];
1726                 int i=0;
1727                 while(i<top){
1728                         if(hex.at(i)=='0')
1729                                 ihex[i]=0;
1730                         else if(hex.at(i)=='1')
1731                                 ihex[i]=1;
1732                         else if(hex.at(i)=='2')
1733                                 ihex[i]=2;
1734                         else if(hex.at(i)=='3')
1735                                 ihex[i]=3;
1736                         else if(hex.at(i)=='4')
1737                                 ihex[i]=4;
1738                         else if(hex.at(i)=='5')
1739                                 ihex[i]=5;
1740                         else if(hex.at(i)=='6')
1741                                 ihex[i]=6;
1742                         else if(hex.at(i)=='7')
1743                                 ihex[i]=7;
1744                         else if(hex.at(i)=='8')
1745                                 ihex[i]=8;
1746                         else if(hex.at(i)=='9')
1747                                 ihex[i]=9;
1748                         else if(hex.at(i)=='a')
1749                                 ihex[i]=10;
1750                         else if(hex.at(i)=='b')
1751                                 ihex[i]=11;
1752                         else if(hex.at(i)=='c')
1753                                 ihex[i]=12;
1754                         else if(hex.at(i)=='d')
1755                                 ihex[i]=13;
1756                         else if(hex.at(i)=='e')
1757                                 ihex[i]=14;
1758                         else if(hex.at(i)=='f')
1759                                 ihex[i]=15;
1760                         else
1761                                 return 0;
1762                         i++;
1763                 }
1764                 i=0;
1765                 while(i<top){
1766                         result+=pow(16,i)*ihex[top-i-1];
1767                         i++;
1768                 }
1769         }
1770         return result;
1771 }
1772
1773 float
1774 Svg_parser::getDimension(const String ac){
1775         if(ac.empty()){
1776                 return 0;
1777         }
1778         int length=ac.size();
1779         float af=0;
1780         if(isdigit(ac.at(length-1))){
1781                 af=atof(ac.data());
1782         }else if(ac.at(length-1)=='%'){
1783                         return 1024;
1784         }else{
1785                 String mtc=ac.substr(length-2,length);
1786                 String nmc=ac.substr(0,length-2);
1787                 if(mtc.compare("px")==0){
1788                         af=atof(nmc.data());
1789                 }else if(mtc.compare("pt")==0){
1790                         af=atof(nmc.data())*1.25;
1791                 }else if(mtc.compare("em")==0){
1792                         af=atof(nmc.data())*16;
1793                 }else if(mtc.compare("mm")==0){
1794                         af=atof(nmc.data())*3.54;
1795                 }else if(mtc.compare("pc")==0){
1796                         af=atof(nmc.data())*15;
1797                 }else if(mtc.compare("cm")==0){
1798                         af=atof(nmc.data())*35.43;
1799                 }else if(mtc.compare("in")==0){
1800                         af=atof(nmc.data())*90;
1801                 }else{
1802                         return 1024;
1803                 }
1804         }
1805         return af;
1806 }
1807 //matrix operations
1808 Matrix*
1809 Svg_parser::newMatrix(Matrix *a){
1810         Matrix* data;
1811         data=(Matrix*)malloc(sizeof(Matrix));
1812         data->a=a->a;           data->b=a->b;           data->c=a->c;
1813         data->d=a->d;           data->e=a->e;           data->f=a->f;
1814         return data;
1815 }
1816 Matrix*
1817 Svg_parser::newMatrix(float a,float b,float c,float d,float e,float f){
1818         Matrix* data;
1819         data=(Matrix*)malloc(sizeof(Matrix));
1820         data->a=a;              data->b=b;              data->c=c;
1821         data->d=d;              data->e=e;              data->f=f;
1822         return data;
1823 }
1824 Matrix*
1825 Svg_parser::newMatrix(const String mvector){
1826         if(!mvector.empty()){
1827                 Matrix* data=(Matrix*)malloc(sizeof(Matrix));
1828                 std::vector<String> tokens=tokenize(mvector,",");
1829                 if(tokens.size()!=6) return newMatrix(1,0,0,1,0,0);
1830                 data->a=atof(tokens.at(0).data());
1831                 data->b=atof(tokens.at(1).data());
1832                 data->c=atof(tokens.at(2).data());
1833                 data->d=atof(tokens.at(3).data());
1834                 data->e=atof(tokens.at(4).data());
1835                 data->f=atof(tokens.at(5).data());
1836                 return data;
1837         }else{
1838                 return newMatrix(1,0,0,1,0,0);
1839         }
1840 }
1841 void
1842 Svg_parser::transformPoint2D(Matrix *mtx,float *a,float *b){
1843         float auxa,auxb;
1844         auxa=0;
1845         auxb=0;
1846         auxa= (*a)*(mtx->a) + (*b)*(mtx->c) + (mtx->e);
1847         auxb= (*a)*(mtx->b) + (*b)*(mtx->d) + (mtx->f);
1848         *a=auxa;
1849         *b=auxb;
1850         return;
1851 }
1852 void
1853 Svg_parser::composeMatrix(Matrix **mtx,Matrix* mtx1,Matrix* mtx2){
1854         Matrix* aux=newMatrix(0,0,0,0,0,0);
1855         aux->a=(mtx1->a)*(mtx2->a)+(mtx1->c)*(mtx2->b);
1856         aux->b=(mtx1->b)*(mtx2->a)+(mtx1->d)*(mtx2->b);
1857         aux->c=(mtx1->a)*(mtx2->c)+(mtx1->c)*(mtx2->d);
1858         aux->d=(mtx1->b)*(mtx2->c)+(mtx1->d)*(mtx2->d);
1859         aux->e=(mtx1->a)*(mtx2->e)+(mtx1->c)*(mtx2->f)+(mtx1->e);
1860         aux->f=(mtx1->b)*(mtx2->e)+(mtx1->d)*(mtx2->f)+(mtx1->f);
1861         *mtx=aux;
1862 }
1863 void
1864 Svg_parser::multiplyMatrix(Matrix **mtx1,Matrix *mtx2){
1865         Matrix* aux=newMatrix(0,0,0,0,0,0);
1866         aux->a=((*mtx1)->a)*(mtx2->a)+((*mtx1)->c)*(mtx2->b);
1867         aux->b=((*mtx1)->b)*(mtx2->a)+((*mtx1)->d)*(mtx2->b);
1868         aux->c=((*mtx1)->a)*(mtx2->c)+((*mtx1)->c)*(mtx2->d);
1869         aux->d=((*mtx1)->b)*(mtx2->c)+((*mtx1)->d)*(mtx2->d);
1870         aux->e=((*mtx1)->a)*(mtx2->e)+((*mtx1)->c)*(mtx2->f)+((*mtx1)->e);
1871         aux->f=((*mtx1)->b)*(mtx2->e)+((*mtx1)->d)*(mtx2->f)+((*mtx1)->f);
1872         (*mtx1)->a=aux->a;
1873         (*mtx1)->b=aux->b;
1874         (*mtx1)->c=aux->c;
1875         (*mtx1)->d=aux->d;
1876         (*mtx1)->e=aux->e;
1877         (*mtx1)->f=aux->f;
1878 }
1879 bool
1880 Svg_parser::matrixIsNull(Matrix *mtx){
1881         if(mtx == NULL) return true;
1882         return false;
1883 }
1884
1885 float
1886 Svg_parser::getRadian(float sexa){
1887         return (sexa*2*PI)/360;
1888 }
1889 void
1890 Svg_parser::removeS(String *input){
1891         for(unsigned int i=0;i<input->size();i++){
1892                 if(input->at(i)==' '){
1893                         input->erase(i,1);
1894                 }
1895         }
1896 }
1897 void
1898 Svg_parser::removeIntoS(String *input){
1899         bool into=false;
1900         for(unsigned int i=0;i<input->size();i++){
1901                 if(input->at(i)=='('){
1902                         into=true;
1903                 }else if(input->at(i)==')'){
1904                         into=false;
1905                 }else if(into && input->at(i)==' '){
1906                         input->erase(i,1);
1907                 }
1908         }
1909 }
1910 std::vector<String>
1911 Svg_parser::tokenize(const String& str,const String& delimiters){
1912         std::vector<String> tokens;
1913         String::size_type lastPos = str.find_first_not_of(delimiters, 0);
1914         String::size_type pos = str.find_first_of(delimiters, lastPos);
1915         while (String::npos != pos || String::npos != lastPos){
1916                 tokens.push_back(str.substr(lastPos, pos - lastPos));
1917                 lastPos = str.find_first_not_of(delimiters, pos);
1918                 pos = str.find_first_of(delimiters, lastPos);
1919         }
1920         return tokens;
1921 }
1922 String
1923 Svg_parser::new_guid(){
1924         uid++;
1925         return GUID::hasher(uid).get_string();
1926 }
1927