#include "hsl.h"

float hue2rgb(float v1, float v2, float vH);

hsl color2hsl(t_color color) {
    float r = color.red / 255.;
    float g = color.green / 255.;
    float b = color.blue / 255.;

    float xmin = std::min(std::min(r, g), b); //Min. value of RGB
    float xmax = std::max(std::max(r, g), b); //Max. value of RGB
    float range = xmax - xmin;

    float H = 0.;
    float S = 0.;
    float L = 0.;
    ;

    L = (xmax + xmin) / 2;

    if (range == 0.) { //Grey
        H = 0.;
        S = 0.;
    } else { //Colour
        if (L < 0.5)
            S = range / (xmax + xmin);
        else
            S = range / (2 - xmax - xmin);

        float delta_r = (((xmax - r) / 6) + (range / 2)) / range;
        float delta_g = (((xmax - g) / 6) + (range / 2)) / range;
        float delta_b = (((xmax - b) / 6) + (range / 2)) / range;

        if (r == xmax)
            H = delta_b - delta_g;
        else if (g == xmax)
            H = (1. / 3.) + delta_r - delta_b;
        else if (b == xmax)
            H = (2. / 3.) + delta_g - delta_r;

        if (H < 0) H += 1;
        if (H > 1) H -= 1;
    }

    hsl val;
    val.h = H;
    val.s = S;
    val.l = L;

    return val;
}

t_color hsl2color(hsl in) {
    float H = in.h;
    float S = in.s;
    float L = in.l;

    float R, G, B;
    if (S == 0) {
        R = L * 255;
        G = L * 255;
        B = L * 255;
    } else {
        float var_2;
        if (L < 0.5)
            var_2 = L * (1 + S);
        else
            var_2 = (L + S) - (S * L);

        float var_1 = 2 * L - var_2;

        R = 255 * hue2rgb(var_1, var_2, H + (1. / 3.));
        G = 255 * hue2rgb(var_1, var_2, H);
        B = 255 * hue2rgb(var_1, var_2, H - (1. / 3.));
    }

    return t_color(R, G, B);
}

float hue2rgb(float v1, float v2, float vH) {
    if (vH < 0) vH += 1.;
    if (vH > 1) vH -= 1.;
    if ((6 * vH) < 1) return v1 + (v2 - v1) * 6 * vH;
    if ((2 * vH) < 1) return v2;
    if ((3 * vH) < 2) return v1 + (v2 - v1) * ((2. / 3.) - vH) * 6;
    return (v1);
}