//SVG Path Reader
//by Michael Chang, UCLA
//http://users.design.ucla.edu/~mflux
//May 22, 2005
class SVGImage
{
  vec verts[];  
  vec center;
  SVGImage()
  {        
  }  
  void findCenter()
  {
    vec avg=new vec();
    int index=0;
    for(int i=2;i<verts.length;i++)
    {
      avg.add(verts[i]);
      index++;
    }
    avg.div(index);
    center=new vec(avg);
  }  
}

void image(SVGImage img,float x,float y)
{
  image(img,new vec(x,y));  
}
void image(SVGImage img,vec p,int c)
{
  bezierDetail(c);     
  image(img,p);
  bezierDetail(20);
}
void image(SVGImage img,vec p)
{  
  pushMatrix();
  translate(p.x-img.center.x,p.y-img.center.y);
  vec vert[]=img.verts;
//  translate(vert[0].x,vert[1].y);
  beginShape();
  vertex(vert[1]);
  for(int i=2;i<vert.length-2;i+=3)
  {
    bezierVertex(vert[i],vert[i+1],vert[i+2]);
  }
  endShape();
  popMatrix();
}
void vertex(vec v)
{
  vertex(v.x,v.y);
}
void bezierVertex(vec v1,vec v2,vec v3)
{
  bezierVertex(v1.x,v1.y,v2.x,v2.y,v3.x,v3.y);
}

SVGImage loadSVG(String filename)
{
  vec verts[]=new vec[0];
  SVGImage img=new SVGImage();
  int index=0;
  String file[];

//Read stuff from file to program 
    file=loadStrings(filename);  
    
    String instr="";
    for(int i=0;i<file.length;i++)
    {  
      String linetext[]=split(file[i]);    
      if(linetext.length>0&&linetext[0].equals("<path"))
      {
        instr=file[i];
        for(int f=i+1;f<file.length;f++)
        {
          String temp=trim(file[f]);        
          if(temp.charAt(0)=='<')
            break;
          else
          {
            instr=instr+temp;  
          }
        }
      }    
    }
    instr=trim(instr);
    String disect[]=split(instr);    
    String fillData=disect[1];
    String strokeData=disect[2];
    String curveData=disect[3];
    String curveTemp[]=split(curveData,"\"");
    curveData=curveTemp[1];
    char curveInfo[]=curveData.toCharArray();
    for(int i=0;i<curveData.length();i++)
    {
      curveInfo[i]=curveData.charAt(i);
    }  
//Parse data into useful information    
    char data[]=curveInfo;
    for(int i=0;i<data.length;i++)
    {
      char c=data[i];
      String numS="";
      switch(c)
      {    
        case 'M':
        case 'm':
          data=splice(data,' ',i+1);
        break;
        case 'C':
        case 'c':      
          data=splice(data,' ',i);       
          data=splice(data,' ',i+2);
          i=i+2;       
        break;      
        case 'S':
        case 's':
          data=splice(data,' ',i);       
          data=splice(data,' ',i+2);
          i=i+2;              
        break;    
        case 'L':
        case 'l':      
          data=splice(data,' ',i);       
          data=splice(data,' ',i+2);
          i=i+2;       
        break;              
        case 'z':
        case 'Z':
          data=splice(data,' ',i);       
          i=i+1;
        break;            
        case ',':
          data[i]=' ';
          data=splice(data,' ',i);       
          data=splice(data,' ',i+2);
          i=i+2;           
        break;
        case '-':
          data=splice(data,' ',i); 
          i=i+1;     
        break;
      }
    }
//Convert information into raw vertices 

    String dd[]=split(new String(data));
    if(dd[0].charAt(0)=='M')
      verts=append(verts,new vec(Float.parseFloat(dd[1]),Float.parseFloat(dd[2])));
    //  translate(Float.parseFloat(data[1]),Float.parseFloat(dd[2]));    
    vec lastCP=null;
    vec lastAP=new vec();
    vec reflectedCP=new vec();
    vec firstCP=null;
    vec firstAP=null;
    for(int i=0;i<dd.length;i++)
    {
      char init=dd[i].charAt(0);
      switch(init)
      {
        case 'M':
          lastCP=new vec(Float.parseFloat(dd[i+1]),Float.parseFloat(dd[i+2]));    
          verts=append(verts,new vec(0,0));
          i+=2;      
        break;      
        case 'm':
          i+=2;      
        break;
        case 'L':
        break;
        case 'l':
        {
          vec pv=new vec(Float.parseFloat(dd[i+1])+lastCP.x,Float.parseFloat(dd[i+2])+lastCP.y);
          verts=append(verts,pv);
//        vertex(pv.x,pv.y);
          lastCP.add(pv);
          i+=2;
        }
        break;
        case 'C':
        {
          vec cp1=new vec(reflectedCP.x+lastAP.x,reflectedCP.y+lastAP.y);
          vec cp2=new vec(-Float.parseFloat(dd[i+3]),Float.parseFloat(dd[i+4]));
          vec ap=new vec(Float.parseFloat(dd[i+5]),Float.parseFloat(dd[i+6])); 
          ap=new vec();       
          verts=append(verts,cp1);
          verts=append(verts,cp2);          
          verts=append(verts,ap);                    
          lastCP=new vec(cp2);
          lastAP=new vec(ap);
          reflectedCP=new vec(lastAP.x-lastCP.x,lastAP.y-lastCP.y);
          i+=6; 
        }          
        break;
        case 'c':
        {
          vec cp1=new vec(Float.parseFloat(dd[i+1])+lastAP.x,Float.parseFloat(dd[i+2])+lastAP.y);
          vec cp2=new vec(Float.parseFloat(dd[i+3])+lastAP.x,Float.parseFloat(dd[i+4])+lastAP.y);
          vec ap=new vec(Float.parseFloat(dd[i+5])+lastAP.x,Float.parseFloat(dd[i+6])+lastAP.y);      
          if(firstAP==null)
          {
            firstAP=new vec(ap);
          }
          if(firstCP==null)
          {
            firstCP=new vec(cp1);
          }     
          verts=append(verts,cp1);
          verts=append(verts,cp2);          
          verts=append(verts,ap);          
//        bezierVertex(cp1.x,cp1.y,cp2.x,cp2.y,ap.x,ap.y);               
          lastCP=new vec(cp2);
          lastAP=new vec(ap);
          reflectedCP=new vec(lastAP.x-lastCP.x,lastAP.y-lastCP.y);
          i+=6;        
        }
        break;         
        case 'S':
        {
          if(dd[i+5].charAt(0)=='z')
          {
            vec cp1=new vec(reflectedCP.x+lastAP.x,reflectedCP.y+lastAP.y);
            vec cp2=new vec(Float.parseFloat(dd[i+1])-Float.parseFloat(dd[i+3]),Float.parseFloat(dd[i+2])-Float.parseFloat(dd[i+4]));
            vec ap=new vec(0,0);   
            verts=append(verts,cp1);
            verts=append(verts,cp2);          
            verts=append(verts,ap);              
//          bezierVertex(cp1.x,cp1.y,cp2.x,cp2.y,ap.x,ap.y);        
            break;      
          }         
          vec cp1=new vec(reflectedCP);
          vec cp2=new vec(Float.parseFloat(dd[i+1]),Float.parseFloat(dd[i+2]));
          vec ap=new vec(Float.parseFloat(dd[i+3]),Float.parseFloat(dd[i+4]));
          verts=append(verts,reflectedCP);
          verts=append(verts,cp2);
          verts=append(verts,ap);
  //        bezierVertex(reflectedCP.x,reflectedCP.y,cp2.x,cp2.y,ap.x,ap.y);        
          lastCP=new vec(cp2);
          lastAP=new vec(ap);
          reflectedCP=new vec(lastAP.x-lastCP.x,lastAP.y-lastCP.y);   
          i+=4;      
        }      
        break;
        case 's':
        {
          reflectedCP.add(lastAP);
          vec cp1=new vec(reflectedCP);
          vec cp2=new vec(Float.parseFloat(dd[i+1])+lastAP.x,Float.parseFloat(dd[i+2])+lastAP.y);
          vec ap=new vec(Float.parseFloat(dd[i+3])+lastAP.x,Float.parseFloat(dd[i+4])+lastAP.y);
          verts=append(verts,reflectedCP);
          verts=append(verts,cp2);
          verts=append(verts,ap);  
//        bezierVertex(reflectedCP.x,reflectedCP.y,cp2.x,cp2.y,ap.x,ap.y);        
          lastCP=new vec(cp2);
          lastAP=new vec(ap);
          reflectedCP=new vec(lastAP.x-lastCP.x,lastAP.y-lastCP.y);        
          i+=4;
        }
        break;
        default:
        break;                         
      }
    }
  img.verts=verts;
  img.findCenter();
  return img;
}