XSPI.c

#include "XSPI.h"

uint8_t IN_FLASHMODE = 0;
int SPI_DEVICE;

void XSPI_Init(void) {
  if (gpioInitialise() < 0){
    printf("Couldn't initialize GPIO\n");
    exit(-1);
  }

  SPI_DEVICE = spiOpen(0,50000,0x00);
  if (SPI_DEVICE < 0){
    printf("Couldn't initialize SPI\n");
    exit(-1);
  }

  PINOUT(EJ);
  PINOUT(XX);
  PINOUT(SS);
  PINOUT(SCK);
  PINOUT(MOSI);
  PININ(MISO);

  PINHIGH(EJ);
  PINHIGH(SS);
  PINHIGH(XX);
  PINHIGH(SCK);
  PINLOW(MOSI);
}

void XSPI_Shutdown(void) {
  printf("Shutdown\n");
  PINHIGH(SS);
  PINLOW(XX);
  PINLOW(EJ);

  gpioDelay(50000);

  PINHIGH(EJ);
}

void XSPI_EnterFlashmode(void) {
  PINLOW(XX);

  gpioDelay(50000);

  PINLOW(SS);
  PINLOW(EJ);

  gpioDelay(50000);

  PINHIGH(XX);
  PINHIGH(EJ);

  gpioDelay(50000);

  PINLOW(SS);
  IN_FLASHMODE = 1;
}

void XSPI_LeaveFlashmode(uint8_t force) {
  if (IN_FLASHMODE || force) {
    PINHIGH(SS);
    PINLOW(EJ);

    gpioDelay(50000);

    PINLOW(XX);
    PINHIGH(EJ);

    IN_FLASHMODE = 0;
  }
}

void XSPI_Read(uint8_t reg, uint8_t *buf) {
  PINLOW(SS);
  gpioDelay(2);

  XSPI_PutByte((reg << 2) | 1);
  XSPI_PutByte(0xFF);
  *buf++ = XSPI_FetchByte();
  *buf++ = XSPI_FetchByte();
  *buf++ = XSPI_FetchByte();
  *buf++ = XSPI_FetchByte();

  PINHIGH(SS);
}

uint16_t XSPI_ReadWord(uint8_t reg) {
  uint16_t res;

  PINLOW(SS);
  gpioDelay(2);

  XSPI_PutByte((reg << 2) | 1);
  XSPI_PutByte(0xFF);

  res = XSPI_FetchByte();
  res |= ((uint16_t)XSPI_FetchByte()) << 8;

  PINHIGH(SS);

  return res;
}

uint8_t XSPI_ReadByte(uint8_t reg) {
  uint8_t res;

  PINLOW(SS);
  gpioDelay(2);

  XSPI_PutByte((reg << 2) | 1);
  XSPI_PutByte(0xFF);

  res = XSPI_FetchByte();

  PINHIGH(SS);

  return res;
}

void XSPI_Write(uint8_t reg, uint8_t *buf) {
  PINLOW(SS);
  gpioDelay(2);

  XSPI_PutByte((reg << 2) | 2);
  XSPI_PutByte(*buf++);
  XSPI_PutByte(*buf++);
  XSPI_PutByte(*buf++);
  XSPI_PutByte(*buf++);

  PINHIGH(SS);
}

void XSPI_WriteByte(uint8_t reg, uint8_t byte) {
  uint8_t data[] = {0, 0, 0, 0};
  data[0] = byte;

  XSPI_Write(reg, data);
}

void XSPI_WriteDword(uint8_t reg, uint32_t dword) {
  XSPI_Write(reg, (uint8_t *)&dword);
}

void XSPI_Write0(uint8_t reg) {
  uint8_t tmp[] = {0, 0, 0, 0};
  XSPI_Write(reg, tmp);
}

uint8_t XSPI_FetchByte() {
  uint8_t in = 0;
  PINLOW(MOSI);
  for (uint8_t i = 0; i < 8; i++) {
    PINHIGH(SCK);
    in |= PINGET(MISO) ? (1 << i) : 0x00;
    PINLOW(SCK);
  }
  return in;
  // uint8_t in = 0;
  // int check = spiRead(SPI_DEVICE, &in, 1);
  // if(1 == check){
  //   return in;
  // }
  // printf("spiRead Error: %i\n",check );
  // return 0x00;
}

void XSPI_PutByte(uint8_t out) {
  for (uint8_t i = 0; i < 8; i++) {
    if (out & (1 << i)) {
      PINHIGH(MOSI);
    } else {
      PINLOW(MOSI);
    }
    PINHIGH(SCK);
    PINLOW(SCK);
  }
  // int check = spiWrite(SPI_DEVICE, &out, 1);
  // if(1 != check){
  //   printf("spiRead Error: %i\n",check );
  // }
}