#include "main.h"

#include "stm32l100c_discovery.h"

#include "ssd1306.h"

#include "config.h"

#include "eeprom_min.h"

#include "gpio.h"

#include "spi.h"

// USB includes

#include "hw_config.h"

#include "usb_lib.h"

#include "usb_desc.h"

#include "usb_pwr.h"

#include "stringhelpers.h"

// TODO: Grab buttonpresses with interrupts

// USB Supporting Vars

extern __IO uint8_t Receive_Buffer[64];

extern __IO  uint32_t Receive_length ;

extern __IO  uint32_t length ;

uint8_t Send_Buffer[64];

uint32_t packet_sent=1;

uint32_t packet_receive=1;

// Globalish setting vars

uint8_t boottobrew = 0;

uint16_t windup_guard = 1;

uint16_t k_p = 1;

uint16_t k_i = 1;

uint16_t k_d = 1;

// ISR ticks var

volatile uint32_t ticks = 0;

int16_t setpoint_brew = 0;

int16_t setpoint_steam = 0;

// State definition

enum state {

    STATE_IDLE = 0,

    STATE_SETP,

    STATE_SETI,

    STATE_SETD,

    STATE_SETWINDUP,

    STATE_SETBOOTTOBREW,

    STATE_PREHEAT_BREW,

    STATE_MAINTAIN_BREW,

    STATE_PREHEAT_STEAM,

    STATE_MAINTAIN_STEAM,

};

uint8_t state = STATE_IDLE;

static __IO uint32_t TimingDelay;

// Move to header file

void process();

void machine();

void restore_settings();

void save_settings();

void save_setpoints();

int main(void)

{

    // Init clocks

    SystemInit();

    // Init GPIO

    init_gpio();

    // Turn on power LED

    GPIO_SetBits(LED_POWER);

    // TODO: Awesome pwm of power LED (TIM4_CH4 or TIM11_CH1)

    // Configure 1ms SysTick (change if more temporal resolution needed) 

    RCC_ClocksTypeDef RCC_Clocks;

    RCC_GetClocksFreq(&RCC_Clocks);

    SysTick_Config(RCC_Clocks.HCLK_Frequency / 1000);

    // Init SPI busses

    init_spi();

    // Init OLED over SPI

    ssd1306_Init();

    ssd1306_clearscreen();

    // Check for problems on startup

    if(clock_fail) {

        //ssd1306_DrawStringBig("ERROR: Check Xtal", 2, 0);

        ssd1306_DrawStringBig("NO XTAL", 2, 0);

        delay(1000);

        ssd1306_clearscreen();

    }

    // Init USB

    //Set_System(); // hw_config.h

    Set_USBClock();

    USB_Interrupts_Config();

    USB_Init();

    //SYSCFG_USBPuCmd(ENABLE);

    //PowerOn();

    // Startup screen 

    ssd1306_DrawString("therm v0.1", 1, 40);

    ssd1306_DrawString("protofusion.org/therm", 3, 0);

    delay(1500);

    ssd1306_clearscreen();

    restore_settings();

    if(boottobrew)

      state = STATE_PREHEAT_BREW; // Go to brew instead of idle if configured thusly

    GPIO_ResetBits(LED_STAT);

    // Main loop

    while(1)

    {

        // Process sensor inputs

        process();

        // Run state machine

        machine(); 

    }

}

// Read temperature and update global temp vars

int16_t temp = 0;

uint8_t temp_frac = 0;

void update_temp() {

    // Assert CS

    GPIO_ResetBits(MAX_CS);

    delay(1);

    // This may not clock at all... might need to send 16 bits first

            GPIO_SetBits(LED_STAT);

            GPIO_SetBits(SSR_PIN);

            last_ssr_on = ticks;

        }

    }

    // Kill SSR after elapsed period less than SSR_PERIOD 

    if(ticks - last_ssr_on > ssr_output || ssr_output == 0)

    {

        GPIO_ResetBits(LED_STAT);

        GPIO_ResetBits(SSR_PIN);

    }

}

void draw_setpoint() {

    char tempstr[3];

    itoa_fp(temp, temp_frac, tempstr);

    ssd1306_DrawStringBig("      ", 3, 0);

    ssd1306_DrawStringBig(tempstr, 3, 0);

    ssd1306_DrawStringBig(">", 3, 74);

    itoa(setpoint, tempstr);

    ssd1306_DrawStringBig("    ", 3, 90);

    ssd1306_DrawStringBig(tempstr, 3, 90);

}

uint8_t goto_mode = 2;

// State machine

uint8_t sw_btn_last = 0;

uint8_t sw_up_last = 0;

uint8_t sw_down_last = 0;

uint8_t sw_left_last = 0;

uint8_t sw_right_last = 0;

#define SW_BTN_PRESSED (sw_btn_last == 0 && sw_btn == 1) // rising edge on buttonpress

#define SW_UP_PRESSED (sw_up_last == 0 && sw_up == 1)

#define SW_DOWN_PRESSED (sw_down_last == 0 && sw_down == 1)

#define SW_LEFT_PRESSED (sw_left_last == 0 && sw_left == 1)

#define SW_RIGHT_PRESSED (sw_right_last == 0 && sw_right == 1)

void save_settings()

{

   Minimal_EEPROM_Unlock();

    // Try programming a word at an address divisible by 4

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_BOOTTOBREW, boottobrew);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_WINDUP_GUARD, windup_guard);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_K_P, k_p);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_K_I, k_i);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_K_D, k_d);

    Minimal_EEPROM_Lock();

}

void save_setpoints()

{

    Minimal_EEPROM_Unlock();

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_BREWTEMP, setpoint_brew);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_STEAMTEMP, setpoint_steam); 

    Minimal_EEPROM_Lock();

}

// TODO: Make a struct that has all settings in it. Pass by ref to this func in a library.

void restore_settings()

{

    Minimal_EEPROM_Unlock();

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    boottobrew = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_BOOTTOBREW));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    windup_guard = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_WINDUP_GUARD));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    k_p = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_K_P));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    k_i = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_K_I));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    k_d = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_K_D));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    setpoint_brew = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_BREWTEMP));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    setpoint_steam = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_STEAMTEMP));    

    Minimal_EEPROM_Lock();

}

int16_t last_temp = 21245;

///////////////////////////////////////////////////////////////////////////////////////

/// freaking multiple setpoint support ///

uint8_t final_setpoint = 0;

// Multiple screens to set setpoint and duration on each screen

// press center to go to the next one, and press left or right or something to confirm

// When executing, complete on time AND(?) temperature. Maybe allow switching to OR via settings

////////////////////////////////////////////////////////////////////////////////////////////////

void machine()

{

    uint8_t last_state = state;

    uint8_t temp_changed = temp != last_temp;

    last_temp = temp;

    uint8_t sw_btn = !GPIO_ReadInputDataBit(SW_BTN);

    uint8_t sw_up = !GPIO_ReadInputDataBit(SW_UP);

    uint8_t sw_down = !GPIO_ReadInputDataBit(SW_DOWN);

    uint8_t sw_left = !GPIO_ReadInputDataBit(SW_LEFT);

    uint8_t sw_right = !GPIO_ReadInputDataBit(SW_RIGHT);

    switch(state)

    {

        // Idle state

        case STATE_IDLE:

        {

            // Write text to OLED

            // [ therm :: idle ]

            ssd1306_DrawString("therm :: idle ", 0, 40);

            pid_enabled = 0;

            if(temp_changed) {

                char tempstr[6];

                itoa_fp(temp, temp_frac, tempstr);

                ssd1306_DrawString("Temp: ", 3, 40);

                ssd1306_DrawString("    ", 3, 72);

                ssd1306_DrawString(tempstr, 3, 72);

            }

            ssd1306_drawlogo();

            switch(goto_mode) {

                case 2:

                {

                    ssd1306_DrawString("-> brew     ", 1, 40);

                } break;

                case 1:

                {

                    ssd1306_DrawString("-> setup    ", 1, 40);

                } break;

                case 0:

                {

                    ssd1306_DrawString("-> reset    ", 1, 40);

                } break;

            }

            // Button handler

            if(SW_BTN_PRESSED) {

                switch(goto_mode) {

                    case 2:

                        state = STATE_PREHEAT_BREW;

                        break;

                    case 1:

                        state = STATE_SETP;

                        break;

                    case 0:

                        state = STATE_IDLE;

                        break;

                    default:

                        state = STATE_PREHEAT_BREW;

                }

            }

            else if(SW_UP_PRESSED && goto_mode < 2) {

                goto_mode++;

            }

            else if(SW_DOWN_PRESSED && goto_mode > 0) {

                goto_mode--;

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETP:

        {

            // Write text to OLED

            // [ therm :: set p ]

            // [ p = 12         ]

            ssd1306_DrawString("Proportional", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(k_p, tempstr);

            ssd1306_DrawString("P=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                state = STATE_SETI;

            }

            else {

                user_input(&k_p);

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETI:

        {

            // Write text to OLED

            // [ therm :: set i ]

            // [ i = 12         ]

            ssd1306_DrawString("Integral", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(k_i, tempstr);

            ssd1306_DrawString("I=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                state = STATE_SETD;

            }

            else {

                user_input(&k_i);

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETD:

        {

            // Write text to OLED

            // [ therm :: set d ]

            // [ d = 12         ]

            ssd1306_DrawString("Derivative", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(k_d, tempstr);

            ssd1306_DrawString("D=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

            }

            else {

                user_input(&k_d);

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETWINDUP:

        {

            // Write text to OLED

            // [ therm :: set windup ]

            // [ g = 12         ]

            ssd1306_DrawString("Windup Guard", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(windup_guard, tempstr);

            ssd1306_DrawString("G=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                state = STATE_SETBOOTTOBREW;

            }

            else {

                user_input(&windup_guard);

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETBOOTTOBREW:

        {

            // Write text to OLED

            // [ therm :: set windup ]

            // [ g = 12         ]

            ssd1306_DrawString("Boot to Brew", 0, 40);

            ssd1306_drawlogo();

            ssd1306_DrawString("btb=", 1, 45);

            if(boottobrew)

                ssd1306_DrawString("Enabled ", 1, 70);

            else

                ssd1306_DrawString("Disabled", 1, 70);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                save_settings();

                state = STATE_IDLE;

            }

            else if(!GPIO_ReadInputDataBit(SW_UP)) {

                boottobrew = 1;

            }

            else if(!GPIO_ReadInputDataBit(SW_DOWN)) {

                boottobrew = 0;

            }

            // Event Handler

            // N/A

        } break;

        case STATE_PREHEAT_BREW:

        {

            // Write text to OLED

            // [ therm : preheating brew ]

            // [ 30 => 120 C             ]

            ssd1306_DrawString("Preheating...", 0, 0);

            //ssd1306_drawlogo();

            draw_setpoint();

            pid_enabled = 1;

	    setpoint = setpoint_brew;

            // Button handler

            if(SW_BTN_PRESSED) {

		save_setpoints(); // TODO: Check for mod

                state = STATE_IDLE;

            }

            else {

                user_input(&setpoint_brew);

            }

            // Event Handler

            if(temp >= setpoint) {

                state = STATE_MAINTAIN_BREW;

            }

        } break;

        case STATE_MAINTAIN_BREW:

        {

            // Write text to OLED

            // [ therm : ready to brew ]

            // [ 30 => 120 C           ]

            ssd1306_DrawString("Preheated!", 0, 0);