2 * Copyright 2008, Freescale Semiconductor, Inc
5 * Based vaguely on the Linux code
7 * See file CREDITS for list of people who contributed to this
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License as
12 * published by the Free Software Foundation; either version 2 of
13 * the License, or (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
32 #include <linux/list.h>
35 /* Set block count limit because of 16 bit register limit on some hardware*/
36 #ifndef CONFIG_SYS_MMC_MAX_BLK_COUNT
37 #define CONFIG_SYS_MMC_MAX_BLK_COUNT 65535
40 static struct list_head mmc_devices;
41 static int cur_dev_num = -1;
43 int __board_mmc_getcd(u8 *cd, struct mmc *mmc) {
47 int board_mmc_getcd(u8 *cd, struct mmc *mmc)__attribute__((weak,
48 alias("__board_mmc_getcd")));
50 int mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd, struct mmc_data *data)
52 return mmc->send_cmd(mmc, cmd, data);
55 int mmc_send_status(struct mmc *mmc, int timeout)
59 #ifdef CONFIG_MMC_TRACE
63 cmd.cmdidx = MMC_CMD_SEND_STATUS;
64 cmd.resp_type = MMC_RSP_R1;
69 err = mmc_send_cmd(mmc, &cmd, NULL);
72 else if (cmd.response[0] & MMC_STATUS_RDY_FOR_DATA)
77 if (cmd.response[0] & MMC_STATUS_MASK) {
78 printf("Status Error: 0x%08X\n", cmd.response[0]);
84 printf("Timeout waiting card ready\n");
91 int mmc_set_blocklen(struct mmc *mmc, int len)
95 cmd.cmdidx = MMC_CMD_SET_BLOCKLEN;
96 cmd.resp_type = MMC_RSP_R1;
100 return mmc_send_cmd(mmc, &cmd, NULL);
103 struct mmc *find_mmc_device(int dev_num)
106 struct list_head *entry;
108 list_for_each(entry, &mmc_devices) {
109 m = list_entry(entry, struct mmc, link);
111 if (m->block_dev.dev == dev_num)
115 printf("MMC Device %d not found\n", dev_num);
121 mmc_write_blocks(struct mmc *mmc, ulong start, lbaint_t blkcnt, const void*src)
124 struct mmc_data data;
127 if ((start + blkcnt) > mmc->block_dev.lba) {
128 printf("MMC: block number 0x%lx exceeds max(0x%lx)\n",
129 start + blkcnt, mmc->block_dev.lba);
134 cmd.cmdidx = MMC_CMD_WRITE_MULTIPLE_BLOCK;
136 cmd.cmdidx = MMC_CMD_WRITE_SINGLE_BLOCK;
138 if (mmc->high_capacity)
141 cmd.cmdarg = start * mmc->write_bl_len;
143 cmd.resp_type = MMC_RSP_R1;
147 data.blocks = blkcnt;
148 data.blocksize = mmc->write_bl_len;
149 data.flags = MMC_DATA_WRITE;
151 if (mmc_send_cmd(mmc, &cmd, &data)) {
152 printf("mmc write failed\n");
156 /* SPI multiblock writes terminate using a special
157 * token, not a STOP_TRANSMISSION request.
159 if (!mmc_host_is_spi(mmc) && blkcnt > 1) {
160 cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION;
162 cmd.resp_type = MMC_RSP_R1b;
164 if (mmc_send_cmd(mmc, &cmd, NULL)) {
165 printf("mmc fail to send stop cmd\n");
169 /* Waiting for the ready status */
170 mmc_send_status(mmc, timeout);
177 mmc_bwrite(int dev_num, ulong start, lbaint_t blkcnt, const void*src)
179 lbaint_t cur, blocks_todo = blkcnt;
181 struct mmc *mmc = find_mmc_device(dev_num);
185 if (mmc_set_blocklen(mmc, mmc->write_bl_len))
189 cur = (blocks_todo > CONFIG_SYS_MMC_MAX_BLK_COUNT) ?
190 CONFIG_SYS_MMC_MAX_BLK_COUNT : blocks_todo;
191 if(mmc_write_blocks(mmc, start, cur, src) != cur)
195 src += cur * mmc->write_bl_len;
196 } while (blocks_todo > 0);
201 int mmc_read_blocks(struct mmc *mmc, void *dst, ulong start, lbaint_t blkcnt)
204 struct mmc_data data;
208 cmd.cmdidx = MMC_CMD_READ_MULTIPLE_BLOCK;
210 cmd.cmdidx = MMC_CMD_READ_SINGLE_BLOCK;
212 if (mmc->high_capacity)
215 cmd.cmdarg = start * mmc->read_bl_len;
217 cmd.resp_type = MMC_RSP_R1;
221 data.blocks = blkcnt;
222 data.blocksize = mmc->read_bl_len;
223 data.flags = MMC_DATA_READ;
225 if (mmc_send_cmd(mmc, &cmd, &data))
229 cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION;
231 cmd.resp_type = MMC_RSP_R1b;
233 if (mmc_send_cmd(mmc, &cmd, NULL)) {
234 printf("mmc fail to send stop cmd\n");
238 /* Waiting for the ready status */
239 mmc_send_status(mmc, timeout);
245 static ulong mmc_bread(int dev_num, ulong start, lbaint_t blkcnt, void *dst)
247 lbaint_t cur, blocks_todo = blkcnt;
252 struct mmc *mmc = find_mmc_device(dev_num);
256 if ((start + blkcnt) > mmc->block_dev.lba) {
257 printf("MMC: block number 0x%lx exceeds max(0x%lx)\n",
258 start + blkcnt, mmc->block_dev.lba);
262 if (mmc_set_blocklen(mmc, mmc->read_bl_len))
266 cur = (blocks_todo > CONFIG_SYS_MMC_MAX_BLK_COUNT) ?
267 CONFIG_SYS_MMC_MAX_BLK_COUNT : blocks_todo;
268 if(mmc_read_blocks(mmc, dst, start, cur) != cur)
272 dst += cur * mmc->read_bl_len;
273 } while (blocks_todo > 0);
278 int mmc_go_idle(struct mmc* mmc)
285 cmd.cmdidx = MMC_CMD_GO_IDLE_STATE;
287 cmd.resp_type = MMC_RSP_NONE;
290 err = mmc_send_cmd(mmc, &cmd, NULL);
301 sd_send_op_cond(struct mmc *mmc)
308 cmd.cmdidx = MMC_CMD_APP_CMD;
309 cmd.resp_type = MMC_RSP_R1;
313 err = mmc_send_cmd(mmc, &cmd, NULL);
318 cmd.cmdidx = SD_CMD_APP_SEND_OP_COND;
319 cmd.resp_type = MMC_RSP_R3;
322 * Most cards do not answer if some reserved bits
323 * in the ocr are set. However, Some controller
324 * can set bit 7 (reserved for low voltages), but
325 * how to manage low voltages SD card is not yet
328 cmd.cmdarg = mmc_host_is_spi(mmc) ? 0 :
329 (mmc->voltages & 0xff8000);
331 if (mmc->version == SD_VERSION_2)
332 cmd.cmdarg |= OCR_HCS;
334 err = mmc_send_cmd(mmc, &cmd, NULL);
340 } while ((!(cmd.response[0] & OCR_BUSY)) && timeout--);
345 if (mmc->version != SD_VERSION_2)
346 mmc->version = SD_VERSION_1_0;
348 if (mmc_host_is_spi(mmc)) { /* read OCR for spi */
349 cmd.cmdidx = MMC_CMD_SPI_READ_OCR;
350 cmd.resp_type = MMC_RSP_R3;
354 err = mmc_send_cmd(mmc, &cmd, NULL);
360 mmc->ocr = cmd.response[0];
362 mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS);
368 int mmc_send_op_cond(struct mmc *mmc)
374 /* Some cards seem to need this */
378 cmd.cmdidx = MMC_CMD_SEND_OP_COND;
379 cmd.resp_type = MMC_RSP_R3;
380 cmd.cmdarg = OCR_HCS | (mmc_host_is_spi(mmc) ? 0 :
384 err = mmc_send_cmd(mmc, &cmd, NULL);
390 } while (!(cmd.response[0] & OCR_BUSY) && timeout--);
395 if (mmc_host_is_spi(mmc)) { /* read OCR for spi */
396 cmd.cmdidx = MMC_CMD_SPI_READ_OCR;
397 cmd.resp_type = MMC_RSP_R3;
401 err = mmc_send_cmd(mmc, &cmd, NULL);
407 mmc->version = MMC_VERSION_UNKNOWN;
408 mmc->ocr = cmd.response[0];
410 mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS);
417 int mmc_send_ext_csd(struct mmc *mmc, char *ext_csd)
420 struct mmc_data data;
423 /* Get the Card Status Register */
424 cmd.cmdidx = MMC_CMD_SEND_EXT_CSD;
425 cmd.resp_type = MMC_RSP_R1;
431 data.blocksize = 512;
432 data.flags = MMC_DATA_READ;
434 err = mmc_send_cmd(mmc, &cmd, &data);
440 int mmc_switch(struct mmc *mmc, u8 set, u8 index, u8 value)
446 cmd.cmdidx = MMC_CMD_SWITCH;
447 cmd.resp_type = MMC_RSP_R1b;
448 cmd.cmdarg = (MMC_SWITCH_MODE_WRITE_BYTE << 24) |
453 ret = mmc_send_cmd(mmc, &cmd, NULL);
455 /* Waiting for the ready status */
456 mmc_send_status(mmc, timeout);
462 int mmc_change_freq(struct mmc *mmc)
470 if (mmc_host_is_spi(mmc))
473 /* Only version 4 supports high-speed */
474 if (mmc->version < MMC_VERSION_4)
477 mmc->card_caps |= MMC_MODE_4BIT;
479 err = mmc_send_ext_csd(mmc, ext_csd);
484 if (ext_csd[212] || ext_csd[213] || ext_csd[214] || ext_csd[215])
485 mmc->high_capacity = 1;
487 cardtype = ext_csd[196] & 0xf;
489 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, 1);
494 /* Now check to see that it worked */
495 err = mmc_send_ext_csd(mmc, ext_csd);
500 /* No high-speed support */
504 /* High Speed is set, there are two types: 52MHz and 26MHz */
505 if (cardtype & MMC_HS_52MHZ)
506 mmc->card_caps |= MMC_MODE_HS_52MHz | MMC_MODE_HS;
508 mmc->card_caps |= MMC_MODE_HS;
513 int sd_switch(struct mmc *mmc, int mode, int group, u8 value, u8 *resp)
516 struct mmc_data data;
518 /* Switch the frequency */
519 cmd.cmdidx = SD_CMD_SWITCH_FUNC;
520 cmd.resp_type = MMC_RSP_R1;
521 cmd.cmdarg = (mode << 31) | 0xffffff;
522 cmd.cmdarg &= ~(0xf << (group * 4));
523 cmd.cmdarg |= value << (group * 4);
526 data.dest = (char *)resp;
529 data.flags = MMC_DATA_READ;
531 return mmc_send_cmd(mmc, &cmd, &data);
535 int sd_change_freq(struct mmc *mmc)
540 uint switch_status[16];
541 struct mmc_data data;
546 if (mmc_host_is_spi(mmc))
549 /* Read the SCR to find out if this card supports higher speeds */
550 cmd.cmdidx = MMC_CMD_APP_CMD;
551 cmd.resp_type = MMC_RSP_R1;
552 cmd.cmdarg = mmc->rca << 16;
555 err = mmc_send_cmd(mmc, &cmd, NULL);
560 cmd.cmdidx = SD_CMD_APP_SEND_SCR;
561 cmd.resp_type = MMC_RSP_R1;
568 data.dest = (char *)&scr;
571 data.flags = MMC_DATA_READ;
573 err = mmc_send_cmd(mmc, &cmd, &data);
582 mmc->scr[0] = __be32_to_cpu(scr[0]);
583 mmc->scr[1] = __be32_to_cpu(scr[1]);
585 switch ((mmc->scr[0] >> 24) & 0xf) {
587 mmc->version = SD_VERSION_1_0;
590 mmc->version = SD_VERSION_1_10;
593 mmc->version = SD_VERSION_2;
596 mmc->version = SD_VERSION_1_0;
600 if (mmc->scr[0] & SD_DATA_4BIT)
601 mmc->card_caps |= MMC_MODE_4BIT;
603 /* Version 1.0 doesn't support switching */
604 if (mmc->version == SD_VERSION_1_0)
609 err = sd_switch(mmc, SD_SWITCH_CHECK, 0, 1,
610 (u8 *)&switch_status);
615 /* The high-speed function is busy. Try again */
616 if (!(__be32_to_cpu(switch_status[7]) & SD_HIGHSPEED_BUSY))
620 /* If high-speed isn't supported, we return */
621 if (!(__be32_to_cpu(switch_status[3]) & SD_HIGHSPEED_SUPPORTED))
624 err = sd_switch(mmc, SD_SWITCH_SWITCH, 0, 1, (u8 *)&switch_status);
629 if ((__be32_to_cpu(switch_status[4]) & 0x0f000000) == 0x01000000)
630 mmc->card_caps |= MMC_MODE_HS;
635 /* frequency bases */
636 /* divided by 10 to be nice to platforms without floating point */
637 static const int fbase[] = {
644 /* Multiplier values for TRAN_SPEED. Multiplied by 10 to be nice
645 * to platforms without floating point.
647 static const int multipliers[] = {
666 void mmc_set_ios(struct mmc *mmc)
671 void mmc_set_clock(struct mmc *mmc, uint clock)
673 if (clock > mmc->f_max)
676 if (clock < mmc->f_min)
684 void mmc_set_bus_width(struct mmc *mmc, uint width)
686 mmc->bus_width = width;
691 int mmc_startup(struct mmc *mmc)
700 #ifdef CONFIG_MMC_SPI_CRC_ON
701 if (mmc_host_is_spi(mmc)) { /* enable CRC check for spi */
702 cmd.cmdidx = MMC_CMD_SPI_CRC_ON_OFF;
703 cmd.resp_type = MMC_RSP_R1;
706 err = mmc_send_cmd(mmc, &cmd, NULL);
713 /* Put the Card in Identify Mode */
714 cmd.cmdidx = mmc_host_is_spi(mmc) ? MMC_CMD_SEND_CID :
715 MMC_CMD_ALL_SEND_CID; /* cmd not supported in spi */
716 cmd.resp_type = MMC_RSP_R2;
720 err = mmc_send_cmd(mmc, &cmd, NULL);
725 memcpy(mmc->cid, cmd.response, 16);
728 * For MMC cards, set the Relative Address.
729 * For SD cards, get the Relatvie Address.
730 * This also puts the cards into Standby State
732 if (!mmc_host_is_spi(mmc)) { /* cmd not supported in spi */
733 cmd.cmdidx = SD_CMD_SEND_RELATIVE_ADDR;
734 cmd.cmdarg = mmc->rca << 16;
735 cmd.resp_type = MMC_RSP_R6;
738 err = mmc_send_cmd(mmc, &cmd, NULL);
744 mmc->rca = (cmd.response[0] >> 16) & 0xffff;
747 /* Get the Card-Specific Data */
748 cmd.cmdidx = MMC_CMD_SEND_CSD;
749 cmd.resp_type = MMC_RSP_R2;
750 cmd.cmdarg = mmc->rca << 16;
753 err = mmc_send_cmd(mmc, &cmd, NULL);
755 /* Waiting for the ready status */
756 mmc_send_status(mmc, timeout);
761 mmc->csd[0] = cmd.response[0];
762 mmc->csd[1] = cmd.response[1];
763 mmc->csd[2] = cmd.response[2];
764 mmc->csd[3] = cmd.response[3];
766 if (mmc->version == MMC_VERSION_UNKNOWN) {
767 int version = (cmd.response[0] >> 26) & 0xf;
771 mmc->version = MMC_VERSION_1_2;
774 mmc->version = MMC_VERSION_1_4;
777 mmc->version = MMC_VERSION_2_2;
780 mmc->version = MMC_VERSION_3;
783 mmc->version = MMC_VERSION_4;
786 mmc->version = MMC_VERSION_1_2;
791 /* divide frequency by 10, since the mults are 10x bigger */
792 freq = fbase[(cmd.response[0] & 0x7)];
793 mult = multipliers[((cmd.response[0] >> 3) & 0xf)];
795 mmc->tran_speed = freq * mult;
797 mmc->read_bl_len = 1 << ((cmd.response[1] >> 16) & 0xf);
800 mmc->write_bl_len = mmc->read_bl_len;
802 mmc->write_bl_len = 1 << ((cmd.response[3] >> 22) & 0xf);
804 if (mmc->high_capacity) {
805 csize = (mmc->csd[1] & 0x3f) << 16
806 | (mmc->csd[2] & 0xffff0000) >> 16;
809 csize = (mmc->csd[1] & 0x3ff) << 2
810 | (mmc->csd[2] & 0xc0000000) >> 30;
811 cmult = (mmc->csd[2] & 0x00038000) >> 15;
814 mmc->capacity = (csize + 1) << (cmult + 2);
815 mmc->capacity *= mmc->read_bl_len;
817 if (mmc->read_bl_len > 512)
818 mmc->read_bl_len = 512;
820 if (mmc->write_bl_len > 512)
821 mmc->write_bl_len = 512;
823 /* Select the card, and put it into Transfer Mode */
824 if (!mmc_host_is_spi(mmc)) { /* cmd not supported in spi */
825 cmd.cmdidx = MMC_CMD_SELECT_CARD;
826 cmd.resp_type = MMC_RSP_R1b;
827 cmd.cmdarg = mmc->rca << 16;
829 err = mmc_send_cmd(mmc, &cmd, NULL);
835 if (!IS_SD(mmc) && (mmc->version >= MMC_VERSION_4)) {
836 /* check ext_csd version and capacity */
837 err = mmc_send_ext_csd(mmc, ext_csd);
838 if (!err & (ext_csd[192] >= 2)) {
839 mmc->capacity = ext_csd[212] << 0 | ext_csd[213] << 8 |
840 ext_csd[214] << 16 | ext_csd[215] << 24;
841 mmc->capacity *= 512;
846 err = sd_change_freq(mmc);
848 err = mmc_change_freq(mmc);
853 /* Restrict card's capabilities by what the host can do */
854 mmc->card_caps &= mmc->host_caps;
857 if (mmc->card_caps & MMC_MODE_4BIT) {
858 cmd.cmdidx = MMC_CMD_APP_CMD;
859 cmd.resp_type = MMC_RSP_R1;
860 cmd.cmdarg = mmc->rca << 16;
863 err = mmc_send_cmd(mmc, &cmd, NULL);
867 cmd.cmdidx = SD_CMD_APP_SET_BUS_WIDTH;
868 cmd.resp_type = MMC_RSP_R1;
871 err = mmc_send_cmd(mmc, &cmd, NULL);
875 mmc_set_bus_width(mmc, 4);
878 if (mmc->card_caps & MMC_MODE_HS)
879 mmc_set_clock(mmc, 50000000);
881 mmc_set_clock(mmc, 25000000);
883 if (mmc->card_caps & MMC_MODE_4BIT) {
884 /* Set the card to use 4 bit*/
885 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
887 EXT_CSD_BUS_WIDTH_4);
892 mmc_set_bus_width(mmc, 4);
893 } else if (mmc->card_caps & MMC_MODE_8BIT) {
894 /* Set the card to use 8 bit*/
895 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
897 EXT_CSD_BUS_WIDTH_8);
902 mmc_set_bus_width(mmc, 8);
905 if (mmc->card_caps & MMC_MODE_HS) {
906 if (mmc->card_caps & MMC_MODE_HS_52MHz)
907 mmc_set_clock(mmc, 52000000);
909 mmc_set_clock(mmc, 26000000);
911 mmc_set_clock(mmc, 20000000);
914 /* fill in device description */
915 mmc->block_dev.lun = 0;
916 mmc->block_dev.type = 0;
917 mmc->block_dev.blksz = mmc->read_bl_len;
918 mmc->block_dev.lba = lldiv(mmc->capacity, mmc->read_bl_len);
919 sprintf(mmc->block_dev.vendor, "Man %06x Snr %08x", mmc->cid[0] >> 8,
920 (mmc->cid[2] << 8) | (mmc->cid[3] >> 24));
921 sprintf(mmc->block_dev.product, "%c%c%c%c%c", mmc->cid[0] & 0xff,
922 (mmc->cid[1] >> 24), (mmc->cid[1] >> 16) & 0xff,
923 (mmc->cid[1] >> 8) & 0xff, mmc->cid[1] & 0xff);
924 sprintf(mmc->block_dev.revision, "%d.%d", mmc->cid[2] >> 28,
925 (mmc->cid[2] >> 24) & 0xf);
926 init_part(&mmc->block_dev);
931 int mmc_send_if_cond(struct mmc *mmc)
936 cmd.cmdidx = SD_CMD_SEND_IF_COND;
937 /* We set the bit if the host supports voltages between 2.7 and 3.6 V */
938 cmd.cmdarg = ((mmc->voltages & 0xff8000) != 0) << 8 | 0xaa;
939 cmd.resp_type = MMC_RSP_R7;
942 err = mmc_send_cmd(mmc, &cmd, NULL);
947 if ((cmd.response[0] & 0xff) != 0xaa)
950 mmc->version = SD_VERSION_2;
955 int mmc_register(struct mmc *mmc)
957 /* Setup the universal parts of the block interface just once */
958 mmc->block_dev.if_type = IF_TYPE_MMC;
959 mmc->block_dev.dev = cur_dev_num++;
960 mmc->block_dev.removable = 1;
961 mmc->block_dev.block_read = mmc_bread;
962 mmc->block_dev.block_write = mmc_bwrite;
964 INIT_LIST_HEAD (&mmc->link);
966 list_add_tail (&mmc->link, &mmc_devices);
971 block_dev_desc_t *mmc_get_dev(int dev)
973 struct mmc *mmc = find_mmc_device(dev);
975 return mmc ? &mmc->block_dev : NULL;
978 int mmc_init(struct mmc *mmc)
982 err = mmc->init(mmc);
987 mmc_set_bus_width(mmc, 1);
988 mmc_set_clock(mmc, 1);
991 err = mmc_go_idle(mmc);
996 /* Test for SD version 2 */
997 err = mmc_send_if_cond(mmc);
999 /* Now try to get the SD card's operating condition */
1000 err = sd_send_op_cond(mmc);
1002 /* If the command timed out, we check for an MMC card */
1003 if (err == TIMEOUT) {
1004 err = mmc_send_op_cond(mmc);
1007 printf("Card did not respond to voltage select!\n");
1008 return UNUSABLE_ERR;
1012 return mmc_startup(mmc);
1016 * CPU and board-specific MMC initializations. Aliased function
1017 * signals caller to move on
1019 static int __def_mmc_init(bd_t *bis)
1024 int cpu_mmc_init(bd_t *bis) __attribute__((weak, alias("__def_mmc_init")));
1025 int board_mmc_init(bd_t *bis) __attribute__((weak, alias("__def_mmc_init")));
1027 void print_mmc_devices(char separator)
1030 struct list_head *entry;
1032 list_for_each(entry, &mmc_devices) {
1033 m = list_entry(entry, struct mmc, link);
1035 printf("%s: %d", m->name, m->block_dev.dev);
1037 if (entry->next != &mmc_devices)
1038 printf("%c ", separator);
1044 int mmc_initialize(bd_t *bis)
1046 INIT_LIST_HEAD (&mmc_devices);
1049 if (board_mmc_init(bis) < 0)
1052 print_mmc_devices(',');