#include "zeus/CColor.hpp"
#include "zeus/CVector4f.hpp"

namespace zeus
{
const CColor CColor::skRed(Comp32(0xFF0000FFul));
const CColor CColor::skBlack(Comp32(0x000000FFul));
const CColor CColor::skBlue(Comp32(0x0000FFFFul));
const CColor CColor::skGreen(Comp32(0x00FF00FFul));
const CColor CColor::skGrey(Comp32(0x808080FFul));
const CColor CColor::skOrange(Comp32(0xFF7000FFul));
const CColor CColor::skPurple(Comp32(0xA000FFFFul));
const CColor CColor::skYellow(Comp32(0xFFFF00FFul));
const CColor CColor::skWhite(Comp32(0xFFFFFFFFul));
const CColor CColor::skClear(Comp32(0x00000000ul));

float hueToRgb(float p, float q, float t)
{
    if (t < 0.0f)
        t += 1.0f;
    if (t > 1.0f)
        t -= 1.0f;
    if (t < 1.f / 6.f)
        return p + (q - p) * 6.f * t;
    if (t < 1.f / 2.f)
        return q;
    if (t < 2.f / 3.f)
        return p + (q - p) * (2.f / 3.f - t) * 6.f;
    return p;
}

CColor::CColor(const CVector4f& other)
{
    r = other.x;
    g = other.y;
    b = other.z;
    a = other.w;
}

CColor& CColor::operator=(const CVector4f& other)
{
    r = other.x;
    g = other.y;
    b = other.z;
    a = other.w;

    return *this;
}

void CColor::fromHSV(float h, float s, float v, float _a)
{
    int i = int(h * 6);
    float f = h * 6 - i;
    float p = v * (1 - s);
    float q = v * (1 - f * s);
    float t = v * (1 - (1 - f) * s);
    float _r, _g, _b;

    switch (i % 6)
    {
    case 0:
        _r = v, _g = t, _b = p;
        break;
    case 1:
        _r = q, _g = v, _b = p;
        break;
    case 2:
        _r = p, _g = v, _b = t;
        break;
    case 3:
        _r = p, _g = q, _b = v;
        break;
    case 4:
        _r = t, _g = p, _b = v;
        break;
    case 5:
        _r = v, _g = p, _b = q;
        break;
    }

    r = _r;
    g = _g;
    b = _b;
    a = _a;
}

void CColor::toHSV(float& h, float& s, float& v) const
{
    float min = std::min(r, std::min(g, b));
    float max = std::max(r, std::max(g, b));
    v = max;

    float delta = max - min;
    s = max == 0 ? 0 : delta / max;

    if (max == min)
        h = 0;
    else
    {
        if (max == r)
            h = (g - b) / delta + (g < b ? 6 : 0);
        else if (max == g)
            h = (b - r) / delta + 2;
        else if (max == b)
            h = (r - g) / delta + 4;
        h /= 6;
    }
}

void CColor::fromHSL(float h, float s, float l, float _a)
{
    if (s == 0.0f)
        r = g = b = l;
    else
    {
        const float q = l < 0.5f ? l * (1.f + s) : l + s - 1.f * s;
        const float p = 2 * l - q;
        r = hueToRgb(p, q, h + 1.f / 3);
        g = hueToRgb(p, q, h);
        b = hueToRgb(p, q, h - 1.f / 3);
    }
    a = _a;
}

void CColor::toHSL(float& h, float& s, float& l)
{
    const float min = std::min(r, std::min(g, b));
    const float max = std::max(r, std::max(g, b));
    const float d = max - min;

    if (max == min)
        h = s = 0;
    else
    {
        s = l > 0.5f ? d / (2.f - max - min) : d / (max + min);
        if (max == r)
            h = (g - b) / d + (g < b ? 6.f : 0.f);
        else if (max == g)
            h = (b - r) / d + 2.f;
        else if (max == b)
            h = (r - g) / d + 4.f;

        h /= 6;
    }
}
}