#include <QApplication>
#include <QPainter>
#include <QGraphicsSceneMouseEvent>
#include <QFileInfo>
#include "font.h"
#include "popup.h"
#include "waypointitem.h"


#define HS(size) \
	((int)((qreal)size * 1.2))
#define FS(size) \
	((int)((qreal)size * 1.41))

Units WaypointItem::_units = Metric;
CoordinatesFormat WaypointItem::_format = DecimalDegrees;
QTimeZone WaypointItem::_timeZone = QTimeZone::utc();

ToolTip WaypointItem::info(bool extended) const
{
	Q_UNUSED(extended);
	ToolTip tt;
	QLocale l;

	if (!_waypoint.name().isEmpty())
		tt.insert(qApp->translate("WaypointItem", "Name"), _waypoint.name());
	tt.insert(qApp->translate("WaypointItem", "Coordinates"),
	  Format::coordinates(_waypoint.coordinates(), _format));
	QPair<qreal, qreal> elevations(_waypoint.elevations(_map));
	if (!std::isnan(elevations.first)) {
		QString val = Format::elevation(elevations.first, _units);
		if (!std::isnan(elevations.second))
			val += " (" + Format::elevation(elevations.second, _units) + ")";
		tt.insert(qApp->translate("WaypointItem", "Elevation"), val);
	}
	if (_waypoint.timestamp().isValid()) {
		QDateTime date(_waypoint.timestamp().toTimeZone(_timeZone));
		tt.insert(qApp->translate("WaypointItem", "Date"),
		  l.toString(date.date(), QLocale::ShortFormat) + " "
			+ date.time().toString("h:mm:ss"));
	}
	if (!_waypoint.description().isEmpty())
		tt.insert(qApp->translate("WaypointItem", "Description"),
		  _waypoint.description());
	if (!_waypoint.comment().isEmpty()
	  && _waypoint.comment() != _waypoint.description())
		tt.insert(qApp->translate("WaypointItem", "Comment"),
		  _waypoint.comment());
	if (!_waypoint.symbol().isEmpty())
		tt.insert(qApp->translate("WaypointItem", "Symbol"), _waypoint.symbol());
	if (!_waypoint.address().isEmpty()) {
		QString addr(_waypoint.address());
		addr.replace('\n', "<br/>");
		addr = "<address>" + addr + "</address>";
		tt.insert(qApp->translate("WaypointItem", "Address"), addr);
	}
	if (!_waypoint.phone().isEmpty())
		tt.insert(qApp->translate("WaypointItem", "Phone"), _waypoint.phone());
	if (!_waypoint.links().isEmpty()) {
		QString links;
		for (int i = 0; i < _waypoint.links().size(); i++) {
			const Link &link = _waypoint.links().at(i);
			links.append(QString("<a href=\"%0\">%1</a>").arg(link.URL(),
			  link.text().isEmpty() ? link.URL() : link.text()));
			if (i != _waypoint.links().size() - 1)
				links.append("<br/>");
		}
		tt.insert(qApp->translate("WaypointItem", "Links"), links);
	}
#ifndef Q_OS_ANDROID
	if (!_waypoint.file().isEmpty())
		tt.insert(qApp->translate("WaypointItem", "File"),
		  QString("<a href=\"file:%1\">%2</a>").arg(_waypoint.file(),
		  QFileInfo(_waypoint.file()).fileName()));
#endif // Q_OS_ANDROID

	tt.setImages(_waypoint.images());

	return tt;
}

WaypointItem::WaypointItem(const Waypoint &waypoint, Map *map,
  QGraphicsItem *parent) : GraphicsItem(parent), _map(map)
{
	_waypoint = waypoint;
	_showLabel = false;
	_showIcon = false;
	_size = 8;
	_color = Qt::black;

	_icon = (_waypoint.style().icon().isNull())
	  ? Waypoint::symbolIcon(_waypoint.symbol())
	  : &_waypoint.style().icon();

	_font.setPixelSize(FS(size()));
	_font.setFamily(FONT_FAMILY);

	updateCache();

	setPos(map->ll2xy(waypoint.coordinates()));
	setCursor(Qt::ArrowCursor);
	setAcceptHoverEvents(true);
}

void WaypointItem::setMap(Map *map)
{
	_map = map;
	setPos(map->ll2xy(_waypoint.coordinates()));
}

void WaypointItem::updateCache()
{
	QPainterPath p;
	qreal pointSize = _font.bold() ? HS(size()) : size();
	const QPixmap &icon = _waypoint.style().icon();

	if (_showLabel && !_waypoint.name().isEmpty()) {
		QFontMetrics fm(_font);
		_labelBB = fm.tightBoundingRect(_waypoint.name());

		if (_showIcon && _icon) {
			if (_font.bold())
				p.addRect(-_icon->width() * 0.625, icon.isNull()
				  ? -_icon->height() * 1.25 : -_icon->height() * 0.625,
				  _icon->width() * 1.25, _icon->height() * 1.25);
			else
				p.addRect(-_icon->width()/2.0, icon.isNull()
				  ? -_icon->height() : -_icon->height()/2, _icon->width(),
				  _icon->height());

			if (icon.isNull())
				p.addRect(0, 0, _labelBB.width(), _labelBB.height()
				  + fm.descent());
			else
				p.addRect(_icon->width()/2, _icon->height()/2, _labelBB.width(),
				  _labelBB.height() + fm.descent());
		} else {
			p.addRect(-pointSize/2, -pointSize/2, pointSize, pointSize);
			p.addRect(pointSize/2, pointSize/2, _labelBB.width(),
			  _labelBB.height() + fm.descent());
		}
	} else {
		if (_showIcon && _icon) {
			if (_font.bold())
				p.addRect(-_icon->width() * 0.625, icon.isNull()
				  ? -_icon->height() * 1.25 : -_icon->height() * 0.625,
				  _icon->width() * 1.25, _icon->height() * 1.25);
			else
				p.addRect(-_icon->width()/2, icon.isNull()
				  ? -_icon->height() : -_icon->height()/2, _icon->width(),
				  _icon->height());
		} else
			p.addRect(-pointSize/2, -pointSize/2, pointSize, pointSize);
	}

	_shape = p;
}

void WaypointItem::paint(QPainter *painter,
  const QStyleOptionGraphicsItem *option, QWidget *widget)
{
	Q_UNUSED(option);
	Q_UNUSED(widget);
	qreal pointSize = _font.bold() ? HS(size()) : size();
	const QPixmap &icon = _waypoint.style().icon();

	painter->setPen(color());

	if (_showLabel && !_waypoint.name().isEmpty()) {
		painter->setFont(_font);
		if (_showIcon && _icon) {
			if (icon.isNull())
				painter->drawText(-qMax(_labelBB.x(), 0), _labelBB.height(),
				  _waypoint.name());
			else
				painter->drawText(_icon->width()/2 - qMax(_labelBB.x(), 0),
				  _icon->height()/2 + _labelBB.height(), _waypoint.name());
		} else
			painter->drawText(pointSize/2 - qMax(_labelBB.x(), 0), pointSize/2
			  + _labelBB.height(), _waypoint.name());
	}

	painter->setBrush(QBrush(color(), Qt::SolidPattern));
	if (_showIcon && _icon) {
		if (_font.bold())
			painter->drawPixmap(-_icon->width() * 0.625, icon.isNull()
			  ? -_icon->height() * 1.25 : -_icon->height() * 0.625,
			  _icon->scaled(_icon->width() * 1.25, _icon->height() * 1.25));
		else
			painter->drawPixmap(-_icon->width()/2.0, icon.isNull()
			  ? -_icon->height() : -_icon->height()/2, *_icon);
	} else
		painter->drawEllipse(-pointSize/2, -pointSize/2, pointSize, pointSize);

	//painter->setPen(Qt::red);
	//painter->setBrush(Qt::NoBrush);
	//painter->drawPath(_shape);
}

int WaypointItem::size() const
{
	return (_useStyle && _waypoint.style().size() > 0)
	  ? _waypoint.style().size() : _size;
}

void WaypointItem::setSize(int size)
{
	_size = size;
	updateSize();
}

void WaypointItem::updateSize()
{
	prepareGeometryChange();
	_font.setPixelSize(FS(size()));
	updateCache();
}

const QColor &WaypointItem::color() const
{
	return (_useStyle && _waypoint.style().color().isValid())
	  ? _waypoint.style().color() : _color;
}

void WaypointItem::setColor(const QColor &color)
{
	_color = color;
	updateColor();
}

void WaypointItem::updateColor()
{
	update();
}

void WaypointItem::updateStyle()
{
	updateSize();
	updateColor();
}

void WaypointItem::showLabel(bool show)
{
	if (_showLabel == show)
		return;

	prepareGeometryChange();
	_showLabel = show;
	updateCache();
}

void WaypointItem::showIcon(bool show)
{
	if (_showIcon == show)
		return;

	prepareGeometryChange();
	_showIcon = show;
	updateCache();
}

void WaypointItem::hoverEnterEvent(QGraphicsSceneHoverEvent *event)
{
	Q_UNUSED(event);

	prepareGeometryChange();
	_font.setBold(true);
	updateCache();
	setZValue(zValue() + 1.0);
}

void WaypointItem::hoverLeaveEvent(QGraphicsSceneHoverEvent *event)
{
	Q_UNUSED(event);

	prepareGeometryChange();
	_font.setBold(false);
	updateCache();
	setZValue(zValue() - 1.0);
}

void WaypointItem::mousePressEvent(QGraphicsSceneMouseEvent *event)
{
	GraphicsScene *gs = dynamic_cast<GraphicsScene *>(scene());
	if (gs)
		Popup::show(event->screenPos(), info(gs->showExtendedInfo()),
		  event->widget());
	/* Do not propagate the event any further as lower stacked items (path
	   items) would replace the popup with their own popup */
}