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