/*
 * eeprom.c
 *
 *  Created on: Jun 7, 2017
 *      Author: wn
 */

#include "eeprom.h"
#include "stm32f1xx_hal.h"
#include <string.h>

#define HIGH GPIO_PIN_SET
#define LOW GPIO_PIN_RESET

extern SPI_HandleTypeDef hspi1;


const uint8_t EEPROM_READ = 0x03;
const uint8_t EEPROM_WRITE = 0x02;
const uint8_t EEPROM_WRDI = 0x04;
const uint8_t EEPROM_WREN = 0x06;
const uint8_t EEPROM_RDSR = 0x05;
const uint8_t EEPROM_WRSR = 0x01;


const uint32_t STORAGE_MAGIC = 0xaffe000b;



tStorage storage;
extern tDisplay display;


static void __EEPROM_CS(GPIO_PinState v) {
  HAL_GPIO_WritePin(EEPROM_CS_GPIO_Port, EEPROM_CS_Pin, v);
}


__attribute__((unused)) static uint8_t eepromReadStatus() {
  struct {
    uint8_t rdsr;
    uint8_t data;
  } txMsg = {
      .rdsr = EEPROM_RDSR
  }, rxMsg;

  __EEPROM_CS(LOW);
  HAL_SPI_TransmitReceive(&eepromSpi, &txMsg, &rxMsg, 2, HAL_MAX_DELAY);
  __EEPROM_CS(HIGH);

  return rxMsg.data;
}

static void eepromWren() {
  struct {
    uint8_t wren;
  } txMsg = {
      .wren = EEPROM_WREN
  };

  __EEPROM_CS(LOW);
  HAL_SPI_Transmit(&eepromSpi, &txMsg, 1, HAL_MAX_DELAY);
  __EEPROM_CS(HIGH);
}

__attribute__((unused)) static void eepromWrdi() {
  struct {
    uint8_t wrdi;
  } txMsg = {
      .wrdi = EEPROM_WRDI
  };

  __EEPROM_CS(LOW);
  HAL_SPI_Transmit(&eepromSpi, &txMsg, 1, HAL_MAX_DELAY);
  __EEPROM_CS(HIGH);
}


void eepromWrite(uint16_t addr, uint8_t *buf, uint8_t len) {
  struct {
    uint8_t write;
    uint16_t addr;
    uint8_t data[32];
  } msg = {
      .write = EEPROM_WRITE,
      .addr = addr
  };
  memcpy(msg.data, buf, len);

  eepromWren();

  __EEPROM_CS(LOW);
  HAL_SPI_Transmit(&eepromSpi, &msg, ((uint16_t)(len+3+1)), HAL_MAX_DELAY);
  __EEPROM_CS(HIGH);
}

void eepromRead(uint16_t addr, uint8_t *buf, uint8_t len) {
  struct {
    uint8_t read;
    uint16_t addr;
    uint8_t data[32];
  } txMsg = {
      .read = EEPROM_READ,
      .addr = addr
  },
    rxMsg;

  __EEPROM_CS(LOW);
  HAL_SPI_TransmitReceive(&eepromSpi, &txMsg, &rxMsg, ((uint16_t)(len+3+1)), HAL_MAX_DELAY);
  __EEPROM_CS(HIGH);

  memcpy(buf, rxMsg.data, len);
}

int eepromReadStorage() {
  eepromRead(STORAGE_ADDRESS, (uint8_t*) &storage, sizeof(storage));
  if (storage.magic == STORAGE_MAGIC) {
    return 0;
  } else {
    return -1;
  }
}

void eepromWriteStorage() {
  storage.magic = STORAGE_MAGIC;
  eepromWrite(STORAGE_ADDRESS, (uint8_t*) &storage, sizeof(storage));
}