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 #include <linux/slab.h> 15 16 #include <linux/mmc/host.h> 17 #include <linux/mmc/card.h> 18 #include <linux/mmc/mmc.h> 19 20 #include "core.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 static void mmc_set_erase_size(struct mmc_card *card) 112 { 113 if (card->ext_csd.erase_group_def & 1) 114 card->erase_size = card->ext_csd.hc_erase_size; 115 else 116 card->erase_size = card->csd.erase_size; 117 118 mmc_init_erase(card); 119 } 120 121 /* 122 * Given a 128-bit response, decode to our card CSD structure. 123 */ 124 static int mmc_decode_csd(struct mmc_card *card) 125 { 126 struct mmc_csd *csd = &card->csd; 127 unsigned int e, m, a, b; 128 u32 *resp = card->raw_csd; 129 130 /* 131 * We only understand CSD structure v1.1 and v1.2. 132 * v1.2 has extra information in bits 15, 11 and 10. 133 * We also support eMMC v4.4 & v4.41. 134 */ 135 csd->structure = UNSTUFF_BITS(resp, 126, 2); 136 if (csd->structure == 0) { 137 printk(KERN_ERR "%s: unrecognised CSD structure version %d\n", 138 mmc_hostname(card->host), csd->structure); 139 return -EINVAL; 140 } 141 142 csd->mmca_vsn = UNSTUFF_BITS(resp, 122, 4); 143 m = UNSTUFF_BITS(resp, 115, 4); 144 e = UNSTUFF_BITS(resp, 112, 3); 145 csd->tacc_ns = (tacc_exp[e] * tacc_mant[m] + 9) / 10; 146 csd->tacc_clks = UNSTUFF_BITS(resp, 104, 8) * 100; 147 148 m = UNSTUFF_BITS(resp, 99, 4); 149 e = UNSTUFF_BITS(resp, 96, 3); 150 csd->max_dtr = tran_exp[e] * tran_mant[m]; 151 csd->cmdclass = UNSTUFF_BITS(resp, 84, 12); 152 153 e = UNSTUFF_BITS(resp, 47, 3); 154 m = UNSTUFF_BITS(resp, 62, 12); 155 csd->capacity = (1 + m) << (e + 2); 156 157 csd->read_blkbits = UNSTUFF_BITS(resp, 80, 4); 158 csd->read_partial = UNSTUFF_BITS(resp, 79, 1); 159 csd->write_misalign = UNSTUFF_BITS(resp, 78, 1); 160 csd->read_misalign = UNSTUFF_BITS(resp, 77, 1); 161 csd->r2w_factor = UNSTUFF_BITS(resp, 26, 3); 162 csd->write_blkbits = UNSTUFF_BITS(resp, 22, 4); 163 csd->write_partial = UNSTUFF_BITS(resp, 21, 1); 164 165 if (csd->write_blkbits >= 9) { 166 a = UNSTUFF_BITS(resp, 42, 5); 167 b = UNSTUFF_BITS(resp, 37, 5); 168 csd->erase_size = (a + 1) * (b + 1); 169 csd->erase_size <<= csd->write_blkbits - 9; 170 } 171 172 return 0; 173 } 174 175 /* 176 * Read and decode extended CSD. 177 */ 178 static int mmc_read_ext_csd(struct mmc_card *card) 179 { 180 int err; 181 u8 *ext_csd; 182 183 BUG_ON(!card); 184 185 if (card->csd.mmca_vsn < CSD_SPEC_VER_4) 186 return 0; 187 188 /* 189 * As the ext_csd is so large and mostly unused, we don't store the 190 * raw block in mmc_card. 191 */ 192 ext_csd = kmalloc(512, GFP_KERNEL); 193 if (!ext_csd) { 194 printk(KERN_ERR "%s: could not allocate a buffer to " 195 "receive the ext_csd.\n", mmc_hostname(card->host)); 196 return -ENOMEM; 197 } 198 199 err = mmc_send_ext_csd(card, ext_csd); 200 if (err) { 201 /* If the host or the card can't do the switch, 202 * fail more gracefully. */ 203 if ((err != -EINVAL) 204 && (err != -ENOSYS) 205 && (err != -EFAULT)) 206 goto out; 207 208 /* 209 * High capacity cards should have this "magic" size 210 * stored in their CSD. 211 */ 212 if (card->csd.capacity == (4096 * 512)) { 213 printk(KERN_ERR "%s: unable to read EXT_CSD " 214 "on a possible high capacity card. " 215 "Card will be ignored.\n", 216 mmc_hostname(card->host)); 217 } else { 218 printk(KERN_WARNING "%s: unable to read " 219 "EXT_CSD, performance might " 220 "suffer.\n", 221 mmc_hostname(card->host)); 222 err = 0; 223 } 224 225 goto out; 226 } 227 228 /* Version is coded in the CSD_STRUCTURE byte in the EXT_CSD register */ 229 if (card->csd.structure == 3) { 230 int ext_csd_struct = ext_csd[EXT_CSD_STRUCTURE]; 231 if (ext_csd_struct > 2) { 232 printk(KERN_ERR "%s: unrecognised EXT_CSD structure " 233 "version %d\n", mmc_hostname(card->host), 234 ext_csd_struct); 235 err = -EINVAL; 236 goto out; 237 } 238 } 239 240 card->ext_csd.rev = ext_csd[EXT_CSD_REV]; 241 if (card->ext_csd.rev > 5) { 242 printk(KERN_ERR "%s: unrecognised EXT_CSD revision %d\n", 243 mmc_hostname(card->host), card->ext_csd.rev); 244 err = -EINVAL; 245 goto out; 246 } 247 248 if (card->ext_csd.rev >= 2) { 249 card->ext_csd.sectors = 250 ext_csd[EXT_CSD_SEC_CNT + 0] << 0 | 251 ext_csd[EXT_CSD_SEC_CNT + 1] << 8 | 252 ext_csd[EXT_CSD_SEC_CNT + 2] << 16 | 253 ext_csd[EXT_CSD_SEC_CNT + 3] << 24; 254 255 /* Cards with density > 2GiB are sector addressed */ 256 if (card->ext_csd.sectors > (2u * 1024 * 1024 * 1024) / 512) 257 mmc_card_set_blockaddr(card); 258 } 259 260 switch (ext_csd[EXT_CSD_CARD_TYPE] & EXT_CSD_CARD_TYPE_MASK) { 261 case EXT_CSD_CARD_TYPE_DDR_52 | EXT_CSD_CARD_TYPE_52 | 262 EXT_CSD_CARD_TYPE_26: 263 card->ext_csd.hs_max_dtr = 52000000; 264 card->ext_csd.card_type = EXT_CSD_CARD_TYPE_DDR_52; 265 break; 266 case EXT_CSD_CARD_TYPE_DDR_1_2V | EXT_CSD_CARD_TYPE_52 | 267 EXT_CSD_CARD_TYPE_26: 268 card->ext_csd.hs_max_dtr = 52000000; 269 card->ext_csd.card_type = EXT_CSD_CARD_TYPE_DDR_1_2V; 270 break; 271 case EXT_CSD_CARD_TYPE_DDR_1_8V | EXT_CSD_CARD_TYPE_52 | 272 EXT_CSD_CARD_TYPE_26: 273 card->ext_csd.hs_max_dtr = 52000000; 274 card->ext_csd.card_type = EXT_CSD_CARD_TYPE_DDR_1_8V; 275 break; 276 case EXT_CSD_CARD_TYPE_52 | EXT_CSD_CARD_TYPE_26: 277 card->ext_csd.hs_max_dtr = 52000000; 278 break; 279 case EXT_CSD_CARD_TYPE_26: 280 card->ext_csd.hs_max_dtr = 26000000; 281 break; 282 default: 283 /* MMC v4 spec says this cannot happen */ 284 printk(KERN_WARNING "%s: card is mmc v4 but doesn't " 285 "support any high-speed modes.\n", 286 mmc_hostname(card->host)); 287 } 288 289 if (card->ext_csd.rev >= 3) { 290 u8 sa_shift = ext_csd[EXT_CSD_S_A_TIMEOUT]; 291 292 /* Sleep / awake timeout in 100ns units */ 293 if (sa_shift > 0 && sa_shift <= 0x17) 294 card->ext_csd.sa_timeout = 295 1 << ext_csd[EXT_CSD_S_A_TIMEOUT]; 296 card->ext_csd.erase_group_def = 297 ext_csd[EXT_CSD_ERASE_GROUP_DEF]; 298 card->ext_csd.hc_erase_timeout = 300 * 299 ext_csd[EXT_CSD_ERASE_TIMEOUT_MULT]; 300 card->ext_csd.hc_erase_size = 301 ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE] << 10; 302 } 303 304 if (card->ext_csd.rev >= 4) { 305 /* 306 * Enhanced area feature support -- check whether the eMMC 307 * card has the Enhanced area enabled. If so, export enhanced 308 * area offset and size to user by adding sysfs interface. 309 */ 310 if ((ext_csd[EXT_CSD_PARTITION_SUPPORT] & 0x2) && 311 (ext_csd[EXT_CSD_PARTITION_ATTRIBUTE] & 0x1)) { 312 u8 hc_erase_grp_sz = 313 ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]; 314 u8 hc_wp_grp_sz = 315 ext_csd[EXT_CSD_HC_WP_GRP_SIZE]; 316 317 card->ext_csd.enhanced_area_en = 1; 318 /* 319 * calculate the enhanced data area offset, in bytes 320 */ 321 card->ext_csd.enhanced_area_offset = 322 (ext_csd[139] << 24) + (ext_csd[138] << 16) + 323 (ext_csd[137] << 8) + ext_csd[136]; 324 if (mmc_card_blockaddr(card)) 325 card->ext_csd.enhanced_area_offset <<= 9; 326 /* 327 * calculate the enhanced data area size, in kilobytes 328 */ 329 card->ext_csd.enhanced_area_size = 330 (ext_csd[142] << 16) + (ext_csd[141] << 8) + 331 ext_csd[140]; 332 card->ext_csd.enhanced_area_size *= 333 (size_t)(hc_erase_grp_sz * hc_wp_grp_sz); 334 card->ext_csd.enhanced_area_size <<= 9; 335 } else { 336 /* 337 * If the enhanced area is not enabled, disable these 338 * device attributes. 339 */ 340 card->ext_csd.enhanced_area_offset = -EINVAL; 341 card->ext_csd.enhanced_area_size = -EINVAL; 342 } 343 card->ext_csd.sec_trim_mult = 344 ext_csd[EXT_CSD_SEC_TRIM_MULT]; 345 card->ext_csd.sec_erase_mult = 346 ext_csd[EXT_CSD_SEC_ERASE_MULT]; 347 card->ext_csd.sec_feature_support = 348 ext_csd[EXT_CSD_SEC_FEATURE_SUPPORT]; 349 card->ext_csd.trim_timeout = 300 * 350 ext_csd[EXT_CSD_TRIM_MULT]; 351 } 352 353 if (ext_csd[EXT_CSD_ERASED_MEM_CONT]) 354 card->erased_byte = 0xFF; 355 else 356 card->erased_byte = 0x0; 357 358 out: 359 kfree(ext_csd); 360 361 return err; 362 } 363 364 MMC_DEV_ATTR(cid, "%08x%08x%08x%08x\n", card->raw_cid[0], card->raw_cid[1], 365 card->raw_cid[2], card->raw_cid[3]); 366 MMC_DEV_ATTR(csd, "%08x%08x%08x%08x\n", card->raw_csd[0], card->raw_csd[1], 367 card->raw_csd[2], card->raw_csd[3]); 368 MMC_DEV_ATTR(date, "%02d/%04d\n", card->cid.month, card->cid.year); 369 MMC_DEV_ATTR(erase_size, "%u\n", card->erase_size << 9); 370 MMC_DEV_ATTR(preferred_erase_size, "%u\n", card->pref_erase << 9); 371 MMC_DEV_ATTR(fwrev, "0x%x\n", card->cid.fwrev); 372 MMC_DEV_ATTR(hwrev, "0x%x\n", card->cid.hwrev); 373 MMC_DEV_ATTR(manfid, "0x%06x\n", card->cid.manfid); 374 MMC_DEV_ATTR(name, "%s\n", card->cid.prod_name); 375 MMC_DEV_ATTR(oemid, "0x%04x\n", card->cid.oemid); 376 MMC_DEV_ATTR(serial, "0x%08x\n", card->cid.serial); 377 MMC_DEV_ATTR(enhanced_area_offset, "%llu\n", 378 card->ext_csd.enhanced_area_offset); 379 MMC_DEV_ATTR(enhanced_area_size, "%u\n", card->ext_csd.enhanced_area_size); 380 381 static struct attribute *mmc_std_attrs[] = { 382 &dev_attr_cid.attr, 383 &dev_attr_csd.attr, 384 &dev_attr_date.attr, 385 &dev_attr_erase_size.attr, 386 &dev_attr_preferred_erase_size.attr, 387 &dev_attr_fwrev.attr, 388 &dev_attr_hwrev.attr, 389 &dev_attr_manfid.attr, 390 &dev_attr_name.attr, 391 &dev_attr_oemid.attr, 392 &dev_attr_serial.attr, 393 &dev_attr_enhanced_area_offset.attr, 394 &dev_attr_enhanced_area_size.attr, 395 NULL, 396 }; 397 398 static struct attribute_group mmc_std_attr_group = { 399 .attrs = mmc_std_attrs, 400 }; 401 402 static const struct attribute_group *mmc_attr_groups[] = { 403 &mmc_std_attr_group, 404 NULL, 405 }; 406 407 static struct device_type mmc_type = { 408 .groups = mmc_attr_groups, 409 }; 410 411 /* 412 * Handle the detection and initialisation of a card. 413 * 414 * In the case of a resume, "oldcard" will contain the card 415 * we're trying to reinitialise. 416 */ 417 static int mmc_init_card(struct mmc_host *host, u32 ocr, 418 struct mmc_card *oldcard) 419 { 420 struct mmc_card *card; 421 int err, ddr = 0; 422 u32 cid[4]; 423 unsigned int max_dtr; 424 u32 rocr; 425 426 BUG_ON(!host); 427 WARN_ON(!host->claimed); 428 429 /* 430 * Since we're changing the OCR value, we seem to 431 * need to tell some cards to go back to the idle 432 * state. We wait 1ms to give cards time to 433 * respond. 434 */ 435 mmc_go_idle(host); 436 437 /* The extra bit indicates that we support high capacity */ 438 err = mmc_send_op_cond(host, ocr | (1 << 30), &rocr); 439 if (err) 440 goto err; 441 442 /* 443 * For SPI, enable CRC as appropriate. 444 */ 445 if (mmc_host_is_spi(host)) { 446 err = mmc_spi_set_crc(host, use_spi_crc); 447 if (err) 448 goto err; 449 } 450 451 /* 452 * Fetch CID from card. 453 */ 454 if (mmc_host_is_spi(host)) 455 err = mmc_send_cid(host, cid); 456 else 457 err = mmc_all_send_cid(host, cid); 458 if (err) 459 goto err; 460 461 if (oldcard) { 462 if (memcmp(cid, oldcard->raw_cid, sizeof(cid)) != 0) { 463 err = -ENOENT; 464 goto err; 465 } 466 467 card = oldcard; 468 } else { 469 /* 470 * Allocate card structure. 471 */ 472 card = mmc_alloc_card(host, &mmc_type); 473 if (IS_ERR(card)) { 474 err = PTR_ERR(card); 475 goto err; 476 } 477 478 card->type = MMC_TYPE_MMC; 479 card->rca = 1; 480 memcpy(card->raw_cid, cid, sizeof(card->raw_cid)); 481 } 482 483 /* 484 * For native busses: set card RCA and quit open drain mode. 485 */ 486 if (!mmc_host_is_spi(host)) { 487 err = mmc_set_relative_addr(card); 488 if (err) 489 goto free_card; 490 491 mmc_set_bus_mode(host, MMC_BUSMODE_PUSHPULL); 492 } 493 494 if (!oldcard) { 495 /* 496 * Fetch CSD from card. 497 */ 498 err = mmc_send_csd(card, card->raw_csd); 499 if (err) 500 goto free_card; 501 502 err = mmc_decode_csd(card); 503 if (err) 504 goto free_card; 505 err = mmc_decode_cid(card); 506 if (err) 507 goto free_card; 508 } 509 510 /* 511 * Select card, as all following commands rely on that. 512 */ 513 if (!mmc_host_is_spi(host)) { 514 err = mmc_select_card(card); 515 if (err) 516 goto free_card; 517 } 518 519 if (!oldcard) { 520 /* 521 * Fetch and process extended CSD. 522 */ 523 err = mmc_read_ext_csd(card); 524 if (err) 525 goto free_card; 526 527 /* If doing byte addressing, check if required to do sector 528 * addressing. Handle the case of <2GB cards needing sector 529 * addressing. See section 8.1 JEDEC Standard JED84-A441; 530 * ocr register has bit 30 set for sector addressing. 531 */ 532 if (!(mmc_card_blockaddr(card)) && (rocr & (1<<30))) 533 mmc_card_set_blockaddr(card); 534 535 /* Erase size depends on CSD and Extended CSD */ 536 mmc_set_erase_size(card); 537 } 538 539 /* 540 * If enhanced_area_en is TRUE, host needs to enable ERASE_GRP_DEF 541 * bit. This bit will be lost everytime after a reset or power off. 542 */ 543 if (card->ext_csd.enhanced_area_en) { 544 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 545 EXT_CSD_ERASE_GROUP_DEF, 1); 546 547 if (err && err != -EBADMSG) 548 goto free_card; 549 550 if (err) { 551 err = 0; 552 /* 553 * Just disable enhanced area off & sz 554 * will try to enable ERASE_GROUP_DEF 555 * during next time reinit 556 */ 557 card->ext_csd.enhanced_area_offset = -EINVAL; 558 card->ext_csd.enhanced_area_size = -EINVAL; 559 } else { 560 card->ext_csd.erase_group_def = 1; 561 /* 562 * enable ERASE_GRP_DEF successfully. 563 * This will affect the erase size, so 564 * here need to reset erase size 565 */ 566 mmc_set_erase_size(card); 567 } 568 } 569 570 /* 571 * Activate high speed (if supported) 572 */ 573 if ((card->ext_csd.hs_max_dtr != 0) && 574 (host->caps & MMC_CAP_MMC_HIGHSPEED)) { 575 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 576 EXT_CSD_HS_TIMING, 1); 577 if (err && err != -EBADMSG) 578 goto free_card; 579 580 if (err) { 581 printk(KERN_WARNING "%s: switch to highspeed failed\n", 582 mmc_hostname(card->host)); 583 err = 0; 584 } else { 585 mmc_card_set_highspeed(card); 586 mmc_set_timing(card->host, MMC_TIMING_MMC_HS); 587 } 588 } 589 590 /* 591 * Compute bus speed. 592 */ 593 max_dtr = (unsigned int)-1; 594 595 if (mmc_card_highspeed(card)) { 596 if (max_dtr > card->ext_csd.hs_max_dtr) 597 max_dtr = card->ext_csd.hs_max_dtr; 598 } else if (max_dtr > card->csd.max_dtr) { 599 max_dtr = card->csd.max_dtr; 600 } 601 602 mmc_set_clock(host, max_dtr); 603 604 /* 605 * Indicate DDR mode (if supported). 606 */ 607 if (mmc_card_highspeed(card)) { 608 if ((card->ext_csd.card_type & EXT_CSD_CARD_TYPE_DDR_1_8V) 609 && (host->caps & (MMC_CAP_1_8V_DDR))) 610 ddr = MMC_1_8V_DDR_MODE; 611 else if ((card->ext_csd.card_type & EXT_CSD_CARD_TYPE_DDR_1_2V) 612 && (host->caps & (MMC_CAP_1_2V_DDR))) 613 ddr = MMC_1_2V_DDR_MODE; 614 } 615 616 /* 617 * Activate wide bus and DDR (if supported). 618 */ 619 if ((card->csd.mmca_vsn >= CSD_SPEC_VER_4) && 620 (host->caps & (MMC_CAP_4_BIT_DATA | MMC_CAP_8_BIT_DATA))) { 621 static unsigned ext_csd_bits[][2] = { 622 { EXT_CSD_BUS_WIDTH_8, EXT_CSD_DDR_BUS_WIDTH_8 }, 623 { EXT_CSD_BUS_WIDTH_4, EXT_CSD_DDR_BUS_WIDTH_4 }, 624 { EXT_CSD_BUS_WIDTH_1, EXT_CSD_BUS_WIDTH_1 }, 625 }; 626 static unsigned bus_widths[] = { 627 MMC_BUS_WIDTH_8, 628 MMC_BUS_WIDTH_4, 629 MMC_BUS_WIDTH_1 630 }; 631 unsigned idx, bus_width = 0; 632 633 if (host->caps & MMC_CAP_8_BIT_DATA) 634 idx = 0; 635 else 636 idx = 1; 637 for (; idx < ARRAY_SIZE(bus_widths); idx++) { 638 bus_width = bus_widths[idx]; 639 if (bus_width == MMC_BUS_WIDTH_1) 640 ddr = 0; /* no DDR for 1-bit width */ 641 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 642 EXT_CSD_BUS_WIDTH, 643 ext_csd_bits[idx][0]); 644 if (!err) { 645 mmc_set_bus_width_ddr(card->host, 646 bus_width, MMC_SDR_MODE); 647 /* 648 * If controller can't handle bus width test, 649 * use the highest bus width to maintain 650 * compatibility with previous MMC behavior. 651 */ 652 if (!(host->caps & MMC_CAP_BUS_WIDTH_TEST)) 653 break; 654 err = mmc_bus_test(card, bus_width); 655 if (!err) 656 break; 657 } 658 } 659 660 if (!err && ddr) { 661 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 662 EXT_CSD_BUS_WIDTH, 663 ext_csd_bits[idx][1]); 664 } 665 if (err) { 666 printk(KERN_WARNING "%s: switch to bus width %d ddr %d " 667 "failed\n", mmc_hostname(card->host), 668 1 << bus_width, ddr); 669 goto free_card; 670 } else if (ddr) { 671 mmc_card_set_ddr_mode(card); 672 mmc_set_bus_width_ddr(card->host, bus_width, ddr); 673 } 674 } 675 676 if (!oldcard) 677 host->card = card; 678 679 return 0; 680 681 free_card: 682 if (!oldcard) 683 mmc_remove_card(card); 684 err: 685 686 return err; 687 } 688 689 /* 690 * Host is being removed. Free up the current card. 691 */ 692 static void mmc_remove(struct mmc_host *host) 693 { 694 BUG_ON(!host); 695 BUG_ON(!host->card); 696 697 mmc_remove_card(host->card); 698 host->card = NULL; 699 } 700 701 /* 702 * Card detection callback from host. 703 */ 704 static void mmc_detect(struct mmc_host *host) 705 { 706 int err; 707 708 BUG_ON(!host); 709 BUG_ON(!host->card); 710 711 mmc_claim_host(host); 712 713 /* 714 * Just check if our card has been removed. 715 */ 716 err = mmc_send_status(host->card, NULL); 717 718 mmc_release_host(host); 719 720 if (err) { 721 mmc_remove(host); 722 723 mmc_claim_host(host); 724 mmc_detach_bus(host); 725 mmc_release_host(host); 726 } 727 } 728 729 /* 730 * Suspend callback from host. 731 */ 732 static int mmc_suspend(struct mmc_host *host) 733 { 734 BUG_ON(!host); 735 BUG_ON(!host->card); 736 737 mmc_claim_host(host); 738 if (!mmc_host_is_spi(host)) 739 mmc_deselect_cards(host); 740 host->card->state &= ~MMC_STATE_HIGHSPEED; 741 mmc_release_host(host); 742 743 return 0; 744 } 745 746 /* 747 * Resume callback from host. 748 * 749 * This function tries to determine if the same card is still present 750 * and, if so, restore all state to it. 751 */ 752 static int mmc_resume(struct mmc_host *host) 753 { 754 int err; 755 756 BUG_ON(!host); 757 BUG_ON(!host->card); 758 759 mmc_claim_host(host); 760 err = mmc_init_card(host, host->ocr, host->card); 761 mmc_release_host(host); 762 763 return err; 764 } 765 766 static int mmc_power_restore(struct mmc_host *host) 767 { 768 int ret; 769 770 host->card->state &= ~MMC_STATE_HIGHSPEED; 771 mmc_claim_host(host); 772 ret = mmc_init_card(host, host->ocr, host->card); 773 mmc_release_host(host); 774 775 return ret; 776 } 777 778 static int mmc_sleep(struct mmc_host *host) 779 { 780 struct mmc_card *card = host->card; 781 int err = -ENOSYS; 782 783 if (card && card->ext_csd.rev >= 3) { 784 err = mmc_card_sleepawake(host, 1); 785 if (err < 0) 786 pr_debug("%s: Error %d while putting card into sleep", 787 mmc_hostname(host), err); 788 } 789 790 return err; 791 } 792 793 static int mmc_awake(struct mmc_host *host) 794 { 795 struct mmc_card *card = host->card; 796 int err = -ENOSYS; 797 798 if (card && card->ext_csd.rev >= 3) { 799 err = mmc_card_sleepawake(host, 0); 800 if (err < 0) 801 pr_debug("%s: Error %d while awaking sleeping card", 802 mmc_hostname(host), err); 803 } 804 805 return err; 806 } 807 808 static const struct mmc_bus_ops mmc_ops = { 809 .awake = mmc_awake, 810 .sleep = mmc_sleep, 811 .remove = mmc_remove, 812 .detect = mmc_detect, 813 .suspend = NULL, 814 .resume = NULL, 815 .power_restore = mmc_power_restore, 816 }; 817 818 static const struct mmc_bus_ops mmc_ops_unsafe = { 819 .awake = mmc_awake, 820 .sleep = mmc_sleep, 821 .remove = mmc_remove, 822 .detect = mmc_detect, 823 .suspend = mmc_suspend, 824 .resume = mmc_resume, 825 .power_restore = mmc_power_restore, 826 }; 827 828 static void mmc_attach_bus_ops(struct mmc_host *host) 829 { 830 const struct mmc_bus_ops *bus_ops; 831 832 if (!mmc_card_is_removable(host)) 833 bus_ops = &mmc_ops_unsafe; 834 else 835 bus_ops = &mmc_ops; 836 mmc_attach_bus(host, bus_ops); 837 } 838 839 /* 840 * Starting point for MMC card init. 841 */ 842 int mmc_attach_mmc(struct mmc_host *host) 843 { 844 int err; 845 u32 ocr; 846 847 BUG_ON(!host); 848 WARN_ON(!host->claimed); 849 850 err = mmc_send_op_cond(host, 0, &ocr); 851 if (err) 852 return err; 853 854 mmc_attach_bus_ops(host); 855 if (host->ocr_avail_mmc) 856 host->ocr_avail = host->ocr_avail_mmc; 857 858 /* 859 * We need to get OCR a different way for SPI. 860 */ 861 if (mmc_host_is_spi(host)) { 862 err = mmc_spi_read_ocr(host, 1, &ocr); 863 if (err) 864 goto err; 865 } 866 867 /* 868 * Sanity check the voltages that the card claims to 869 * support. 870 */ 871 if (ocr & 0x7F) { 872 printk(KERN_WARNING "%s: card claims to support voltages " 873 "below the defined range. These will be ignored.\n", 874 mmc_hostname(host)); 875 ocr &= ~0x7F; 876 } 877 878 host->ocr = mmc_select_voltage(host, ocr); 879 880 /* 881 * Can we support the voltage of the card? 882 */ 883 if (!host->ocr) { 884 err = -EINVAL; 885 goto err; 886 } 887 888 /* 889 * Detect and init the card. 890 */ 891 err = mmc_init_card(host, host->ocr, NULL); 892 if (err) 893 goto err; 894 895 mmc_release_host(host); 896 err = mmc_add_card(host->card); 897 mmc_claim_host(host); 898 if (err) 899 goto remove_card; 900 901 return 0; 902 903 remove_card: 904 mmc_release_host(host); 905 mmc_remove_card(host->card); 906 mmc_claim_host(host); 907 host->card = NULL; 908 err: 909 mmc_detach_bus(host); 910 911 printk(KERN_ERR "%s: error %d whilst initialising MMC card\n", 912 mmc_hostname(host), err); 913 914 return err; 915 } 916