X-Git-Url: https://codewiz.org/gitweb?a=blobdiff_plain;f=bertos%2Fdrv%2Fsd.c;h=820873eda9478a27cf6fcbcf1b1fbe6804c8655e;hb=976d522209efc4c11a019ae6b34657b6b3f59ba0;hp=9880dfe15cabde7e7c35b11d1b09f27349e3f088;hpb=3715319745d93d6f552b72a5321e8dc3b595a96d;p=bertos.git diff --git a/bertos/drv/sd.c b/bertos/drv/sd.c index 9880dfe1..820873ed 100644 --- a/bertos/drv/sd.c +++ b/bertos/drv/sd.c @@ -37,283 +37,20 @@ #include "sd.h" #include "hw/hw_sd.h" -#include -#include -#include - -#include - #include "cfg/cfg_sd.h" #define LOG_LEVEL SD_LOG_LEVEL #define LOG_FORMAT SD_LOG_FORMAT #include -#include - -#include /* memset */ - -/** - * Card Specific Data - * read directly from the card. - */ -typedef struct CardCSD -{ - uint16_t block_len; ///< Length of a block - uint32_t block_num; ///< Number of block on the card - uint16_t capacity; ///< Card capacity in MB -} CardCSD; - -#define SD_IN_IDLE 0x01 -#define SD_STARTTOKEN 0xFE - -#define TIMEOUT_NAC 16384 -#define SD_DEFAULT_BLOCKLEN 512 - -#define SD_BUSY_TIMEOUT ms_to_ticks(200) - -static bool sd_select(Sd *sd, bool state) -{ - KFile *fd = sd->ch; - - if (state) - { - SD_CS_ON(); - - ticks_t start = timer_clock(); - do - { - if (kfile_getc(fd) == 0xff) - return true; - - cpu_relax(); - } - while (timer_clock() - start < SD_BUSY_TIMEOUT); - - SD_CS_OFF(); - LOG_ERR("sd_select timeout\n"); - return false; - } - else - { - kfile_putc(0xff, fd); - kfile_flush(fd); - SD_CS_OFF(); - return true; - } -} - -static int16_t sd_waitR1(Sd *sd) -{ - uint8_t datain; - - for (int i = 0; i < TIMEOUT_NAC; i++) - { - datain = kfile_getc(sd->ch); - if (datain != 0xff) - return (int16_t)datain; - } - LOG_ERR("Timeout waiting R1\n"); - return EOF; -} - -static int16_t sd_sendCommand(Sd *sd, uint8_t cmd, uint32_t param, uint8_t crc) -{ - KFile *fd = sd->ch; - /* The 7th bit of command must be a 1 */ - kfile_putc(cmd | 0x40, fd); - - /* send parameter */ - kfile_putc((param >> 24) & 0xFF, fd); - kfile_putc((param >> 16) & 0xFF, fd); - kfile_putc((param >> 8) & 0xFF, fd); - kfile_putc((param) & 0xFF, fd); - - kfile_putc(crc, fd); - - return sd_waitR1(sd); -} - -static bool sd_getBlock(Sd *sd, void *buf, size_t len) -{ - uint8_t token; - uint16_t crc; - - KFile *fd = sd->ch; - - for (int i = 0; i < TIMEOUT_NAC; i++) - { - token = kfile_getc(fd); - if (token != 0xff) - { - if (token == SD_STARTTOKEN) - { - if (kfile_read(fd, buf, len) == len) - { - if (kfile_read(fd, &crc, sizeof(crc)) == sizeof(crc)) - /* check CRC here if needed */ - return true; - else - LOG_ERR("get_block error getting crc\n"); - } - else - LOG_ERR("get_block len error: %d\n", (int)len); - } - else - LOG_ERR("get_block token error: %02X\n", token); - - return false; - } - } - - LOG_ERR("get_block timeout waiting token\n"); - return false; -} - -#define SD_SELECT(sd) \ -do \ -{ \ - if (!sd_select((sd), true)) \ - { \ - LOG_ERR("%s failed, card busy\n", __func__); \ - return EOF; \ - } \ -} \ -while (0) - -#define SD_SETBLOCKLEN 0x50 - -static int16_t sd_setBlockLen(Sd *sd, uint32_t newlen) -{ - SD_SELECT(sd); - - sd->r1 = sd_sendCommand(sd, SD_SETBLOCKLEN, newlen, 0); - - sd_select(sd, false); - return sd->r1; -} - -#define SD_SEND_CSD 0x49 - -static int16_t sd_getCSD(Sd *sd, CardCSD *csd) -{ - SD_SELECT(sd); - - int16_t r1 = sd_sendCommand(sd, SD_SEND_CSD, 0, 0); - - if (r1) - { - LOG_ERR("send_csd failed: %04X\n", sd->r1); - sd_select(sd, false); - return r1; - } - - uint8_t buf[16]; - bool res = sd_getBlock(sd, buf, sizeof(buf)); - sd_select(sd, false); - - if (res) - { - #if LOG_LEVEL >= LOG_LVL_INFO - LOG_INFO("CSD: ["); - for (int i = 0; i < 16; i++) - kprintf("%02X ", buf[i]); - kprintf("]\n"); - #endif - - uint16_t mult = (1L << ((((buf[9] & 0x03) << 1) | ((buf[10] & 0x80) >> 7)) + 2)); - uint16_t c_size = (((uint16_t)(buf[6] & 0x03)) << 10) | (((uint16_t)buf[7]) << 2) | - (((uint16_t)(buf[8] & 0xC0)) >> 6); - - csd->block_len = (1L << (buf[5] & 0x0F)); - csd->block_num = (c_size + 1) * mult; - csd->capacity = (csd->block_len * csd->block_num) >> 20; // in MB - - LOG_INFO("block_len %d bytes, block_num %ld, total capacity %dMB\n", csd->block_len, csd->block_num, csd->capacity); - return 0; - } - else - return EOF; -} - - -#define SD_READ_SINGLEBLOCK 0x51 - -static size_t sd_readDirect(struct KBlock *b, block_idx_t idx, void *buf, size_t offset, size_t size) -{ - Sd *sd = SD_CAST(b); - LOG_INFO("reading from block %ld, offset %d, size %d\n", idx, offset, size); - - if ((sd->r1 = sd_setBlockLen(sd, size))) - { - LOG_ERR("setBlockLen failed: %04X\n", sd->r1); - return 0; - } - - SD_SELECT(sd); - - sd->r1 = sd_sendCommand(sd, SD_READ_SINGLEBLOCK, idx * SD_DEFAULT_BLOCKLEN + offset, 0); - - if (sd->r1) - { - LOG_ERR("read single block failed: %04X\n", sd->r1); - sd_select(sd, false); - return 0; - } - - bool res = sd_getBlock(sd, buf, size); - sd_select(sd, false); - if (!res) - { - LOG_ERR("read single block failed reading data\n"); - return 0; - } - else - return size; -} -#define SD_WRITE_SINGLEBLOCK 0x58 -#define SD_DATA_ACCEPTED 0x05 - -static int sd_writeBlock(KBlock *b, block_idx_t idx, const void *buf) -{ - Sd *sd = SD_CAST(b); - KFile *fd = sd->ch; - - LOG_INFO("writing block %ld\n", idx); - if ((sd->r1 = sd_setBlockLen(sd, SD_DEFAULT_BLOCKLEN))) - { - LOG_ERR("setBlockLen failed: %04X\n", sd->r1); - return sd->r1; - } - - SD_SELECT(sd); - - sd->r1 = sd_sendCommand(sd, SD_WRITE_SINGLEBLOCK, idx * SD_DEFAULT_BLOCKLEN, 0); - - if (sd->r1) - { - LOG_ERR("write single block failed: %04X\n", sd->r1); - sd_select(sd, false); - return sd->r1; - } - - kfile_putc(SD_STARTTOKEN, fd); - kfile_write(fd, buf, SD_DEFAULT_BLOCKLEN); - /* send fake crc */ - kfile_putc(0, fd); - kfile_putc(0, fd); +#include - uint8_t dataresp = kfile_getc(fd); - sd_select(sd, false); +#include - if ((dataresp & 0x1f) != SD_DATA_ACCEPTED) - { - LOG_ERR("write block %ld failed: %02X\n", idx, dataresp); - return EOF; - } - return 0; -} +#ifdef SD_INCLUDE_SPI_SOURCE + #include +#endif void sd_writeTest(Sd *sd) { @@ -322,16 +59,15 @@ void sd_writeTest(Sd *sd) for (block_idx_t i = 0; i < sd->b.blk_cnt; i++) { - LOG_INFO("writing block %ld: %s\n", i, (sd_writeBlock(&sd->b, i, buf) == 0) ? "OK" : "FAIL"); + LOG_INFO("writing block %ld: %s\n", i, (kblock_read(&sd->b, i, buf, 0, SD_DEFAULT_BLOCKLEN) == SD_DEFAULT_BLOCKLEN) ? "OK" : "FAIL"); } } - bool sd_test(Sd *sd) { uint8_t buf[SD_DEFAULT_BLOCKLEN]; - if (sd_readDirect(&sd->b, 0, buf, 0, sd->b.blk_size) != sd->b.blk_size) + if (kblock_read(&sd->b, 0, buf, 0, sd->b.blk_size) != sd->b.blk_size) return false; kputchar('\n'); @@ -343,11 +79,11 @@ bool sd_test(Sd *sd) kputchar('\n'); } - if (sd_writeBlock(&sd->b, 0, buf) != 0) + if (kblock_write(&sd->b, 0, buf, 0, SD_DEFAULT_BLOCKLEN) != SD_DEFAULT_BLOCKLEN) return false; memset(buf, 0, sizeof(buf)); - if (sd_readDirect(&sd->b, 0, buf, 0, sd->b.blk_size) != sd->b.blk_size) + if (kblock_read(&sd->b, 0, buf, 0, sd->b.blk_size) != sd->b.blk_size) return false; kputchar('\n'); @@ -362,158 +98,5 @@ bool sd_test(Sd *sd) return true; } -static int sd_error(KBlock *b) -{ - Sd *sd = SD_CAST(b); - return sd->r1; -} -static int sd_clearerr(KBlock *b) -{ - Sd *sd = SD_CAST(b); - sd->r1 = 0; - return 0; -} - -static const KBlockVTable sd_unbuffered_vt = -{ - .readDirect = sd_readDirect, - .writeBlock = sd_writeBlock, - - .error = sd_error, - .clearerr = sd_clearerr, -}; - -static const KBlockVTable sd_buffered_vt = -{ - .readDirect = sd_readDirect, - .writeBlock = sd_writeBlock, - - .readBuf = kblock_swReadBuf, - .writeBuf = kblock_swWriteBuf, - .load = kblock_swLoad, - .store = kblock_swStore, - - .error = sd_error, - .clearerr = sd_clearerr, -}; - -#define SD_GO_IDLE_STATE 0x40 -#define SD_GO_IDLE_STATE_CRC 0x95 -#define SD_SEND_OP_COND 0x41 -#define SD_SEND_OP_COND_CRC 0xF9 - -#define SD_START_DELAY ms_to_ticks(10) -#define SD_INIT_TIMEOUT ms_to_ticks(1000) -#define SD_IDLE_RETRIES 4 - -static bool sd_blockInit(Sd *sd, KFile *ch) -{ - ASSERT(sd); - ASSERT(ch); - memset(sd, 0, sizeof(*sd)); - DB(sd->b.priv.type = KBT_SD); - sd->ch = ch; - - SD_CS_INIT(); - SD_CS_OFF(); - - /* Wait a few moments for supply voltage to stabilize */ - timer_delay(SD_START_DELAY); - - /* Give 80 clk pulses to wake up the card */ - for (int i = 0; i < 10; i++) - kfile_putc(0xff, ch); - kfile_flush(ch); - - for (int i = 0; i < SD_IDLE_RETRIES; i++) - { - SD_SELECT(sd); - sd->r1 = sd_sendCommand(sd, SD_GO_IDLE_STATE, 0, SD_GO_IDLE_STATE_CRC); - sd_select(sd, false); - - if (sd->r1 == SD_IN_IDLE) - break; - } - - if (sd->r1 != SD_IN_IDLE) - { - LOG_ERR("go_idle_state failed: %04X\n", sd->r1); - return false; - } - - ticks_t start = timer_clock(); - - /* Wait for card to start */ - do - { - SD_SELECT(sd); - sd->r1 = sd_sendCommand(sd, SD_SEND_OP_COND, 0, SD_SEND_OP_COND_CRC); - sd_select(sd, false); - cpu_relax(); - } - while (sd->r1 != 0 && timer_clock() - start < SD_INIT_TIMEOUT); - - if (sd->r1) - { - LOG_ERR("send_op_cond failed: %04X\n", sd->r1); - return false; - } - - sd->r1 = sd_setBlockLen(sd, SD_DEFAULT_BLOCKLEN); - - if (sd->r1) - { - LOG_ERR("setBlockLen failed: %04X\n", sd->r1); - return false; - } - - /* Avoid warning for uninitialized csd use (gcc bug?) */ - CardCSD csd = csd; - - sd->r1 = sd_getCSD(sd, &csd); - - if (sd->r1) - { - LOG_ERR("getCSD failed: %04X\n", sd->r1); - return false; - } - - sd->b.blk_size = SD_DEFAULT_BLOCKLEN; - sd->b.blk_cnt = csd.block_num * (csd.block_len / SD_DEFAULT_BLOCKLEN); - LOG_INFO("blk_size %d, blk_cnt %ld\n", sd->b.blk_size, sd->b.blk_cnt); - -#if CONFIG_SD_AUTOASSIGN_FAT - disk_assignDrive(&sd->b, 0); -#endif - - return true; -} - -bool sd_initUnbuf(Sd *sd, KFile *ch) -{ - if (sd_blockInit(sd, ch)) - { - sd->b.priv.vt = &sd_unbuffered_vt; - return true; - } - else - return false; -} - -static uint8_t sd_buf[SD_DEFAULT_BLOCKLEN]; - -bool sd_initBuf(Sd *sd, KFile *ch) -{ - if (sd_blockInit(sd, ch)) - { - sd->b.priv.buf = sd_buf; - sd->b.priv.flags |= KB_BUFFERED; - sd->b.priv.vt = &sd_buffered_vt; - sd->b.priv.vt->load(&sd->b, 0); - return true; - } - else - return false; -}