]> git.proxmox.com Git - mirror_ubuntu-artful-kernel.git/blob - drivers/mmc/core/mmc.c
68c0e3b2f0e86a5bfadfc5be21b4b459dd2f203f
[mirror_ubuntu-artful-kernel.git] / drivers / mmc / core / mmc.c
1 /*
2 * linux/drivers/mmc/core/mmc.c
3 *
4 * Copyright (C) 2003-2004 Russell King, All Rights Reserved.
5 * Copyright (C) 2005-2007 Pierre Ossman, All Rights Reserved.
6 * MMCv4 support Copyright (C) 2006 Philip Langdale, All Rights Reserved.
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License version 2 as
10 * published by the Free Software Foundation.
11 */
12
13 #include <linux/err.h>
14
15 #include <linux/mmc/host.h>
16 #include <linux/mmc/card.h>
17 #include <linux/mmc/mmc.h>
18
19 #include "core.h"
20 #include "sysfs.h"
21 #include "bus.h"
22 #include "mmc_ops.h"
23
24 static const unsigned int tran_exp[] = {
25 10000, 100000, 1000000, 10000000,
26 0, 0, 0, 0
27 };
28
29 static const unsigned char tran_mant[] = {
30 0, 10, 12, 13, 15, 20, 25, 30,
31 35, 40, 45, 50, 55, 60, 70, 80,
32 };
33
34 static const unsigned int tacc_exp[] = {
35 1, 10, 100, 1000, 10000, 100000, 1000000, 10000000,
36 };
37
38 static const unsigned int tacc_mant[] = {
39 0, 10, 12, 13, 15, 20, 25, 30,
40 35, 40, 45, 50, 55, 60, 70, 80,
41 };
42
43 #define UNSTUFF_BITS(resp,start,size) \
44 ({ \
45 const int __size = size; \
46 const u32 __mask = (__size < 32 ? 1 << __size : 0) - 1; \
47 const int __off = 3 - ((start) / 32); \
48 const int __shft = (start) & 31; \
49 u32 __res; \
50 \
51 __res = resp[__off] >> __shft; \
52 if (__size + __shft > 32) \
53 __res |= resp[__off-1] << ((32 - __shft) % 32); \
54 __res & __mask; \
55 })
56
57 /*
58 * Given the decoded CSD structure, decode the raw CID to our CID structure.
59 */
60 static int mmc_decode_cid(struct mmc_card *card)
61 {
62 u32 *resp = card->raw_cid;
63
64 /*
65 * The selection of the format here is based upon published
66 * specs from sandisk and from what people have reported.
67 */
68 switch (card->csd.mmca_vsn) {
69 case 0: /* MMC v1.0 - v1.2 */
70 case 1: /* MMC v1.4 */
71 card->cid.manfid = UNSTUFF_BITS(resp, 104, 24);
72 card->cid.prod_name[0] = UNSTUFF_BITS(resp, 96, 8);
73 card->cid.prod_name[1] = UNSTUFF_BITS(resp, 88, 8);
74 card->cid.prod_name[2] = UNSTUFF_BITS(resp, 80, 8);
75 card->cid.prod_name[3] = UNSTUFF_BITS(resp, 72, 8);
76 card->cid.prod_name[4] = UNSTUFF_BITS(resp, 64, 8);
77 card->cid.prod_name[5] = UNSTUFF_BITS(resp, 56, 8);
78 card->cid.prod_name[6] = UNSTUFF_BITS(resp, 48, 8);
79 card->cid.hwrev = UNSTUFF_BITS(resp, 44, 4);
80 card->cid.fwrev = UNSTUFF_BITS(resp, 40, 4);
81 card->cid.serial = UNSTUFF_BITS(resp, 16, 24);
82 card->cid.month = UNSTUFF_BITS(resp, 12, 4);
83 card->cid.year = UNSTUFF_BITS(resp, 8, 4) + 1997;
84 break;
85
86 case 2: /* MMC v2.0 - v2.2 */
87 case 3: /* MMC v3.1 - v3.3 */
88 case 4: /* MMC v4 */
89 card->cid.manfid = UNSTUFF_BITS(resp, 120, 8);
90 card->cid.oemid = UNSTUFF_BITS(resp, 104, 16);
91 card->cid.prod_name[0] = UNSTUFF_BITS(resp, 96, 8);
92 card->cid.prod_name[1] = UNSTUFF_BITS(resp, 88, 8);
93 card->cid.prod_name[2] = UNSTUFF_BITS(resp, 80, 8);
94 card->cid.prod_name[3] = UNSTUFF_BITS(resp, 72, 8);
95 card->cid.prod_name[4] = UNSTUFF_BITS(resp, 64, 8);
96 card->cid.prod_name[5] = UNSTUFF_BITS(resp, 56, 8);
97 card->cid.serial = UNSTUFF_BITS(resp, 16, 32);
98 card->cid.month = UNSTUFF_BITS(resp, 12, 4);
99 card->cid.year = UNSTUFF_BITS(resp, 8, 4) + 1997;
100 break;
101
102 default:
103 printk(KERN_ERR "%s: card has unknown MMCA version %d\n",
104 mmc_hostname(card->host), card->csd.mmca_vsn);
105 return -EINVAL;
106 }
107
108 return 0;
109 }
110
111 /*
112 * Given a 128-bit response, decode to our card CSD structure.
113 */
114 static int mmc_decode_csd(struct mmc_card *card)
115 {
116 struct mmc_csd *csd = &card->csd;
117 unsigned int e, m, csd_struct;
118 u32 *resp = card->raw_csd;
119
120 /*
121 * We only understand CSD structure v1.1 and v1.2.
122 * v1.2 has extra information in bits 15, 11 and 10.
123 */
124 csd_struct = UNSTUFF_BITS(resp, 126, 2);
125 if (csd_struct != 1 && csd_struct != 2) {
126 printk(KERN_ERR "%s: unrecognised CSD structure version %d\n",
127 mmc_hostname(card->host), csd_struct);
128 return -EINVAL;
129 }
130
131 csd->mmca_vsn = UNSTUFF_BITS(resp, 122, 4);
132 m = UNSTUFF_BITS(resp, 115, 4);
133 e = UNSTUFF_BITS(resp, 112, 3);
134 csd->tacc_ns = (tacc_exp[e] * tacc_mant[m] + 9) / 10;
135 csd->tacc_clks = UNSTUFF_BITS(resp, 104, 8) * 100;
136
137 m = UNSTUFF_BITS(resp, 99, 4);
138 e = UNSTUFF_BITS(resp, 96, 3);
139 csd->max_dtr = tran_exp[e] * tran_mant[m];
140 csd->cmdclass = UNSTUFF_BITS(resp, 84, 12);
141
142 e = UNSTUFF_BITS(resp, 47, 3);
143 m = UNSTUFF_BITS(resp, 62, 12);
144 csd->capacity = (1 + m) << (e + 2);
145
146 csd->read_blkbits = UNSTUFF_BITS(resp, 80, 4);
147 csd->read_partial = UNSTUFF_BITS(resp, 79, 1);
148 csd->write_misalign = UNSTUFF_BITS(resp, 78, 1);
149 csd->read_misalign = UNSTUFF_BITS(resp, 77, 1);
150 csd->r2w_factor = UNSTUFF_BITS(resp, 26, 3);
151 csd->write_blkbits = UNSTUFF_BITS(resp, 22, 4);
152 csd->write_partial = UNSTUFF_BITS(resp, 21, 1);
153
154 return 0;
155 }
156
157 /*
158 * Read and decode extended CSD.
159 */
160 static int mmc_read_ext_csd(struct mmc_card *card)
161 {
162 int err;
163 u8 *ext_csd;
164 unsigned int ext_csd_struct;
165
166 BUG_ON(!card);
167
168 if (card->csd.mmca_vsn < CSD_SPEC_VER_4)
169 return 0;
170
171 /*
172 * As the ext_csd is so large and mostly unused, we don't store the
173 * raw block in mmc_card.
174 */
175 ext_csd = kmalloc(512, GFP_KERNEL);
176 if (!ext_csd) {
177 printk(KERN_ERR "%s: could not allocate a buffer to "
178 "receive the ext_csd.\n", mmc_hostname(card->host));
179 return -ENOMEM;
180 }
181
182 err = mmc_send_ext_csd(card, ext_csd);
183 if (err) {
184 /*
185 * We all hosts that cannot perform the command
186 * to fail more gracefully
187 */
188 if (err != -EINVAL)
189 goto out;
190
191 /*
192 * High capacity cards should have this "magic" size
193 * stored in their CSD.
194 */
195 if (card->csd.capacity == (4096 * 512)) {
196 printk(KERN_ERR "%s: unable to read EXT_CSD "
197 "on a possible high capacity card. "
198 "Card will be ignored.\n",
199 mmc_hostname(card->host));
200 } else {
201 printk(KERN_WARNING "%s: unable to read "
202 "EXT_CSD, performance might "
203 "suffer.\n",
204 mmc_hostname(card->host));
205 err = 0;
206 }
207
208 goto out;
209 }
210
211 ext_csd_struct = ext_csd[EXT_CSD_REV];
212 if (ext_csd_struct > 2) {
213 printk(KERN_ERR "%s: unrecognised EXT_CSD structure "
214 "version %d\n", mmc_hostname(card->host),
215 ext_csd_struct);
216 err = -EINVAL;
217 goto out;
218 }
219
220 if (ext_csd_struct >= 2) {
221 card->ext_csd.sectors =
222 ext_csd[EXT_CSD_SEC_CNT + 0] << 0 |
223 ext_csd[EXT_CSD_SEC_CNT + 1] << 8 |
224 ext_csd[EXT_CSD_SEC_CNT + 2] << 16 |
225 ext_csd[EXT_CSD_SEC_CNT + 3] << 24;
226 if (card->ext_csd.sectors)
227 mmc_card_set_blockaddr(card);
228 }
229
230 switch (ext_csd[EXT_CSD_CARD_TYPE]) {
231 case EXT_CSD_CARD_TYPE_52 | EXT_CSD_CARD_TYPE_26:
232 card->ext_csd.hs_max_dtr = 52000000;
233 break;
234 case EXT_CSD_CARD_TYPE_26:
235 card->ext_csd.hs_max_dtr = 26000000;
236 break;
237 default:
238 /* MMC v4 spec says this cannot happen */
239 printk(KERN_WARNING "%s: card is mmc v4 but doesn't "
240 "support any high-speed modes.\n",
241 mmc_hostname(card->host));
242 goto out;
243 }
244
245 out:
246 kfree(ext_csd);
247
248 return err;
249 }
250
251 /*
252 * Handle the detection and initialisation of a card.
253 *
254 * In the case of a resume, "curcard" will contain the card
255 * we're trying to reinitialise.
256 */
257 static int mmc_init_card(struct mmc_host *host, u32 ocr,
258 struct mmc_card *oldcard)
259 {
260 struct mmc_card *card;
261 int err;
262 u32 cid[4];
263 unsigned int max_dtr;
264
265 BUG_ON(!host);
266 WARN_ON(!host->claimed);
267
268 /*
269 * Since we're changing the OCR value, we seem to
270 * need to tell some cards to go back to the idle
271 * state. We wait 1ms to give cards time to
272 * respond.
273 */
274 mmc_go_idle(host);
275
276 /* The extra bit indicates that we support high capacity */
277 err = mmc_send_op_cond(host, ocr | (1 << 30), NULL);
278 if (err)
279 goto err;
280
281 /*
282 * For SPI, enable CRC as appropriate.
283 */
284 if (mmc_host_is_spi(host)) {
285 err = mmc_spi_set_crc(host, use_spi_crc);
286 if (err)
287 goto err;
288 }
289
290 /*
291 * Fetch CID from card.
292 */
293 if (mmc_host_is_spi(host))
294 err = mmc_send_cid(host, cid);
295 else
296 err = mmc_all_send_cid(host, cid);
297 if (err)
298 goto err;
299
300 if (oldcard) {
301 if (memcmp(cid, oldcard->raw_cid, sizeof(cid)) != 0) {
302 err = -ENOENT;
303 goto err;
304 }
305
306 card = oldcard;
307 } else {
308 /*
309 * Allocate card structure.
310 */
311 card = mmc_alloc_card(host);
312 if (IS_ERR(card)) {
313 err = PTR_ERR(card);
314 goto err;
315 }
316
317 card->type = MMC_TYPE_MMC;
318 card->rca = 1;
319 memcpy(card->raw_cid, cid, sizeof(card->raw_cid));
320 }
321
322 /*
323 * For native busses: set card RCA and quit open drain mode.
324 */
325 if (!mmc_host_is_spi(host)) {
326 err = mmc_set_relative_addr(card);
327 if (err)
328 goto free_card;
329
330 mmc_set_bus_mode(host, MMC_BUSMODE_PUSHPULL);
331 }
332
333 if (!oldcard) {
334 /*
335 * Fetch CSD from card.
336 */
337 err = mmc_send_csd(card, card->raw_csd);
338 if (err)
339 goto free_card;
340
341 err = mmc_decode_csd(card);
342 if (err)
343 goto free_card;
344 err = mmc_decode_cid(card);
345 if (err)
346 goto free_card;
347 }
348
349 /*
350 * Select card, as all following commands rely on that.
351 */
352 if (!mmc_host_is_spi(host)) {
353 err = mmc_select_card(card);
354 if (err)
355 goto free_card;
356 }
357
358 if (!oldcard) {
359 /*
360 * Fetch and process extended CSD.
361 */
362 err = mmc_read_ext_csd(card);
363 if (err)
364 goto free_card;
365 }
366
367 /*
368 * Activate high speed (if supported)
369 */
370 if ((card->ext_csd.hs_max_dtr != 0) &&
371 (host->caps & MMC_CAP_MMC_HIGHSPEED)) {
372 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
373 EXT_CSD_HS_TIMING, 1);
374 if (err)
375 goto free_card;
376
377 mmc_card_set_highspeed(card);
378
379 mmc_set_timing(card->host, MMC_TIMING_MMC_HS);
380 }
381
382 /*
383 * Compute bus speed.
384 */
385 max_dtr = (unsigned int)-1;
386
387 if (mmc_card_highspeed(card)) {
388 if (max_dtr > card->ext_csd.hs_max_dtr)
389 max_dtr = card->ext_csd.hs_max_dtr;
390 } else if (max_dtr > card->csd.max_dtr) {
391 max_dtr = card->csd.max_dtr;
392 }
393
394 mmc_set_clock(host, max_dtr);
395
396 /*
397 * Activate wide bus (if supported).
398 */
399 if ((card->csd.mmca_vsn >= CSD_SPEC_VER_4) &&
400 (host->caps & MMC_CAP_4_BIT_DATA)) {
401 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
402 EXT_CSD_BUS_WIDTH, EXT_CSD_BUS_WIDTH_4);
403 if (err)
404 goto free_card;
405
406 mmc_set_bus_width(card->host, MMC_BUS_WIDTH_4);
407 }
408
409 if (!oldcard)
410 host->card = card;
411
412 return 0;
413
414 free_card:
415 if (!oldcard)
416 mmc_remove_card(card);
417 err:
418
419 return err;
420 }
421
422 /*
423 * Host is being removed. Free up the current card.
424 */
425 static void mmc_remove(struct mmc_host *host)
426 {
427 BUG_ON(!host);
428 BUG_ON(!host->card);
429
430 mmc_remove_card(host->card);
431 host->card = NULL;
432 }
433
434 /*
435 * Card detection callback from host.
436 */
437 static void mmc_detect(struct mmc_host *host)
438 {
439 int err;
440
441 BUG_ON(!host);
442 BUG_ON(!host->card);
443
444 mmc_claim_host(host);
445
446 /*
447 * Just check if our card has been removed.
448 */
449 err = mmc_send_status(host->card, NULL);
450
451 mmc_release_host(host);
452
453 if (err) {
454 mmc_remove(host);
455
456 mmc_claim_host(host);
457 mmc_detach_bus(host);
458 mmc_release_host(host);
459 }
460 }
461
462 MMC_ATTR_FN(cid, "%08x%08x%08x%08x\n", card->raw_cid[0], card->raw_cid[1],
463 card->raw_cid[2], card->raw_cid[3]);
464 MMC_ATTR_FN(csd, "%08x%08x%08x%08x\n", card->raw_csd[0], card->raw_csd[1],
465 card->raw_csd[2], card->raw_csd[3]);
466 MMC_ATTR_FN(date, "%02d/%04d\n", card->cid.month, card->cid.year);
467 MMC_ATTR_FN(fwrev, "0x%x\n", card->cid.fwrev);
468 MMC_ATTR_FN(hwrev, "0x%x\n", card->cid.hwrev);
469 MMC_ATTR_FN(manfid, "0x%06x\n", card->cid.manfid);
470 MMC_ATTR_FN(name, "%s\n", card->cid.prod_name);
471 MMC_ATTR_FN(oemid, "0x%04x\n", card->cid.oemid);
472 MMC_ATTR_FN(serial, "0x%08x\n", card->cid.serial);
473
474 static struct device_attribute mmc_dev_attrs[] = {
475 MMC_ATTR_RO(cid),
476 MMC_ATTR_RO(csd),
477 MMC_ATTR_RO(date),
478 MMC_ATTR_RO(fwrev),
479 MMC_ATTR_RO(hwrev),
480 MMC_ATTR_RO(manfid),
481 MMC_ATTR_RO(name),
482 MMC_ATTR_RO(oemid),
483 MMC_ATTR_RO(serial),
484 __ATTR_NULL,
485 };
486
487 /*
488 * Adds sysfs entries as relevant.
489 */
490 static int mmc_sysfs_add(struct mmc_host *host, struct mmc_card *card)
491 {
492 int ret;
493
494 ret = mmc_add_attrs(card, mmc_dev_attrs);
495 if (ret < 0)
496 return ret;
497
498 return 0;
499 }
500
501 /*
502 * Removes the sysfs entries added by mmc_sysfs_add().
503 */
504 static void mmc_sysfs_remove(struct mmc_host *host, struct mmc_card *card)
505 {
506 mmc_remove_attrs(card, mmc_dev_attrs);
507 }
508
509 #ifdef CONFIG_MMC_UNSAFE_RESUME
510
511 /*
512 * Suspend callback from host.
513 */
514 static void mmc_suspend(struct mmc_host *host)
515 {
516 BUG_ON(!host);
517 BUG_ON(!host->card);
518
519 mmc_claim_host(host);
520 if (!mmc_host_is_spi(host))
521 mmc_deselect_cards(host);
522 host->card->state &= ~MMC_STATE_HIGHSPEED;
523 mmc_release_host(host);
524 }
525
526 /*
527 * Resume callback from host.
528 *
529 * This function tries to determine if the same card is still present
530 * and, if so, restore all state to it.
531 */
532 static void mmc_resume(struct mmc_host *host)
533 {
534 int err;
535
536 BUG_ON(!host);
537 BUG_ON(!host->card);
538
539 mmc_claim_host(host);
540 err = mmc_init_card(host, host->ocr, host->card);
541 mmc_release_host(host);
542
543 if (err) {
544 mmc_remove(host);
545
546 mmc_claim_host(host);
547 mmc_detach_bus(host);
548 mmc_release_host(host);
549 }
550
551 }
552
553 #else
554
555 #define mmc_suspend NULL
556 #define mmc_resume NULL
557
558 #endif
559
560 static const struct mmc_bus_ops mmc_ops = {
561 .remove = mmc_remove,
562 .detect = mmc_detect,
563 .sysfs_add = mmc_sysfs_add,
564 .sysfs_remove = mmc_sysfs_remove,
565 .suspend = mmc_suspend,
566 .resume = mmc_resume,
567 };
568
569 /*
570 * Starting point for MMC card init.
571 */
572 int mmc_attach_mmc(struct mmc_host *host, u32 ocr)
573 {
574 int err;
575
576 BUG_ON(!host);
577 WARN_ON(!host->claimed);
578
579 mmc_attach_bus(host, &mmc_ops);
580
581 /*
582 * We need to get OCR a different way for SPI.
583 */
584 if (mmc_host_is_spi(host)) {
585 err = mmc_spi_read_ocr(host, 1, &ocr);
586 if (err)
587 goto err;
588 }
589
590 /*
591 * Sanity check the voltages that the card claims to
592 * support.
593 */
594 if (ocr & 0x7F) {
595 printk(KERN_WARNING "%s: card claims to support voltages "
596 "below the defined range. These will be ignored.\n",
597 mmc_hostname(host));
598 ocr &= ~0x7F;
599 }
600
601 host->ocr = mmc_select_voltage(host, ocr);
602
603 /*
604 * Can we support the voltage of the card?
605 */
606 if (!host->ocr) {
607 err = -EINVAL;
608 goto err;
609 }
610
611 /*
612 * Detect and init the card.
613 */
614 err = mmc_init_card(host, host->ocr, NULL);
615 if (err)
616 goto err;
617
618 mmc_release_host(host);
619
620 err = mmc_add_card(host->card);
621 if (err)
622 goto remove_card;
623
624 return 0;
625
626 remove_card:
627 mmc_remove_card(host->card);
628 host->card = NULL;
629 mmc_claim_host(host);
630 err:
631 mmc_detach_bus(host);
632 mmc_release_host(host);
633
634 printk(KERN_ERR "%s: error %d whilst initialising MMC card\n",
635 mmc_hostname(host), err);
636
637 return err;
638 }
639