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 card->ext_csd.raw_ext_csd_structure = ext_csd[EXT_CSD_STRUCTURE]; 251 if (card->csd.structure == 3) { 252 if (card->ext_csd.raw_ext_csd_structure > 2) { 253 printk(KERN_ERR "%s: unrecognised EXT_CSD structure " 254 "version %d\n", mmc_hostname(card->host), 255 card->ext_csd.raw_ext_csd_structure); 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 > 6) { 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 card->ext_csd.raw_sectors[0] = ext_csd[EXT_CSD_SEC_CNT + 0]; 270 card->ext_csd.raw_sectors[1] = ext_csd[EXT_CSD_SEC_CNT + 1]; 271 card->ext_csd.raw_sectors[2] = ext_csd[EXT_CSD_SEC_CNT + 2]; 272 card->ext_csd.raw_sectors[3] = ext_csd[EXT_CSD_SEC_CNT + 3]; 273 if (card->ext_csd.rev >= 2) { 274 card->ext_csd.sectors = 275 ext_csd[EXT_CSD_SEC_CNT + 0] << 0 | 276 ext_csd[EXT_CSD_SEC_CNT + 1] << 8 | 277 ext_csd[EXT_CSD_SEC_CNT + 2] << 16 | 278 ext_csd[EXT_CSD_SEC_CNT + 3] << 24; 279 280 /* Cards with density > 2GiB are sector addressed */ 281 if (card->ext_csd.sectors > (2u * 1024 * 1024 * 1024) / 512) 282 mmc_card_set_blockaddr(card); 283 } 284 card->ext_csd.raw_card_type = ext_csd[EXT_CSD_CARD_TYPE]; 285 switch (ext_csd[EXT_CSD_CARD_TYPE] & EXT_CSD_CARD_TYPE_MASK) { 286 case EXT_CSD_CARD_TYPE_DDR_52 | EXT_CSD_CARD_TYPE_52 | 287 EXT_CSD_CARD_TYPE_26: 288 card->ext_csd.hs_max_dtr = 52000000; 289 card->ext_csd.card_type = EXT_CSD_CARD_TYPE_DDR_52; 290 break; 291 case EXT_CSD_CARD_TYPE_DDR_1_2V | EXT_CSD_CARD_TYPE_52 | 292 EXT_CSD_CARD_TYPE_26: 293 card->ext_csd.hs_max_dtr = 52000000; 294 card->ext_csd.card_type = EXT_CSD_CARD_TYPE_DDR_1_2V; 295 break; 296 case EXT_CSD_CARD_TYPE_DDR_1_8V | EXT_CSD_CARD_TYPE_52 | 297 EXT_CSD_CARD_TYPE_26: 298 card->ext_csd.hs_max_dtr = 52000000; 299 card->ext_csd.card_type = EXT_CSD_CARD_TYPE_DDR_1_8V; 300 break; 301 case EXT_CSD_CARD_TYPE_52 | EXT_CSD_CARD_TYPE_26: 302 card->ext_csd.hs_max_dtr = 52000000; 303 break; 304 case EXT_CSD_CARD_TYPE_26: 305 card->ext_csd.hs_max_dtr = 26000000; 306 break; 307 default: 308 /* MMC v4 spec says this cannot happen */ 309 printk(KERN_WARNING "%s: card is mmc v4 but doesn't " 310 "support any high-speed modes.\n", 311 mmc_hostname(card->host)); 312 } 313 314 card->ext_csd.raw_s_a_timeout = ext_csd[EXT_CSD_S_A_TIMEOUT]; 315 card->ext_csd.raw_erase_timeout_mult = 316 ext_csd[EXT_CSD_ERASE_TIMEOUT_MULT]; 317 card->ext_csd.raw_hc_erase_grp_size = 318 ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]; 319 if (card->ext_csd.rev >= 3) { 320 u8 sa_shift = ext_csd[EXT_CSD_S_A_TIMEOUT]; 321 card->ext_csd.part_config = ext_csd[EXT_CSD_PART_CONFIG]; 322 323 /* EXT_CSD value is in units of 10ms, but we store in ms */ 324 card->ext_csd.part_time = 10 * ext_csd[EXT_CSD_PART_SWITCH_TIME]; 325 326 /* Sleep / awake timeout in 100ns units */ 327 if (sa_shift > 0 && sa_shift <= 0x17) 328 card->ext_csd.sa_timeout = 329 1 << ext_csd[EXT_CSD_S_A_TIMEOUT]; 330 card->ext_csd.erase_group_def = 331 ext_csd[EXT_CSD_ERASE_GROUP_DEF]; 332 card->ext_csd.hc_erase_timeout = 300 * 333 ext_csd[EXT_CSD_ERASE_TIMEOUT_MULT]; 334 card->ext_csd.hc_erase_size = 335 ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE] << 10; 336 337 card->ext_csd.rel_sectors = ext_csd[EXT_CSD_REL_WR_SEC_C]; 338 339 /* 340 * There are two boot regions of equal size, defined in 341 * multiples of 128K. 342 */ 343 card->ext_csd.boot_size = ext_csd[EXT_CSD_BOOT_MULT] << 17; 344 } 345 346 card->ext_csd.raw_hc_erase_gap_size = 347 ext_csd[EXT_CSD_PARTITION_ATTRIBUTE]; 348 card->ext_csd.raw_sec_trim_mult = 349 ext_csd[EXT_CSD_SEC_TRIM_MULT]; 350 card->ext_csd.raw_sec_erase_mult = 351 ext_csd[EXT_CSD_SEC_ERASE_MULT]; 352 card->ext_csd.raw_sec_feature_support = 353 ext_csd[EXT_CSD_SEC_FEATURE_SUPPORT]; 354 card->ext_csd.raw_trim_mult = 355 ext_csd[EXT_CSD_TRIM_MULT]; 356 if (card->ext_csd.rev >= 4) { 357 /* 358 * Enhanced area feature support -- check whether the eMMC 359 * card has the Enhanced area enabled. If so, export enhanced 360 * area offset and size to user by adding sysfs interface. 361 */ 362 if ((ext_csd[EXT_CSD_PARTITION_SUPPORT] & 0x2) && 363 (ext_csd[EXT_CSD_PARTITION_ATTRIBUTE] & 0x1)) { 364 u8 hc_erase_grp_sz = 365 ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]; 366 u8 hc_wp_grp_sz = 367 ext_csd[EXT_CSD_HC_WP_GRP_SIZE]; 368 369 card->ext_csd.enhanced_area_en = 1; 370 /* 371 * calculate the enhanced data area offset, in bytes 372 */ 373 card->ext_csd.enhanced_area_offset = 374 (ext_csd[139] << 24) + (ext_csd[138] << 16) + 375 (ext_csd[137] << 8) + ext_csd[136]; 376 if (mmc_card_blockaddr(card)) 377 card->ext_csd.enhanced_area_offset <<= 9; 378 /* 379 * calculate the enhanced data area size, in kilobytes 380 */ 381 card->ext_csd.enhanced_area_size = 382 (ext_csd[142] << 16) + (ext_csd[141] << 8) + 383 ext_csd[140]; 384 card->ext_csd.enhanced_area_size *= 385 (size_t)(hc_erase_grp_sz * hc_wp_grp_sz); 386 card->ext_csd.enhanced_area_size <<= 9; 387 } else { 388 /* 389 * If the enhanced area is not enabled, disable these 390 * device attributes. 391 */ 392 card->ext_csd.enhanced_area_offset = -EINVAL; 393 card->ext_csd.enhanced_area_size = -EINVAL; 394 } 395 card->ext_csd.sec_trim_mult = 396 ext_csd[EXT_CSD_SEC_TRIM_MULT]; 397 card->ext_csd.sec_erase_mult = 398 ext_csd[EXT_CSD_SEC_ERASE_MULT]; 399 card->ext_csd.sec_feature_support = 400 ext_csd[EXT_CSD_SEC_FEATURE_SUPPORT]; 401 card->ext_csd.trim_timeout = 300 * 402 ext_csd[EXT_CSD_TRIM_MULT]; 403 } 404 405 if (card->ext_csd.rev >= 5) 406 card->ext_csd.rel_param = ext_csd[EXT_CSD_WR_REL_PARAM]; 407 408 if (ext_csd[EXT_CSD_ERASED_MEM_CONT]) 409 card->erased_byte = 0xFF; 410 else 411 card->erased_byte = 0x0; 412 413 out: 414 return err; 415 } 416 417 static inline void mmc_free_ext_csd(u8 *ext_csd) 418 { 419 kfree(ext_csd); 420 } 421 422 423 static int mmc_compare_ext_csds(struct mmc_card *card, unsigned bus_width) 424 { 425 u8 *bw_ext_csd; 426 int err; 427 428 if (bus_width == MMC_BUS_WIDTH_1) 429 return 0; 430 431 err = mmc_get_ext_csd(card, &bw_ext_csd); 432 433 if (err || bw_ext_csd == NULL) { 434 if (bus_width != MMC_BUS_WIDTH_1) 435 err = -EINVAL; 436 goto out; 437 } 438 439 if (bus_width == MMC_BUS_WIDTH_1) 440 goto out; 441 442 /* only compare read only fields */ 443 err = (!(card->ext_csd.raw_partition_support == 444 bw_ext_csd[EXT_CSD_PARTITION_SUPPORT]) && 445 (card->ext_csd.raw_erased_mem_count == 446 bw_ext_csd[EXT_CSD_ERASED_MEM_CONT]) && 447 (card->ext_csd.rev == 448 bw_ext_csd[EXT_CSD_REV]) && 449 (card->ext_csd.raw_ext_csd_structure == 450 bw_ext_csd[EXT_CSD_STRUCTURE]) && 451 (card->ext_csd.raw_card_type == 452 bw_ext_csd[EXT_CSD_CARD_TYPE]) && 453 (card->ext_csd.raw_s_a_timeout == 454 bw_ext_csd[EXT_CSD_S_A_TIMEOUT]) && 455 (card->ext_csd.raw_hc_erase_gap_size == 456 bw_ext_csd[EXT_CSD_HC_WP_GRP_SIZE]) && 457 (card->ext_csd.raw_erase_timeout_mult == 458 bw_ext_csd[EXT_CSD_ERASE_TIMEOUT_MULT]) && 459 (card->ext_csd.raw_hc_erase_grp_size == 460 bw_ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]) && 461 (card->ext_csd.raw_sec_trim_mult == 462 bw_ext_csd[EXT_CSD_SEC_TRIM_MULT]) && 463 (card->ext_csd.raw_sec_erase_mult == 464 bw_ext_csd[EXT_CSD_SEC_ERASE_MULT]) && 465 (card->ext_csd.raw_sec_feature_support == 466 bw_ext_csd[EXT_CSD_SEC_FEATURE_SUPPORT]) && 467 (card->ext_csd.raw_trim_mult == 468 bw_ext_csd[EXT_CSD_TRIM_MULT]) && 469 (card->ext_csd.raw_sectors[0] == 470 bw_ext_csd[EXT_CSD_SEC_CNT + 0]) && 471 (card->ext_csd.raw_sectors[1] == 472 bw_ext_csd[EXT_CSD_SEC_CNT + 1]) && 473 (card->ext_csd.raw_sectors[2] == 474 bw_ext_csd[EXT_CSD_SEC_CNT + 2]) && 475 (card->ext_csd.raw_sectors[3] == 476 bw_ext_csd[EXT_CSD_SEC_CNT + 3])); 477 if (err) 478 err = -EINVAL; 479 480 out: 481 mmc_free_ext_csd(bw_ext_csd); 482 return err; 483 } 484 485 MMC_DEV_ATTR(cid, "%08x%08x%08x%08x\n", card->raw_cid[0], card->raw_cid[1], 486 card->raw_cid[2], card->raw_cid[3]); 487 MMC_DEV_ATTR(csd, "%08x%08x%08x%08x\n", card->raw_csd[0], card->raw_csd[1], 488 card->raw_csd[2], card->raw_csd[3]); 489 MMC_DEV_ATTR(date, "%02d/%04d\n", card->cid.month, card->cid.year); 490 MMC_DEV_ATTR(erase_size, "%u\n", card->erase_size << 9); 491 MMC_DEV_ATTR(preferred_erase_size, "%u\n", card->pref_erase << 9); 492 MMC_DEV_ATTR(fwrev, "0x%x\n", card->cid.fwrev); 493 MMC_DEV_ATTR(hwrev, "0x%x\n", card->cid.hwrev); 494 MMC_DEV_ATTR(manfid, "0x%06x\n", card->cid.manfid); 495 MMC_DEV_ATTR(name, "%s\n", card->cid.prod_name); 496 MMC_DEV_ATTR(oemid, "0x%04x\n", card->cid.oemid); 497 MMC_DEV_ATTR(serial, "0x%08x\n", card->cid.serial); 498 MMC_DEV_ATTR(enhanced_area_offset, "%llu\n", 499 card->ext_csd.enhanced_area_offset); 500 MMC_DEV_ATTR(enhanced_area_size, "%u\n", card->ext_csd.enhanced_area_size); 501 502 static struct attribute *mmc_std_attrs[] = { 503 &dev_attr_cid.attr, 504 &dev_attr_csd.attr, 505 &dev_attr_date.attr, 506 &dev_attr_erase_size.attr, 507 &dev_attr_preferred_erase_size.attr, 508 &dev_attr_fwrev.attr, 509 &dev_attr_hwrev.attr, 510 &dev_attr_manfid.attr, 511 &dev_attr_name.attr, 512 &dev_attr_oemid.attr, 513 &dev_attr_serial.attr, 514 &dev_attr_enhanced_area_offset.attr, 515 &dev_attr_enhanced_area_size.attr, 516 NULL, 517 }; 518 519 static struct attribute_group mmc_std_attr_group = { 520 .attrs = mmc_std_attrs, 521 }; 522 523 static const struct attribute_group *mmc_attr_groups[] = { 524 &mmc_std_attr_group, 525 NULL, 526 }; 527 528 static struct device_type mmc_type = { 529 .groups = mmc_attr_groups, 530 }; 531 532 /* 533 * Handle the detection and initialisation of a card. 534 * 535 * In the case of a resume, "oldcard" will contain the card 536 * we're trying to reinitialise. 537 */ 538 static int mmc_init_card(struct mmc_host *host, u32 ocr, 539 struct mmc_card *oldcard) 540 { 541 struct mmc_card *card; 542 int err, ddr = 0; 543 u32 cid[4]; 544 unsigned int max_dtr; 545 u32 rocr; 546 u8 *ext_csd = NULL; 547 548 BUG_ON(!host); 549 WARN_ON(!host->claimed); 550 551 /* 552 * Since we're changing the OCR value, we seem to 553 * need to tell some cards to go back to the idle 554 * state. We wait 1ms to give cards time to 555 * respond. 556 */ 557 mmc_go_idle(host); 558 559 /* The extra bit indicates that we support high capacity */ 560 err = mmc_send_op_cond(host, ocr | (1 << 30), &rocr); 561 if (err) 562 goto err; 563 564 /* 565 * For SPI, enable CRC as appropriate. 566 */ 567 if (mmc_host_is_spi(host)) { 568 err = mmc_spi_set_crc(host, use_spi_crc); 569 if (err) 570 goto err; 571 } 572 573 /* 574 * Fetch CID from card. 575 */ 576 if (mmc_host_is_spi(host)) 577 err = mmc_send_cid(host, cid); 578 else 579 err = mmc_all_send_cid(host, cid); 580 if (err) 581 goto err; 582 583 if (oldcard) { 584 if (memcmp(cid, oldcard->raw_cid, sizeof(cid)) != 0) { 585 err = -ENOENT; 586 goto err; 587 } 588 589 card = oldcard; 590 } else { 591 /* 592 * Allocate card structure. 593 */ 594 card = mmc_alloc_card(host, &mmc_type); 595 if (IS_ERR(card)) { 596 err = PTR_ERR(card); 597 goto err; 598 } 599 600 card->type = MMC_TYPE_MMC; 601 card->rca = 1; 602 memcpy(card->raw_cid, cid, sizeof(card->raw_cid)); 603 } 604 605 /* 606 * For native busses: set card RCA and quit open drain mode. 607 */ 608 if (!mmc_host_is_spi(host)) { 609 err = mmc_set_relative_addr(card); 610 if (err) 611 goto free_card; 612 613 mmc_set_bus_mode(host, MMC_BUSMODE_PUSHPULL); 614 } 615 616 if (!oldcard) { 617 /* 618 * Fetch CSD from card. 619 */ 620 err = mmc_send_csd(card, card->raw_csd); 621 if (err) 622 goto free_card; 623 624 err = mmc_decode_csd(card); 625 if (err) 626 goto free_card; 627 err = mmc_decode_cid(card); 628 if (err) 629 goto free_card; 630 } 631 632 /* 633 * Select card, as all following commands rely on that. 634 */ 635 if (!mmc_host_is_spi(host)) { 636 err = mmc_select_card(card); 637 if (err) 638 goto free_card; 639 } 640 641 if (!oldcard) { 642 /* 643 * Fetch and process extended CSD. 644 */ 645 646 err = mmc_get_ext_csd(card, &ext_csd); 647 if (err) 648 goto free_card; 649 err = mmc_read_ext_csd(card, ext_csd); 650 if (err) 651 goto free_card; 652 653 /* If doing byte addressing, check if required to do sector 654 * addressing. Handle the case of <2GB cards needing sector 655 * addressing. See section 8.1 JEDEC Standard JED84-A441; 656 * ocr register has bit 30 set for sector addressing. 657 */ 658 if (!(mmc_card_blockaddr(card)) && (rocr & (1<<30))) 659 mmc_card_set_blockaddr(card); 660 661 /* Erase size depends on CSD and Extended CSD */ 662 mmc_set_erase_size(card); 663 } 664 665 /* 666 * If enhanced_area_en is TRUE, host needs to enable ERASE_GRP_DEF 667 * bit. This bit will be lost every time after a reset or power off. 668 */ 669 if (card->ext_csd.enhanced_area_en) { 670 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 671 EXT_CSD_ERASE_GROUP_DEF, 1, 0); 672 673 if (err && err != -EBADMSG) 674 goto free_card; 675 676 if (err) { 677 err = 0; 678 /* 679 * Just disable enhanced area off & sz 680 * will try to enable ERASE_GROUP_DEF 681 * during next time reinit 682 */ 683 card->ext_csd.enhanced_area_offset = -EINVAL; 684 card->ext_csd.enhanced_area_size = -EINVAL; 685 } else { 686 card->ext_csd.erase_group_def = 1; 687 /* 688 * enable ERASE_GRP_DEF successfully. 689 * This will affect the erase size, so 690 * here need to reset erase size 691 */ 692 mmc_set_erase_size(card); 693 } 694 } 695 696 /* 697 * Ensure eMMC user default partition is enabled 698 */ 699 if (card->ext_csd.part_config & EXT_CSD_PART_CONFIG_ACC_MASK) { 700 card->ext_csd.part_config &= ~EXT_CSD_PART_CONFIG_ACC_MASK; 701 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_PART_CONFIG, 702 card->ext_csd.part_config, 703 card->ext_csd.part_time); 704 if (err && err != -EBADMSG) 705 goto free_card; 706 } 707 708 /* 709 * Activate high speed (if supported) 710 */ 711 if ((card->ext_csd.hs_max_dtr != 0) && 712 (host->caps & MMC_CAP_MMC_HIGHSPEED)) { 713 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 714 EXT_CSD_HS_TIMING, 1, 0); 715 if (err && err != -EBADMSG) 716 goto free_card; 717 718 if (err) { 719 printk(KERN_WARNING "%s: switch to highspeed failed\n", 720 mmc_hostname(card->host)); 721 err = 0; 722 } else { 723 mmc_card_set_highspeed(card); 724 mmc_set_timing(card->host, MMC_TIMING_MMC_HS); 725 } 726 } 727 728 /* 729 * Compute bus speed. 730 */ 731 max_dtr = (unsigned int)-1; 732 733 if (mmc_card_highspeed(card)) { 734 if (max_dtr > card->ext_csd.hs_max_dtr) 735 max_dtr = card->ext_csd.hs_max_dtr; 736 } else if (max_dtr > card->csd.max_dtr) { 737 max_dtr = card->csd.max_dtr; 738 } 739 740 mmc_set_clock(host, max_dtr); 741 742 /* 743 * Indicate DDR mode (if supported). 744 */ 745 if (mmc_card_highspeed(card)) { 746 if ((card->ext_csd.card_type & EXT_CSD_CARD_TYPE_DDR_1_8V) 747 && ((host->caps & (MMC_CAP_1_8V_DDR | 748 MMC_CAP_UHS_DDR50)) 749 == (MMC_CAP_1_8V_DDR | MMC_CAP_UHS_DDR50))) 750 ddr = MMC_1_8V_DDR_MODE; 751 else if ((card->ext_csd.card_type & EXT_CSD_CARD_TYPE_DDR_1_2V) 752 && ((host->caps & (MMC_CAP_1_2V_DDR | 753 MMC_CAP_UHS_DDR50)) 754 == (MMC_CAP_1_2V_DDR | MMC_CAP_UHS_DDR50))) 755 ddr = MMC_1_2V_DDR_MODE; 756 } 757 758 /* 759 * Activate wide bus and DDR (if supported). 760 */ 761 if ((card->csd.mmca_vsn >= CSD_SPEC_VER_4) && 762 (host->caps & (MMC_CAP_4_BIT_DATA | MMC_CAP_8_BIT_DATA))) { 763 static unsigned ext_csd_bits[][2] = { 764 { EXT_CSD_BUS_WIDTH_8, EXT_CSD_DDR_BUS_WIDTH_8 }, 765 { EXT_CSD_BUS_WIDTH_4, EXT_CSD_DDR_BUS_WIDTH_4 }, 766 { EXT_CSD_BUS_WIDTH_1, EXT_CSD_BUS_WIDTH_1 }, 767 }; 768 static unsigned bus_widths[] = { 769 MMC_BUS_WIDTH_8, 770 MMC_BUS_WIDTH_4, 771 MMC_BUS_WIDTH_1 772 }; 773 unsigned idx, bus_width = 0; 774 775 if (host->caps & MMC_CAP_8_BIT_DATA) 776 idx = 0; 777 else 778 idx = 1; 779 for (; idx < ARRAY_SIZE(bus_widths); idx++) { 780 bus_width = bus_widths[idx]; 781 if (bus_width == MMC_BUS_WIDTH_1) 782 ddr = 0; /* no DDR for 1-bit width */ 783 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 784 EXT_CSD_BUS_WIDTH, 785 ext_csd_bits[idx][0], 786 0); 787 if (!err) { 788 mmc_set_bus_width(card->host, bus_width); 789 790 /* 791 * If controller can't handle bus width test, 792 * compare ext_csd previously read in 1 bit mode 793 * against ext_csd at new bus width 794 */ 795 if (!(host->caps & MMC_CAP_BUS_WIDTH_TEST)) 796 err = mmc_compare_ext_csds(card, 797 bus_width); 798 else 799 err = mmc_bus_test(card, bus_width); 800 if (!err) 801 break; 802 } 803 } 804 805 if (!err && ddr) { 806 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 807 EXT_CSD_BUS_WIDTH, 808 ext_csd_bits[idx][1], 809 0); 810 } 811 if (err) { 812 printk(KERN_WARNING "%s: switch to bus width %d ddr %d " 813 "failed\n", mmc_hostname(card->host), 814 1 << bus_width, ddr); 815 goto free_card; 816 } else if (ddr) { 817 /* 818 * eMMC cards can support 3.3V to 1.2V i/o (vccq) 819 * signaling. 820 * 821 * EXT_CSD_CARD_TYPE_DDR_1_8V means 3.3V or 1.8V vccq. 822 * 823 * 1.8V vccq at 3.3V core voltage (vcc) is not required 824 * in the JEDEC spec for DDR. 825 * 826 * Do not force change in vccq since we are obviously 827 * working and no change to vccq is needed. 828 * 829 * WARNING: eMMC rules are NOT the same as SD DDR 830 */ 831 if (ddr == EXT_CSD_CARD_TYPE_DDR_1_2V) { 832 err = mmc_set_signal_voltage(host, 833 MMC_SIGNAL_VOLTAGE_120, 0); 834 if (err) 835 goto err; 836 } 837 mmc_card_set_ddr_mode(card); 838 mmc_set_timing(card->host, MMC_TIMING_UHS_DDR50); 839 mmc_set_bus_width(card->host, bus_width); 840 } 841 } 842 843 if (!oldcard) 844 host->card = card; 845 846 mmc_free_ext_csd(ext_csd); 847 return 0; 848 849 free_card: 850 if (!oldcard) 851 mmc_remove_card(card); 852 err: 853 mmc_free_ext_csd(ext_csd); 854 855 return err; 856 } 857 858 /* 859 * Host is being removed. Free up the current card. 860 */ 861 static void mmc_remove(struct mmc_host *host) 862 { 863 BUG_ON(!host); 864 BUG_ON(!host->card); 865 866 mmc_remove_card(host->card); 867 host->card = NULL; 868 } 869 870 /* 871 * Card detection callback from host. 872 */ 873 static void mmc_detect(struct mmc_host *host) 874 { 875 int err; 876 877 BUG_ON(!host); 878 BUG_ON(!host->card); 879 880 mmc_claim_host(host); 881 882 /* 883 * Just check if our card has been removed. 884 */ 885 err = mmc_send_status(host->card, NULL); 886 887 mmc_release_host(host); 888 889 if (err) { 890 mmc_remove(host); 891 892 mmc_claim_host(host); 893 mmc_detach_bus(host); 894 mmc_release_host(host); 895 } 896 } 897 898 /* 899 * Suspend callback from host. 900 */ 901 static int mmc_suspend(struct mmc_host *host) 902 { 903 BUG_ON(!host); 904 BUG_ON(!host->card); 905 906 mmc_claim_host(host); 907 if (!mmc_host_is_spi(host)) 908 mmc_deselect_cards(host); 909 host->card->state &= ~MMC_STATE_HIGHSPEED; 910 mmc_release_host(host); 911 912 return 0; 913 } 914 915 /* 916 * Resume callback from host. 917 * 918 * This function tries to determine if the same card is still present 919 * and, if so, restore all state to it. 920 */ 921 static int mmc_resume(struct mmc_host *host) 922 { 923 int err; 924 925 BUG_ON(!host); 926 BUG_ON(!host->card); 927 928 mmc_claim_host(host); 929 err = mmc_init_card(host, host->ocr, host->card); 930 mmc_release_host(host); 931 932 return err; 933 } 934 935 static int mmc_power_restore(struct mmc_host *host) 936 { 937 int ret; 938 939 host->card->state &= ~MMC_STATE_HIGHSPEED; 940 mmc_claim_host(host); 941 ret = mmc_init_card(host, host->ocr, host->card); 942 mmc_release_host(host); 943 944 return ret; 945 } 946 947 static int mmc_sleep(struct mmc_host *host) 948 { 949 struct mmc_card *card = host->card; 950 int err = -ENOSYS; 951 952 if (card && card->ext_csd.rev >= 3) { 953 err = mmc_card_sleepawake(host, 1); 954 if (err < 0) 955 pr_debug("%s: Error %d while putting card into sleep", 956 mmc_hostname(host), err); 957 } 958 959 return err; 960 } 961 962 static int mmc_awake(struct mmc_host *host) 963 { 964 struct mmc_card *card = host->card; 965 int err = -ENOSYS; 966 967 if (card && card->ext_csd.rev >= 3) { 968 err = mmc_card_sleepawake(host, 0); 969 if (err < 0) 970 pr_debug("%s: Error %d while awaking sleeping card", 971 mmc_hostname(host), err); 972 } 973 974 return err; 975 } 976 977 static const struct mmc_bus_ops mmc_ops = { 978 .awake = mmc_awake, 979 .sleep = mmc_sleep, 980 .remove = mmc_remove, 981 .detect = mmc_detect, 982 .suspend = NULL, 983 .resume = NULL, 984 .power_restore = mmc_power_restore, 985 }; 986 987 static const struct mmc_bus_ops mmc_ops_unsafe = { 988 .awake = mmc_awake, 989 .sleep = mmc_sleep, 990 .remove = mmc_remove, 991 .detect = mmc_detect, 992 .suspend = mmc_suspend, 993 .resume = mmc_resume, 994 .power_restore = mmc_power_restore, 995 }; 996 997 static void mmc_attach_bus_ops(struct mmc_host *host) 998 { 999 const struct mmc_bus_ops *bus_ops; 1000 1001 if (!mmc_card_is_removable(host)) 1002 bus_ops = &mmc_ops_unsafe; 1003 else 1004 bus_ops = &mmc_ops; 1005 mmc_attach_bus(host, bus_ops); 1006 } 1007 1008 /* 1009 * Starting point for MMC card init. 1010 */ 1011 int mmc_attach_mmc(struct mmc_host *host) 1012 { 1013 int err; 1014 u32 ocr; 1015 1016 BUG_ON(!host); 1017 WARN_ON(!host->claimed); 1018 1019 err = mmc_send_op_cond(host, 0, &ocr); 1020 if (err) 1021 return err; 1022 1023 mmc_attach_bus_ops(host); 1024 if (host->ocr_avail_mmc) 1025 host->ocr_avail = host->ocr_avail_mmc; 1026 1027 /* 1028 * We need to get OCR a different way for SPI. 1029 */ 1030 if (mmc_host_is_spi(host)) { 1031 err = mmc_spi_read_ocr(host, 1, &ocr); 1032 if (err) 1033 goto err; 1034 } 1035 1036 /* 1037 * Sanity check the voltages that the card claims to 1038 * support. 1039 */ 1040 if (ocr & 0x7F) { 1041 printk(KERN_WARNING "%s: card claims to support voltages " 1042 "below the defined range. These will be ignored.\n", 1043 mmc_hostname(host)); 1044 ocr &= ~0x7F; 1045 } 1046 1047 host->ocr = mmc_select_voltage(host, ocr); 1048 1049 /* 1050 * Can we support the voltage of the card? 1051 */ 1052 if (!host->ocr) { 1053 err = -EINVAL; 1054 goto err; 1055 } 1056 1057 /* 1058 * Detect and init the card. 1059 */ 1060 err = mmc_init_card(host, host->ocr, NULL); 1061 if (err) 1062 goto err; 1063 1064 mmc_release_host(host); 1065 err = mmc_add_card(host->card); 1066 mmc_claim_host(host); 1067 if (err) 1068 goto remove_card; 1069 1070 return 0; 1071 1072 remove_card: 1073 mmc_release_host(host); 1074 mmc_remove_card(host->card); 1075 mmc_claim_host(host); 1076 host->card = NULL; 1077 err: 1078 mmc_detach_bus(host); 1079 1080 printk(KERN_ERR "%s: error %d whilst initialising MMC card\n", 1081 mmc_hostname(host), err); 1082 1083 return err; 1084 } 1085