#include <math.h>

 #include <qregexp.h>

 #include <qpoint.h>

 #include <stdlib.h>

 #include "misc.h"

 QString qpointToString (const QPoint &p)

 {

 	return "(" + QString("%1").arg(p.x()) +","+ QString ("%1").arg (p.y()) +")";

 }

 ostream &operator<< (ostream &stream, QPoint const &p)

 { 

     return (stream << qpointToString(p) );

 }

 float getAngle(const QPoint &p)

 {	

 	// Calculate angle of vector to y-axis

 	if (p.y()==0)

 	{

 		if (p.x()>=0)

 			return M_PI_2;

 		else

 			return 3* M_PI_2;

 	} else

 	{

 		if (p.y()>0) 

 			return (float)(M_PI  - atan ( (double)(p.x()) / (double)(p.y()) ) );

 		else	

 			if (p.x()<0)

 				return (float)( 2*M_PI - atan ( (double)(p.x()) / (double)(p.y()) ) );

 			else	

 				return (float)( - atan ( (double)(p.x()) / (double)(p.y()) ) );

 	}	

 }

 QPoint normalise(const QPoint &p)

 {	

 	// Calculate normalised position (fixed length) 

 	double px=p.x();

 	double py=p.y();

 	double x;

 	double y;

 	double r=150;

 	if (px==0)

 	{

 		x=0;

 		if (py>=0)

 			y=r;

 		else

 			y=-r;

 	} else

 	{

 		double sign;

 		double a;

 		if (px>0) 

 			sign=1; 

 		else 

 			sign=-1;

 		a=atan (py / px);

 		x=cos (a) * r *sign;

 		y=sin (a) * r *sign;

 	}	

 	return QPoint ((int) (x),(int) (y));

 }

 QString maskPath(QString p)

 {

 	// Change " " to "\ " to enable blanks in filenames

 	p=p.replace(QChar('&'),"\\&");

 	return p.replace(QChar(' '),"\\ ");

 }

 QString convertToRel (const QString &src, const QString &dst)

 {

 	QString s=src;

 	QString d=dst;

 	int i;

 	if (s==d) 

 	{

 		// Special case, we just need the name of the file,

 		// not the complete path

 		i=d.findRev ("/");

 		d=d.right (d.length()-i-1);

 	} else

 	{

 		// Find relative path from src to dst

 		// Remove the first "/"

 		if (s.section ("/",0,0).isEmpty()) 

 		{

 			s=s.right (s.length()-1);

 			d=d.right (d.length()-1);

 		}

 		// remove identical left parts

 		while (s.section("/",0,0) == d.section("/",0,0) ) 

 		{

 			i=s.find ("/");

 			s=s.right (s.length()-i-1);

 			d=d.right (d.length()-i-1);

 		}

 		int srcsep=s.contains("/");

 		int dstsep=d.contains("/");

 		if (srcsep >=  dstsep )

 		{

 			// find path to go up first and then back to dst

 			i=1;

 			while (i<=srcsep) 

 			{

 				d="../"+d;

 				i++;

 			}	

 		}

 	}	

 	return d;

 }

 QString makeUniqueDir (QString s)

 {

 	char *p;

 	int bytes=s.length();

 	p=(char*) malloc (bytes+1);

 	int i;

 	for (i=0;i<bytes;i++)

 		p[i]=s.at(i).latin1();

 	p[bytes]=0;	

 	QString r=mkdtemp (p);

 	free (p);

 	return r;

 }

 void removeDir(QDir d)

 {

 	if (d.path().left(4)!="/tmp")

 	{

 		// FIXME testing

 		qWarning ("misc.cpp::removeDir should remove "+d.path()+" - aborted.");

 		return;

 	}

 	// Traverse directories

 	d.setFilter( QDir::Dirs| QDir::Hidden | QDir::NoSymLinks );

 	const QFileInfoList *dirlist = d.entryInfoList();

 	QFileInfoListIterator itdir( *dirlist );

 	QFileInfo *fi;

 	while ( (fi = itdir.current()) != 0 ) 

 	{

 		if (fi->fileName() != "." && fi->fileName() != ".." )

 		{

 			if ( !d.cd(fi->fileName()) ) 

 				qWarning ("removeDir() cannot find the directory "+fi->fileName());

 			else 

 			{

 				// Recursively remove subdirs

 				removeDir (d);

 				d.cdUp();

 			}

 		}	

 		++itdir;

 	}		

 	// Traverse files

 	d.setFilter( QDir::Files| QDir::Hidden | QDir::NoSymLinks );

 	const QFileInfoList *filelist = d.entryInfoList();

 	QFileInfoListIterator itfile( *filelist );

 	while ( (fi = itfile.current()) != 0 ) 

 	{

 		QFile (fi->filePath()).remove();

 		++itfile;

 	}	

 	if (!d.rmdir(d.path()))

 		qWarning ("removeDir("+d.path()+") failed!");

 }		

 void makeSubDirs (const QString &s)

 {

 	QDir d(s);

 	d.mkdir(s);

 	d.mkdir ("images");	

 	d.mkdir ("flags");	

 }

 // returns masked "<" ">" "&"

 QString quotemeta(const QString &s)

 {

 	QString r=s;

     QRegExp  rx("&(?!amp;)");

     r.replace ( rx,"&");

     rx.setPattern( ">");

     r.replace ( rx,">");

     rx.setPattern( "<");

     r.replace ( rx,"<");

     rx.setPattern( "\"");

     r.replace ( rx,""");

     return r;

 }

 int max(int a, int b)

 {

 	if (a>b)

 		return a;

 	return b;

 }

 int xmlObj::actindent=0;		// make instance of actindent

 xmlObj::xmlObj()

 {

     indentwidth=4;

 }

 // returns <s at />

 QString xmlObj::singleElement(QString s, QString at)

 {

     return indent() + "<" + s +" " + at +" " + "/>\n";

 }

 // returns <s>

 QString xmlObj::beginElement(QString s)

 {

     return indent() + "<" + s + ">\n";

 }

 // returns <s at>

 QString xmlObj::beginElement(QString s, QString at)

 {

     return indent() + "<" + s + " " + at + ">\n";

 }

 // returns </s>

 QString xmlObj::endElement(QString s)

 {

     return indent() + "</" + s + ">\n";

 }

 // returns  at="val"

 QString xmlObj::attribut(QString at, QString val)

 {

     return " " + at + "=\"" + quotemeta (val) + "\""; 

 }

 // returns <s> val </s>

 QString xmlObj::valueElement(QString el, QString val)

 {

     return indent() + "<" + el + ">" + quotemeta(val) + "</" +el + ">\n";

 }

 // returns <s at> val </s>

 QString xmlObj::valueElement(QString el, QString val, QString at)

 {

     return indent() + "<" + el + " " + at + ">" + quotemeta(val) + "</" +el + ">\n";

 }

 void xmlObj::incIndent()

 {

     actindent++;

 }	

 void xmlObj::decIndent()

 {

     actindent--;

     if (actindent<0) actindent=0;

 }	

 QString xmlObj::indent()

 {

     QString s;

     int i;

     for (i=0; i<actindent*indentwidth; i++)

     {

 		s= s + " ";

     }

     return s;

 }	

 ImagePreview::ImagePreview (QWidget *parent=0): QLabel (parent)

 {

 }

 void ImagePreview::previewUrl( const QUrl &u )

 {

     QString path = u.path();

     QPixmap pix( path );

     if ( pix.isNull() )

         setText( QObject::tr("This is not an image.") );

     else

 	{

 		float max_w=300;

 		float max_h=300;

 		float r;

 		if (pix.width()>max_w)

 		{

 			r=max_w / pix.width();

 			pix.resize(qRound(pix.width()*r), qRound(pix.height()*r));

 			// TODO not a resize, but a shrink/enlarge is needed here...

 		}

 		if (pix.height()>max_h)

 		{

 			r=max_h / pix.height();

 			pix.resize(qRound(pix.width()*r), qRound(pix.height()*r));

 			// TODO not a resize, but a shrink/enlarge is needed here...

 		}

         setPixmap( pix );

 	}	

 }