| /* |
| * Copyright (c) 2016-2018, ARM Limited and Contributors. All rights reserved. |
| * |
| * SPDX-License-Identifier: BSD-3-Clause |
| * |
| * Defines a simple and generic interface to access eMMC device. |
| */ |
| |
| #include <arch_helpers.h> |
| #include <assert.h> |
| #include <debug.h> |
| #include <emmc.h> |
| #include <errno.h> |
| #include <string.h> |
| #include <utils.h> |
| |
| static const emmc_ops_t *ops; |
| static unsigned int emmc_ocr_value; |
| static emmc_csd_t emmc_csd; |
| static unsigned int emmc_flags; |
| |
| static int is_cmd23_enabled(void) |
| { |
| return (!!(emmc_flags & EMMC_FLAG_CMD23)); |
| } |
| |
| static int emmc_device_state(void) |
| { |
| emmc_cmd_t cmd; |
| int ret; |
| |
| do { |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD13; |
| cmd.cmd_arg = EMMC_FIX_RCA << RCA_SHIFT_OFFSET; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| assert((cmd.resp_data[0] & STATUS_SWITCH_ERROR) == 0); |
| /* Ignore improbable errors in release builds */ |
| (void)ret; |
| } while ((cmd.resp_data[0] & STATUS_READY_FOR_DATA) == 0); |
| return EMMC_GET_STATE(cmd.resp_data[0]); |
| } |
| |
| static void emmc_set_ext_csd(unsigned int ext_cmd, unsigned int value) |
| { |
| emmc_cmd_t cmd; |
| int ret, state; |
| |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD6; |
| cmd.cmd_arg = EXTCSD_WRITE_BYTES | EXTCSD_CMD(ext_cmd) | |
| EXTCSD_VALUE(value) | 1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| /* wait to exit PRG state */ |
| do { |
| state = emmc_device_state(); |
| } while (state == EMMC_STATE_PRG); |
| /* Ignore improbable errors in release builds */ |
| (void)ret; |
| } |
| |
| static void emmc_set_ios(int clk, int bus_width) |
| { |
| int ret; |
| |
| /* set IO speed & IO bus width */ |
| if (emmc_csd.spec_vers == 4) |
| emmc_set_ext_csd(CMD_EXTCSD_BUS_WIDTH, bus_width); |
| ret = ops->set_ios(clk, bus_width); |
| assert(ret == 0); |
| /* Ignore improbable errors in release builds */ |
| (void)ret; |
| } |
| |
| static int emmc_enumerate(int clk, int bus_width) |
| { |
| emmc_cmd_t cmd; |
| int ret, state; |
| |
| ops->init(); |
| |
| /* CMD0: reset to IDLE */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD0; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| while (1) { |
| /* CMD1: get OCR register */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD1; |
| cmd.cmd_arg = OCR_SECTOR_MODE | OCR_VDD_MIN_2V7 | |
| OCR_VDD_MIN_1V7; |
| cmd.resp_type = EMMC_RESPONSE_R3; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| emmc_ocr_value = cmd.resp_data[0]; |
| if (emmc_ocr_value & OCR_POWERUP) |
| break; |
| } |
| |
| /* CMD2: Card Identification */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD2; |
| cmd.resp_type = EMMC_RESPONSE_R2; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| /* CMD3: Set Relative Address */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD3; |
| cmd.cmd_arg = EMMC_FIX_RCA << RCA_SHIFT_OFFSET; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| /* CMD9: CSD Register */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD9; |
| cmd.cmd_arg = EMMC_FIX_RCA << RCA_SHIFT_OFFSET; |
| cmd.resp_type = EMMC_RESPONSE_R2; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| memcpy(&emmc_csd, &cmd.resp_data, sizeof(cmd.resp_data)); |
| |
| /* CMD7: Select Card */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD7; |
| cmd.cmd_arg = EMMC_FIX_RCA << RCA_SHIFT_OFFSET; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| /* wait to TRAN state */ |
| do { |
| state = emmc_device_state(); |
| } while (state != EMMC_STATE_TRAN); |
| |
| emmc_set_ios(clk, bus_width); |
| return ret; |
| } |
| |
| size_t emmc_read_blocks(int lba, uintptr_t buf, size_t size) |
| { |
| emmc_cmd_t cmd; |
| int ret; |
| |
| assert((ops != 0) && |
| (ops->read != 0) && |
| ((buf & EMMC_BLOCK_MASK) == 0) && |
| ((size & EMMC_BLOCK_MASK) == 0)); |
| |
| inv_dcache_range(buf, size); |
| ret = ops->prepare(lba, buf, size); |
| assert(ret == 0); |
| |
| if (is_cmd23_enabled()) { |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| /* set block count */ |
| cmd.cmd_idx = EMMC_CMD23; |
| cmd.cmd_arg = size / EMMC_BLOCK_SIZE; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD18; |
| } else { |
| if (size > EMMC_BLOCK_SIZE) |
| cmd.cmd_idx = EMMC_CMD18; |
| else |
| cmd.cmd_idx = EMMC_CMD17; |
| } |
| if ((emmc_ocr_value & OCR_ACCESS_MODE_MASK) == OCR_BYTE_MODE) |
| cmd.cmd_arg = lba * EMMC_BLOCK_SIZE; |
| else |
| cmd.cmd_arg = lba; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| ret = ops->read(lba, buf, size); |
| assert(ret == 0); |
| |
| /* wait buffer empty */ |
| emmc_device_state(); |
| |
| if (is_cmd23_enabled() == 0) { |
| if (size > EMMC_BLOCK_SIZE) { |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD12; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| } |
| } |
| /* Ignore improbable errors in release builds */ |
| (void)ret; |
| return size; |
| } |
| |
| size_t emmc_write_blocks(int lba, const uintptr_t buf, size_t size) |
| { |
| emmc_cmd_t cmd; |
| int ret; |
| |
| assert((ops != 0) && |
| (ops->write != 0) && |
| ((buf & EMMC_BLOCK_MASK) == 0) && |
| ((size & EMMC_BLOCK_MASK) == 0)); |
| |
| clean_dcache_range(buf, size); |
| ret = ops->prepare(lba, buf, size); |
| assert(ret == 0); |
| |
| if (is_cmd23_enabled()) { |
| /* set block count */ |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD23; |
| cmd.cmd_arg = size / EMMC_BLOCK_SIZE; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD25; |
| } else { |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| if (size > EMMC_BLOCK_SIZE) |
| cmd.cmd_idx = EMMC_CMD25; |
| else |
| cmd.cmd_idx = EMMC_CMD24; |
| } |
| if ((emmc_ocr_value & OCR_ACCESS_MODE_MASK) == OCR_BYTE_MODE) |
| cmd.cmd_arg = lba * EMMC_BLOCK_SIZE; |
| else |
| cmd.cmd_arg = lba; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| ret = ops->write(lba, buf, size); |
| assert(ret == 0); |
| |
| /* wait buffer empty */ |
| emmc_device_state(); |
| |
| if (is_cmd23_enabled() == 0) { |
| if (size > EMMC_BLOCK_SIZE) { |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD12; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| } |
| } |
| /* Ignore improbable errors in release builds */ |
| (void)ret; |
| return size; |
| } |
| |
| size_t emmc_erase_blocks(int lba, size_t size) |
| { |
| emmc_cmd_t cmd; |
| int ret, state; |
| |
| assert(ops != 0); |
| assert((size != 0) && ((size % EMMC_BLOCK_SIZE) == 0)); |
| |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD35; |
| cmd.cmd_arg = lba; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD36; |
| cmd.cmd_arg = lba + (size / EMMC_BLOCK_SIZE) - 1; |
| cmd.resp_type = EMMC_RESPONSE_R1; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| zeromem(&cmd, sizeof(emmc_cmd_t)); |
| cmd.cmd_idx = EMMC_CMD38; |
| cmd.resp_type = EMMC_RESPONSE_R1B; |
| ret = ops->send_cmd(&cmd); |
| assert(ret == 0); |
| |
| /* wait to TRAN state */ |
| do { |
| state = emmc_device_state(); |
| } while (state != EMMC_STATE_TRAN); |
| /* Ignore improbable errors in release builds */ |
| (void)ret; |
| return size; |
| } |
| |
| static inline void emmc_rpmb_enable(void) |
| { |
| emmc_set_ext_csd(CMD_EXTCSD_PARTITION_CONFIG, |
| PART_CFG_BOOT_PARTITION1_ENABLE | |
| PART_CFG_PARTITION1_ACCESS); |
| } |
| |
| static inline void emmc_rpmb_disable(void) |
| { |
| emmc_set_ext_csd(CMD_EXTCSD_PARTITION_CONFIG, |
| PART_CFG_BOOT_PARTITION1_ENABLE); |
| } |
| |
| size_t emmc_rpmb_read_blocks(int lba, uintptr_t buf, size_t size) |
| { |
| size_t size_read; |
| |
| emmc_rpmb_enable(); |
| size_read = emmc_read_blocks(lba, buf, size); |
| emmc_rpmb_disable(); |
| return size_read; |
| } |
| |
| size_t emmc_rpmb_write_blocks(int lba, const uintptr_t buf, size_t size) |
| { |
| size_t size_written; |
| |
| emmc_rpmb_enable(); |
| size_written = emmc_write_blocks(lba, buf, size); |
| emmc_rpmb_disable(); |
| return size_written; |
| } |
| |
| size_t emmc_rpmb_erase_blocks(int lba, size_t size) |
| { |
| size_t size_erased; |
| |
| emmc_rpmb_enable(); |
| size_erased = emmc_erase_blocks(lba, size); |
| emmc_rpmb_disable(); |
| return size_erased; |
| } |
| |
| void emmc_init(const emmc_ops_t *ops_ptr, int clk, int width, |
| unsigned int flags) |
| { |
| assert((ops_ptr != 0) && |
| (ops_ptr->init != 0) && |
| (ops_ptr->send_cmd != 0) && |
| (ops_ptr->set_ios != 0) && |
| (ops_ptr->prepare != 0) && |
| (ops_ptr->read != 0) && |
| (ops_ptr->write != 0) && |
| (clk != 0) && |
| ((width == EMMC_BUS_WIDTH_1) || |
| (width == EMMC_BUS_WIDTH_4) || |
| (width == EMMC_BUS_WIDTH_8) || |
| (width == EMMC_BUS_WIDTH_DDR_4) || |
| (width == EMMC_BUS_WIDTH_DDR_8))); |
| ops = ops_ptr; |
| emmc_flags = flags; |
| |
| emmc_enumerate(clk, width); |
| } |