/*
 * Copyright 2001-2009, Haiku.
 * Copyright 2002, Thomas Kurschel.
 * Distributed under the terms of the MIT License.
 *
 * Authors:
 *		Rafael Romo
 *		Thomas Kurschel
 *		Axel Dörfler, axeld@pinc-software.de
 */


#include "MonitorView.h"

#include <stdio.h>

#include <Catalog.h>
#include <Locale.h>
#include <Roster.h>
#include <Screen.h>

#include "Constants.h"

#undef B_TRANSLATION_CONTEXT
#define B_TRANSLATION_CONTEXT "Monitor View"


MonitorView::MonitorView(BRect rect, const char *name, int32 width, int32 height)
	: BView(rect, name, B_FOLLOW_ALL, B_WILL_DRAW | B_FULL_UPDATE_ON_RESIZE),
	fMaxWidth(1920),
	fMaxHeight(1200),
	fWidth(width),
	fHeight(height),
	fDPI(0)
{
	BScreen screen(B_MAIN_SCREEN_ID);
	fDesktopColor = screen.DesktopColor(current_workspace());
}


MonitorView::~MonitorView()
{
}


void
MonitorView::AttachedToWindow()
{
	SetViewColor(B_TRANSPARENT_COLOR);
	fBackgroundColor = ui_color(B_PANEL_BACKGROUND_COLOR);

	_UpdateDPI();
}


void
MonitorView::MouseDown(BPoint point)
{
	be_roster->Launch(kBackgroundsSignature);
}


void
MonitorView::Draw(BRect updateRect)
{
	rgb_color darkColor = {160, 160, 160, 255};
	rgb_color blackColor = {0, 0, 0, 255};
	rgb_color redColor = {228, 0, 0, 255};
	rgb_color whiteColor = {255, 255, 255, 255};
	BRect outerRect = _MonitorBounds();

	SetHighColor(fBackgroundColor);
	FillRect(updateRect);

	SetDrawingMode(B_OP_OVER);

	// frame & background

	SetHighColor(darkColor);
	FillRoundRect(outerRect, 3.0, 3.0);

	SetHighColor(blackColor);
	StrokeRoundRect(outerRect, 3.0, 3.0);

	SetHighColor(fDesktopColor);

	BRect innerRect(outerRect.InsetByCopy(4, 4));
	FillRoundRect(innerRect, 2.0, 2.0);

	SetHighColor(blackColor);
	StrokeRoundRect(innerRect, 2.0, 2.0);

	SetDrawingMode(B_OP_COPY);

	// power light

	SetHighColor(redColor);
	BPoint powerPos(outerRect.left + 5, outerRect.bottom - 2);
	StrokeLine(powerPos, BPoint(powerPos.x + 2, powerPos.y));

	// DPI

	if (fDPI == 0)
		return;

	font_height fontHeight;
	GetFontHeight(&fontHeight);
	float height = ceilf(fontHeight.ascent + fontHeight.descent);

	char text[64];
	snprintf(text, sizeof(text), B_TRANSLATE("%ld dpi"), (long int)fDPI);

	float width = StringWidth(text);
	if (width > innerRect.Width() || height > innerRect.Height())
		return;

	SetLowColor(fDesktopColor);
	SetHighColor(whiteColor);

	DrawString(text, BPoint(innerRect.left + (innerRect.Width() - width) / 2,
		innerRect.top + fontHeight.ascent + (innerRect.Height() - height) / 2));
}


void
MonitorView::SetResolution(int32 width, int32 height)
{
	if (fWidth == width && fHeight == height)
		return;

	fWidth = width;
	fHeight = height;

	_UpdateDPI();
	Invalidate();
}


void
MonitorView::SetMaxResolution(int32 width, int32 height)
{
	if (fMaxWidth == width && fMaxHeight == height)
		return;

	fMaxWidth = width;
	fMaxHeight = height;

	Invalidate();
}


void
MonitorView::MessageReceived(BMessage* message)
{
	switch (message->what) {
		case B_COLORS_UPDATED:
		{
			message->FindColor(ui_color_name(B_PANEL_BACKGROUND_COLOR),
				&fBackgroundColor);
			break;
		}
		case UPDATE_DESKTOP_MSG:
		{
			int32 width, height;
			if (message->FindInt32("width", &width) == B_OK
				&& message->FindInt32("height", &height) == B_OK)
				SetResolution(width, height);
			break;
		}

		case UPDATE_DESKTOP_COLOR_MSG:
		{
			BScreen screen(Window());
			rgb_color color = screen.DesktopColor(current_workspace());
			if (color != fDesktopColor) {
				fDesktopColor = color;
				Invalidate();
			}
			break;
		}

		default:
			BView::MessageReceived(message);
			break;
	}
}


BRect
MonitorView::_MonitorBounds()
{
	float maxWidth = Bounds().Width();
	float maxHeight = Bounds().Height();
	if (maxWidth / maxHeight > (float)fMaxWidth / fMaxHeight)
		maxWidth = maxHeight / fMaxHeight * fMaxWidth;
	else
		maxHeight = maxWidth / fMaxWidth * fMaxHeight;

	float factorX = (float)fWidth / fMaxWidth;
	float factorY = (float)fHeight / fMaxHeight;

	if (factorX > factorY && factorX > 1) {
		factorY /= factorX;
		factorX = 1;
	} else if (factorY > factorX && factorY > 1) {
		factorX /= factorY;
		factorY = 1;
	}

	float width = maxWidth * factorX;
	float height = maxHeight * factorY;

	BSize size = Bounds().Size();
	return BRect((size.width - width) / 2, (size.height - height) / 2,
		(size.width + width) / 2, (size.height + height) / 2);
}


void
MonitorView::_UpdateDPI()
{
	fDPI = 0;

	BScreen screen(Window());
	monitor_info info;
	if (screen.GetMonitorInfo(&info) != B_OK)
		return;

	double x = info.width / 2.54;
	double y = info.height / 2.54;

	fDPI = (int32)round((fWidth / x + fHeight / y) / 2);
}