Loading...
1/*
2 * linux/drivers/mmc/core/sd.c
3 *
4 * Copyright (C) 2003-2004 Russell King, All Rights Reserved.
5 * SD support Copyright (C) 2004 Ian Molton, All Rights Reserved.
6 * Copyright (C) 2005-2007 Pierre Ossman, 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#include <linux/sizes.h>
15#include <linux/slab.h>
16#include <linux/stat.h>
17#include <linux/pm_runtime.h>
18
19#include <linux/mmc/host.h>
20#include <linux/mmc/card.h>
21#include <linux/mmc/mmc.h>
22#include <linux/mmc/sd.h>
23
24#include "core.h"
25#include "bus.h"
26#include "mmc_ops.h"
27#include "sd.h"
28#include "sd_ops.h"
29
30static const unsigned int tran_exp[] = {
31 10000, 100000, 1000000, 10000000,
32 0, 0, 0, 0
33};
34
35static const unsigned char tran_mant[] = {
36 0, 10, 12, 13, 15, 20, 25, 30,
37 35, 40, 45, 50, 55, 60, 70, 80,
38};
39
40static const unsigned int tacc_exp[] = {
41 1, 10, 100, 1000, 10000, 100000, 1000000, 10000000,
42};
43
44static const unsigned int tacc_mant[] = {
45 0, 10, 12, 13, 15, 20, 25, 30,
46 35, 40, 45, 50, 55, 60, 70, 80,
47};
48
49static const unsigned int sd_au_size[] = {
50 0, SZ_16K / 512, SZ_32K / 512, SZ_64K / 512,
51 SZ_128K / 512, SZ_256K / 512, SZ_512K / 512, SZ_1M / 512,
52 SZ_2M / 512, SZ_4M / 512, SZ_8M / 512, (SZ_8M + SZ_4M) / 512,
53 SZ_16M / 512, (SZ_16M + SZ_8M) / 512, SZ_32M / 512, SZ_64M / 512,
54};
55
56#define UNSTUFF_BITS(resp,start,size) \
57 ({ \
58 const int __size = size; \
59 const u32 __mask = (__size < 32 ? 1 << __size : 0) - 1; \
60 const int __off = 3 - ((start) / 32); \
61 const int __shft = (start) & 31; \
62 u32 __res; \
63 \
64 __res = resp[__off] >> __shft; \
65 if (__size + __shft > 32) \
66 __res |= resp[__off-1] << ((32 - __shft) % 32); \
67 __res & __mask; \
68 })
69
70/*
71 * Given the decoded CSD structure, decode the raw CID to our CID structure.
72 */
73void mmc_decode_cid(struct mmc_card *card)
74{
75 u32 *resp = card->raw_cid;
76
77 /*
78 * SD doesn't currently have a version field so we will
79 * have to assume we can parse this.
80 */
81 card->cid.manfid = UNSTUFF_BITS(resp, 120, 8);
82 card->cid.oemid = UNSTUFF_BITS(resp, 104, 16);
83 card->cid.prod_name[0] = UNSTUFF_BITS(resp, 96, 8);
84 card->cid.prod_name[1] = UNSTUFF_BITS(resp, 88, 8);
85 card->cid.prod_name[2] = UNSTUFF_BITS(resp, 80, 8);
86 card->cid.prod_name[3] = UNSTUFF_BITS(resp, 72, 8);
87 card->cid.prod_name[4] = UNSTUFF_BITS(resp, 64, 8);
88 card->cid.hwrev = UNSTUFF_BITS(resp, 60, 4);
89 card->cid.fwrev = UNSTUFF_BITS(resp, 56, 4);
90 card->cid.serial = UNSTUFF_BITS(resp, 24, 32);
91 card->cid.year = UNSTUFF_BITS(resp, 12, 8);
92 card->cid.month = UNSTUFF_BITS(resp, 8, 4);
93
94 card->cid.year += 2000; /* SD cards year offset */
95}
96
97/*
98 * Given a 128-bit response, decode to our card CSD structure.
99 */
100static int mmc_decode_csd(struct mmc_card *card)
101{
102 struct mmc_csd *csd = &card->csd;
103 unsigned int e, m, csd_struct;
104 u32 *resp = card->raw_csd;
105
106 csd_struct = UNSTUFF_BITS(resp, 126, 2);
107
108 switch (csd_struct) {
109 case 0:
110 m = UNSTUFF_BITS(resp, 115, 4);
111 e = UNSTUFF_BITS(resp, 112, 3);
112 csd->tacc_ns = (tacc_exp[e] * tacc_mant[m] + 9) / 10;
113 csd->tacc_clks = UNSTUFF_BITS(resp, 104, 8) * 100;
114
115 m = UNSTUFF_BITS(resp, 99, 4);
116 e = UNSTUFF_BITS(resp, 96, 3);
117 csd->max_dtr = tran_exp[e] * tran_mant[m];
118 csd->cmdclass = UNSTUFF_BITS(resp, 84, 12);
119
120 e = UNSTUFF_BITS(resp, 47, 3);
121 m = UNSTUFF_BITS(resp, 62, 12);
122 csd->capacity = (1 + m) << (e + 2);
123
124 csd->read_blkbits = UNSTUFF_BITS(resp, 80, 4);
125 csd->read_partial = UNSTUFF_BITS(resp, 79, 1);
126 csd->write_misalign = UNSTUFF_BITS(resp, 78, 1);
127 csd->read_misalign = UNSTUFF_BITS(resp, 77, 1);
128 csd->dsr_imp = UNSTUFF_BITS(resp, 76, 1);
129 csd->r2w_factor = UNSTUFF_BITS(resp, 26, 3);
130 csd->write_blkbits = UNSTUFF_BITS(resp, 22, 4);
131 csd->write_partial = UNSTUFF_BITS(resp, 21, 1);
132
133 if (UNSTUFF_BITS(resp, 46, 1)) {
134 csd->erase_size = 1;
135 } else if (csd->write_blkbits >= 9) {
136 csd->erase_size = UNSTUFF_BITS(resp, 39, 7) + 1;
137 csd->erase_size <<= csd->write_blkbits - 9;
138 }
139 break;
140 case 1:
141 /*
142 * This is a block-addressed SDHC or SDXC card. Most
143 * interesting fields are unused and have fixed
144 * values. To avoid getting tripped by buggy cards,
145 * we assume those fixed values ourselves.
146 */
147 mmc_card_set_blockaddr(card);
148
149 csd->tacc_ns = 0; /* Unused */
150 csd->tacc_clks = 0; /* Unused */
151
152 m = UNSTUFF_BITS(resp, 99, 4);
153 e = UNSTUFF_BITS(resp, 96, 3);
154 csd->max_dtr = tran_exp[e] * tran_mant[m];
155 csd->cmdclass = UNSTUFF_BITS(resp, 84, 12);
156 csd->c_size = UNSTUFF_BITS(resp, 48, 22);
157
158 /* SDXC cards have a minimum C_SIZE of 0x00FFFF */
159 if (csd->c_size >= 0xFFFF)
160 mmc_card_set_ext_capacity(card);
161
162 m = UNSTUFF_BITS(resp, 48, 22);
163 csd->capacity = (1 + m) << 10;
164
165 csd->read_blkbits = 9;
166 csd->read_partial = 0;
167 csd->write_misalign = 0;
168 csd->read_misalign = 0;
169 csd->r2w_factor = 4; /* Unused */
170 csd->write_blkbits = 9;
171 csd->write_partial = 0;
172 csd->erase_size = 1;
173 break;
174 default:
175 pr_err("%s: unrecognised CSD structure version %d\n",
176 mmc_hostname(card->host), csd_struct);
177 return -EINVAL;
178 }
179
180 card->erase_size = csd->erase_size;
181
182 return 0;
183}
184
185/*
186 * Given a 64-bit response, decode to our card SCR structure.
187 */
188static int mmc_decode_scr(struct mmc_card *card)
189{
190 struct sd_scr *scr = &card->scr;
191 unsigned int scr_struct;
192 u32 resp[4];
193
194 resp[3] = card->raw_scr[1];
195 resp[2] = card->raw_scr[0];
196
197 scr_struct = UNSTUFF_BITS(resp, 60, 4);
198 if (scr_struct != 0) {
199 pr_err("%s: unrecognised SCR structure version %d\n",
200 mmc_hostname(card->host), scr_struct);
201 return -EINVAL;
202 }
203
204 scr->sda_vsn = UNSTUFF_BITS(resp, 56, 4);
205 scr->bus_widths = UNSTUFF_BITS(resp, 48, 4);
206 if (scr->sda_vsn == SCR_SPEC_VER_2)
207 /* Check if Physical Layer Spec v3.0 is supported */
208 scr->sda_spec3 = UNSTUFF_BITS(resp, 47, 1);
209
210 if (UNSTUFF_BITS(resp, 55, 1))
211 card->erased_byte = 0xFF;
212 else
213 card->erased_byte = 0x0;
214
215 if (scr->sda_spec3)
216 scr->cmds = UNSTUFF_BITS(resp, 32, 2);
217 return 0;
218}
219
220/*
221 * Fetch and process SD Status register.
222 */
223static int mmc_read_ssr(struct mmc_card *card)
224{
225 unsigned int au, es, et, eo;
226 int err, i;
227 u32 *ssr;
228
229 if (!(card->csd.cmdclass & CCC_APP_SPEC)) {
230 pr_warn("%s: card lacks mandatory SD Status function\n",
231 mmc_hostname(card->host));
232 return 0;
233 }
234
235 ssr = kmalloc(64, GFP_KERNEL);
236 if (!ssr)
237 return -ENOMEM;
238
239 err = mmc_app_sd_status(card, ssr);
240 if (err) {
241 pr_warn("%s: problem reading SD Status register\n",
242 mmc_hostname(card->host));
243 err = 0;
244 goto out;
245 }
246
247 for (i = 0; i < 16; i++)
248 ssr[i] = be32_to_cpu(ssr[i]);
249
250 /*
251 * UNSTUFF_BITS only works with four u32s so we have to offset the
252 * bitfield positions accordingly.
253 */
254 au = UNSTUFF_BITS(ssr, 428 - 384, 4);
255 if (au) {
256 if (au <= 9 || card->scr.sda_spec3) {
257 card->ssr.au = sd_au_size[au];
258 es = UNSTUFF_BITS(ssr, 408 - 384, 16);
259 et = UNSTUFF_BITS(ssr, 402 - 384, 6);
260 if (es && et) {
261 eo = UNSTUFF_BITS(ssr, 400 - 384, 2);
262 card->ssr.erase_timeout = (et * 1000) / es;
263 card->ssr.erase_offset = eo * 1000;
264 }
265 } else {
266 pr_warn("%s: SD Status: Invalid Allocation Unit size\n",
267 mmc_hostname(card->host));
268 }
269 }
270out:
271 kfree(ssr);
272 return err;
273}
274
275/*
276 * Fetches and decodes switch information
277 */
278static int mmc_read_switch(struct mmc_card *card)
279{
280 int err;
281 u8 *status;
282
283 if (card->scr.sda_vsn < SCR_SPEC_VER_1)
284 return 0;
285
286 if (!(card->csd.cmdclass & CCC_SWITCH)) {
287 pr_warn("%s: card lacks mandatory switch function, performance might suffer\n",
288 mmc_hostname(card->host));
289 return 0;
290 }
291
292 err = -EIO;
293
294 status = kmalloc(64, GFP_KERNEL);
295 if (!status) {
296 pr_err("%s: could not allocate a buffer for "
297 "switch capabilities.\n",
298 mmc_hostname(card->host));
299 return -ENOMEM;
300 }
301
302 /*
303 * Find out the card's support bits with a mode 0 operation.
304 * The argument does not matter, as the support bits do not
305 * change with the arguments.
306 */
307 err = mmc_sd_switch(card, 0, 0, 0, status);
308 if (err) {
309 /*
310 * If the host or the card can't do the switch,
311 * fail more gracefully.
312 */
313 if (err != -EINVAL && err != -ENOSYS && err != -EFAULT)
314 goto out;
315
316 pr_warn("%s: problem reading Bus Speed modes\n",
317 mmc_hostname(card->host));
318 err = 0;
319
320 goto out;
321 }
322
323 if (status[13] & SD_MODE_HIGH_SPEED)
324 card->sw_caps.hs_max_dtr = HIGH_SPEED_MAX_DTR;
325
326 if (card->scr.sda_spec3) {
327 card->sw_caps.sd3_bus_mode = status[13];
328 /* Driver Strengths supported by the card */
329 card->sw_caps.sd3_drv_type = status[9];
330 card->sw_caps.sd3_curr_limit = status[7] | status[6] << 8;
331 }
332
333out:
334 kfree(status);
335
336 return err;
337}
338
339/*
340 * Test if the card supports high-speed mode and, if so, switch to it.
341 */
342int mmc_sd_switch_hs(struct mmc_card *card)
343{
344 int err;
345 u8 *status;
346
347 if (card->scr.sda_vsn < SCR_SPEC_VER_1)
348 return 0;
349
350 if (!(card->csd.cmdclass & CCC_SWITCH))
351 return 0;
352
353 if (!(card->host->caps & MMC_CAP_SD_HIGHSPEED))
354 return 0;
355
356 if (card->sw_caps.hs_max_dtr == 0)
357 return 0;
358
359 status = kmalloc(64, GFP_KERNEL);
360 if (!status) {
361 pr_err("%s: could not allocate a buffer for "
362 "switch capabilities.\n", mmc_hostname(card->host));
363 return -ENOMEM;
364 }
365
366 err = mmc_sd_switch(card, 1, 0, 1, status);
367 if (err)
368 goto out;
369
370 if ((status[16] & 0xF) != 1) {
371 pr_warn("%s: Problem switching card into high-speed mode!\n",
372 mmc_hostname(card->host));
373 err = 0;
374 } else {
375 err = 1;
376 }
377
378out:
379 kfree(status);
380
381 return err;
382}
383
384static int sd_select_driver_type(struct mmc_card *card, u8 *status)
385{
386 int card_drv_type, drive_strength, drv_type;
387 int err;
388
389 card->drive_strength = 0;
390
391 card_drv_type = card->sw_caps.sd3_drv_type | SD_DRIVER_TYPE_B;
392
393 drive_strength = mmc_select_drive_strength(card,
394 card->sw_caps.uhs_max_dtr,
395 card_drv_type, &drv_type);
396
397 if (drive_strength) {
398 err = mmc_sd_switch(card, 1, 2, drive_strength, status);
399 if (err)
400 return err;
401 if ((status[15] & 0xF) != drive_strength) {
402 pr_warn("%s: Problem setting drive strength!\n",
403 mmc_hostname(card->host));
404 return 0;
405 }
406 card->drive_strength = drive_strength;
407 }
408
409 if (drv_type)
410 mmc_set_driver_type(card->host, drv_type);
411
412 return 0;
413}
414
415static void sd_update_bus_speed_mode(struct mmc_card *card)
416{
417 /*
418 * If the host doesn't support any of the UHS-I modes, fallback on
419 * default speed.
420 */
421 if (!mmc_host_uhs(card->host)) {
422 card->sd_bus_speed = 0;
423 return;
424 }
425
426 if ((card->host->caps & MMC_CAP_UHS_SDR104) &&
427 (card->sw_caps.sd3_bus_mode & SD_MODE_UHS_SDR104)) {
428 card->sd_bus_speed = UHS_SDR104_BUS_SPEED;
429 } else if ((card->host->caps & MMC_CAP_UHS_DDR50) &&
430 (card->sw_caps.sd3_bus_mode & SD_MODE_UHS_DDR50)) {
431 card->sd_bus_speed = UHS_DDR50_BUS_SPEED;
432 } else if ((card->host->caps & (MMC_CAP_UHS_SDR104 |
433 MMC_CAP_UHS_SDR50)) && (card->sw_caps.sd3_bus_mode &
434 SD_MODE_UHS_SDR50)) {
435 card->sd_bus_speed = UHS_SDR50_BUS_SPEED;
436 } else if ((card->host->caps & (MMC_CAP_UHS_SDR104 |
437 MMC_CAP_UHS_SDR50 | MMC_CAP_UHS_SDR25)) &&
438 (card->sw_caps.sd3_bus_mode & SD_MODE_UHS_SDR25)) {
439 card->sd_bus_speed = UHS_SDR25_BUS_SPEED;
440 } else if ((card->host->caps & (MMC_CAP_UHS_SDR104 |
441 MMC_CAP_UHS_SDR50 | MMC_CAP_UHS_SDR25 |
442 MMC_CAP_UHS_SDR12)) && (card->sw_caps.sd3_bus_mode &
443 SD_MODE_UHS_SDR12)) {
444 card->sd_bus_speed = UHS_SDR12_BUS_SPEED;
445 }
446}
447
448static int sd_set_bus_speed_mode(struct mmc_card *card, u8 *status)
449{
450 int err;
451 unsigned int timing = 0;
452
453 switch (card->sd_bus_speed) {
454 case UHS_SDR104_BUS_SPEED:
455 timing = MMC_TIMING_UHS_SDR104;
456 card->sw_caps.uhs_max_dtr = UHS_SDR104_MAX_DTR;
457 break;
458 case UHS_DDR50_BUS_SPEED:
459 timing = MMC_TIMING_UHS_DDR50;
460 card->sw_caps.uhs_max_dtr = UHS_DDR50_MAX_DTR;
461 break;
462 case UHS_SDR50_BUS_SPEED:
463 timing = MMC_TIMING_UHS_SDR50;
464 card->sw_caps.uhs_max_dtr = UHS_SDR50_MAX_DTR;
465 break;
466 case UHS_SDR25_BUS_SPEED:
467 timing = MMC_TIMING_UHS_SDR25;
468 card->sw_caps.uhs_max_dtr = UHS_SDR25_MAX_DTR;
469 break;
470 case UHS_SDR12_BUS_SPEED:
471 timing = MMC_TIMING_UHS_SDR12;
472 card->sw_caps.uhs_max_dtr = UHS_SDR12_MAX_DTR;
473 break;
474 default:
475 return 0;
476 }
477
478 err = mmc_sd_switch(card, 1, 0, card->sd_bus_speed, status);
479 if (err)
480 return err;
481
482 if ((status[16] & 0xF) != card->sd_bus_speed)
483 pr_warn("%s: Problem setting bus speed mode!\n",
484 mmc_hostname(card->host));
485 else {
486 mmc_set_timing(card->host, timing);
487 mmc_set_clock(card->host, card->sw_caps.uhs_max_dtr);
488 }
489
490 return 0;
491}
492
493/* Get host's max current setting at its current voltage */
494static u32 sd_get_host_max_current(struct mmc_host *host)
495{
496 u32 voltage, max_current;
497
498 voltage = 1 << host->ios.vdd;
499 switch (voltage) {
500 case MMC_VDD_165_195:
501 max_current = host->max_current_180;
502 break;
503 case MMC_VDD_29_30:
504 case MMC_VDD_30_31:
505 max_current = host->max_current_300;
506 break;
507 case MMC_VDD_32_33:
508 case MMC_VDD_33_34:
509 max_current = host->max_current_330;
510 break;
511 default:
512 max_current = 0;
513 }
514
515 return max_current;
516}
517
518static int sd_set_current_limit(struct mmc_card *card, u8 *status)
519{
520 int current_limit = SD_SET_CURRENT_NO_CHANGE;
521 int err;
522 u32 max_current;
523
524 /*
525 * Current limit switch is only defined for SDR50, SDR104, and DDR50
526 * bus speed modes. For other bus speed modes, we do not change the
527 * current limit.
528 */
529 if ((card->sd_bus_speed != UHS_SDR50_BUS_SPEED) &&
530 (card->sd_bus_speed != UHS_SDR104_BUS_SPEED) &&
531 (card->sd_bus_speed != UHS_DDR50_BUS_SPEED))
532 return 0;
533
534 /*
535 * Host has different current capabilities when operating at
536 * different voltages, so find out its max current first.
537 */
538 max_current = sd_get_host_max_current(card->host);
539
540 /*
541 * We only check host's capability here, if we set a limit that is
542 * higher than the card's maximum current, the card will be using its
543 * maximum current, e.g. if the card's maximum current is 300ma, and
544 * when we set current limit to 200ma, the card will draw 200ma, and
545 * when we set current limit to 400/600/800ma, the card will draw its
546 * maximum 300ma from the host.
547 *
548 * The above is incorrect: if we try to set a current limit that is
549 * not supported by the card, the card can rightfully error out the
550 * attempt, and remain at the default current limit. This results
551 * in a 300mA card being limited to 200mA even though the host
552 * supports 800mA. Failures seen with SanDisk 8GB UHS cards with
553 * an iMX6 host. --rmk
554 */
555 if (max_current >= 800 &&
556 card->sw_caps.sd3_curr_limit & SD_MAX_CURRENT_800)
557 current_limit = SD_SET_CURRENT_LIMIT_800;
558 else if (max_current >= 600 &&
559 card->sw_caps.sd3_curr_limit & SD_MAX_CURRENT_600)
560 current_limit = SD_SET_CURRENT_LIMIT_600;
561 else if (max_current >= 400 &&
562 card->sw_caps.sd3_curr_limit & SD_MAX_CURRENT_400)
563 current_limit = SD_SET_CURRENT_LIMIT_400;
564 else if (max_current >= 200 &&
565 card->sw_caps.sd3_curr_limit & SD_MAX_CURRENT_200)
566 current_limit = SD_SET_CURRENT_LIMIT_200;
567
568 if (current_limit != SD_SET_CURRENT_NO_CHANGE) {
569 err = mmc_sd_switch(card, 1, 3, current_limit, status);
570 if (err)
571 return err;
572
573 if (((status[15] >> 4) & 0x0F) != current_limit)
574 pr_warn("%s: Problem setting current limit!\n",
575 mmc_hostname(card->host));
576
577 }
578
579 return 0;
580}
581
582/*
583 * UHS-I specific initialization procedure
584 */
585static int mmc_sd_init_uhs_card(struct mmc_card *card)
586{
587 int err;
588 u8 *status;
589
590 if (!card->scr.sda_spec3)
591 return 0;
592
593 if (!(card->csd.cmdclass & CCC_SWITCH))
594 return 0;
595
596 status = kmalloc(64, GFP_KERNEL);
597 if (!status) {
598 pr_err("%s: could not allocate a buffer for "
599 "switch capabilities.\n", mmc_hostname(card->host));
600 return -ENOMEM;
601 }
602
603 /* Set 4-bit bus width */
604 if ((card->host->caps & MMC_CAP_4_BIT_DATA) &&
605 (card->scr.bus_widths & SD_SCR_BUS_WIDTH_4)) {
606 err = mmc_app_set_bus_width(card, MMC_BUS_WIDTH_4);
607 if (err)
608 goto out;
609
610 mmc_set_bus_width(card->host, MMC_BUS_WIDTH_4);
611 }
612
613 /*
614 * Select the bus speed mode depending on host
615 * and card capability.
616 */
617 sd_update_bus_speed_mode(card);
618
619 /* Set the driver strength for the card */
620 err = sd_select_driver_type(card, status);
621 if (err)
622 goto out;
623
624 /* Set current limit for the card */
625 err = sd_set_current_limit(card, status);
626 if (err)
627 goto out;
628
629 /* Set bus speed mode of the card */
630 err = sd_set_bus_speed_mode(card, status);
631 if (err)
632 goto out;
633
634 /*
635 * SPI mode doesn't define CMD19 and tuning is only valid for SDR50 and
636 * SDR104 mode SD-cards. Note that tuning is mandatory for SDR104.
637 */
638 if (!mmc_host_is_spi(card->host) &&
639 (card->host->ios.timing == MMC_TIMING_UHS_SDR50 ||
640 card->host->ios.timing == MMC_TIMING_UHS_DDR50 ||
641 card->host->ios.timing == MMC_TIMING_UHS_SDR104)) {
642 err = mmc_execute_tuning(card);
643
644 /*
645 * As SD Specifications Part1 Physical Layer Specification
646 * Version 3.01 says, CMD19 tuning is available for unlocked
647 * cards in transfer state of 1.8V signaling mode. The small
648 * difference between v3.00 and 3.01 spec means that CMD19
649 * tuning is also available for DDR50 mode.
650 */
651 if (err && card->host->ios.timing == MMC_TIMING_UHS_DDR50) {
652 pr_warn("%s: ddr50 tuning failed\n",
653 mmc_hostname(card->host));
654 err = 0;
655 }
656 }
657
658out:
659 kfree(status);
660
661 return err;
662}
663
664MMC_DEV_ATTR(cid, "%08x%08x%08x%08x\n", card->raw_cid[0], card->raw_cid[1],
665 card->raw_cid[2], card->raw_cid[3]);
666MMC_DEV_ATTR(csd, "%08x%08x%08x%08x\n", card->raw_csd[0], card->raw_csd[1],
667 card->raw_csd[2], card->raw_csd[3]);
668MMC_DEV_ATTR(scr, "%08x%08x\n", card->raw_scr[0], card->raw_scr[1]);
669MMC_DEV_ATTR(date, "%02d/%04d\n", card->cid.month, card->cid.year);
670MMC_DEV_ATTR(erase_size, "%u\n", card->erase_size << 9);
671MMC_DEV_ATTR(preferred_erase_size, "%u\n", card->pref_erase << 9);
672MMC_DEV_ATTR(fwrev, "0x%x\n", card->cid.fwrev);
673MMC_DEV_ATTR(hwrev, "0x%x\n", card->cid.hwrev);
674MMC_DEV_ATTR(manfid, "0x%06x\n", card->cid.manfid);
675MMC_DEV_ATTR(name, "%s\n", card->cid.prod_name);
676MMC_DEV_ATTR(oemid, "0x%04x\n", card->cid.oemid);
677MMC_DEV_ATTR(serial, "0x%08x\n", card->cid.serial);
678
679
680static struct attribute *sd_std_attrs[] = {
681 &dev_attr_cid.attr,
682 &dev_attr_csd.attr,
683 &dev_attr_scr.attr,
684 &dev_attr_date.attr,
685 &dev_attr_erase_size.attr,
686 &dev_attr_preferred_erase_size.attr,
687 &dev_attr_fwrev.attr,
688 &dev_attr_hwrev.attr,
689 &dev_attr_manfid.attr,
690 &dev_attr_name.attr,
691 &dev_attr_oemid.attr,
692 &dev_attr_serial.attr,
693 NULL,
694};
695ATTRIBUTE_GROUPS(sd_std);
696
697struct device_type sd_type = {
698 .groups = sd_std_groups,
699};
700
701/*
702 * Fetch CID from card.
703 */
704int mmc_sd_get_cid(struct mmc_host *host, u32 ocr, u32 *cid, u32 *rocr)
705{
706 int err;
707 u32 max_current;
708 int retries = 10;
709 u32 pocr = ocr;
710
711try_again:
712 if (!retries) {
713 ocr &= ~SD_OCR_S18R;
714 pr_warn("%s: Skipping voltage switch\n", mmc_hostname(host));
715 }
716
717 /*
718 * Since we're changing the OCR value, we seem to
719 * need to tell some cards to go back to the idle
720 * state. We wait 1ms to give cards time to
721 * respond.
722 */
723 mmc_go_idle(host);
724
725 /*
726 * If SD_SEND_IF_COND indicates an SD 2.0
727 * compliant card and we should set bit 30
728 * of the ocr to indicate that we can handle
729 * block-addressed SDHC cards.
730 */
731 err = mmc_send_if_cond(host, ocr);
732 if (!err)
733 ocr |= SD_OCR_CCS;
734
735 /*
736 * If the host supports one of UHS-I modes, request the card
737 * to switch to 1.8V signaling level. If the card has failed
738 * repeatedly to switch however, skip this.
739 */
740 if (retries && mmc_host_uhs(host))
741 ocr |= SD_OCR_S18R;
742
743 /*
744 * If the host can supply more than 150mA at current voltage,
745 * XPC should be set to 1.
746 */
747 max_current = sd_get_host_max_current(host);
748 if (max_current > 150)
749 ocr |= SD_OCR_XPC;
750
751 err = mmc_send_app_op_cond(host, ocr, rocr);
752 if (err)
753 return err;
754
755 /*
756 * In case CCS and S18A in the response is set, start Signal Voltage
757 * Switch procedure. SPI mode doesn't support CMD11.
758 */
759 if (!mmc_host_is_spi(host) && rocr &&
760 ((*rocr & 0x41000000) == 0x41000000)) {
761 err = mmc_set_signal_voltage(host, MMC_SIGNAL_VOLTAGE_180,
762 pocr);
763 if (err == -EAGAIN) {
764 retries--;
765 goto try_again;
766 } else if (err) {
767 retries = 0;
768 goto try_again;
769 }
770 }
771
772 if (mmc_host_is_spi(host))
773 err = mmc_send_cid(host, cid);
774 else
775 err = mmc_all_send_cid(host, cid);
776
777 return err;
778}
779
780int mmc_sd_get_csd(struct mmc_host *host, struct mmc_card *card)
781{
782 int err;
783
784 /*
785 * Fetch CSD from card.
786 */
787 err = mmc_send_csd(card, card->raw_csd);
788 if (err)
789 return err;
790
791 err = mmc_decode_csd(card);
792 if (err)
793 return err;
794
795 return 0;
796}
797
798static int mmc_sd_get_ro(struct mmc_host *host)
799{
800 int ro;
801
802 /*
803 * Some systems don't feature a write-protect pin and don't need one.
804 * E.g. because they only have micro-SD card slot. For those systems
805 * assume that the SD card is always read-write.
806 */
807 if (host->caps2 & MMC_CAP2_NO_WRITE_PROTECT)
808 return 0;
809
810 if (!host->ops->get_ro)
811 return -1;
812
813 ro = host->ops->get_ro(host);
814
815 return ro;
816}
817
818int mmc_sd_setup_card(struct mmc_host *host, struct mmc_card *card,
819 bool reinit)
820{
821 int err;
822
823 if (!reinit) {
824 /*
825 * Fetch SCR from card.
826 */
827 err = mmc_app_send_scr(card, card->raw_scr);
828 if (err)
829 return err;
830
831 err = mmc_decode_scr(card);
832 if (err)
833 return err;
834
835 /*
836 * Fetch and process SD Status register.
837 */
838 err = mmc_read_ssr(card);
839 if (err)
840 return err;
841
842 /* Erase init depends on CSD and SSR */
843 mmc_init_erase(card);
844
845 /*
846 * Fetch switch information from card.
847 */
848 err = mmc_read_switch(card);
849 if (err)
850 return err;
851 }
852
853 /*
854 * For SPI, enable CRC as appropriate.
855 * This CRC enable is located AFTER the reading of the
856 * card registers because some SDHC cards are not able
857 * to provide valid CRCs for non-512-byte blocks.
858 */
859 if (mmc_host_is_spi(host)) {
860 err = mmc_spi_set_crc(host, use_spi_crc);
861 if (err)
862 return err;
863 }
864
865 /*
866 * Check if read-only switch is active.
867 */
868 if (!reinit) {
869 int ro = mmc_sd_get_ro(host);
870
871 if (ro < 0) {
872 pr_warn("%s: host does not support reading read-only switch, assuming write-enable\n",
873 mmc_hostname(host));
874 } else if (ro > 0) {
875 mmc_card_set_readonly(card);
876 }
877 }
878
879 return 0;
880}
881
882unsigned mmc_sd_get_max_clock(struct mmc_card *card)
883{
884 unsigned max_dtr = (unsigned int)-1;
885
886 if (mmc_card_hs(card)) {
887 if (max_dtr > card->sw_caps.hs_max_dtr)
888 max_dtr = card->sw_caps.hs_max_dtr;
889 } else if (max_dtr > card->csd.max_dtr) {
890 max_dtr = card->csd.max_dtr;
891 }
892
893 return max_dtr;
894}
895
896/*
897 * Handle the detection and initialisation of a card.
898 *
899 * In the case of a resume, "oldcard" will contain the card
900 * we're trying to reinitialise.
901 */
902static int mmc_sd_init_card(struct mmc_host *host, u32 ocr,
903 struct mmc_card *oldcard)
904{
905 struct mmc_card *card;
906 int err;
907 u32 cid[4];
908 u32 rocr = 0;
909
910 BUG_ON(!host);
911 WARN_ON(!host->claimed);
912
913 err = mmc_sd_get_cid(host, ocr, cid, &rocr);
914 if (err)
915 return err;
916
917 if (oldcard) {
918 if (memcmp(cid, oldcard->raw_cid, sizeof(cid)) != 0)
919 return -ENOENT;
920
921 card = oldcard;
922 } else {
923 /*
924 * Allocate card structure.
925 */
926 card = mmc_alloc_card(host, &sd_type);
927 if (IS_ERR(card))
928 return PTR_ERR(card);
929
930 card->ocr = ocr;
931 card->type = MMC_TYPE_SD;
932 memcpy(card->raw_cid, cid, sizeof(card->raw_cid));
933 }
934
935 /*
936 * Call the optional HC's init_card function to handle quirks.
937 */
938 if (host->ops->init_card)
939 host->ops->init_card(host, card);
940
941 /*
942 * For native busses: get card RCA and quit open drain mode.
943 */
944 if (!mmc_host_is_spi(host)) {
945 err = mmc_send_relative_addr(host, &card->rca);
946 if (err)
947 goto free_card;
948 }
949
950 if (!oldcard) {
951 err = mmc_sd_get_csd(host, card);
952 if (err)
953 goto free_card;
954
955 mmc_decode_cid(card);
956 }
957
958 /*
959 * handling only for cards supporting DSR and hosts requesting
960 * DSR configuration
961 */
962 if (card->csd.dsr_imp && host->dsr_req)
963 mmc_set_dsr(host);
964
965 /*
966 * Select card, as all following commands rely on that.
967 */
968 if (!mmc_host_is_spi(host)) {
969 err = mmc_select_card(card);
970 if (err)
971 goto free_card;
972 }
973
974 err = mmc_sd_setup_card(host, card, oldcard != NULL);
975 if (err)
976 goto free_card;
977
978 /* Initialization sequence for UHS-I cards */
979 if (rocr & SD_ROCR_S18A) {
980 err = mmc_sd_init_uhs_card(card);
981 if (err)
982 goto free_card;
983 } else {
984 /*
985 * Attempt to change to high-speed (if supported)
986 */
987 err = mmc_sd_switch_hs(card);
988 if (err > 0)
989 mmc_set_timing(card->host, MMC_TIMING_SD_HS);
990 else if (err)
991 goto free_card;
992
993 /*
994 * Set bus speed.
995 */
996 mmc_set_clock(host, mmc_sd_get_max_clock(card));
997
998 /*
999 * Switch to wider bus (if supported).
1000 */
1001 if ((host->caps & MMC_CAP_4_BIT_DATA) &&
1002 (card->scr.bus_widths & SD_SCR_BUS_WIDTH_4)) {
1003 err = mmc_app_set_bus_width(card, MMC_BUS_WIDTH_4);
1004 if (err)
1005 goto free_card;
1006
1007 mmc_set_bus_width(host, MMC_BUS_WIDTH_4);
1008 }
1009 }
1010
1011 host->card = card;
1012 return 0;
1013
1014free_card:
1015 if (!oldcard)
1016 mmc_remove_card(card);
1017
1018 return err;
1019}
1020
1021/*
1022 * Host is being removed. Free up the current card.
1023 */
1024static void mmc_sd_remove(struct mmc_host *host)
1025{
1026 BUG_ON(!host);
1027 BUG_ON(!host->card);
1028
1029 mmc_remove_card(host->card);
1030 host->card = NULL;
1031}
1032
1033/*
1034 * Card detection - card is alive.
1035 */
1036static int mmc_sd_alive(struct mmc_host *host)
1037{
1038 return mmc_send_status(host->card, NULL);
1039}
1040
1041/*
1042 * Card detection callback from host.
1043 */
1044static void mmc_sd_detect(struct mmc_host *host)
1045{
1046 int err;
1047
1048 BUG_ON(!host);
1049 BUG_ON(!host->card);
1050
1051 mmc_get_card(host->card);
1052
1053 /*
1054 * Just check if our card has been removed.
1055 */
1056 err = _mmc_detect_card_removed(host);
1057
1058 mmc_put_card(host->card);
1059
1060 if (err) {
1061 mmc_sd_remove(host);
1062
1063 mmc_claim_host(host);
1064 mmc_detach_bus(host);
1065 mmc_power_off(host);
1066 mmc_release_host(host);
1067 }
1068}
1069
1070static int _mmc_sd_suspend(struct mmc_host *host)
1071{
1072 int err = 0;
1073
1074 BUG_ON(!host);
1075 BUG_ON(!host->card);
1076
1077 mmc_claim_host(host);
1078
1079 if (mmc_card_suspended(host->card))
1080 goto out;
1081
1082 if (!mmc_host_is_spi(host))
1083 err = mmc_deselect_cards(host);
1084
1085 if (!err) {
1086 mmc_power_off(host);
1087 mmc_card_set_suspended(host->card);
1088 }
1089
1090out:
1091 mmc_release_host(host);
1092 return err;
1093}
1094
1095/*
1096 * Callback for suspend
1097 */
1098static int mmc_sd_suspend(struct mmc_host *host)
1099{
1100 int err;
1101
1102 err = _mmc_sd_suspend(host);
1103 if (!err) {
1104 pm_runtime_disable(&host->card->dev);
1105 pm_runtime_set_suspended(&host->card->dev);
1106 }
1107
1108 return err;
1109}
1110
1111/*
1112 * This function tries to determine if the same card is still present
1113 * and, if so, restore all state to it.
1114 */
1115static int _mmc_sd_resume(struct mmc_host *host)
1116{
1117 int err = 0;
1118
1119 BUG_ON(!host);
1120 BUG_ON(!host->card);
1121
1122 mmc_claim_host(host);
1123
1124 if (!mmc_card_suspended(host->card))
1125 goto out;
1126
1127 mmc_power_up(host, host->card->ocr);
1128 err = mmc_sd_init_card(host, host->card->ocr, host->card);
1129 mmc_card_clr_suspended(host->card);
1130
1131out:
1132 mmc_release_host(host);
1133 return err;
1134}
1135
1136/*
1137 * Callback for resume
1138 */
1139static int mmc_sd_resume(struct mmc_host *host)
1140{
1141 pm_runtime_enable(&host->card->dev);
1142 return 0;
1143}
1144
1145/*
1146 * Callback for runtime_suspend.
1147 */
1148static int mmc_sd_runtime_suspend(struct mmc_host *host)
1149{
1150 int err;
1151
1152 if (!(host->caps & MMC_CAP_AGGRESSIVE_PM))
1153 return 0;
1154
1155 err = _mmc_sd_suspend(host);
1156 if (err)
1157 pr_err("%s: error %d doing aggressive suspend\n",
1158 mmc_hostname(host), err);
1159
1160 return err;
1161}
1162
1163/*
1164 * Callback for runtime_resume.
1165 */
1166static int mmc_sd_runtime_resume(struct mmc_host *host)
1167{
1168 int err;
1169
1170 err = _mmc_sd_resume(host);
1171 if (err && err != -ENOMEDIUM)
1172 pr_err("%s: error %d doing runtime resume\n",
1173 mmc_hostname(host), err);
1174
1175 return 0;
1176}
1177
1178static int mmc_sd_reset(struct mmc_host *host)
1179{
1180 mmc_power_cycle(host, host->card->ocr);
1181 return mmc_sd_init_card(host, host->card->ocr, host->card);
1182}
1183
1184static const struct mmc_bus_ops mmc_sd_ops = {
1185 .remove = mmc_sd_remove,
1186 .detect = mmc_sd_detect,
1187 .runtime_suspend = mmc_sd_runtime_suspend,
1188 .runtime_resume = mmc_sd_runtime_resume,
1189 .suspend = mmc_sd_suspend,
1190 .resume = mmc_sd_resume,
1191 .alive = mmc_sd_alive,
1192 .shutdown = mmc_sd_suspend,
1193 .reset = mmc_sd_reset,
1194};
1195
1196/*
1197 * Starting point for SD card init.
1198 */
1199int mmc_attach_sd(struct mmc_host *host)
1200{
1201 int err;
1202 u32 ocr, rocr;
1203
1204 BUG_ON(!host);
1205 WARN_ON(!host->claimed);
1206
1207 err = mmc_send_app_op_cond(host, 0, &ocr);
1208 if (err)
1209 return err;
1210
1211 mmc_attach_bus(host, &mmc_sd_ops);
1212 if (host->ocr_avail_sd)
1213 host->ocr_avail = host->ocr_avail_sd;
1214
1215 /*
1216 * We need to get OCR a different way for SPI.
1217 */
1218 if (mmc_host_is_spi(host)) {
1219 mmc_go_idle(host);
1220
1221 err = mmc_spi_read_ocr(host, 0, &ocr);
1222 if (err)
1223 goto err;
1224 }
1225
1226 rocr = mmc_select_voltage(host, ocr);
1227
1228 /*
1229 * Can we support the voltage(s) of the card(s)?
1230 */
1231 if (!rocr) {
1232 err = -EINVAL;
1233 goto err;
1234 }
1235
1236 /*
1237 * Detect and init the card.
1238 */
1239 err = mmc_sd_init_card(host, rocr, NULL);
1240 if (err)
1241 goto err;
1242
1243 mmc_release_host(host);
1244 err = mmc_add_card(host->card);
1245 if (err)
1246 goto remove_card;
1247
1248 mmc_claim_host(host);
1249 return 0;
1250
1251remove_card:
1252 mmc_remove_card(host->card);
1253 host->card = NULL;
1254 mmc_claim_host(host);
1255err:
1256 mmc_detach_bus(host);
1257
1258 pr_err("%s: error %d whilst initialising SD card\n",
1259 mmc_hostname(host), err);
1260
1261 return err;
1262}
1/*
2 * linux/drivers/mmc/core/sd.c
3 *
4 * Copyright (C) 2003-2004 Russell King, All Rights Reserved.
5 * SD support Copyright (C) 2004 Ian Molton, All Rights Reserved.
6 * Copyright (C) 2005-2007 Pierre Ossman, 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#include <linux/sizes.h>
15#include <linux/slab.h>
16#include <linux/stat.h>
17#include <linux/pm_runtime.h>
18
19#include <linux/mmc/host.h>
20#include <linux/mmc/card.h>
21#include <linux/mmc/mmc.h>
22#include <linux/mmc/sd.h>
23
24#include "core.h"
25#include "bus.h"
26#include "mmc_ops.h"
27#include "sd.h"
28#include "sd_ops.h"
29
30static const unsigned int tran_exp[] = {
31 10000, 100000, 1000000, 10000000,
32 0, 0, 0, 0
33};
34
35static const unsigned char tran_mant[] = {
36 0, 10, 12, 13, 15, 20, 25, 30,
37 35, 40, 45, 50, 55, 60, 70, 80,
38};
39
40static const unsigned int tacc_exp[] = {
41 1, 10, 100, 1000, 10000, 100000, 1000000, 10000000,
42};
43
44static const unsigned int tacc_mant[] = {
45 0, 10, 12, 13, 15, 20, 25, 30,
46 35, 40, 45, 50, 55, 60, 70, 80,
47};
48
49static const unsigned int sd_au_size[] = {
50 0, SZ_16K / 512, SZ_32K / 512, SZ_64K / 512,
51 SZ_128K / 512, SZ_256K / 512, SZ_512K / 512, SZ_1M / 512,
52 SZ_2M / 512, SZ_4M / 512, SZ_8M / 512, (SZ_8M + SZ_4M) / 512,
53 SZ_16M / 512, (SZ_16M + SZ_8M) / 512, SZ_32M / 512, SZ_64M / 512,
54};
55
56#define UNSTUFF_BITS(resp,start,size) \
57 ({ \
58 const int __size = size; \
59 const u32 __mask = (__size < 32 ? 1 << __size : 0) - 1; \
60 const int __off = 3 - ((start) / 32); \
61 const int __shft = (start) & 31; \
62 u32 __res; \
63 \
64 __res = resp[__off] >> __shft; \
65 if (__size + __shft > 32) \
66 __res |= resp[__off-1] << ((32 - __shft) % 32); \
67 __res & __mask; \
68 })
69
70/*
71 * Given the decoded CSD structure, decode the raw CID to our CID structure.
72 */
73void mmc_decode_cid(struct mmc_card *card)
74{
75 u32 *resp = card->raw_cid;
76
77 memset(&card->cid, 0, sizeof(struct mmc_cid));
78
79 /*
80 * SD doesn't currently have a version field so we will
81 * have to assume we can parse this.
82 */
83 card->cid.manfid = UNSTUFF_BITS(resp, 120, 8);
84 card->cid.oemid = UNSTUFF_BITS(resp, 104, 16);
85 card->cid.prod_name[0] = UNSTUFF_BITS(resp, 96, 8);
86 card->cid.prod_name[1] = UNSTUFF_BITS(resp, 88, 8);
87 card->cid.prod_name[2] = UNSTUFF_BITS(resp, 80, 8);
88 card->cid.prod_name[3] = UNSTUFF_BITS(resp, 72, 8);
89 card->cid.prod_name[4] = UNSTUFF_BITS(resp, 64, 8);
90 card->cid.hwrev = UNSTUFF_BITS(resp, 60, 4);
91 card->cid.fwrev = UNSTUFF_BITS(resp, 56, 4);
92 card->cid.serial = UNSTUFF_BITS(resp, 24, 32);
93 card->cid.year = UNSTUFF_BITS(resp, 12, 8);
94 card->cid.month = UNSTUFF_BITS(resp, 8, 4);
95
96 card->cid.year += 2000; /* SD cards year offset */
97}
98
99/*
100 * Given a 128-bit response, decode to our card CSD structure.
101 */
102static int mmc_decode_csd(struct mmc_card *card)
103{
104 struct mmc_csd *csd = &card->csd;
105 unsigned int e, m, csd_struct;
106 u32 *resp = card->raw_csd;
107
108 csd_struct = UNSTUFF_BITS(resp, 126, 2);
109
110 switch (csd_struct) {
111 case 0:
112 m = UNSTUFF_BITS(resp, 115, 4);
113 e = UNSTUFF_BITS(resp, 112, 3);
114 csd->tacc_ns = (tacc_exp[e] * tacc_mant[m] + 9) / 10;
115 csd->tacc_clks = UNSTUFF_BITS(resp, 104, 8) * 100;
116
117 m = UNSTUFF_BITS(resp, 99, 4);
118 e = UNSTUFF_BITS(resp, 96, 3);
119 csd->max_dtr = tran_exp[e] * tran_mant[m];
120 csd->cmdclass = UNSTUFF_BITS(resp, 84, 12);
121
122 e = UNSTUFF_BITS(resp, 47, 3);
123 m = UNSTUFF_BITS(resp, 62, 12);
124 csd->capacity = (1 + m) << (e + 2);
125
126 csd->read_blkbits = UNSTUFF_BITS(resp, 80, 4);
127 csd->read_partial = UNSTUFF_BITS(resp, 79, 1);
128 csd->write_misalign = UNSTUFF_BITS(resp, 78, 1);
129 csd->read_misalign = UNSTUFF_BITS(resp, 77, 1);
130 csd->r2w_factor = UNSTUFF_BITS(resp, 26, 3);
131 csd->write_blkbits = UNSTUFF_BITS(resp, 22, 4);
132 csd->write_partial = UNSTUFF_BITS(resp, 21, 1);
133
134 if (UNSTUFF_BITS(resp, 46, 1)) {
135 csd->erase_size = 1;
136 } else if (csd->write_blkbits >= 9) {
137 csd->erase_size = UNSTUFF_BITS(resp, 39, 7) + 1;
138 csd->erase_size <<= csd->write_blkbits - 9;
139 }
140 break;
141 case 1:
142 /*
143 * This is a block-addressed SDHC or SDXC card. Most
144 * interesting fields are unused and have fixed
145 * values. To avoid getting tripped by buggy cards,
146 * we assume those fixed values ourselves.
147 */
148 mmc_card_set_blockaddr(card);
149
150 csd->tacc_ns = 0; /* Unused */
151 csd->tacc_clks = 0; /* Unused */
152
153 m = UNSTUFF_BITS(resp, 99, 4);
154 e = UNSTUFF_BITS(resp, 96, 3);
155 csd->max_dtr = tran_exp[e] * tran_mant[m];
156 csd->cmdclass = UNSTUFF_BITS(resp, 84, 12);
157 csd->c_size = UNSTUFF_BITS(resp, 48, 22);
158
159 /* SDXC cards have a minimum C_SIZE of 0x00FFFF */
160 if (csd->c_size >= 0xFFFF)
161 mmc_card_set_ext_capacity(card);
162
163 m = UNSTUFF_BITS(resp, 48, 22);
164 csd->capacity = (1 + m) << 10;
165
166 csd->read_blkbits = 9;
167 csd->read_partial = 0;
168 csd->write_misalign = 0;
169 csd->read_misalign = 0;
170 csd->r2w_factor = 4; /* Unused */
171 csd->write_blkbits = 9;
172 csd->write_partial = 0;
173 csd->erase_size = 1;
174 break;
175 default:
176 pr_err("%s: unrecognised CSD structure version %d\n",
177 mmc_hostname(card->host), csd_struct);
178 return -EINVAL;
179 }
180
181 card->erase_size = csd->erase_size;
182
183 return 0;
184}
185
186/*
187 * Given a 64-bit response, decode to our card SCR structure.
188 */
189static int mmc_decode_scr(struct mmc_card *card)
190{
191 struct sd_scr *scr = &card->scr;
192 unsigned int scr_struct;
193 u32 resp[4];
194
195 resp[3] = card->raw_scr[1];
196 resp[2] = card->raw_scr[0];
197
198 scr_struct = UNSTUFF_BITS(resp, 60, 4);
199 if (scr_struct != 0) {
200 pr_err("%s: unrecognised SCR structure version %d\n",
201 mmc_hostname(card->host), scr_struct);
202 return -EINVAL;
203 }
204
205 scr->sda_vsn = UNSTUFF_BITS(resp, 56, 4);
206 scr->bus_widths = UNSTUFF_BITS(resp, 48, 4);
207 if (scr->sda_vsn == SCR_SPEC_VER_2)
208 /* Check if Physical Layer Spec v3.0 is supported */
209 scr->sda_spec3 = UNSTUFF_BITS(resp, 47, 1);
210
211 if (UNSTUFF_BITS(resp, 55, 1))
212 card->erased_byte = 0xFF;
213 else
214 card->erased_byte = 0x0;
215
216 if (scr->sda_spec3)
217 scr->cmds = UNSTUFF_BITS(resp, 32, 2);
218 return 0;
219}
220
221/*
222 * Fetch and process SD Status register.
223 */
224static int mmc_read_ssr(struct mmc_card *card)
225{
226 unsigned int au, es, et, eo;
227 int err, i;
228 u32 *ssr;
229
230 if (!(card->csd.cmdclass & CCC_APP_SPEC)) {
231 pr_warning("%s: card lacks mandatory SD Status "
232 "function.\n", mmc_hostname(card->host));
233 return 0;
234 }
235
236 ssr = kmalloc(64, GFP_KERNEL);
237 if (!ssr)
238 return -ENOMEM;
239
240 err = mmc_app_sd_status(card, ssr);
241 if (err) {
242 pr_warning("%s: problem reading SD Status "
243 "register.\n", mmc_hostname(card->host));
244 err = 0;
245 goto out;
246 }
247
248 for (i = 0; i < 16; i++)
249 ssr[i] = be32_to_cpu(ssr[i]);
250
251 /*
252 * UNSTUFF_BITS only works with four u32s so we have to offset the
253 * bitfield positions accordingly.
254 */
255 au = UNSTUFF_BITS(ssr, 428 - 384, 4);
256 if (au) {
257 if (au <= 9 || card->scr.sda_spec3) {
258 card->ssr.au = sd_au_size[au];
259 es = UNSTUFF_BITS(ssr, 408 - 384, 16);
260 et = UNSTUFF_BITS(ssr, 402 - 384, 6);
261 if (es && et) {
262 eo = UNSTUFF_BITS(ssr, 400 - 384, 2);
263 card->ssr.erase_timeout = (et * 1000) / es;
264 card->ssr.erase_offset = eo * 1000;
265 }
266 } else {
267 pr_warning("%s: SD Status: Invalid Allocation Unit size.\n",
268 mmc_hostname(card->host));
269 }
270 }
271out:
272 kfree(ssr);
273 return err;
274}
275
276/*
277 * Fetches and decodes switch information
278 */
279static int mmc_read_switch(struct mmc_card *card)
280{
281 int err;
282 u8 *status;
283
284 if (card->scr.sda_vsn < SCR_SPEC_VER_1)
285 return 0;
286
287 if (!(card->csd.cmdclass & CCC_SWITCH)) {
288 pr_warning("%s: card lacks mandatory switch "
289 "function, performance might suffer.\n",
290 mmc_hostname(card->host));
291 return 0;
292 }
293
294 err = -EIO;
295
296 status = kmalloc(64, GFP_KERNEL);
297 if (!status) {
298 pr_err("%s: could not allocate a buffer for "
299 "switch capabilities.\n",
300 mmc_hostname(card->host));
301 return -ENOMEM;
302 }
303
304 /*
305 * Find out the card's support bits with a mode 0 operation.
306 * The argument does not matter, as the support bits do not
307 * change with the arguments.
308 */
309 err = mmc_sd_switch(card, 0, 0, 0, status);
310 if (err) {
311 /*
312 * If the host or the card can't do the switch,
313 * fail more gracefully.
314 */
315 if (err != -EINVAL && err != -ENOSYS && err != -EFAULT)
316 goto out;
317
318 pr_warning("%s: problem reading Bus Speed modes.\n",
319 mmc_hostname(card->host));
320 err = 0;
321
322 goto out;
323 }
324
325 if (status[13] & SD_MODE_HIGH_SPEED)
326 card->sw_caps.hs_max_dtr = HIGH_SPEED_MAX_DTR;
327
328 if (card->scr.sda_spec3) {
329 card->sw_caps.sd3_bus_mode = status[13];
330 /* Driver Strengths supported by the card */
331 card->sw_caps.sd3_drv_type = status[9];
332 }
333
334out:
335 kfree(status);
336
337 return err;
338}
339
340/*
341 * Test if the card supports high-speed mode and, if so, switch to it.
342 */
343int mmc_sd_switch_hs(struct mmc_card *card)
344{
345 int err;
346 u8 *status;
347
348 if (card->scr.sda_vsn < SCR_SPEC_VER_1)
349 return 0;
350
351 if (!(card->csd.cmdclass & CCC_SWITCH))
352 return 0;
353
354 if (!(card->host->caps & MMC_CAP_SD_HIGHSPEED))
355 return 0;
356
357 if (card->sw_caps.hs_max_dtr == 0)
358 return 0;
359
360 err = -EIO;
361
362 status = kmalloc(64, GFP_KERNEL);
363 if (!status) {
364 pr_err("%s: could not allocate a buffer for "
365 "switch capabilities.\n", mmc_hostname(card->host));
366 return -ENOMEM;
367 }
368
369 err = mmc_sd_switch(card, 1, 0, 1, status);
370 if (err)
371 goto out;
372
373 if ((status[16] & 0xF) != 1) {
374 pr_warning("%s: Problem switching card "
375 "into high-speed mode!\n",
376 mmc_hostname(card->host));
377 err = 0;
378 } else {
379 err = 1;
380 }
381
382out:
383 kfree(status);
384
385 return err;
386}
387
388static int sd_select_driver_type(struct mmc_card *card, u8 *status)
389{
390 int host_drv_type = SD_DRIVER_TYPE_B;
391 int card_drv_type = SD_DRIVER_TYPE_B;
392 int drive_strength;
393 int err;
394
395 /*
396 * If the host doesn't support any of the Driver Types A,C or D,
397 * or there is no board specific handler then default Driver
398 * Type B is used.
399 */
400 if (!(card->host->caps & (MMC_CAP_DRIVER_TYPE_A | MMC_CAP_DRIVER_TYPE_C
401 | MMC_CAP_DRIVER_TYPE_D)))
402 return 0;
403
404 if (!card->host->ops->select_drive_strength)
405 return 0;
406
407 if (card->host->caps & MMC_CAP_DRIVER_TYPE_A)
408 host_drv_type |= SD_DRIVER_TYPE_A;
409
410 if (card->host->caps & MMC_CAP_DRIVER_TYPE_C)
411 host_drv_type |= SD_DRIVER_TYPE_C;
412
413 if (card->host->caps & MMC_CAP_DRIVER_TYPE_D)
414 host_drv_type |= SD_DRIVER_TYPE_D;
415
416 if (card->sw_caps.sd3_drv_type & SD_DRIVER_TYPE_A)
417 card_drv_type |= SD_DRIVER_TYPE_A;
418
419 if (card->sw_caps.sd3_drv_type & SD_DRIVER_TYPE_C)
420 card_drv_type |= SD_DRIVER_TYPE_C;
421
422 if (card->sw_caps.sd3_drv_type & SD_DRIVER_TYPE_D)
423 card_drv_type |= SD_DRIVER_TYPE_D;
424
425 /*
426 * The drive strength that the hardware can support
427 * depends on the board design. Pass the appropriate
428 * information and let the hardware specific code
429 * return what is possible given the options
430 */
431 mmc_host_clk_hold(card->host);
432 drive_strength = card->host->ops->select_drive_strength(
433 card->sw_caps.uhs_max_dtr,
434 host_drv_type, card_drv_type);
435 mmc_host_clk_release(card->host);
436
437 err = mmc_sd_switch(card, 1, 2, drive_strength, status);
438 if (err)
439 return err;
440
441 if ((status[15] & 0xF) != drive_strength) {
442 pr_warning("%s: Problem setting drive strength!\n",
443 mmc_hostname(card->host));
444 return 0;
445 }
446
447 mmc_set_driver_type(card->host, drive_strength);
448
449 return 0;
450}
451
452static void sd_update_bus_speed_mode(struct mmc_card *card)
453{
454 /*
455 * If the host doesn't support any of the UHS-I modes, fallback on
456 * default speed.
457 */
458 if (!mmc_host_uhs(card->host)) {
459 card->sd_bus_speed = 0;
460 return;
461 }
462
463 if ((card->host->caps & MMC_CAP_UHS_SDR104) &&
464 (card->sw_caps.sd3_bus_mode & SD_MODE_UHS_SDR104)) {
465 card->sd_bus_speed = UHS_SDR104_BUS_SPEED;
466 } else if ((card->host->caps & MMC_CAP_UHS_DDR50) &&
467 (card->sw_caps.sd3_bus_mode & SD_MODE_UHS_DDR50)) {
468 card->sd_bus_speed = UHS_DDR50_BUS_SPEED;
469 } else if ((card->host->caps & (MMC_CAP_UHS_SDR104 |
470 MMC_CAP_UHS_SDR50)) && (card->sw_caps.sd3_bus_mode &
471 SD_MODE_UHS_SDR50)) {
472 card->sd_bus_speed = UHS_SDR50_BUS_SPEED;
473 } else if ((card->host->caps & (MMC_CAP_UHS_SDR104 |
474 MMC_CAP_UHS_SDR50 | MMC_CAP_UHS_SDR25)) &&
475 (card->sw_caps.sd3_bus_mode & SD_MODE_UHS_SDR25)) {
476 card->sd_bus_speed = UHS_SDR25_BUS_SPEED;
477 } else if ((card->host->caps & (MMC_CAP_UHS_SDR104 |
478 MMC_CAP_UHS_SDR50 | MMC_CAP_UHS_SDR25 |
479 MMC_CAP_UHS_SDR12)) && (card->sw_caps.sd3_bus_mode &
480 SD_MODE_UHS_SDR12)) {
481 card->sd_bus_speed = UHS_SDR12_BUS_SPEED;
482 }
483}
484
485static int sd_set_bus_speed_mode(struct mmc_card *card, u8 *status)
486{
487 int err;
488 unsigned int timing = 0;
489
490 switch (card->sd_bus_speed) {
491 case UHS_SDR104_BUS_SPEED:
492 timing = MMC_TIMING_UHS_SDR104;
493 card->sw_caps.uhs_max_dtr = UHS_SDR104_MAX_DTR;
494 break;
495 case UHS_DDR50_BUS_SPEED:
496 timing = MMC_TIMING_UHS_DDR50;
497 card->sw_caps.uhs_max_dtr = UHS_DDR50_MAX_DTR;
498 break;
499 case UHS_SDR50_BUS_SPEED:
500 timing = MMC_TIMING_UHS_SDR50;
501 card->sw_caps.uhs_max_dtr = UHS_SDR50_MAX_DTR;
502 break;
503 case UHS_SDR25_BUS_SPEED:
504 timing = MMC_TIMING_UHS_SDR25;
505 card->sw_caps.uhs_max_dtr = UHS_SDR25_MAX_DTR;
506 break;
507 case UHS_SDR12_BUS_SPEED:
508 timing = MMC_TIMING_UHS_SDR12;
509 card->sw_caps.uhs_max_dtr = UHS_SDR12_MAX_DTR;
510 break;
511 default:
512 return 0;
513 }
514
515 err = mmc_sd_switch(card, 1, 0, card->sd_bus_speed, status);
516 if (err)
517 return err;
518
519 if ((status[16] & 0xF) != card->sd_bus_speed)
520 pr_warning("%s: Problem setting bus speed mode!\n",
521 mmc_hostname(card->host));
522 else {
523 mmc_set_timing(card->host, timing);
524 mmc_set_clock(card->host, card->sw_caps.uhs_max_dtr);
525 }
526
527 return 0;
528}
529
530/* Get host's max current setting at its current voltage */
531static u32 sd_get_host_max_current(struct mmc_host *host)
532{
533 u32 voltage, max_current;
534
535 voltage = 1 << host->ios.vdd;
536 switch (voltage) {
537 case MMC_VDD_165_195:
538 max_current = host->max_current_180;
539 break;
540 case MMC_VDD_29_30:
541 case MMC_VDD_30_31:
542 max_current = host->max_current_300;
543 break;
544 case MMC_VDD_32_33:
545 case MMC_VDD_33_34:
546 max_current = host->max_current_330;
547 break;
548 default:
549 max_current = 0;
550 }
551
552 return max_current;
553}
554
555static int sd_set_current_limit(struct mmc_card *card, u8 *status)
556{
557 int current_limit = SD_SET_CURRENT_NO_CHANGE;
558 int err;
559 u32 max_current;
560
561 /*
562 * Current limit switch is only defined for SDR50, SDR104, and DDR50
563 * bus speed modes. For other bus speed modes, we do not change the
564 * current limit.
565 */
566 if ((card->sd_bus_speed != UHS_SDR50_BUS_SPEED) &&
567 (card->sd_bus_speed != UHS_SDR104_BUS_SPEED) &&
568 (card->sd_bus_speed != UHS_DDR50_BUS_SPEED))
569 return 0;
570
571 /*
572 * Host has different current capabilities when operating at
573 * different voltages, so find out its max current first.
574 */
575 max_current = sd_get_host_max_current(card->host);
576
577 /*
578 * We only check host's capability here, if we set a limit that is
579 * higher than the card's maximum current, the card will be using its
580 * maximum current, e.g. if the card's maximum current is 300ma, and
581 * when we set current limit to 200ma, the card will draw 200ma, and
582 * when we set current limit to 400/600/800ma, the card will draw its
583 * maximum 300ma from the host.
584 */
585 if (max_current >= 800)
586 current_limit = SD_SET_CURRENT_LIMIT_800;
587 else if (max_current >= 600)
588 current_limit = SD_SET_CURRENT_LIMIT_600;
589 else if (max_current >= 400)
590 current_limit = SD_SET_CURRENT_LIMIT_400;
591 else if (max_current >= 200)
592 current_limit = SD_SET_CURRENT_LIMIT_200;
593
594 if (current_limit != SD_SET_CURRENT_NO_CHANGE) {
595 err = mmc_sd_switch(card, 1, 3, current_limit, status);
596 if (err)
597 return err;
598
599 if (((status[15] >> 4) & 0x0F) != current_limit)
600 pr_warning("%s: Problem setting current limit!\n",
601 mmc_hostname(card->host));
602
603 }
604
605 return 0;
606}
607
608/*
609 * UHS-I specific initialization procedure
610 */
611static int mmc_sd_init_uhs_card(struct mmc_card *card)
612{
613 int err;
614 u8 *status;
615
616 if (!card->scr.sda_spec3)
617 return 0;
618
619 if (!(card->csd.cmdclass & CCC_SWITCH))
620 return 0;
621
622 status = kmalloc(64, GFP_KERNEL);
623 if (!status) {
624 pr_err("%s: could not allocate a buffer for "
625 "switch capabilities.\n", mmc_hostname(card->host));
626 return -ENOMEM;
627 }
628
629 /* Set 4-bit bus width */
630 if ((card->host->caps & MMC_CAP_4_BIT_DATA) &&
631 (card->scr.bus_widths & SD_SCR_BUS_WIDTH_4)) {
632 err = mmc_app_set_bus_width(card, MMC_BUS_WIDTH_4);
633 if (err)
634 goto out;
635
636 mmc_set_bus_width(card->host, MMC_BUS_WIDTH_4);
637 }
638
639 /*
640 * Select the bus speed mode depending on host
641 * and card capability.
642 */
643 sd_update_bus_speed_mode(card);
644
645 /* Set the driver strength for the card */
646 err = sd_select_driver_type(card, status);
647 if (err)
648 goto out;
649
650 /* Set current limit for the card */
651 err = sd_set_current_limit(card, status);
652 if (err)
653 goto out;
654
655 /* Set bus speed mode of the card */
656 err = sd_set_bus_speed_mode(card, status);
657 if (err)
658 goto out;
659
660 /*
661 * SPI mode doesn't define CMD19 and tuning is only valid for SDR50 and
662 * SDR104 mode SD-cards. Note that tuning is mandatory for SDR104.
663 */
664 if (!mmc_host_is_spi(card->host) && card->host->ops->execute_tuning &&
665 (card->sd_bus_speed == UHS_SDR50_BUS_SPEED ||
666 card->sd_bus_speed == UHS_SDR104_BUS_SPEED)) {
667 mmc_host_clk_hold(card->host);
668 err = card->host->ops->execute_tuning(card->host,
669 MMC_SEND_TUNING_BLOCK);
670 mmc_host_clk_release(card->host);
671 }
672
673out:
674 kfree(status);
675
676 return err;
677}
678
679MMC_DEV_ATTR(cid, "%08x%08x%08x%08x\n", card->raw_cid[0], card->raw_cid[1],
680 card->raw_cid[2], card->raw_cid[3]);
681MMC_DEV_ATTR(csd, "%08x%08x%08x%08x\n", card->raw_csd[0], card->raw_csd[1],
682 card->raw_csd[2], card->raw_csd[3]);
683MMC_DEV_ATTR(scr, "%08x%08x\n", card->raw_scr[0], card->raw_scr[1]);
684MMC_DEV_ATTR(date, "%02d/%04d\n", card->cid.month, card->cid.year);
685MMC_DEV_ATTR(erase_size, "%u\n", card->erase_size << 9);
686MMC_DEV_ATTR(preferred_erase_size, "%u\n", card->pref_erase << 9);
687MMC_DEV_ATTR(fwrev, "0x%x\n", card->cid.fwrev);
688MMC_DEV_ATTR(hwrev, "0x%x\n", card->cid.hwrev);
689MMC_DEV_ATTR(manfid, "0x%06x\n", card->cid.manfid);
690MMC_DEV_ATTR(name, "%s\n", card->cid.prod_name);
691MMC_DEV_ATTR(oemid, "0x%04x\n", card->cid.oemid);
692MMC_DEV_ATTR(serial, "0x%08x\n", card->cid.serial);
693
694
695static struct attribute *sd_std_attrs[] = {
696 &dev_attr_cid.attr,
697 &dev_attr_csd.attr,
698 &dev_attr_scr.attr,
699 &dev_attr_date.attr,
700 &dev_attr_erase_size.attr,
701 &dev_attr_preferred_erase_size.attr,
702 &dev_attr_fwrev.attr,
703 &dev_attr_hwrev.attr,
704 &dev_attr_manfid.attr,
705 &dev_attr_name.attr,
706 &dev_attr_oemid.attr,
707 &dev_attr_serial.attr,
708 NULL,
709};
710
711static struct attribute_group sd_std_attr_group = {
712 .attrs = sd_std_attrs,
713};
714
715static const struct attribute_group *sd_attr_groups[] = {
716 &sd_std_attr_group,
717 NULL,
718};
719
720struct device_type sd_type = {
721 .groups = sd_attr_groups,
722};
723
724/*
725 * Fetch CID from card.
726 */
727int mmc_sd_get_cid(struct mmc_host *host, u32 ocr, u32 *cid, u32 *rocr)
728{
729 int err;
730 u32 max_current;
731 int retries = 10;
732 u32 pocr = ocr;
733
734try_again:
735 if (!retries) {
736 ocr &= ~SD_OCR_S18R;
737 pr_warning("%s: Skipping voltage switch\n",
738 mmc_hostname(host));
739 }
740
741 /*
742 * Since we're changing the OCR value, we seem to
743 * need to tell some cards to go back to the idle
744 * state. We wait 1ms to give cards time to
745 * respond.
746 */
747 mmc_go_idle(host);
748
749 /*
750 * If SD_SEND_IF_COND indicates an SD 2.0
751 * compliant card and we should set bit 30
752 * of the ocr to indicate that we can handle
753 * block-addressed SDHC cards.
754 */
755 err = mmc_send_if_cond(host, ocr);
756 if (!err)
757 ocr |= SD_OCR_CCS;
758
759 /*
760 * If the host supports one of UHS-I modes, request the card
761 * to switch to 1.8V signaling level. If the card has failed
762 * repeatedly to switch however, skip this.
763 */
764 if (retries && mmc_host_uhs(host))
765 ocr |= SD_OCR_S18R;
766
767 /*
768 * If the host can supply more than 150mA at current voltage,
769 * XPC should be set to 1.
770 */
771 max_current = sd_get_host_max_current(host);
772 if (max_current > 150)
773 ocr |= SD_OCR_XPC;
774
775 err = mmc_send_app_op_cond(host, ocr, rocr);
776 if (err)
777 return err;
778
779 /*
780 * In case CCS and S18A in the response is set, start Signal Voltage
781 * Switch procedure. SPI mode doesn't support CMD11.
782 */
783 if (!mmc_host_is_spi(host) && rocr &&
784 ((*rocr & 0x41000000) == 0x41000000)) {
785 err = mmc_set_signal_voltage(host, MMC_SIGNAL_VOLTAGE_180,
786 pocr);
787 if (err == -EAGAIN) {
788 retries--;
789 goto try_again;
790 } else if (err) {
791 retries = 0;
792 goto try_again;
793 }
794 }
795
796 if (mmc_host_is_spi(host))
797 err = mmc_send_cid(host, cid);
798 else
799 err = mmc_all_send_cid(host, cid);
800
801 return err;
802}
803
804int mmc_sd_get_csd(struct mmc_host *host, struct mmc_card *card)
805{
806 int err;
807
808 /*
809 * Fetch CSD from card.
810 */
811 err = mmc_send_csd(card, card->raw_csd);
812 if (err)
813 return err;
814
815 err = mmc_decode_csd(card);
816 if (err)
817 return err;
818
819 return 0;
820}
821
822int mmc_sd_setup_card(struct mmc_host *host, struct mmc_card *card,
823 bool reinit)
824{
825 int err;
826
827 if (!reinit) {
828 /*
829 * Fetch SCR from card.
830 */
831 err = mmc_app_send_scr(card, card->raw_scr);
832 if (err)
833 return err;
834
835 err = mmc_decode_scr(card);
836 if (err)
837 return err;
838
839 /*
840 * Fetch and process SD Status register.
841 */
842 err = mmc_read_ssr(card);
843 if (err)
844 return err;
845
846 /* Erase init depends on CSD and SSR */
847 mmc_init_erase(card);
848
849 /*
850 * Fetch switch information from card.
851 */
852 err = mmc_read_switch(card);
853 if (err)
854 return err;
855 }
856
857 /*
858 * For SPI, enable CRC as appropriate.
859 * This CRC enable is located AFTER the reading of the
860 * card registers because some SDHC cards are not able
861 * to provide valid CRCs for non-512-byte blocks.
862 */
863 if (mmc_host_is_spi(host)) {
864 err = mmc_spi_set_crc(host, use_spi_crc);
865 if (err)
866 return err;
867 }
868
869 /*
870 * Check if read-only switch is active.
871 */
872 if (!reinit) {
873 int ro = -1;
874
875 if (host->ops->get_ro) {
876 mmc_host_clk_hold(card->host);
877 ro = host->ops->get_ro(host);
878 mmc_host_clk_release(card->host);
879 }
880
881 if (ro < 0) {
882 pr_warning("%s: host does not "
883 "support reading read-only "
884 "switch. assuming write-enable.\n",
885 mmc_hostname(host));
886 } else if (ro > 0) {
887 mmc_card_set_readonly(card);
888 }
889 }
890
891 return 0;
892}
893
894unsigned mmc_sd_get_max_clock(struct mmc_card *card)
895{
896 unsigned max_dtr = (unsigned int)-1;
897
898 if (mmc_card_highspeed(card)) {
899 if (max_dtr > card->sw_caps.hs_max_dtr)
900 max_dtr = card->sw_caps.hs_max_dtr;
901 } else if (max_dtr > card->csd.max_dtr) {
902 max_dtr = card->csd.max_dtr;
903 }
904
905 return max_dtr;
906}
907
908void mmc_sd_go_highspeed(struct mmc_card *card)
909{
910 mmc_card_set_highspeed(card);
911 mmc_set_timing(card->host, MMC_TIMING_SD_HS);
912}
913
914/*
915 * Handle the detection and initialisation of a card.
916 *
917 * In the case of a resume, "oldcard" will contain the card
918 * we're trying to reinitialise.
919 */
920static int mmc_sd_init_card(struct mmc_host *host, u32 ocr,
921 struct mmc_card *oldcard)
922{
923 struct mmc_card *card;
924 int err;
925 u32 cid[4];
926 u32 rocr = 0;
927
928 BUG_ON(!host);
929 WARN_ON(!host->claimed);
930
931 err = mmc_sd_get_cid(host, ocr, cid, &rocr);
932 if (err)
933 return err;
934
935 if (oldcard) {
936 if (memcmp(cid, oldcard->raw_cid, sizeof(cid)) != 0)
937 return -ENOENT;
938
939 card = oldcard;
940 } else {
941 /*
942 * Allocate card structure.
943 */
944 card = mmc_alloc_card(host, &sd_type);
945 if (IS_ERR(card))
946 return PTR_ERR(card);
947
948 card->ocr = ocr;
949 card->type = MMC_TYPE_SD;
950 memcpy(card->raw_cid, cid, sizeof(card->raw_cid));
951 }
952
953 /*
954 * For native busses: get card RCA and quit open drain mode.
955 */
956 if (!mmc_host_is_spi(host)) {
957 err = mmc_send_relative_addr(host, &card->rca);
958 if (err)
959 goto free_card;
960 }
961
962 if (!oldcard) {
963 err = mmc_sd_get_csd(host, card);
964 if (err)
965 goto free_card;
966
967 mmc_decode_cid(card);
968 }
969
970 /*
971 * Select card, as all following commands rely on that.
972 */
973 if (!mmc_host_is_spi(host)) {
974 err = mmc_select_card(card);
975 if (err)
976 goto free_card;
977 }
978
979 err = mmc_sd_setup_card(host, card, oldcard != NULL);
980 if (err)
981 goto free_card;
982
983 /* Initialization sequence for UHS-I cards */
984 if (rocr & SD_ROCR_S18A) {
985 err = mmc_sd_init_uhs_card(card);
986 if (err)
987 goto free_card;
988
989 /* Card is an ultra-high-speed card */
990 mmc_card_set_uhs(card);
991 } else {
992 /*
993 * Attempt to change to high-speed (if supported)
994 */
995 err = mmc_sd_switch_hs(card);
996 if (err > 0)
997 mmc_sd_go_highspeed(card);
998 else if (err)
999 goto free_card;
1000
1001 /*
1002 * Set bus speed.
1003 */
1004 mmc_set_clock(host, mmc_sd_get_max_clock(card));
1005
1006 /*
1007 * Switch to wider bus (if supported).
1008 */
1009 if ((host->caps & MMC_CAP_4_BIT_DATA) &&
1010 (card->scr.bus_widths & SD_SCR_BUS_WIDTH_4)) {
1011 err = mmc_app_set_bus_width(card, MMC_BUS_WIDTH_4);
1012 if (err)
1013 goto free_card;
1014
1015 mmc_set_bus_width(host, MMC_BUS_WIDTH_4);
1016 }
1017 }
1018
1019 host->card = card;
1020 return 0;
1021
1022free_card:
1023 if (!oldcard)
1024 mmc_remove_card(card);
1025
1026 return err;
1027}
1028
1029/*
1030 * Host is being removed. Free up the current card.
1031 */
1032static void mmc_sd_remove(struct mmc_host *host)
1033{
1034 BUG_ON(!host);
1035 BUG_ON(!host->card);
1036
1037 mmc_remove_card(host->card);
1038 host->card = NULL;
1039}
1040
1041/*
1042 * Card detection - card is alive.
1043 */
1044static int mmc_sd_alive(struct mmc_host *host)
1045{
1046 return mmc_send_status(host->card, NULL);
1047}
1048
1049/*
1050 * Card detection callback from host.
1051 */
1052static void mmc_sd_detect(struct mmc_host *host)
1053{
1054 int err;
1055
1056 BUG_ON(!host);
1057 BUG_ON(!host->card);
1058
1059 mmc_get_card(host->card);
1060
1061 /*
1062 * Just check if our card has been removed.
1063 */
1064 err = _mmc_detect_card_removed(host);
1065
1066 mmc_put_card(host->card);
1067
1068 if (err) {
1069 mmc_sd_remove(host);
1070
1071 mmc_claim_host(host);
1072 mmc_detach_bus(host);
1073 mmc_power_off(host);
1074 mmc_release_host(host);
1075 }
1076}
1077
1078static int _mmc_sd_suspend(struct mmc_host *host)
1079{
1080 int err = 0;
1081
1082 BUG_ON(!host);
1083 BUG_ON(!host->card);
1084
1085 mmc_claim_host(host);
1086
1087 if (mmc_card_suspended(host->card))
1088 goto out;
1089
1090 if (!mmc_host_is_spi(host))
1091 err = mmc_deselect_cards(host);
1092 host->card->state &= ~MMC_STATE_HIGHSPEED;
1093 if (!err) {
1094 mmc_power_off(host);
1095 mmc_card_set_suspended(host->card);
1096 }
1097
1098out:
1099 mmc_release_host(host);
1100 return err;
1101}
1102
1103/*
1104 * Callback for suspend
1105 */
1106static int mmc_sd_suspend(struct mmc_host *host)
1107{
1108 int err;
1109
1110 err = _mmc_sd_suspend(host);
1111 if (!err) {
1112 pm_runtime_disable(&host->card->dev);
1113 pm_runtime_set_suspended(&host->card->dev);
1114 }
1115
1116 return err;
1117}
1118
1119/*
1120 * This function tries to determine if the same card is still present
1121 * and, if so, restore all state to it.
1122 */
1123static int _mmc_sd_resume(struct mmc_host *host)
1124{
1125 int err = 0;
1126
1127 BUG_ON(!host);
1128 BUG_ON(!host->card);
1129
1130 mmc_claim_host(host);
1131
1132 if (!mmc_card_suspended(host->card))
1133 goto out;
1134
1135 mmc_power_up(host, host->card->ocr);
1136 err = mmc_sd_init_card(host, host->card->ocr, host->card);
1137 mmc_card_clr_suspended(host->card);
1138
1139out:
1140 mmc_release_host(host);
1141 return err;
1142}
1143
1144/*
1145 * Callback for resume
1146 */
1147static int mmc_sd_resume(struct mmc_host *host)
1148{
1149 int err = 0;
1150
1151 if (!(host->caps & MMC_CAP_RUNTIME_RESUME)) {
1152 err = _mmc_sd_resume(host);
1153 pm_runtime_set_active(&host->card->dev);
1154 pm_runtime_mark_last_busy(&host->card->dev);
1155 }
1156 pm_runtime_enable(&host->card->dev);
1157
1158 return err;
1159}
1160
1161/*
1162 * Callback for runtime_suspend.
1163 */
1164static int mmc_sd_runtime_suspend(struct mmc_host *host)
1165{
1166 int err;
1167
1168 if (!(host->caps & MMC_CAP_AGGRESSIVE_PM))
1169 return 0;
1170
1171 err = _mmc_sd_suspend(host);
1172 if (err)
1173 pr_err("%s: error %d doing aggessive suspend\n",
1174 mmc_hostname(host), err);
1175
1176 return err;
1177}
1178
1179/*
1180 * Callback for runtime_resume.
1181 */
1182static int mmc_sd_runtime_resume(struct mmc_host *host)
1183{
1184 int err;
1185
1186 if (!(host->caps & (MMC_CAP_AGGRESSIVE_PM | MMC_CAP_RUNTIME_RESUME)))
1187 return 0;
1188
1189 err = _mmc_sd_resume(host);
1190 if (err)
1191 pr_err("%s: error %d doing aggessive resume\n",
1192 mmc_hostname(host), err);
1193
1194 return 0;
1195}
1196
1197static int mmc_sd_power_restore(struct mmc_host *host)
1198{
1199 int ret;
1200
1201 host->card->state &= ~MMC_STATE_HIGHSPEED;
1202 mmc_claim_host(host);
1203 ret = mmc_sd_init_card(host, host->card->ocr, host->card);
1204 mmc_release_host(host);
1205
1206 return ret;
1207}
1208
1209static const struct mmc_bus_ops mmc_sd_ops = {
1210 .remove = mmc_sd_remove,
1211 .detect = mmc_sd_detect,
1212 .runtime_suspend = mmc_sd_runtime_suspend,
1213 .runtime_resume = mmc_sd_runtime_resume,
1214 .suspend = mmc_sd_suspend,
1215 .resume = mmc_sd_resume,
1216 .power_restore = mmc_sd_power_restore,
1217 .alive = mmc_sd_alive,
1218 .shutdown = mmc_sd_suspend,
1219};
1220
1221/*
1222 * Starting point for SD card init.
1223 */
1224int mmc_attach_sd(struct mmc_host *host)
1225{
1226 int err;
1227 u32 ocr, rocr;
1228
1229 BUG_ON(!host);
1230 WARN_ON(!host->claimed);
1231
1232 err = mmc_send_app_op_cond(host, 0, &ocr);
1233 if (err)
1234 return err;
1235
1236 mmc_attach_bus(host, &mmc_sd_ops);
1237 if (host->ocr_avail_sd)
1238 host->ocr_avail = host->ocr_avail_sd;
1239
1240 /*
1241 * We need to get OCR a different way for SPI.
1242 */
1243 if (mmc_host_is_spi(host)) {
1244 mmc_go_idle(host);
1245
1246 err = mmc_spi_read_ocr(host, 0, &ocr);
1247 if (err)
1248 goto err;
1249 }
1250
1251 rocr = mmc_select_voltage(host, ocr);
1252
1253 /*
1254 * Can we support the voltage(s) of the card(s)?
1255 */
1256 if (!rocr) {
1257 err = -EINVAL;
1258 goto err;
1259 }
1260
1261 /*
1262 * Detect and init the card.
1263 */
1264 err = mmc_sd_init_card(host, rocr, NULL);
1265 if (err)
1266 goto err;
1267
1268 mmc_release_host(host);
1269 err = mmc_add_card(host->card);
1270 mmc_claim_host(host);
1271 if (err)
1272 goto remove_card;
1273
1274 return 0;
1275
1276remove_card:
1277 mmc_release_host(host);
1278 mmc_remove_card(host->card);
1279 host->card = NULL;
1280 mmc_claim_host(host);
1281err:
1282 mmc_detach_bus(host);
1283
1284 pr_err("%s: error %d whilst initialising SD card\n",
1285 mmc_hostname(host), err);
1286
1287 return err;
1288}
1289