OpenRTX/platform/drivers/NVM/W25Qx.c

344 wiersze
9.3 KiB
C

/***************************************************************************
* Copyright (C) 2020 - 2025 by Federico Amedeo Izzo IU2NUO, *
* Niccolò Izzo IU2KIN *
* Frederik Saraci IU2NRO *
* Silvano Seva IU2KWO *
* *
* 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 3 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 "W25Qx.h"
#include <errno.h>
#include <stdint.h>
#include <stdlib.h>
#include <string.h>
#include <hwconfig.h>
#include <peripherals/gpio.h>
#include <interfaces/delays.h>
#define CMD_WRITE 0x02 /* Read data */
#define CMD_READ 0x03 /* Read data */
#define CMD_RDSTA 0x05 /* Read status register */
#define CMD_WREN 0x06 /* Write enable */
#define CMD_ESECT 0x20 /* Erase 4kB sector */
#define CMD_RSECR 0x48 /* Read security register */
#define CMD_WKUP 0xAB /* Release power down */
#define CMD_PDWN 0xB9 /* Power down */
#define CMD_EXADD 0xB7 /* Enter 4-byte addr mode */
#define CMD_ECHIP 0xC7 /* Full chip erase */
static const size_t PAGE_SIZE = 256;
static const size_t SECT_SIZE = 4096;
/**
* \internal
* Wait until an erase or write operation finishes.
*
* @param timeout: wait timeout, in ms.
* @return zero on success, -EIO if timeout expires.
*/
static int waitUntilReady(const struct W25QxCfg *cfg, uint32_t timeout)
{
// Each wait tick is 500us
timeout *= 2;
while(timeout > 0)
{
delayUs(500);
timeout--;
uint8_t cmd[] = {CMD_RDSTA, 0x00};
uint8_t ret[2];
gpioPin_clear(&cfg->cs);
spi_transfer(cfg->spi, cmd, ret, 2);
gpioPin_set(&cfg->cs);
/* If busy flag is low, we're done */
if((ret[1] & 0x01) == 0)
return 0;
}
return -EIO;
}
static inline void enableWrite(const struct W25QxCfg *cfg)
{
const uint8_t cmd = CMD_WREN;
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, &cmd, 1);
gpioPin_set(&cfg->cs);
delayUs(5);
}
void W25Qx_init(const struct nvmDevice *dev)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
gpioPin_setMode(&cfg->cs, OUTPUT);
gpioPin_set(&cfg->cs);
// TODO: Implement sleep to increase power saving
W25Qx_wakeup(dev);
#ifdef CONFIG_W25Qx_EXT_ADDR
const uint8_t cmd = CMD_EXADD;
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, &cmd, 1);
gpioPin_set(&cfg->cs);
#endif
}
void W25Qx_terminate(const struct nvmDevice *dev)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
W25Qx_sleep(dev);
gpioPin_setMode(&cfg->cs, INPUT);
}
void W25Qx_wakeup(const struct nvmDevice *dev)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
const uint8_t cmd = CMD_WKUP;
spi_acquire(cfg->spi);
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, &cmd, 1);
gpioPin_set(&cfg->cs);
spi_release(cfg->spi);
}
void W25Qx_sleep(const struct nvmDevice *dev)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
const uint8_t cmd = CMD_PDWN;
spi_acquire(cfg->spi);
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, &cmd, 1);
gpioPin_set(&cfg->cs);
spi_release(cfg->spi);
}
static int nvm_api_readSecReg(const struct nvmDevice *dev, uint32_t offset, void *data, size_t len)
{
const struct W25QxSecRegDevice *pDev = (const struct W25QxSecRegDevice *) dev;
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
// Keep 256-byte boundary to avoid wrap-around when reading
size_t readLen = len;
if((offset + len) > 0xFF)
{
readLen = 0xFF - (offset & 0xFF);
}
uint32_t address = pDev->baseAddr + offset;
const uint8_t command[] =
{
CMD_RSECR, // Command
(address >> 16) & 0xFF, // Address high
(address >> 8) & 0xFF, // Address middle
address & 0xFF, // Address low
0x00 // Dummy byte
};
spi_acquire(cfg->spi);
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, command, sizeof(command));
spi_receive(cfg->spi, data, readLen);
gpioPin_set(&cfg->cs);
spi_release(cfg->spi);
return 0;
}
static int nvm_api_read(const struct nvmDevice *dev, uint32_t offset, void *data, size_t len)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
const uint8_t command[] =
{
CMD_READ, // Command
#ifdef CONFIG_W25Qx_EXT_ADDR
(offset >> 24) & 0xFF, // Address 31:24
#endif
(offset >> 16) & 0xFF, // Address high
(offset >> 8) & 0xFF, // Address middle
offset & 0xFF, // Address low
};
spi_acquire(cfg->spi);
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, command, sizeof(command));
spi_receive(cfg->spi, data, len);
gpioPin_set(&cfg->cs);
spi_release(cfg->spi);
return 0;
}
static int nvm_api_erase(const struct nvmDevice *dev, uint32_t offset, size_t size)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
// Addr or size not aligned to sector size
if(((offset % SECT_SIZE) != 0) || ((size % SECT_SIZE) != 0))
return -EINVAL;
spi_acquire(cfg->spi);
int ret = 0;
while(size > 0)
{
// Write enable, has to be issued for each erase operation
enableWrite(cfg);
// Sector erase
const uint8_t command[] =
{
CMD_ESECT, // Command
#ifdef CONFIG_W25Qx_EXT_ADDR
(offset >> 24) & 0xFF, // Address 31:24
#endif
(offset >> 16) & 0xFF, // Address high
(offset >> 8) & 0xFF, // Address middle
offset & 0xFF, // Address low
};
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, command, sizeof(command));
gpioPin_set(&cfg->cs);
ret = waitUntilReady(cfg, 500);
if(ret < 0)
break;
size -= SECT_SIZE;
offset += SECT_SIZE;
}
spi_release(cfg->spi);
return ret;
}
static ssize_t W25Qx_writePage(const struct nvmDevice *dev, uint32_t addr,
const void* buf, size_t len)
{
const struct W25QxCfg *cfg = (const struct W25QxCfg *) dev->priv;
// Keep page boundary to avoid wrap-around when writing
size_t addrRange = addr & (PAGE_SIZE - 1);
size_t writeLen = len;
if((addrRange + len) > PAGE_SIZE)
{
writeLen = PAGE_SIZE - addrRange;
}
// Write enable bit has to be set before each page program
enableWrite(cfg);
// Page program
const uint8_t command[] =
{
CMD_WRITE, // Command
#ifdef CONFIG_W25Qx_EXT_ADDR
(addr >> 24) & 0xFF, // Address 31:24
#endif
(addr >> 16) & 0xFF, // Address high
(addr >> 8) & 0xFF, // Address middle
addr & 0xFF, // Address low
};
gpioPin_clear(&cfg->cs);
spi_send(cfg->spi, command, sizeof(command));
spi_send(cfg->spi, buf, writeLen);
gpioPin_set(&cfg->cs);
// Wait until write terminates, timeout after 500ms.
int ret = waitUntilReady(cfg, 500);
spi_release(cfg->spi);
if(ret < 0)
return (ssize_t) ret;
else
return writeLen;
}
static int nvm_api_write(const struct nvmDevice *dev, uint32_t offset, const void *data, size_t len)
{
while(len > 0)
{
// Maximum single-shot write length is one page
size_t toWrite = len;
if(toWrite >= PAGE_SIZE)
toWrite = PAGE_SIZE;
ssize_t written = W25Qx_writePage(dev, offset, data, toWrite);
if(written < 0)
return (int) written;
len -= (size_t) written;
data = ((const uint8_t *) data) + (size_t) written;
offset += (size_t) written;
}
return 0;
}
const struct nvmOps W25Qx_ops =
{
.read = nvm_api_read,
.write = nvm_api_write,
.erase = nvm_api_erase,
.sync = NULL,
};
const struct nvmOps W25Qx_secReg_ops =
{
.read = nvm_api_readSecReg,
.write = NULL,
.erase = NULL,
.sync = NULL,
};
const struct nvmInfo W25Qx_info =
{
.write_size = 1,
.erase_size = SECT_SIZE,
.erase_cycles = 100000,
.device_info = NVM_FLASH | NVM_WRITE | NVM_BITWRITE | NVM_ERASE
};
const struct nvmInfo W25Qx_secReg_info =
{
.write_size = 0,
.erase_size = 0,
.erase_cycles = 0,
.device_info = NVM_FLASH
};