#include <graph_displayer_canvas.h>
#include <broken_edge.h>
#include <math.h>


int GraphDisplayerCanvas::changeNodeRadius (std::string mapname, Graph::Node node)
{
  Graph::NodeMap<double> * actual_map;
  if(mapname=="Default")
    {
      actual_map=new Graph::NodeMap<double>(g,node_property_defaults[N_RADIUS]);
    }
  else
    {
      actual_map=(mapstorage.nodemap_storage)[mapname];
    }

  if(node==INVALID)
    {
      for (NodeIt i(g); i!=INVALID; ++i)
	{
	  int w=(int)(*actual_map)[i];
	  if(w>=0)
	    {
	      double x1, y1, x2, y2;
	      x1=nodesmap[i]->property_x1().get_value();
	      x2=nodesmap[i]->property_x2().get_value();
	      y1=nodesmap[i]->property_y1().get_value();
	      y2=nodesmap[i]->property_y2().get_value();
	      nodesmap[i]->property_x1().set_value((x1+x2)/2-w);
	      nodesmap[i]->property_x2().set_value((x1+x2)/2+w);
	      nodesmap[i]->property_y1().set_value((y1+y2)/2-w);
	      nodesmap[i]->property_y2().set_value((y1+y2)/2+w);
	    }
	}
    }
  else
    {
      //I think only new nodes use this case
//       int w=(int)(*actual_map)[node];
      int w=(int)(node_property_defaults[N_RADIUS]);
      if(w>=0)
	{
	  double x1, y1, x2, y2;
	  x1=nodesmap[node]->property_x1().get_value();
	  x2=nodesmap[node]->property_x2().get_value();
	  y1=nodesmap[node]->property_y1().get_value();
	  y2=nodesmap[node]->property_y2().get_value();
	  nodesmap[node]->property_x1().set_value((x1+x2)/2-w);
	  nodesmap[node]->property_x2().set_value((x1+x2)/2+w);
	  nodesmap[node]->property_y1().set_value((y1+y2)/2-w);
	  nodesmap[node]->property_y2().set_value((y1+y2)/2+w);
	}
    }
  return 0;
};

int GraphDisplayerCanvas::changeNodeColor (std::string mapname, Graph::Node node)
{  

  //function maps the range of the maximum and
  //the minimum of the nodemap to the range of
  //green in RGB

  Graph::NodeMap<double> * actual_map;
  if(mapname=="Default")
    {
      actual_map=new Graph::NodeMap<double>(g,node_property_defaults[N_COLOR]);
    }
  else
    {
      actual_map=(mapstorage.nodemap_storage)[mapname];
    }

  double max, min;

  if(mapname!="Default")
    {
      max=mapstorage.maxOfNodeMap(mapname);
      min=mapstorage.minOfNodeMap(mapname);
    }
  else
    {
      max=node_property_defaults[N_COLOR];
      min=node_property_defaults[N_COLOR];
    }


  if(node==INVALID)
    {

      for (NodeIt i(g); i!=INVALID; ++i)
	{
	  Gdk::Color color;

	  double w=(*actual_map)[i];

	  if(max!=min)
	    {
	      color.set_rgb_p (0, 0, 100*(w-min)/(max-min));
	    }
	  else
	    {
	      color.set_rgb_p (0, 0, 100);
	    }

	  nodesmap[i]->property_fill_color_gdk().set_value(color);
	}
    }
  else
    {
      Gdk::Color color;

      double w=(*actual_map)[node];

      if(max!=min)
	{
	  color.set_rgb_p (0, 0, 100*(w-min)/(max-min));
	}
      else
	{
	  color.set_rgb_p (0, 0, 100);
	}

      nodesmap[node]->property_fill_color_gdk().set_value(color);
    }
  return 0;
};

int GraphDisplayerCanvas::changeNodeText (std::string mapname, Graph::Node node)
{

  //the number in the map will be written on the node
  //EXCEPT when the name of the map is Text, because
  //in that case empty string will be written, because
  //that is the deleter map

  Graph::NodeMap<double> * actual_map=NULL;
  if(mapname!="Default")
    {
      actual_map=(mapstorage.nodemap_storage)[mapname];
    }

  if(node==INVALID)
    {
      for (NodeIt i(g); i!=INVALID; ++i)
	{
	  if(mapname!="Default")
	    {
	      nodemap_to_edit=mapname;
	      double number=(*actual_map)[i];
	      int length=1;
	      //if number is smaller than one, length would be negative, or invalid
	      if(number>=1)
		{
		  length=(int)(floor(log(number)/log(10)))+1;
		}
	      int maxpos=(int)(pow(10,length-1));
	      int strl=length+1+RANGE;
	      char * str=new char[strl];
	      str[length]='.';
	      str[strl]='\0';
      
	      for(int j=0;j<strl;j++)
		{
		  if(j!=length)
		    {
//  		      std::cout << (number) << "-" << (int)number << "=" << (number)-(int)number << std::endl;
		      if((number-(int)number)>ALMOST_ONE)
			{
// 			  std::cout<<"rounding: " <<number<<std::endl;
			  number=round(number);
			}
 		      int digit=(int)(number/maxpos);
// 		      std::cout << number << "/" << maxpos << "=" << digit << std::endl;
		      str[j]=(digit+'0');
		      number-=digit*maxpos;
		      number*=10;
		    }
		}
      
	      nodetextmap[i]->property_text().set_value(str);
	    }
	  else
	    {
	      nodemap_to_edit="";
	      nodetextmap[i]->property_text().set_value("");
	    }
	}
    }
  else
    {
      if(mapname!="Default")
	{
	  double number=(*actual_map)[node];
	  int length=1;
	  //if number is smaller than one, length would be negative, or invalid
	  if(number>=1)
	    {
	      length=(int)(floor(log(number)/log(10)))+1;
	    }
	  int maxpos=(int)(pow(10,length-1));
	  int strl=length+1+RANGE;
	  char * str=new char[strl];
	  str[length]='.';
	  str[strl]='\0';
      
	  for(int j=0;j<strl;j++)
	    {
	      if(j!=length)
		{
		  if((number-(int)number)>ALMOST_ONE)
		    {
		      number=round(number);
		    }
		  int digit=(int)(number/maxpos);
		  str[j]=(digit+'0');
		  number-=digit*maxpos;
		  number*=10;
		}
	    }
      
	  nodetextmap[node]->property_text().set_value(str);
	}
      else
	{
	  nodetextmap[node]->property_text().set_value("");
	}
    }
  return 0;
};