/* * (C) Copyright 2013-2016 * Allwinner Technology Co., Ltd. * */ /* * (C) Copyright 2007-2012 * Allwinner Technology Co., Ltd. * * Description: MMC driver for General mmc operations * Author: Aaron * Date: 2012-2-3 14:18:18 */ #include "mmc_def.h" #include "mmc_bsp.h" #include "mmc.h" #include #include /* Set block count limit because of 16 bit register limit on some hardware*/ #ifndef CONFIG_SYS_MMC_MAX_BLK_COUNT #define CONFIG_SYS_MMC_MAX_BLK_COUNT 65535 #endif unsigned char mmc_arg_addr[SUNXI_SDMMC_PARAMETER_REGION_SIZE_BYTE]; extern int mmc_config_addr; /*extern const boot0_file_head_t BT0_head; */ static struct mmc *mmc_devices[MAX_MMC_NUM]; int mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd, struct mmc_data *data) { return mmc->send_cmd(mmc, cmd, data); } int mmc_send_status(struct mmc *mmc, int timeout) { struct mmc_cmd cmd; int err; cmd.cmdidx = MMC_CMD_SEND_STATUS; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = mmc->rca << 16; cmd.flags = 0; do { err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d Send status failed\n", mmc->control_num); return err; } else if (cmd.response[0] & MMC_STATUS_RDY_FOR_DATA) break; mdelay(1); if (cmd.response[0] & MMC_STATUS_MASK) { mmcinfo("mmc %d Status Error: 0x%08X\n", mmc->control_num, cmd.response[0]); return COMM_ERR; } } while (timeout--); if (!timeout) { mmcinfo("mmc %d Timeout waiting card ready\n", mmc->control_num); return TIMEOUT; } return 0; } int mmc_set_blocklen(struct mmc *mmc, int len) { struct mmc_cmd cmd; /* don't set blocklen at ddr mode */ if ((mmc->speed_mode == HSDDR52_DDR50) || (mmc->speed_mode == HS400)) { return 0; } cmd.cmdidx = MMC_CMD_SET_BLOCKLEN; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = len; cmd.flags = 0; return mmc_send_cmd(mmc, &cmd, NULL); } struct mmc *find_mmc_device(int dev_num) { if (mmc_devices[dev_num] != NULL) return mmc_devices[dev_num]; mmcinfo("MMC Device %d not found\n", dev_num); return NULL; } int mmc_read_blocks(struct mmc *mmc, void *dst, unsigned long start, unsigned blkcnt) { struct mmc_cmd cmd; struct mmc_data data; int timeout = 1000; if (blkcnt > 1) cmd.cmdidx = MMC_CMD_READ_MULTIPLE_BLOCK; else cmd.cmdidx = MMC_CMD_READ_SINGLE_BLOCK; if (mmc->high_capacity) cmd.cmdarg = start; else cmd.cmdarg = start * mmc->read_bl_len; cmd.resp_type = MMC_RSP_R1; cmd.flags = 0; data.b.dest = dst; data.blocks = blkcnt; data.blocksize = mmc->read_bl_len; data.flags = MMC_DATA_READ; if (mmc_send_cmd(mmc, &cmd, &data)) { mmcinfo("mmc %d read blcok failed\n", mmc->control_num); return 0; } if (blkcnt > 1) { cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION; cmd.cmdarg = 0; cmd.resp_type = MMC_RSP_R1b; cmd.flags = 0; if (mmc_send_cmd(mmc, &cmd, NULL)) { mmcinfo("mmc %d fail to send stop cmd\n", mmc->control_num); return 0; } /* Waiting for the ready status */ mmc_send_status(mmc, timeout); } return blkcnt; } unsigned long mmc_bread(int dev_num, unsigned long start, unsigned blkcnt, void *dst) { unsigned cur, blocks_todo = blkcnt; struct mmc *mmc = find_mmc_device(dev_num); if (blkcnt == 0) { mmcinfo("mmc %d blkcnt should not be 0\n", mmc->control_num); return 0; } if (!mmc) { mmcinfo("Can not find mmc dev %d\n", dev_num); return 0; } if ((start + blkcnt) > mmc->lba) { mmcinfo("mmc %d: block number 0x%x exceeds max(0x%x)\n", mmc->control_num, (unsigned int)(start + blkcnt), (unsigned int)mmc->lba); return 0; } if (mmc_set_blocklen(mmc, mmc->read_bl_len)) { mmcinfo("mmc %d Set block len failed\n", mmc->control_num); return 0; } do { cur = (blocks_todo > mmc->b_max) ? mmc->b_max : blocks_todo; if (mmc_read_blocks(mmc, dst, start, cur) != cur) { mmcinfo("mmc %d block read failed\n", mmc->control_num); return 0; } blocks_todo -= cur; start += cur; /*dst += cur * mmc->read_bl_len; */ dst = (char *)dst + cur * mmc->read_bl_len; } while (blocks_todo > 0); return blkcnt; } int mmc_go_idle(struct mmc *mmc) { struct mmc_cmd cmd; int err; mdelay(1); cmd.cmdidx = MMC_CMD_GO_IDLE_STATE; cmd.cmdarg = 0; cmd.resp_type = MMC_RSP_NONE; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d go idle failed\n", mmc->control_num); return err; } mdelay(2); return 0; } int sd_send_op_cond(struct mmc *mmc) { int timeout = 1000; int err; struct mmc_cmd cmd; do { cmd.cmdidx = MMC_CMD_APP_CMD; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = 0; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send app cmd failed\n", mmc->control_num); return err; } cmd.cmdidx = SD_CMD_APP_SEND_OP_COND; cmd.resp_type = MMC_RSP_R3; /* * Most cards do not answer if some reserved bits * in the ocr are set. However, Some controller * can set bit 7 (reserved for low voltages), but * how to manage low voltages SD card is not yet * specified. */ cmd.cmdarg = mmc_host_is_spi(mmc) ? 0 : (mmc->voltages & 0xff8000); if (mmc->version == SD_VERSION_2) cmd.cmdarg |= OCR_HCS; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send cmd41 failed\n", mmc->control_num); return err; } mdelay(1); } while ((!(cmd.response[0] & OCR_BUSY)) && timeout--); if (timeout <= 0) { mmcinfo("mmc %d wait card init failed\n", mmc->control_num); return UNUSABLE_ERR; } if (mmc->version != SD_VERSION_2) mmc->version = SD_VERSION_1_0; if (mmc_host_is_spi(mmc)) { /* read OCR for spi */ cmd.cmdidx = MMC_CMD_SPI_READ_OCR; cmd.resp_type = MMC_RSP_R3; cmd.cmdarg = 0; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d spi read ocr failed\n", mmc->control_num); return err; } } mmc->ocr = cmd.response[0]; mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS); mmc->rca = 0; return 0; } int mmc_send_op_cond(struct mmc *mmc) { int timeout = 10000; struct mmc_cmd cmd; int err; /* Some cards seem to need this */ mmc_go_idle(mmc); /* Asking to the card its capabilities */ cmd.cmdidx = MMC_CMD_SEND_OP_COND; cmd.resp_type = MMC_RSP_R3; cmd.cmdarg = 0; /*0x40ff8000;*/ /*foresee */ cmd.flags = 0; /*mmcinfo("mmc send op cond arg not zero !!!\n"); */ err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send op cond failed\n", mmc->control_num); return err; } mdelay(1); do { cmd.cmdidx = MMC_CMD_SEND_OP_COND; cmd.resp_type = MMC_RSP_R3; cmd.cmdarg = (mmc_host_is_spi(mmc) ? 0 : (mmc->voltages & (cmd.response[0] & OCR_VOLTAGE_MASK)) | (cmd.response[0] & OCR_ACCESS_MODE)); if (mmc->host_caps & MMC_MODE_HC) cmd.cmdarg |= OCR_HCS; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send op cond failed\n", mmc->control_num); return err; } mdelay(1); } while (!(cmd.response[0] & OCR_BUSY) && timeout--); if (timeout <= 0) { mmcinfo("mmc %d wait for mmc init failed\n", mmc->control_num); return UNUSABLE_ERR; } if (mmc_host_is_spi(mmc)) { /* read OCR for spi */ cmd.cmdidx = MMC_CMD_SPI_READ_OCR; cmd.resp_type = MMC_RSP_R3; cmd.cmdarg = 0; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) return err; } mmc->version = MMC_VERSION_UNKNOWN; mmc->ocr = cmd.response[0]; mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS); mmc->rca = 1; return 0; } int mmc_send_ext_csd(struct mmc *mmc, u8 *ext_csd) { struct mmc_cmd cmd; struct mmc_data data; int err; /* Get the Card Status Register */ cmd.cmdidx = MMC_CMD_SEND_EXT_CSD; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = 0; cmd.flags = 0; data.b.dest = (char *)ext_csd; data.blocks = 1; data.blocksize = 512; data.flags = MMC_DATA_READ; err = mmc_send_cmd(mmc, &cmd, &data); if (err) mmcinfo("mmc %d send ext csd failed\n", mmc->control_num); return err; } int mmc_update_phase(struct mmc *mmc) { if (mmc->update_phase == NULL) return 0; return mmc->update_phase(mmc); } int mmc_switch(struct mmc *mmc, u8 set, u8 index, u8 value) { struct mmc_cmd cmd; int timeout = 1000; int ret; cmd.cmdidx = MMC_CMD_SWITCH; cmd.resp_type = MMC_RSP_R1b; cmd.cmdarg = (MMC_SWITCH_MODE_WRITE_BYTE << 24) | (index << 16) | (value << 8); cmd.flags = 0; ret = mmc_send_cmd(mmc, &cmd, NULL); if (ret) { mmcinfo("mmc %d switch failed\n", mmc->control_num); } /* for re-update sample phase */ ret = mmc_update_phase(mmc); if (ret) { mmcinfo("mmc_switch: update clock failed after send cmd6\n"); return ret; } /* Waiting for the ready status */ mmc_send_status(mmc, timeout); return ret; } int mmc_switch_to_ds(struct mmc *mmc) { int err; if (mmc->speed_mode == DS26_SDR12) { mmcdbg("already at DS26_SDR12 mode\n"); return 0; } if (!(mmc->host_caps & MMC_MODE_HS)) { mmcinfo("host not support ds\n"); return -1; } if (!(mmc->cardtype & EXT_CSD_CARD_TYPE_HS_26)) { mmcinfo("mmc not support ds\n"); return -1; } err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, EXT_CSD_TIMING_BC); if (err) { mmcinfo("mmc change to ds failed\n"); return err; } mmc->speed_mode = DS26_SDR12; return 0; } int mmc_switch_to_hs(struct mmc *mmc) { int err; if (mmc->speed_mode == HSSDR52_SDR25) { mmcdbg("already at HSSDR52_SDR25 mode\n"); return 0; } if (!(mmc->host_caps & MMC_MODE_HS_52MHz)) { mmcinfo("host not support hs\n"); return -1; } if (!(mmc->cardtype & (EXT_CSD_CARD_TYPE_HS|EXT_CSD_CARD_TYPE_DDR_1_8V))) { mmcinfo("mmc not support hs\n"); return -1; } err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, EXT_CSD_TIMING_HS); if (err) { mmcinfo("mmc change to hs failed\n"); return err; } mmc->speed_mode = HSSDR52_SDR25; return 0; } int mmc_switch_to_hs200(struct mmc *mmc) { int err; if (mmc->speed_mode == HS200_SDR104) { mmcdbg("already at HS200_SDR104 mode\n"); return 0; } if (!(mmc->host_caps & MMC_MODE_HS200)) { mmcinfo("host not support hs200\n"); return -1; } if (!(mmc->cardtype & EXT_CSD_CARD_TYPE_HS200_1_8V)) { mmcinfo("mmc not support hs200\n"); return -1; } err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, EXT_CSD_TIMING_HS200); if (err) { mmcinfo("mmc change to hs200 failed\n"); return err; } mmc->speed_mode = HS200_SDR104; return 0; } int mmc_switch_to_hs400(struct mmc *mmc) { int err; if (mmc->speed_mode == HS400) { mmcdbg("already at HS400 mode\n"); return 0; } if (!(mmc->host_caps & MMC_MODE_HS400)) { mmcinfo("host not support hs400\n"); return -1; } if (!(mmc->cardtype & EXT_CSD_CARD_TYPE_HS400_1_8V)) { mmcinfo("mmc not support hs400\n"); return -1; } err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, EXT_CSD_TIMING_HS400); if (err) { mmcinfo("mmc change to hs400 failed\n"); return err; } mmc->speed_mode = HS400; return 0; } int mmc_switch_speed_mode(struct mmc *mmc, int spd_mode) { int ret = 0; if (mmc_host_is_spi(mmc)) return 0; if (spd_mode == DS26_SDR12) ret = mmc_switch_to_ds(mmc); else if (spd_mode == HSSDR52_SDR25) ret = mmc_switch_to_hs(mmc); else if (spd_mode == HS200_SDR104) ret = mmc_switch_to_hs200(mmc); else if (spd_mode == HS400) ret = mmc_switch_to_hs400(mmc); else { ret = -1; mmcinfo("error speed mode %d\n", spd_mode); } return ret; } static int mmc_check_buswidth(struct mmc *mmc, u32 emmc_hs_ddr, u32 bus_width) { int ret = 0; mmcdbg("%s: bus:%d, ddr:%d, spd_md: %d\n", __FUNCTION__, bus_width, emmc_hs_ddr ? 1 : 0, mmc->speed_mode); if (bus_width == 1) { if ((emmc_hs_ddr && (!IS_SD(mmc)) && (mmc->speed_mode == HSSDR52_SDR25)) \ || ((!IS_SD(mmc)) && (mmc->speed_mode == HSDDR52_DDR50)) || ((!IS_SD(mmc)) && (mmc->speed_mode == HS200_SDR104)) \ || ((!IS_SD(mmc)) && (mmc->speed_mode == HS400))) /* don't consider SD3.0. tSD/fSD is SD2.0, 1-bit can be support */ ret = -1; } else if (bus_width == 4) { if (!(mmc->host_caps & MMC_MODE_4BIT)) ret = -1; } else if (bus_width == 8) { if (!(mmc->host_caps & MMC_MODE_8BIT)) ret = -1; if (IS_SD(mmc)) ret = -1; } else { printf("error bus width %d!\n", bus_width); ret = -1; } return ret; } int mmc_switch_bus_width(struct mmc *mmc, int spd_mode, int width) { int err = 0; int emmc_hs_ddr = 0; u32 set_val = 0; /* before enter HS400 mode, emmc has been swtiched to HS-DDR mode with 8-bit bus. * so, don't change bus witdh again. * */ if (spd_mode == HS400) goto OUT; if (spd_mode == HSDDR52_DDR50) emmc_hs_ddr = 1; err = mmc_check_buswidth(mmc, emmc_hs_ddr, width); if (err) { mmcinfo("wrong bus width(%d) for current speed mode\n", width); return -1; } if (width == 1) set_val = EXT_CSD_BUS_WIDTH_1; else if (spd_mode == HSDDR52_DDR50) { if (width == 4) set_val = EXT_CSD_BUS_DDR_4; else if (width == 8) set_val = EXT_CSD_BUS_DDR_8; } else if (width == 4) set_val = EXT_CSD_BUS_WIDTH_4; else if (width == 8) set_val = EXT_CSD_BUS_WIDTH_8; else set_val = EXT_CSD_BUS_WIDTH_1; err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_BUS_WIDTH, set_val); if (err) { mmcinfo("mmc switch bus width failed\n"); return err; } if (spd_mode == HSDDR52_DDR50) { mmc->speed_mode = HSDDR52_DDR50; } mmc_set_bus_width(mmc, width); OUT: return err; } int mmc_switch_bus_mode(struct mmc *mmc, int spd_mode, int width) { int err = 0; int tmp_spd_md = 0; if (IS_SD(mmc)) { return 0; } if (spd_mode == HSDDR52_DDR50) tmp_spd_md = HSSDR52_SDR25; else tmp_spd_md = spd_mode; err = mmc_switch_speed_mode(mmc, tmp_spd_md); if (err) { mmcinfo("switch speed mode fail\n"); return err; } err = mmc_switch_bus_width(mmc, spd_mode, width); if (err) { mmcinfo("switch bus width fail\n"); return err; } if (spd_mode == HSDDR52_DDR50) { mmc->speed_mode = HSDDR52_DDR50; } return err; } int mmc_change_freq(struct mmc *mmc) { u8 ext_csd[512]; int err; int bus_width = 0; int retry = 5; mmc->card_caps = 0; if (mmc_host_is_spi(mmc)) return 0; /* Only version 4 supports high-speed */ if (mmc->version < MMC_VERSION_4) return 0; mmc->card_caps |= MMC_MODE_4BIT | MMC_MODE_8BIT; err = mmc_send_ext_csd(mmc, ext_csd); if (err) { mmcinfo("mmc %d get ext csd failed\n", mmc->control_num); return err; } if (mmc->card_caps & MMC_MODE_8BIT) bus_width = 8; else if (mmc->card_caps & MMC_MODE_4BIT) bus_width = 4; else bus_width = 1; /*retry for Toshiba emmc,for the first time Toshiba emmc change to HS */ /*it will return response crc err,so retry */ do { err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, 1); if (!err) { break; } mmcinfo("retry mmc switch(cmd6)\n"); } while (retry--); if (err) { mmcinfo("mmc %d change to hs failed\n", mmc->control_num); return err; } /* Now check to see that it worked */ err = mmc_send_ext_csd(mmc, ext_csd); if (err) { mmcinfo("mmc %d send ext csd faild\n", mmc->control_num); return err; } /* No high-speed support */ if (!ext_csd[185]) return 0; mmc->cardtype = ext_csd[196] & 0xff; if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS400_1_8V) mmc->card_caps |= MMC_MODE_HS400; else { if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS400_1_2V) mmcinfo("Warning! Card only support HS400 1.2V!\n"); } if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS200_1_8V) mmc->card_caps |= MMC_MODE_HS200; else { if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS200_1_2V) mmcinfo("Warning! Card only support HS200 1.2V!\n"); } if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS_52) { if (mmc->cardtype & EXT_CSD_CARD_TYPE_DDR_52) mmc->card_caps |= MMC_MODE_DDR_52MHz; mmc->card_caps |= MMC_MODE_HS_52MHz; } if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS_26) mmc->card_caps |= MMC_MODE_HS; mmcdbg("mmc->card_caps 0x%x, ddr caps:0x%x\n", mmc->card_caps, mmc->card_caps & MMC_MODE_DDR_52MHz); /* Restrict card's capabilities by what the host can do */ mmc->card_caps &= mmc->host_caps; mmcdbg("mmc->card_caps 0x%x, ddr caps:0x%x\n", mmc->card_caps, mmc->card_caps & MMC_MODE_DDR_52MHz); /* switch to specific speed mode */ if (mmc->card_caps & MMC_MODE_HS400) { /* firstly, switch to HS-DDR 8 bit */ err = mmc_switch_bus_mode(mmc, HSDDR52_DDR50, bus_width); if (err) { mmcinfo("switch to DDR speed mode failed\n"); goto OUT; } /* then, switch to HS400 */ err = mmc_switch_bus_mode(mmc, HS400, bus_width); if (err) { mmcinfo("switch to HS400 speed mode failed\n"); goto OUT; } } else if (mmc->card_caps & MMC_MODE_HS200) { err = mmc_switch_bus_mode(mmc, HS200_SDR104, bus_width); if (err) { mmcinfo("switch to HS200 speed mode failed\n"); goto OUT; } } else if (mmc->card_caps & MMC_MODE_DDR_52MHz) { err = mmc_switch_bus_mode(mmc, HSDDR52_DDR50, bus_width); if (err) { mmcinfo("switch to SDR speed mode failed\n"); goto OUT; } } else if (mmc->card_caps & MMC_MODE_HS_52MHz) { err = mmc_switch_bus_mode(mmc, HSSDR52_SDR25, bus_width); if (err) { mmcinfo("switch to SDR speed mode failed\n"); goto OUT; } } if (mmc->card_caps & MMC_MODE_HS400) { mmc->tran_speed = 200000000; } else if (mmc->card_caps & MMC_MODE_HS200) { mmc->tran_speed = 200000000; } else if (mmc->card_caps & MMC_MODE_DDR_52MHz) { mmc->tran_speed = 52000000; } else if (mmc->card_caps & MMC_MODE_HS) { if (mmc->card_caps & MMC_MODE_HS_52MHz) mmc->tran_speed = 52000000; else mmc->tran_speed = 26000000; } else { mmc->tran_speed = 26000000; } OUT: return err; } int mmc_switch_part(int dev_num, unsigned int part_num) { struct mmc *mmc = find_mmc_device(dev_num); if (!mmc) return -1; return mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_PART_CONF, (mmc->part_config & ~PART_ACCESS_MASK) | (part_num & PART_ACCESS_MASK)); } int sd_switch(struct mmc *mmc, int mode, int group, u8 value, u8 *resp) { struct mmc_cmd cmd; struct mmc_data data; /* Switch the frequency */ cmd.cmdidx = SD_CMD_SWITCH_FUNC; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = ((u32)mode << 31) | 0xffffff; cmd.cmdarg &= ~(0xf << (group * 4)); cmd.cmdarg |= value << (group * 4); cmd.flags = 0; data.b.dest = (char *)resp; data.blocksize = 64; data.blocks = 1; data.flags = MMC_DATA_READ; return mmc_send_cmd(mmc, &cmd, &data); } int sd_change_freq(struct mmc *mmc) { int err; struct mmc_cmd cmd; u32 scr[2]; u32 switch_status[16]; struct mmc_data data; int timeout; mmc->card_caps = 0; if (mmc_host_is_spi(mmc)) return 0; /* Read the SCR to find out if this card supports higher speeds */ cmd.cmdidx = MMC_CMD_APP_CMD; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = mmc->rca << 16; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d Send app cmd failed\n", mmc->control_num); return err; } cmd.cmdidx = SD_CMD_APP_SEND_SCR; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = 0; cmd.flags = 0; timeout = 3; retry_scr: data.b.dest = (char *)&scr; data.blocksize = 8; data.blocks = 1; data.flags = MMC_DATA_READ; err = mmc_send_cmd(mmc, &cmd, &data); if (err) { if (timeout--) goto retry_scr; mmcinfo("mmc %d Send scr failed\n", mmc->control_num); return err; } mmc->scr[0] = __mmc_be32_to_cpu(scr[0]); mmc->scr[1] = __mmc_be32_to_cpu(scr[1]); switch ((mmc->scr[0] >> 24) & 0xf) { case 0: mmc->version = SD_VERSION_1_0; break; case 1: mmc->version = SD_VERSION_1_10; break; case 2: mmc->version = SD_VERSION_2; break; default: mmc->version = SD_VERSION_1_0; break; } if (mmc->scr[0] & SD_DATA_4BIT) mmc->card_caps |= MMC_MODE_4BIT; /* Version 1.0 doesn't support switching */ if (mmc->version == SD_VERSION_1_0) return 0; timeout = 4; while (timeout--) { err = sd_switch(mmc, SD_SWITCH_CHECK, 0, 1, (u8 *)&switch_status); if (err) { mmcinfo("mmc %d Check high speed status faild\n", mmc->control_num); return err; } /* The high-speed function is busy. Try again */ if (!(__be32_to_cpu(switch_status[7]) & SD_HIGHSPEED_BUSY)) break; } /* If high-speed isn't supported, we return */ if (!(__be32_to_cpu(switch_status[3]) & SD_HIGHSPEED_SUPPORTED)) return 0; err = sd_switch(mmc, SD_SWITCH_SWITCH, 0, 1, (u8 *)&switch_status); if (err) { mmcinfo("mmc %d switch to high speed failed\n", mmc->control_num); return err; } err = mmc_update_phase(mmc); if (err) { mmcinfo("update clock failed after send cmd6 to switch to sd high speed mode\n"); return err; } if ((__be32_to_cpu(switch_status[4]) & 0x0f000000) == 0x01000000) { mmc->card_caps |= MMC_MODE_HS; mmc->speed_mode = HSSDR52_SDR25; } return 0; } /* frequency bases */ /* divided by 10 to be nice to platforms without floating point */ static const int fbase[] = { 10000, 100000, 1000000, 10000000, }; /* Multiplier values for TRAN_SPEED. Multiplied by 10 to be nice * to platforms without floating point. */ static const int multipliers[] = { 0, /* reserved */ 10, 12, 13, 15, 20, 25, 30, 35, 40, 45, 50, 55, 60, 70, 80, }; void mmc_set_ios(struct mmc *mmc) { mmc->set_ios(mmc); } void mmc_set_clock(struct mmc *mmc, u32 clock) { if (clock > mmc->f_max) clock = mmc->f_max; if (clock < mmc->f_min) clock = mmc->f_min; mmc->clock = clock; mmc_set_ios(mmc); } void mmc_set_bus_width(struct mmc *mmc, u32 width) { mmc->bus_width = width; mmc_set_ios(mmc); } static void dumphex32(char *name, char *base, int len) { __u32 i; printf("dump %s registers:", name); for (i = 0; i < len; i += 4) { if (!(i & 0xf)) printf("\n0x%x : ", base + i); printf("%x ", *(unsigned int *)(base + i)); } printf("\n"); } int mmc_read_info(struct mmc *mmc, void *buffer, unsigned short length) { int ret = 0; int i = 0; int retry_read = 0; u32 sum = 0; u32 add_sum = 0; struct sunxi_sdmmc_parameter_region *pregion = (struct sunxi_sdmmc_parameter_region *)buffer; retry: ret = mmc_read_blocks(mmc, buffer, SUNXI_SDMMC_PARAMETER_REGION_LBA_START, length); if (ret < 0) { printf("%s %d:read region parameter fail, %s \n", __func__, __LINE__, (retry_read < 3) ? "retry more time" : "go err"); dumphex32("info", buffer, 512); if (retry_read < 3) { retry_read++; goto retry; } else goto err; } /*check magic and sum*/ if (pregion->header.magic == SDMMC_PARAMETER_MAGIC) { /*add_sum don't participate in check sum verificaton*/ add_sum = pregion->header.add_sum; pregion->header.add_sum = 0; sum = 0; for (i = 0; i < pregion->header.length; i++) { sum += ((unsigned char *)buffer)[i]; } if (sum != add_sum) { printf("%s %d:region add sum(%x) is not right(%x), %s \n", __func__, __LINE__, sum, add_sum, (retry_read < 3) ? "retry more time" : "go err"); if (retry_read < 3) { retry_read++; goto retry; } else goto err; } } else { printf("%s %d:region magic is not right, %s %x\n", __func__, __LINE__, (retry_read < 3) ? "retry more time" : "go err", pregion->header.magic); if (retry_read < 3) { retry_read++; goto retry; } else { dumphex32("info", buffer, 512); goto err; } } mmcinfo("RMCA OK!\n"); return 0; err: mmcinfo("RMCA FAIL!\n"); return -1; } int mmc_startup(struct mmc *mmc) { ALLOC_CACHE_ALIGN_BUFFER(u8, ext_csd, MMC_MAX_BLOCK_LEN); int err; u32 mult, freq; u64 cmult, csize, capacity; struct mmc_cmd cmd; int timeout = 1000; char *spd_name[] = { "DS26/SDR12", "HSSDR52/SDR25", "HSDDR52/DDR50", "HS200/SDR104", "HS400" }; /* Put the Card in Identify Mode */ cmd.cmdidx = mmc_host_is_spi(mmc) ? MMC_CMD_SEND_CID : MMC_CMD_ALL_SEND_CID; /* cmd not supported in spi */ cmd.resp_type = MMC_RSP_R2; cmd.cmdarg = 0; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d Put the Card in Identify Mode failed\n", mmc->control_num); goto ERR; } memcpy(mmc->cid, cmd.response, 16); /* * For MMC cards, set the Relative Address. * For SD cards, get the Relatvie Address. * This also puts the cards into Standby State */ if (!mmc_host_is_spi(mmc)) { /* cmd not supported in spi */ cmd.cmdidx = SD_CMD_SEND_RELATIVE_ADDR; cmd.cmdarg = mmc->rca << 16; cmd.resp_type = MMC_RSP_R6; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send rca failed\n", mmc->control_num); goto ERR; } if (IS_SD(mmc)) mmc->rca = (cmd.response[0] >> 16) & 0xffff; } /* Get the Card-Specific Data */ cmd.cmdidx = MMC_CMD_SEND_CSD; cmd.resp_type = MMC_RSP_R2; cmd.cmdarg = mmc->rca << 16; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); /* Waiting for the ready status */ mmc_send_status(mmc, timeout); if (err) { mmcinfo("mmc %d get csd failed\n", mmc->control_num); goto ERR; } mmc->csd[0] = cmd.response[0]; mmc->csd[1] = cmd.response[1]; mmc->csd[2] = cmd.response[2]; mmc->csd[3] = cmd.response[3]; if (mmc->version == MMC_VERSION_UNKNOWN) { int version = (cmd.response[0] >> 26) & 0xf; switch (version) { case 0: mmc->version = MMC_VERSION_1_2; break; case 1: mmc->version = MMC_VERSION_1_4; break; case 2: mmc->version = MMC_VERSION_2_2; break; case 3: mmc->version = MMC_VERSION_3; break; case 4: mmc->version = MMC_VERSION_4; break; default: mmc->version = MMC_VERSION_1_2; break; } } /* divide frequency by 10, since the mults are 10x bigger */ freq = fbase[(cmd.response[0] & 0x7)]; mult = multipliers[((cmd.response[0] >> 3) & 0xf)]; mmc->tran_speed = freq * mult; mmc->read_bl_len = 1 << ((cmd.response[1] >> 16) & 0xf); if (IS_SD(mmc)) mmc->write_bl_len = mmc->read_bl_len; else mmc->write_bl_len = 1 << ((cmd.response[3] >> 22) & 0xf); if (mmc->high_capacity) { csize = (mmc->csd[1] & 0x3f) << 16 | (mmc->csd[2] & 0xffff0000) >> 16; cmult = 8; } else { csize = (mmc->csd[1] & 0x3ff) << 2 | (mmc->csd[2] & 0xc0000000) >> 30; cmult = (mmc->csd[2] & 0x00038000) >> 15; } mmc->capacity = (csize + 1) << (cmult + 2); mmc->capacity *= mmc->read_bl_len; if (mmc->read_bl_len > 512) mmc->read_bl_len = 512; if (mmc->write_bl_len > 512) mmc->write_bl_len = 512; /* Select the card, and put it into Transfer Mode */ if (!mmc_host_is_spi(mmc)) { /* cmd not supported in spi */ cmd.cmdidx = MMC_CMD_SELECT_CARD; cmd.resp_type = MMC_RSP_R1b; cmd.cmdarg = mmc->rca << 16; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("Select the card failed\n"); goto ERR; } } /*read mmc timing info, first OTA would fail*/ err = mmc_read_info(mmc, mmc_arg_addr, SUNXI_SDMMC_PARAMETER_REGION_SIZE_BYTE >> 9); if (err < 0) mmcinfo("mmc read timing info fail\n"); /*update host caps from timing info*/ mmc_update_host_caps_r(mmc->control_num); mmc_set_clock(mmc, 25000000); /* * For SD, its erase group is always one sector */ mmc->erase_grp_size = 1; mmc->part_config = MMCPART_NOAVAILABLE; if (!IS_SD(mmc) && (mmc->version >= MMC_VERSION_4)) { /* check ext_csd version and capacity */ err = mmc_send_ext_csd(mmc, ext_csd); if (err) { mmcinfo("%s, mmc send ext csd failed!\n", __FUNCTION__); goto ERR; } mmc->ext_csd = ext_csd; if (!err) { /* update mmc version */ switch (ext_csd[192]) { case 0: mmc->version = MMC_VERSION_4; break; case 1: mmc->version = MMC_VERSION_4_1; break; case 2: mmc->version = MMC_VERSION_4_2; break; case 3: mmc->version = MMC_VERSION_4_3; break; case 5: mmc->version = MMC_VERSION_4_41; break; case 6: mmc->version = MMC_VERSION_4_5; break; case 7: mmc->version = MMC_VERSION_5_0; break; case 8: mmc->version = MMC_VERSION_5_1; break; } } if (!err & (ext_csd[192] >= 2)) { /* * According to the JEDEC Standard, the value of * ext_csd's capacity is valid if the value is more * than 2GB */ capacity = ext_csd[212] << 0 | ext_csd[213] << 8 | ext_csd[214] << 16 | ext_csd[215] << 24; capacity *= 512; if ((capacity >> 20) > 2 * 1024) mmc->capacity = capacity; } /* * Check whether GROUP_DEF is set, if yes, read out * group size from ext_csd directly, or calculate * the group size from the csd value. */ if (ext_csd[175]) mmc->erase_grp_size = ext_csd[224] * 512 * 1024; else { int erase_gsz, erase_gmul; erase_gsz = (mmc->csd[2] & 0x00007c00) >> 10; erase_gmul = (mmc->csd[2] & 0x000003e0) >> 5; mmc->erase_grp_size = (erase_gsz + 1) * (erase_gmul + 1); } /* store the partition info of emmc */ if (ext_csd[160] & PART_SUPPORT) mmc->part_config = ext_csd[179]; } if (IS_SD(mmc)) err = sd_change_freq(mmc); else err = mmc_change_freq(mmc); if (err) { mmcinfo("mmc %d Change speed mode failed\n", mmc->control_num); goto ERR; } /* for re-update sample phase */ err = mmc_update_phase(mmc); if (err) { mmcinfo("update clock failed\n"); goto ERR; } if (IS_SD(mmc)) { if (mmc->card_caps & MMC_MODE_4BIT) { cmd.cmdidx = MMC_CMD_APP_CMD; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = mmc->rca << 16; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send app cmd failed\n", mmc->control_num); goto ERR; } cmd.cmdidx = SD_CMD_APP_SET_BUS_WIDTH; cmd.resp_type = MMC_RSP_R1; cmd.cmdarg = 2; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d sd set bus width failed\n", mmc->control_num); goto ERR; } mmc_set_bus_width(mmc, 4); } if (mmc->card_caps & MMC_MODE_HS) mmc->tran_speed = 50000000; else mmc->tran_speed = 25000000; } mmcdbg("%s: set clock %d\n", __FUNCTION__, mmc->tran_speed); mmc_set_clock(mmc, mmc->tran_speed); /* fill in device description */ mmc->blksz = mmc->read_bl_len; /*mmc->lba = mmc->capacity/mmc->read_bl_len; //for compiler error */ mmc->lba = mmc->capacity >> 9; if (!IS_SD(mmc)) { switch (mmc->version) { case MMC_VERSION_1_2: mmcinfo("MMC 1.2\n"); break; case MMC_VERSION_1_4: mmcinfo("MMC 1.4\n"); break; case MMC_VERSION_2_2: mmcinfo("MMC 2.2\n"); break; case MMC_VERSION_3: mmcinfo("MMC 3.0\n"); break; case MMC_VERSION_4: mmcinfo("MMC 4.0\n"); break; case MMC_VERSION_4_1: mmcinfo("MMC 4.1\n"); break; case MMC_VERSION_4_2: mmcinfo("MMC 4.2\n"); break; case MMC_VERSION_4_3: mmcinfo("MMC 4.3\n"); break; case MMC_VERSION_4_41: mmcinfo("MMC 4.41\n"); break; case MMC_VERSION_4_5: mmcinfo("MMC 4.5\n"); break; case MMC_VERSION_5_0: mmcinfo("MMC 5.0\n"); break; case MMC_VERSION_5_1: mmcinfo("MMC 5.1\n"); break; default: mmcinfo("Unknow MMC ver\n"); break; } } mmcinfo("%s %d bit\n", spd_name[mmc->speed_mode], mmc->bus_width); mmcinfo("%d Hz\n", mmc->clock); mmcinfo("%d MB\n", mmc->lba >> 11); return 0; ERR: if (ext_csd) { free(ext_csd); mmc->ext_csd = NULL; } return err; } int mmc_send_if_cond(struct mmc *mmc) { struct mmc_cmd cmd; int err; cmd.cmdidx = SD_CMD_SEND_IF_COND; /* We set the bit if the host supports voltages between 2.7 and 3.6 V */ cmd.cmdarg = ((mmc->voltages & 0xff8000) != 0) << 8 | 0xaa; cmd.resp_type = MMC_RSP_R7; cmd.flags = 0; err = mmc_send_cmd(mmc, &cmd, NULL); if (err) { mmcinfo("mmc %d send if cond failed\n", mmc->control_num); return err; } if ((cmd.response[0] & 0xff) != 0xaa) return UNUSABLE_ERR; else mmc->version = SD_VERSION_2; return 0; } int mmc_init(struct mmc *mmc) { int err; /* *struct boot_sdmmc_private_info_t *priv_info = * (struct boot_sdmmc_private_info_t * *)(mmc_config_addr + SDMMC_PRIV_INFO_ADDR_OFFSET); */ struct boot_sdmmc_private_info_t *priv_info = &((struct sunxi_sdmmc_parameter_region *)mmc_arg_addr)->info; if (mmc->has_init) { mmcinfo("mmc %d Has init\n", mmc->control_num); return 0; } err = mmc->init(mmc); if (err) { mmcinfo("mmc %d host init failed\n", mmc->control_num); return err; } mmc_set_bus_width(mmc, 1); mmc_set_clock(mmc, 1); /* Reset the Card */ err = mmc_go_idle(mmc); if (err) { mmcinfo("mmc %d reset card failed\n", mmc->control_num); return err; } /* The internal partition reset to user partition(0) at every CMD0 */ mmc->part_num = 0; if (priv_info->card_type == CARD_TYPE_SD) { mmcinfo("***Try SD card %d***\n", mmc->control_num); /* Test for SD version 2 */ err = mmc_send_if_cond(mmc); /* Now try to get the SD card's operating condition */ err = sd_send_op_cond(mmc); if (err) { mmcinfo("SD card %d Card did not respond to voltage select!\n", mmc->control_num); mmcinfo("***SD/MMC %d init error!!!***\n", mmc->control_num); return UNUSABLE_ERR; } } else if (priv_info->card_type == CARD_TYPE_MMC) { /* If the command timed out, we check for an MMC card */ mmcinfo("***Try MMC card %d***\n", mmc->control_num); err = mmc_send_op_cond(mmc); if (err) { mmcinfo("MMC card %d Card did not respond to voltage select!\n", mmc->control_num); mmcinfo("***SD/MMC %d init error!!!***\n", mmc->control_num); return UNUSABLE_ERR; } } else { mmcinfo("Wrong media type 0x%x\n", priv_info->card_type); mmcinfo("***Try SD card %d***\n", mmc->control_num); /* Test for SD version 2 */ err = mmc_send_if_cond(mmc); /* Now try to get the SD card's operating condition */ err = sd_send_op_cond(mmc); /* If the command timed out, we check for an MMC card */ if (err) { mmcinfo("***Try MMC card %d***\n", mmc->control_num); err = mmc_send_op_cond(mmc); if (err) { mmcinfo("mmc %d Card did not respond to voltage select!\n", mmc->control_num); mmcinfo("***SD/MMC %d init error!!!***\n", mmc->control_num); return UNUSABLE_ERR; } } } err = mmc_startup(mmc); if (err) { mmcinfo("***SD/MMC %d init error!!!***\n", mmc->control_num); mmc->has_init = 0; } else { mmc->has_init = 1; mmcinfo("***SD/MMC %d init OK!!!***\n", mmc->control_num); } return err; } int mmc_register(int dev_num, struct mmc *mmc) { mmc_devices[dev_num] = mmc; if (!mmc->b_max) mmc->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT; return mmc_init(mmc); } int mmc_unregister(int dev_num) { mmc_devices[dev_num] = NULL; mmcdbg("mmc%d unregister\n", dev_num); return 0; }