#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <global.h>
#include <neutrino.h>
#include <pthread.h>
#include <string>

#include <sys/timeb.h>
#include <time.h>
#include <unistd.h>
#include <sys/param.h>
#include <driver/volume.h>
#include <gui/volumebar.h>
#include <gui/infoclock.h>

#define YOFF 0

CInfoClock::CInfoClock(bool noVolume)
{
	frameBuffer = CFrameBuffer::getInstance();
	x = y = clock_x = 0;
	time_height = time_width = thrTimer = 0;
	Init(noVolume);
}

CInfoClock::~CInfoClock()
{
	if(thrTimer)
		pthread_cancel(thrTimer);
	thrTimer = 0;
}

void CInfoClock::Init(bool noVolume)
{
	static int mute_dx = 0, mute_dy = 0, y_org = 0, spacer = 0;
	int mute_corrY = 0;
	if (!noVolume) {
		CVolumeHelper *vh = CVolumeHelper::getInstance();
		int dummy;
		vh->getDimensions(&dummy, &y, &x, &dummy);
		vh->getMuteIconDimensions(&dummy, &dummy, &mute_dx, &mute_dy);
		vh->getSpacer(&spacer, &dummy);
		y_org = y;
	}
	else
		y = y_org;

	digit_offset = g_Font[SNeutrinoSettings::FONT_TYPE_INFOBAR_CHANNAME]->getDigitOffset();
	digit_h      = g_Font[SNeutrinoSettings::FONT_TYPE_INFOBAR_CHANNAME]->getDigitHeight();
	int t1       = g_Font[SNeutrinoSettings::FONT_TYPE_INFOBAR_CHANNAME]->getRenderWidth(widest_number);
	int t2       = g_Font[SNeutrinoSettings::FONT_TYPE_INFOBAR_CHANNAME]->getRenderWidth(":");
	time_height  = digit_h + (int)((float)digit_offset * 1.5);
	time_width   = t1*6 + t2*2;
	clock_x      = x - time_width;
	if (CNeutrinoApp::getInstance()->isMuted()) {
		clock_x -= (mute_dx + spacer);
		if (mute_dy > time_height)
			y += (mute_dy - time_height) / 2;
		else
			mute_corrY = (time_height - mute_dy) / 2;
		CVolumeHelper::getInstance()->setMuteIconCorrY(mute_corrY);
	}
}

CInfoClock* CInfoClock::getInstance(bool noVolume)
{
	static CInfoClock* InfoClock = NULL;
	if(!InfoClock)
		InfoClock = new CInfoClock(noVolume);
	return InfoClock;
}

void CInfoClock::paintTime( bool show_dot)
{
	char timestr[20];
	time_t tm = time(0);
	strftime((char*) &timestr, sizeof(timestr), "%H:%M:%S", localtime(&tm));
	timestr[2] = show_dot ? ':':'.';

	int x_diff = (time_width - g_Font[SNeutrinoSettings::FONT_TYPE_INFOBAR_CHANNAME]->getRenderWidth(timestr)) / 2;
	frameBuffer->paintBoxRel(clock_x, y, time_width, time_height, COL_MENUCONTENT_PLUS_0, RADIUS_SMALL);
	g_Font[SNeutrinoSettings::FONT_TYPE_INFOBAR_CHANNAME]->RenderString(clock_x + x_diff, y + digit_h + digit_offset + ((time_height - digit_h) / 2), time_width, timestr, COL_MENUCONTENT);
}

void* CInfoClock::TimerProc(void *arg)
{

	bool show_dot = false;
	pthread_setcancelstate(PTHREAD_CANCEL_ENABLE,0);
 	pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS,0);

	CInfoClock *InfoClock = static_cast<CInfoClock*>(arg);
	InfoClock->paintTime(show_dot);
	while(1) {
		sleep(1);
		show_dot = !show_dot;
		InfoClock->paintTime(show_dot);
	}
	return 0;
}

void CInfoClock::ClearDisplay()
{
	frameBuffer->paintBackgroundBoxRel(clock_x, y, time_width, time_height);
}

void CInfoClock::StartClock()
{
	Init();
	
	if(!thrTimer) {
		pthread_create (&thrTimer, NULL, TimerProc, (void*) this) ;
		pthread_detach(thrTimer);
	}
}

void CInfoClock::StopClock()
{
	if(thrTimer) {
		pthread_cancel(thrTimer);
		thrTimer = 0;
		frameBuffer->paintBackgroundBoxRel(clock_x, y, time_width, time_height);
	}
}