/*
Copyright 2017 Fred Sundvik
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

#include "visualizer.h"
#include "gfx.h"
#include "math.h"
#include "default_animations.h"
#include "led_backlight_keyframes.h"

#define NUM_ROWS LED_HEIGHT
#define NUM_COLS LED_WIDTH

#define ONESIDESCAN 10
#define BOTHSIDESCAN 20
#define FULL_ON LUMA2COLOR(255)
#define THREE_QUARTER LUMA2COLOR(200)
#define HALF_ON LUMA2COLOR(150)
#define ONE_QUARTER LUMA2COLOR(50)

#define CROSSFADE_TIME 500
#define GRADIENT_TIME 3000
bool led_backlight_keyframe_one_period_sweep(keyframe_animation_t* animation, visualizer_state_t* state);
bool led_backlight_keyframe_half_period_sweep_to_on(keyframe_animation_t* animation, visualizer_state_t* state);
bool led_backlight_keyframe_half_period_sweep_to_off(keyframe_animation_t* animation, visualizer_state_t* state);
keyframe_animation_t Fade_in_all_leds = {
    .num_frames = 1,
    .loop = false,
    .frame_lengths = {
        CROSSFADE_TIME,
    },
    .frame_functions = {
        led_backlight_keyframe_fade_in_all,
    },
};
keyframe_animation_t decreasing_gradient = {
    .num_frames = 8,
    .loop = true,
    .frame_lengths = {
        gfxMillisecondsToTicks(GRADIENT_TIME), // left to rigt (outside in)
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left_to_right (mirrored, so inside out)
        0,           // normal leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left to rigt (outside in)
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left_to_right (mirrored, so inside out)
        0,           // normal leds
    },
    .frame_functions = {
        led_backlight_keyframe_one_period_sweep,
        led_backlight_keyframe_mirror_orientation,
        keyframe_no_operation,
        keyframe_no_operation,
        keyframe_no_operation,
        keyframe_no_operation,
        led_backlight_keyframe_one_period_sweep,
        led_backlight_keyframe_normal_orientation,

    },
};



static uint8_t off_on_off_gradient(float t, float index, float num) {
    const float two_pi = M_PI * 2.0f;
    float normalized_index = (1.0f - index / (num - 1.0f)) * two_pi;
    float x = t * two_pi + normalized_index-M_PI;
    if((1*M_PI) < x && x < (3*M_PI))
    {
      float v = 0.5 * (cosf(x) + 1.0f);
      return (uint8_t)(255.0f * v);
    }
    else
    {
      return 0;
    }
}
static uint8_t off_on_gradient(float t, float index, float num) {
    const float two_pi = M_PI * 2.0f;
    float normalized_index = (1.0f - index / (num - 1.0f)) * two_pi;
    float x = t * two_pi + normalized_index-M_PI;
    float v;
    if((1*M_PI) < x && x < (2*M_PI))
    {
      v = 0.5 * (cosf(x) + 1.0f);
    }
    else if(x >= (2*M_PI))
    {
      v = 1;
    }
    else
    {
      v = 0;
    }
    return (uint8_t)(255.0f * v);
}
static uint8_t on_off_gradient(float t, float index, float num) {
    const float two_pi = M_PI * 2.0f;
    float normalized_index = (1.0f - index / (num - 1.0f)) * two_pi;
    float x = t * two_pi + normalized_index-M_PI;
    float v;
    if((2*M_PI) < x && x < (3*M_PI))
    {
      v = 0.5 * (cosf(x) + 1.0f);

    }
    else if(x >= (3*M_PI))
    {
      v = 0;
    }
    else
    {
      v = 1;
    }
    return (uint8_t)(255.0f * v);
}

bool led_backlight_keyframe_one_period_sweep(keyframe_animation_t* animation, visualizer_state_t* state) {
    (void)state;
    float frame_length = animation->frame_lengths[animation->current_frame];
    float current_pos = frame_length - animation->time_left_in_frame;
    float t = current_pos / frame_length;
    for (int i=0; i< NUM_COLS; i++) {
        uint8_t color = off_on_off_gradient(t*2, i, NUM_COLS);
        gdispGDrawLine(LED_DISPLAY, i, 0, i, NUM_ROWS - 1, LUMA2COLOR(color));
    }
    return true;
}

bool led_backlight_keyframe_half_period_sweep_to_on(keyframe_animation_t* animation, visualizer_state_t* state) {
    (void)state;
    float frame_length = animation->frame_lengths[animation->current_frame];
    float current_pos = frame_length - animation->time_left_in_frame;
    float t = current_pos / frame_length;
    for (int i=0; i< NUM_COLS; i++) {
        uint8_t color = off_on_gradient(t*2, i, NUM_COLS);
        gdispGDrawLine(LED_DISPLAY, i, 0, i, NUM_ROWS - 1, LUMA2COLOR(color));
    }
    return true;
}
bool led_backlight_keyframe_half_period_sweep_to_off(keyframe_animation_t* animation, visualizer_state_t* state) {
    (void)state;
    float frame_length = animation->frame_lengths[animation->current_frame];
    float current_pos = frame_length - animation->time_left_in_frame;
    float t = current_pos / frame_length;
    for (int i=0; i< NUM_COLS; i++) {
        uint8_t color = on_off_gradient(t*2, i, NUM_COLS);
        gdispGDrawLine(LED_DISPLAY, i, 0, i, NUM_ROWS - 1, LUMA2COLOR(color));
    }
    return true;
}


/*
 +---+---+---+---+---+---+---+---+---+---+---+---+---+---+-------+
| 0 | 1 | 2 | 3 | 4 | 5 | 6 | 6 | 5 | 4 | 3 | 2 | 1 | 0 | phase |
+---+---+---+---+---+---+---+---+---+---+---+---+---+---+-------+
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     0 |
| 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     1 |
| 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     2 |
| 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     3 |
| 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     4 |
| 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     5 |
| 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     6 |
| 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |     7 |
| 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 | 0 |     8 |
| 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 | 0 |     9 |
| 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 | 0 |    10 |
| 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 | 0 |    11 |
| 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 | 0 |    12 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 0 |    13 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 | 6 |    14 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 | 5 |    15 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 | 4 |    16 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 | 3 |    17 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 | 2 |    18 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 1 |    19 |
| 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |    20 |
+---+---+---+---+---+---+---+---+---+---+---+---+---+---+-------+
*/

#ifdef MASTER_IS_ON_RIGHT /*right side*/
keyframe_animation_t sweep_on_sweep_off_left_and_right = {
    .num_frames = 12,
    .loop = true,
    .frame_lengths = {
        0,
        1,
        gfxMillisecondsToTicks(GRADIENT_TIME), // left  on
        gfxMillisecondsToTicks(GRADIENT_TIME), // right on
        gfxMillisecondsToTicks(GRADIENT_TIME), // left off
        gfxMillisecondsToTicks(GRADIENT_TIME), // right off
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // right on
        gfxMillisecondsToTicks(GRADIENT_TIME), // left on
        gfxMillisecondsToTicks(GRADIENT_TIME), // right off
        gfxMillisecondsToTicks(GRADIENT_TIME), // left off
        0,           // normal leds
    },
    .frame_functions = {
        led_backlight_keyframe_mirror_orientation,
        led_backlight_keyframe_fade_out_all,
        keyframe_no_operation,
        led_backlight_keyframe_half_period_sweep_to_on,
        keyframe_no_operation,
        led_backlight_keyframe_half_period_sweep_to_off,
        led_backlight_keyframe_normal_orientation,
        led_backlight_keyframe_half_period_sweep_to_on,
        keyframe_no_operation,
        led_backlight_keyframe_half_period_sweep_to_off,
        keyframe_no_operation,
        led_backlight_keyframe_mirror_orientation,

    },
};
keyframe_animation_t both_sides_fade_across = {
    .num_frames = 10,
    .loop = true,
    .frame_lengths = {
        0,
        1,
        gfxMillisecondsToTicks(GRADIENT_TIME), // left to rigt (outside in)
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left_to_right (mirrored, so inside out)
        0,           // normal leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left to rigt (outside in)
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left_to_right (mirrored, so inside out)
        0,           // normal leds
    },
    .frame_functions = {
        led_backlight_keyframe_mirror_orientation,
        led_backlight_keyframe_fade_out_all,
        keyframe_no_operation,
        keyframe_no_operation,
        led_backlight_keyframe_one_period_sweep,
        led_backlight_keyframe_normal_orientation,
        led_backlight_keyframe_one_period_sweep,
        led_backlight_keyframe_mirror_orientation,
        keyframe_no_operation,
        keyframe_no_operation,
    },
};

#else /*left side*/
keyframe_animation_t sweep_on_sweep_off_left_and_right = {
    .num_frames = 10,
    .loop = true,
    .frame_lengths = {
        gfxMillisecondsToTicks(GRADIENT_TIME), // left  on
        gfxMillisecondsToTicks(GRADIENT_TIME), // right on
        gfxMillisecondsToTicks(GRADIENT_TIME), // left off
        gfxMillisecondsToTicks(GRADIENT_TIME), // right off
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // right on
        gfxMillisecondsToTicks(GRADIENT_TIME), // left on
        gfxMillisecondsToTicks(GRADIENT_TIME), // right off
        gfxMillisecondsToTicks(GRADIENT_TIME), // left off
        0,           // normal leds
    },
    .frame_functions = {
        led_backlight_keyframe_half_period_sweep_to_on,
        keyframe_no_operation,
        led_backlight_keyframe_half_period_sweep_to_off,
        keyframe_no_operation,
        led_backlight_keyframe_mirror_orientation,
        keyframe_no_operation,
        led_backlight_keyframe_half_period_sweep_to_on,
        keyframe_no_operation,
        led_backlight_keyframe_half_period_sweep_to_off,
        led_backlight_keyframe_normal_orientation,

    },
};
keyframe_animation_t both_sides_fade_across = {
    .num_frames = 8,
    .loop = true,
    .frame_lengths = {
        gfxMillisecondsToTicks(GRADIENT_TIME), // left to rigt (outside in)
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left_to_right (mirrored, so inside out)
        0,           // normal leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left to rigt (outside in)
        0,           // mirror leds
        gfxMillisecondsToTicks(GRADIENT_TIME), // left_to_right (mirrored, so inside out)
        0,           // normal leds
    },
    .frame_functions = {
        led_backlight_keyframe_one_period_sweep,
        led_backlight_keyframe_mirror_orientation,
        keyframe_no_operation,
        keyframe_no_operation,
        keyframe_no_operation,
        keyframe_no_operation,
        led_backlight_keyframe_one_period_sweep,
        led_backlight_keyframe_normal_orientation,

    },
};


#endif

#define RED 0
#define ORANGE 21
#define YELLOW 42
#define SPRING_GREEN 64
#define GREEN 85
#define TURQUOISE 107
#define CYAN 127
#define OCEAN 149
#define BLUE 170
#define VIOLET 192
#define MAGENTA 212
#define RASPBERRY 234

// This function should be implemented by the keymap visualizer
// Don't change anything else than state->target_lcd_color and state->layer_text as that's the only thing
// that the simple_visualizer assumes that you are updating
// Also make sure that the buffer passed to state->layer_text remains valid until the previous animation is
// stopped. This can be done by either double buffering it or by using constant strings
static void get_visualizer_layer_and_color(visualizer_state_t* state) {
    uint8_t saturation = 255;
    /* if (state->status.leds & (1u << USB_LED_CAPS_LOCK)) {
        saturation = 255;
    } */

    if (state->status.layer & 0x400) {
        state->target_lcd_color = LCD_COLOR(OCEAN, saturation, 0xFF);
        state->layer_text = "STENOGRAPHY";
    }
    else if (state->status.layer & 0x200) {
        state->target_lcd_color = LCD_COLOR(GREEN, saturation, 0xFF);
        state->layer_text = "FUNCTION";
    }
    else if (state->status.layer & 0x100) {
        state->target_lcd_color = LCD_COLOR(MAGENTA, saturation, 0xFF);
        state->layer_text = "Shortcuts Layer";
        stop_keyframe_animation(&sweep_on_sweep_off_left_and_right);
        start_keyframe_animation(&led_test_animation);
    }
    else    if (state->status.layer & 0x80) {
        state->target_lcd_color = LCD_COLOR(VIOLET, saturation, 0xFF);
        state->layer_text = "Plover";
    }
    else if (state->status.layer & 0x40) {
        state->target_lcd_color = LCD_COLOR(RASPBERRY, saturation, 0xFF);
        state->layer_text = "Mirrored Symbols";
    }
    else if (state->status.layer & 0x20) {
        state->target_lcd_color = LCD_COLOR(RED, saturation, 0xFF);
        state->layer_text = "Symbols";
    }
    else if (state->status.layer & 0x8) {
        state->target_lcd_color = LCD_COLOR(OCEAN, saturation, 0xFF);
        state->layer_text = "Mirrored Dvorak";
    }
    else if (state->status.layer & 0x4) {
        state->target_lcd_color = LCD_COLOR(BLUE, saturation, 0xFF);
        state->layer_text = "Dvorak";
        stop_keyframe_animation(&led_test_animation);
        start_keyframe_animation(&sweep_on_sweep_off_left_and_right);
    }
    else if (state->status.layer & 0x2) {
        state->target_lcd_color = LCD_COLOR(ORANGE, saturation, 0xFF);
        state->layer_text = "Mirrored Qwerty";
    }
    else {
        state->target_lcd_color = LCD_COLOR(YELLOW, saturation, 0xFF);
        state->layer_text = "Qwerty";
        stop_keyframe_animation(&led_test_animation);
        start_keyframe_animation(&Fade_in_all_leds);
    }
}