#include "headingobj.h"

#include <qregexp.h>

/////////////////////////////////////////////////////////////////

// HeadingObj

/////////////////////////////////////////////////////////////////

HeadingObj::HeadingObj() : MapObj()

{

//    cout << "Const HeadingObj ()\n";

    init ();

}

HeadingObj::HeadingObj(QGraphicsScene *s) :MapObj(s)

{

//    cout << "Const HeadingObj (s)\n";

    init ();

}

HeadingObj::~HeadingObj()

{

//	cout << "Destr. HeadingObj "<<heading.ascii()<<endl;

	while (!textline.isEmpty())

		delete textline.takeFirst();

}

void HeadingObj::init()

{

    textwidth=40;

    color=QColor ("black");

    font=QFont();

	heading="";

}

void HeadingObj::copy(HeadingObj *other)

{

    MapObj::copy (other);

    textwidth=other->textwidth;

    color=other->color;

    font=other->font;

    setText (other->text() );

}

void HeadingObj::move(double x, double y)

{

    MapObj::move(x,y);

    qreal h;	// height of a textline

    qreal ho;	// offset of height while drawing all lines

    if (!textline.isEmpty() )

		h=textline.first()->boundingRect().height();

    else

		h=2;

    ho=0;

	for (int i=0; i<textline.size(); ++i)

    {

		textline.at(i)->setPos(x,y+ho);

		ho=ho+h;

    }	

}

void HeadingObj::moveBy(double x, double y)

{

    move (x+absPos.x(),y+absPos.y() );

}

void HeadingObj::positionBBox()

{

    bbox.setX (absPos.x());

    bbox.setY (absPos.y());

}

void HeadingObj::calcBBoxSize()

{	

	qreal w=0;

	qreal h=0;

	// Using Backspace an empty heading might easily be created, then there

	// would be textline.first()==NULL This can be worked around by the following, but

	// then no selection would be visible, thus we prevent it in ::setText()

	if (!textline.isEmpty() )

	{

		for (int i=0; i<textline.size(); ++i)

		{

			h+=textline.at(i)->boundingRect().height();

			if (w<textline.at(i)->boundingRect().width() )

				w=textline.at(i)->boundingRect().width();

		}	

	} 

    bbox.setSize (QSizeF(w,h));

}

QGraphicsTextItem* HeadingObj::newLine(QString s)

{

    QGraphicsTextItem *t=scene->addText(s);

    t->setFont (font);

    t->setZValue(Z_TEXT);

    t->setDefaultTextColor(color);

    return t;

}

void HeadingObj::setText (QString s)

{

    heading=s;

    // remove old textlines and prepare generating new ones

	while (!textline.isEmpty())

		delete textline.takeFirst();

	// prevent empty textline, so at least a small selection stays

	// visible for this heading

	if (s.length()==0) s="  ";

    int i=0;	// index for actual search for ws

    int j=0;	// index of last ws

	int k=0;	// index of "<br>" or similar linebreak

	int br=0;	// width of found break, e.g. for <br> it is 4

	QRegExp re("<br.*/>");

	re.setMinimal (true);

    // set the text and wrap lines

    while (s.length()>0)

    {

		// ok, some people wanted manual linebreaks, here we go

		k=re.search (s,i);

		if (k>=0)

		{

			br=re.cap(0).length();

			i=k;

		} else

			i=s.find (" ",i,false);

		if (i<0 && j==0)

		{   // no ws found at all in s

			// append whole s

			textline.append (newLine(s));

			s="";

		} else

		{

			if (i<0 && j>0)

			{	// no ws found in actual search

				if (s.length()<=textwidth)

				{

					textline.append (newLine(s));

					s="";

				} else

				{

					textline.append (newLine(s.left(j)));

					s=s.mid(j+1,s.length());

					j=0;

				}		    

			} else

			{

				if (i>= 0 && i<=static_cast <int> (textwidth))

				{   // there is a ws in textwidth

					if (br>0)

					{

						// here is a linebreak

						textline.append (newLine(s.left(i)));

						s=s.mid(i+br,s.length());

						i=0;

						j=0;

						br=0;

					} else

					{

						j=i;

						i++;

					}

				} else

				{

					if (i>static_cast <int> (textwidth)  )

					{	

						if (j>0)

						{   // a ws out of textwidth, but we have also one in

							textline.append (newLine(s.left(j)));

							s=s.mid(j+1,s.length());

							i=0;

							j=0;

						} else

						{   // a ws out of text, but none in

							textline.append (newLine(s.left(i)));

							s=s.mid(i+1,s.length());

							i=0;

						}

					}

				} 

			}	  

		}		    

    }

	setVisibility (visible);

	move (absPos.x(),absPos.y());

	calcBBoxSize();

}

QString HeadingObj::text ()

{

    return heading;

}

void HeadingObj::setFont (QFont f)

{

    if (font!=f) 

    {

		font=f;

		setText (text());

    }

}

QFont HeadingObj::getFont()

{

    return font;

}    

void HeadingObj::setColor (QColor c)

{

    if (color!=c)

    {

		color=c;

		for (int i=0; i<textline.size(); ++i)

			textline.at(i)->setDefaultTextColor(c);

    }	    

}

QColor HeadingObj::getColor()

{

    return color;

}    

void HeadingObj::setVisibility (bool v)

{

    MapObj::setVisibility(v);

	for (int i=0; i<textline.size(); ++i)

		if (v)

			textline.at(i)->show();

		else

			textline.at(i)->hide();

}

qreal HeadingObj::getHeight ()

{

	return bbox.height();

}

qreal HeadingObj::getWidth()

{

	return bbox.width();

}