blob: cf48be10ba4d44795aadef6afda5cdfa0df30f22 [file] [log] [blame]
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +01001/*
2 * Copyright (C) 2004-2006 Atmel Corporation
3 *
4 * See file CREDITS for list of people who contributed to this
5 * project.
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 2 of
10 * the License, or (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
20 * MA 02111-1307 USA
21 */
22#include <common.h>
23
24#ifdef CONFIG_MMC
25
26#include <part.h>
27#include <mmc.h>
28
29#include <asm/io.h>
30#include <asm/errno.h>
31#include <asm/byteorder.h>
32#include <asm/arch/clk.h>
33#include <asm/arch/memory-map.h>
34
35#include "atmel_mci.h"
36
37#ifdef DEBUG
38#define pr_debug(fmt, args...) printf(fmt, ##args)
39#else
40#define pr_debug(...) do { } while(0)
41#endif
42
43#ifndef CFG_MMC_CLK_OD
44#define CFG_MMC_CLK_OD 150000
45#endif
46
47#ifndef CFG_MMC_CLK_PP
48#define CFG_MMC_CLK_PP 5000000
49#endif
50
51#ifndef CFG_MMC_OP_COND
52#define CFG_MMC_OP_COND 0x00100000
53#endif
54
55#define MMC_DEFAULT_BLKLEN 512
56#define MMC_DEFAULT_RCA 1
57
58static unsigned int mmc_rca;
Haavard Skinnemoenec8e3a52007-06-29 18:38:51 +020059static int mmc_card_is_sd;
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +010060static block_dev_desc_t mmc_blkdev;
61
62block_dev_desc_t *mmc_get_dev(int dev)
63{
64 return &mmc_blkdev;
65}
66
67static void mci_set_mode(unsigned long hz, unsigned long blklen)
68{
69 unsigned long bus_hz;
70 unsigned long clkdiv;
71
72 bus_hz = get_mci_clk_rate();
73 clkdiv = (bus_hz / hz) / 2 - 1;
74
75 pr_debug("mmc: setting clock %lu Hz, block size %lu\n",
76 hz, blklen);
77
78 if (clkdiv & ~255UL) {
79 clkdiv = 255;
80 printf("mmc: clock %lu too low; setting CLKDIV to 255\n",
81 hz);
82 }
83
84 blklen &= 0xfffc;
85 mmci_writel(MR, (MMCI_BF(CLKDIV, clkdiv)
Haavard Skinnemoended3cc52007-06-27 13:34:26 +020086 | MMCI_BF(BLKLEN, blklen)
87 | MMCI_BIT(RDPROOF)
88 | MMCI_BIT(WRPROOF)));
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +010089}
90
91#define RESP_NO_CRC 1
92#define R1 MMCI_BF(RSPTYP, 1)
93#define R2 MMCI_BF(RSPTYP, 2)
94#define R3 (R1 | RESP_NO_CRC)
95#define R6 R1
96#define NID MMCI_BF(MAXLAT, 0)
97#define NCR MMCI_BF(MAXLAT, 1)
98#define TRCMD_START MMCI_BF(TRCMD, 1)
99#define TRDIR_READ MMCI_BF(TRDIR, 1)
100#define TRTYP_BLOCK MMCI_BF(TRTYP, 0)
101#define INIT_CMD MMCI_BF(SPCMD, 1)
102#define OPEN_DRAIN MMCI_BF(OPDCMD, 1)
103
104#define ERROR_FLAGS (MMCI_BIT(DTOE) \
105 | MMCI_BIT(RDIRE) \
106 | MMCI_BIT(RENDE) \
107 | MMCI_BIT(RINDE) \
108 | MMCI_BIT(RTOE))
109
110static int
111mmc_cmd(unsigned long cmd, unsigned long arg,
112 void *resp, unsigned long flags)
113{
114 unsigned long *response = resp;
115 int i, response_words = 0;
116 unsigned long error_flags;
117 u32 status;
118
119 pr_debug("mmc: CMD%lu 0x%lx (flags 0x%lx)\n",
120 cmd, arg, flags);
121
122 error_flags = ERROR_FLAGS;
123 if (!(flags & RESP_NO_CRC))
124 error_flags |= MMCI_BIT(RCRCE);
125
126 flags &= ~MMCI_BF(CMDNB, ~0UL);
127
128 if (MMCI_BFEXT(RSPTYP, flags) == MMCI_RSPTYP_48_BIT_RESP)
129 response_words = 1;
130 else if (MMCI_BFEXT(RSPTYP, flags) == MMCI_RSPTYP_136_BIT_RESP)
131 response_words = 4;
132
133 mmci_writel(ARGR, arg);
134 mmci_writel(CMDR, cmd | flags);
135 do {
136 udelay(40);
137 status = mmci_readl(SR);
138 } while (!(status & MMCI_BIT(CMDRDY)));
139
140 pr_debug("mmc: status 0x%08lx\n", status);
141
142 if (status & ERROR_FLAGS) {
143 printf("mmc: command %lu failed (status: 0x%08lx)\n",
144 cmd, status);
145 return -EIO;
146 }
147
148 if (response_words)
149 pr_debug("mmc: response:");
150
151 for (i = 0; i < response_words; i++) {
152 response[i] = mmci_readl(RSPR);
153 pr_debug(" %08lx", response[i]);
154 }
155 pr_debug("\n");
156
157 return 0;
158}
159
160static int mmc_acmd(unsigned long cmd, unsigned long arg,
161 void *resp, unsigned long flags)
162{
163 unsigned long aresp[4];
164 int ret;
165
166 /*
167 * Seems like the APP_CMD part of an ACMD has 64 cycles max
168 * latency even though the ACMD part doesn't. This isn't
169 * entirely clear in the SD Card spec, but some cards refuse
170 * to work if we attempt to use 5 cycles max latency here...
171 */
172 ret = mmc_cmd(MMC_CMD_APP_CMD, 0, aresp,
173 R1 | NCR | (flags & OPEN_DRAIN));
174 if (ret)
175 return ret;
176 if ((aresp[0] & (R1_ILLEGAL_COMMAND | R1_APP_CMD)) != R1_APP_CMD)
177 return -ENODEV;
178
179 ret = mmc_cmd(cmd, arg, resp, flags);
180 return ret;
181}
182
183static unsigned long
184mmc_bread(int dev, unsigned long start, lbaint_t blkcnt,
185 unsigned long *buffer)
186{
187 int ret, i = 0;
188 unsigned long resp[4];
189 unsigned long card_status, data;
190 unsigned long wordcount;
191 u32 status;
192
193 if (blkcnt == 0)
194 return 0;
195
196 pr_debug("mmc_bread: dev %d, start %lx, blkcnt %lx\n",
197 dev, start, blkcnt);
198
199 /* Put the device into Transfer state */
200 ret = mmc_cmd(MMC_CMD_SELECT_CARD, mmc_rca << 16, resp, R1 | NCR);
201 if (ret) goto fail;
202
203 /* Set block length */
204 ret = mmc_cmd(MMC_CMD_SET_BLOCKLEN, mmc_blkdev.blksz, resp, R1 | NCR);
205 if (ret) goto fail;
206
207 pr_debug("MCI_DTOR = %08lx\n", mmci_readl(DTOR));
208
209 for (i = 0; i < blkcnt; i++, start++) {
210 ret = mmc_cmd(MMC_CMD_READ_SINGLE_BLOCK,
211 start * mmc_blkdev.blksz, resp,
212 (R1 | NCR | TRCMD_START | TRDIR_READ
213 | TRTYP_BLOCK));
214 if (ret) goto fail;
215
216 ret = -EIO;
217 wordcount = 0;
218 do {
219 do {
220 status = mmci_readl(SR);
221 if (status & (ERROR_FLAGS | MMCI_BIT(OVRE)))
222 goto fail;
223 } while (!(status & MMCI_BIT(RXRDY)));
224
225 if (status & MMCI_BIT(RXRDY)) {
226 data = mmci_readl(RDR);
Wolfgang Denkb7ae1cf2007-04-18 16:53:52 +0200227 /* pr_debug("%x\n", data); */
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100228 *buffer++ = data;
229 wordcount++;
230 }
Haavard Skinnemoended3cc52007-06-27 13:34:26 +0200231 } while(wordcount < (mmc_blkdev.blksz / 4));
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100232
233 pr_debug("mmc: read %u words, waiting for BLKE\n", wordcount);
234
235 do {
236 status = mmci_readl(SR);
237 } while (!(status & MMCI_BIT(BLKE)));
238
239 putc('.');
240 }
241
242out:
243 /* Put the device back into Standby state */
244 mmc_cmd(MMC_CMD_SELECT_CARD, 0, resp, NCR);
245 return i;
246
247fail:
248 mmc_cmd(MMC_CMD_SEND_STATUS, mmc_rca << 16, &card_status, R1 | NCR);
Haavard Skinnemoended3cc52007-06-27 13:34:26 +0200249 printf("mmc: bread failed, card status = %08x\n", card_status);
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100250 goto out;
251}
252
253static void mmc_parse_cid(struct mmc_cid *cid, unsigned long *resp)
254{
255 cid->mid = resp[0] >> 24;
256 cid->oid = (resp[0] >> 8) & 0xffff;
257 cid->pnm[0] = resp[0];
258 cid->pnm[1] = resp[1] >> 24;
259 cid->pnm[2] = resp[1] >> 16;
260 cid->pnm[3] = resp[1] >> 8;
261 cid->pnm[4] = resp[1];
262 cid->pnm[5] = resp[2] >> 24;
263 cid->pnm[6] = 0;
264 cid->prv = resp[2] >> 16;
265 cid->psn = (resp[2] << 16) | (resp[3] >> 16);
266 cid->mdt = resp[3] >> 8;
267}
268
269static void sd_parse_cid(struct mmc_cid *cid, unsigned long *resp)
270{
271 cid->mid = resp[0] >> 24;
272 cid->oid = (resp[0] >> 8) & 0xffff;
273 cid->pnm[0] = resp[0];
274 cid->pnm[1] = resp[1] >> 24;
275 cid->pnm[2] = resp[1] >> 16;
276 cid->pnm[3] = resp[1] >> 8;
277 cid->pnm[4] = resp[1];
278 cid->pnm[5] = 0;
279 cid->pnm[6] = 0;
280 cid->prv = resp[2] >> 24;
281 cid->psn = (resp[2] << 8) | (resp[3] >> 24);
282 cid->mdt = (resp[3] >> 8) & 0x0fff;
283}
284
285static void mmc_dump_cid(const struct mmc_cid *cid)
286{
287 printf("Manufacturer ID: %02lX\n", cid->mid);
288 printf("OEM/Application ID: %04lX\n", cid->oid);
289 printf("Product name: %s\n", cid->pnm);
290 printf("Product Revision: %lu.%lu\n",
291 cid->prv >> 4, cid->prv & 0x0f);
292 printf("Product Serial Number: %lu\n", cid->psn);
293 printf("Manufacturing Date: %02lu/%02lu\n",
294 cid->mdt >> 4, cid->mdt & 0x0f);
295}
296
297static void mmc_dump_csd(const struct mmc_csd *csd)
298{
299 unsigned long *csd_raw = (unsigned long *)csd;
300 printf("CSD data: %08lx %08lx %08lx %08lx\n",
301 csd_raw[0], csd_raw[1], csd_raw[2], csd_raw[3]);
302 printf("CSD structure version: 1.%u\n", csd->csd_structure);
303 printf("MMC System Spec version: %u\n", csd->spec_vers);
304 printf("Card command classes: %03x\n", csd->ccc);
305 printf("Read block length: %u\n", 1 << csd->read_bl_len);
306 if (csd->read_bl_partial)
307 puts("Supports partial reads\n");
308 else
309 puts("Does not support partial reads\n");
310 printf("Write block length: %u\n", 1 << csd->write_bl_len);
311 if (csd->write_bl_partial)
312 puts("Supports partial writes\n");
313 else
314 puts("Does not support partial writes\n");
315 if (csd->wp_grp_enable)
316 printf("Supports group WP: %u\n", csd->wp_grp_size + 1);
317 else
318 puts("Does not support group WP\n");
319 printf("Card capacity: %u bytes\n",
320 (csd->c_size + 1) * (1 << (csd->c_size_mult + 2)) *
321 (1 << csd->read_bl_len));
322 printf("File format: %u/%u\n",
323 csd->file_format_grp, csd->file_format);
324 puts("Write protection: ");
325 if (csd->perm_write_protect)
326 puts(" permanent");
327 if (csd->tmp_write_protect)
328 puts(" temporary");
329 putc('\n');
330}
331
332static int mmc_idle_cards(void)
333{
334 int ret;
335
336 /* Reset and initialize all cards */
337 ret = mmc_cmd(MMC_CMD_GO_IDLE_STATE, 0, NULL, 0);
338 if (ret)
339 return ret;
340
341 /* Keep the bus idle for 74 clock cycles */
342 return mmc_cmd(0, 0, NULL, INIT_CMD);
343}
344
345static int sd_init_card(struct mmc_cid *cid, int verbose)
346{
347 unsigned long resp[4];
348 int i, ret = 0;
349
350 mmc_idle_cards();
351 for (i = 0; i < 1000; i++) {
352 ret = mmc_acmd(MMC_ACMD_SD_SEND_OP_COND, CFG_MMC_OP_COND,
353 resp, R3 | NID);
354 if (ret || (resp[0] & 0x80000000))
355 break;
356 ret = -ETIMEDOUT;
357 }
358
359 if (ret)
360 return ret;
361
362 ret = mmc_cmd(MMC_CMD_ALL_SEND_CID, 0, resp, R2 | NID);
363 if (ret)
364 return ret;
365 sd_parse_cid(cid, resp);
366 if (verbose)
367 mmc_dump_cid(cid);
368
369 /* Get RCA of the card that responded */
370 ret = mmc_cmd(MMC_CMD_SD_SEND_RELATIVE_ADDR, 0, resp, R6 | NCR);
371 if (ret)
372 return ret;
373
374 mmc_rca = resp[0] >> 16;
375 if (verbose)
376 printf("SD Card detected (RCA %u)\n", mmc_rca);
Haavard Skinnemoenec8e3a52007-06-29 18:38:51 +0200377 mmc_card_is_sd = 1;
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100378 return 0;
379}
380
381static int mmc_init_card(struct mmc_cid *cid, int verbose)
382{
383 unsigned long resp[4];
384 int i, ret = 0;
385
386 mmc_idle_cards();
387 for (i = 0; i < 1000; i++) {
388 ret = mmc_cmd(MMC_CMD_SEND_OP_COND, CFG_MMC_OP_COND, resp,
389 R3 | NID | OPEN_DRAIN);
390 if (ret || (resp[0] & 0x80000000))
391 break;
392 ret = -ETIMEDOUT;
393 }
394
395 if (ret)
396 return ret;
397
398 /* Get CID of all cards. FIXME: Support more than one card */
399 ret = mmc_cmd(MMC_CMD_ALL_SEND_CID, 0, resp, R2 | NID | OPEN_DRAIN);
400 if (ret)
401 return ret;
402 mmc_parse_cid(cid, resp);
403 if (verbose)
404 mmc_dump_cid(cid);
405
406 /* Set Relative Address of the card that responded */
407 ret = mmc_cmd(MMC_CMD_SET_RELATIVE_ADDR, mmc_rca << 16, resp,
408 R1 | NCR | OPEN_DRAIN);
409 return ret;
410}
411
Haavard Skinnemoenec8e3a52007-06-29 18:38:51 +0200412static void mci_set_data_timeout(struct mmc_csd *csd)
413{
414 static const unsigned int dtomul_to_shift[] = {
415 0, 4, 7, 8, 10, 12, 16, 20,
416 };
417 static const unsigned int taac_exp[] = {
418 1, 10, 100, 1000, 10000, 100000, 1000000, 10000000,
419 };
420 static const unsigned int taac_mant[] = {
421 0, 10, 12, 13, 15, 60, 25, 30,
422 35, 40, 45, 50, 55, 60, 70, 80,
423 };
424 unsigned int timeout_ns, timeout_clks;
425 unsigned int e, m;
426 unsigned int dtocyc, dtomul;
427 unsigned int shift;
428 u32 dtor;
429
430 e = csd->taac & 0x07;
431 m = (csd->taac >> 3) & 0x0f;
432
433 timeout_ns = (taac_exp[e] * taac_mant[m] + 9) / 10;
434 timeout_clks = csd->nsac * 100;
435
436 timeout_clks += (((timeout_ns + 9) / 10)
437 * ((CFG_MMC_CLK_PP + 99999) / 100000) + 9999) / 10000;
438 if (!mmc_card_is_sd)
439 timeout_clks *= 10;
440 else
441 timeout_clks *= 100;
442
443 dtocyc = timeout_clks;
444 dtomul = 0;
445 while (dtocyc > 15 && dtomul < 8) {
446 dtomul++;
447 shift = dtomul_to_shift[dtomul];
448 dtocyc = (timeout_clks + (1 << shift) - 1) >> shift;
449 }
450
451 if (dtomul >= 8) {
452 dtomul = 7;
453 dtocyc = 15;
454 puts("Warning: Using maximum data timeout\n");
455 }
456
457 dtor = (MMCI_BF(DTOMUL, dtomul)
458 | MMCI_BF(DTOCYC, dtocyc));
459 mmci_writel(DTOR, dtor);
460
461 printf("mmc: Using %u cycles data timeout (DTOR=0x%x)\n",
462 dtocyc << shift, dtor);
463}
464
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100465int mmc_init(int verbose)
466{
467 struct mmc_cid cid;
468 struct mmc_csd csd;
Haavard Skinnemoended3cc52007-06-27 13:34:26 +0200469 unsigned int max_blksz;
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100470 int ret;
471
472 /* Initialize controller */
473 mmci_writel(CR, MMCI_BIT(SWRST));
474 mmci_writel(CR, MMCI_BIT(MCIEN));
475 mmci_writel(DTOR, 0x5f);
476 mmci_writel(IDR, ~0UL);
477 mci_set_mode(CFG_MMC_CLK_OD, MMC_DEFAULT_BLKLEN);
478
Haavard Skinnemoenec8e3a52007-06-29 18:38:51 +0200479 mmc_card_is_sd = 0;
480
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100481 ret = sd_init_card(&cid, verbose);
482 if (ret) {
483 mmc_rca = MMC_DEFAULT_RCA;
484 ret = mmc_init_card(&cid, verbose);
485 }
486 if (ret)
487 return ret;
488
489 /* Get CSD from the card */
490 ret = mmc_cmd(MMC_CMD_SEND_CSD, mmc_rca << 16, &csd, R2 | NCR);
491 if (ret)
492 return ret;
493 if (verbose)
494 mmc_dump_csd(&csd);
495
Haavard Skinnemoenec8e3a52007-06-29 18:38:51 +0200496 mci_set_data_timeout(&csd);
497
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100498 /* Initialize the blockdev structure */
499 mmc_blkdev.if_type = IF_TYPE_MMC;
500 mmc_blkdev.part_type = PART_TYPE_DOS;
501 mmc_blkdev.block_read = mmc_bread;
502 sprintf((char *)mmc_blkdev.vendor,
503 "Man %02x%04x Snr %08x",
504 cid.mid, cid.oid, cid.psn);
505 strncpy((char *)mmc_blkdev.product, cid.pnm,
506 sizeof(mmc_blkdev.product));
507 sprintf((char *)mmc_blkdev.revision, "%x %x",
508 cid.prv >> 4, cid.prv & 0x0f);
Haavard Skinnemoended3cc52007-06-27 13:34:26 +0200509
510 /*
511 * If we can't use 512 byte blocks, refuse to deal with the
512 * card. Tons of code elsewhere seems to depend on this.
513 */
514 max_blksz = 1 << csd.read_bl_len;
515 if (max_blksz < 512 || (max_blksz > 512 && !csd.read_bl_partial)) {
516 printf("Card does not support 512 byte reads, aborting.\n");
517 return -ENODEV;
518 }
519 mmc_blkdev.blksz = 512;
Haavard Skinnemoen7c2842a2006-01-20 10:03:53 +0100520 mmc_blkdev.lba = (csd.c_size + 1) * (1 << (csd.c_size_mult + 2));
521
522 mci_set_mode(CFG_MMC_CLK_PP, mmc_blkdev.blksz);
523
524#if 0
525 if (fat_register_device(&mmc_blkdev, 1))
526 printf("Could not register MMC fat device\n");
527#else
528 init_part(&mmc_blkdev);
529#endif
530
531 return 0;
532}
533
534int mmc_read(ulong src, uchar *dst, int size)
535{
536 return -ENOSYS;
537}
538
539int mmc_write(uchar *src, ulong dst, int size)
540{
541 return -ENOSYS;
542}
543
544int mmc2info(ulong addr)
545{
546 return 0;
547}
548
549#endif /* CONFIG_MMC */