#include "tcolorvalue.h"

//===================================================================

void TColorValue::getHsv(int &ih, int &is, int &iv) const

{

	double max, min;

	double delta;

	double r, g, b;

	double v, s, h;

	r = m_r;

	g = m_g;

	b = m_b;

	assert(0 <= r && r <= 1);

	assert(0 <= g && g <= 1);

	assert(0 <= b && b <= 1);

	max = tmax(r, g, b);

	min = tmin(r, g, b);

	v = max;

	if (max != 0)

		s = (max - min) / max;

	else

		s = 0;

	if (s == 0)

		h = 0;

	else {

		delta = max - min;

		if (r == max)

			h = (g - b) / delta;

		else if (g == max)

			h = 2 + (b - r) / delta;

		else if (b == max)

			h = 4 + (r - g) / delta;

		h = h * 60;

		if (h < 0)

			h += 360;

	}

	assert(0 <= h && h <= 360);

	assert(0 <= s && s <= 1);

	assert(0 <= v && v <= 1);

	ih = (int)h;

	is = (int)(s * 100);

	iv = (int)(v * 100);

}

//===================================================================

void TColorValue::getHls(double &h, double &l, double &s) const

{

	double max, min;

	double delta;

	max = tmax(m_r, m_g, m_b);

	min = tmin(m_r, m_g, m_b);

	l = (max + min) / 2;

	if (max == min) {

		s = 0;

		h = 0;

	} else {

		if (l <= 0.5)

			s = (max - min) / (max + min);

		else

			s = (max - min) / (2 - max - min);

		delta = max - min;

		if (m_r == max)

			h = (m_g - m_b) / delta;

		else if (m_g == max)

			h = 2 + (m_b - m_r) / delta;

		else if (m_b == max)

			h = 4 + (m_r - m_g) / delta;

		h = h * 60;

		if (h < 0)

			h += 360;

	}

}

//===================================================================

void TColorValue::setHsv(int h, int s, int v)

{

	int i;

	double p, q, t, f;

	double hue, sat, value;

	hue = h;

	sat = 0.01 * s;

	value = 0.01 * v;

	assert(0 <= hue && hue <= 360);

	assert(0 <= sat && sat <= 1);

	assert(0 <= value && value <= 1);

	if (sat == 0) {

		m_r = m_g = m_b = value;

	} else {

		if (hue == 360)

			hue = 0;

		hue = hue / 60;

		i = (int)hue;

		f = hue - i;

		p = tcrop(value * (1 - sat), 0., 1.);

		q = tcrop(value * (1 - (sat * f)), 0., 1.);

		t = tcrop(value * (1 - (sat * (1 - f))), 0., 1.);

		switch (i) {

		case 0:

			m_r = value;

			m_g = t;

			m_b = p;

			break;

		case 1:

			m_r = q;

			m_g = value;

			m_b = p;

			break;

		case 2:

			m_r = p;

			m_g = value;

			m_b = t;

			break;

		case 3:

			m_r = p;

			m_g = q;

			m_b = value;

			break;

		case 4:

			m_r = t;

			m_g = p;

			m_b = value;

			break;

		case 5:

			m_r = value;

			m_g = p;

			m_b = q;

			break;

		}

	}

}

//===================================================================

void TColorValue::getRgb(int &r, int &g, int &b) const

{

	r = (int)(m_r * 255 + 0.5);

	g = (int)(m_g * 255 + 0.5);

	b = (int)(m_b * 255 + 0.5);

}

//===================================================================

TPixel32 TColorValue::getPixel() const

{

	int r, g, b;

	getRgb(r, g, b);

	return TPixel32(r, g, b, (int)(m_m * 255.0 + 0.5));

}

//===================================================================

void TColorValue::setRgb(int r, int g, int b)

{

	m_r = r / 255.0;

	m_g = g / 255.0;

	m_b = b / 255.0;

}

//===================================================================

void TColorValue::setPixel(const TPixel32 &src)

{

	setRgb(src.r, src.g, src.b);

	m_m = src.m / 255.0;

}