#include <iostream>
#include <vector>
#include <string>
#include <cstdlib>

#include <librsvg/rsvg.h>
#include <librsvg/rsvg-cairo.h>

#include <sys/stat.h>

using namespace std;



int main(int argc,char * argv[])
{
	bool parsed_cmd = false;
	string cmd;
	string input_file;
	string output_file;
	bool use_input=false;
	bool use_output=false;
	
	string sub_name;
	bool use_sub=false;
	
	int width;
	int height;
	
	bool use_size=false;
	
	RsvgHandle * svg;
	cairo_surface_t * surface;
	cairo_t * cairo;
	
	double sx=1.0;
	double sy=1.0;
	
	for(int n=0;n<argc;n++)
	{
		string tmp = argv[n];
		
		if(!parsed_cmd)
		{
		
			if(tmp=="-i")
			{
				parsed_cmd=true;
				cmd="i";
			}
			
			if(tmp=="-o")
			{
				parsed_cmd=true;
				cmd="o";
			}
			
			if(tmp=="-sub")
			{
				parsed_cmd=true;
				cmd="sub";
			}
			
			if(tmp=="-size")
			{	
				parsed_cmd=true;
				cmd="size";
			}
		}
		else
		{
			if(cmd=="i")
			{
				cout<<"Using "<<tmp<<" as input file"<<endl;
				input_file=tmp;
				use_input=true;
				parsed_cmd=false;
			}
			
			if(cmd=="o")
			{
				output_file=tmp;
				use_output=true;
				parsed_cmd=false;
			}
			
			if(cmd=="sub")
			{
				use_sub=true;
				sub_name=tmp;
				parsed_cmd=false;
			}
			
			if(cmd=="size2")
			{
				height=atoi(tmp.c_str());
				parsed_cmd=false;
				use_size=true;
			}
			
			if(cmd=="size")
			{
				width = atoi(tmp.c_str());
				cmd="size2";
			}
			
		}
		
	}
	
	
	
	if(use_input && use_output)
	{
		cout<<"Input:"<<input_file<<endl;
		cout<<"output:"<<output_file<<endl;
		
		if(use_sub)
		{
			cout<<"sub:"<<sub_name<<endl;
		}
		
		if(use_size)
		{
			cout<<"size:"<<width<<"x"<<height<<endl;
		}
				
		struct stat st;
		if(stat(input_file.c_str(),&st)!=0)
		{
			cerr<<"Cannot access to "<<input_file<<endl;
			return 1;
		}
		
		g_type_init();
		svg = rsvg_handle_new_from_file(input_file.c_str(),NULL);
		
		
		RsvgDimensionData size;
		RsvgPositionData pos;
		
		if(use_sub)
		{
			rsvg_handle_get_dimensions_sub(svg,&size,sub_name.c_str());
			rsvg_handle_get_position_sub(svg,&pos,sub_name.c_str());
		}
		else
			rsvg_handle_get_dimensions(svg,&size);
		
		cout<<"svg dimensions:"<<size.width<<","<<size.height<<endl;
		cout<<"em:"<<size.em<<","<<size.ex<<endl;
		
		if(!use_size)
		{
			width=size.width;
			height=size.height;
		}
		
		
		surface = cairo_image_surface_create(CAIRO_FORMAT_ARGB32,width,height);
		cairo_t * cairo = cairo_create(surface);
		
		
		
		if(use_size)
		{
			sx = width/(double)size.width;
			sy = height/(double)size.height;
			cout<<"scale factor:"<<sx<<","<<sy<<endl;
			cairo_scale(cairo,sx,sy);
		}
		
		
		if(use_sub)
		{
			
			//cairo_translate(cairo,-pos.x,-pos.y);
			
			cout<<"sub position:"<<pos.x<<","<<pos.y<<endl;
			double ux,uy;
			ux = pos.x;
			uy = pos.y;
			
			cairo_device_to_user(cairo,&ux,&uy);
			cout<<"transform: "<<ux<<","<<uy<<endl;
			
			cairo_translate(cairo,-ux-1,-uy-1);
			
			rsvg_handle_render_cairo_sub(svg,cairo,sub_name.c_str());
		}
		else
			rsvg_handle_render_cairo(svg,cairo);
		
		cairo_surface_write_to_png(surface,output_file.c_str());
		
	}
	else
	{
		cout<<"svg-render usage:"<<endl;
	}
	
	return 0;
}