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 card->ext_csd.rst_n_function = ext_csd[EXT_CSD_RST_N_FUNCTION]; 408 } 409 410 if (ext_csd[EXT_CSD_ERASED_MEM_CONT]) 411 card->erased_byte = 0xFF; 412 else 413 card->erased_byte = 0x0; 414 415 out: 416 return err; 417 } 418 419 static inline void mmc_free_ext_csd(u8 *ext_csd) 420 { 421 kfree(ext_csd); 422 } 423 424 425 static int mmc_compare_ext_csds(struct mmc_card *card, unsigned bus_width) 426 { 427 u8 *bw_ext_csd; 428 int err; 429 430 if (bus_width == MMC_BUS_WIDTH_1) 431 return 0; 432 433 err = mmc_get_ext_csd(card, &bw_ext_csd); 434 435 if (err || bw_ext_csd == NULL) { 436 if (bus_width != MMC_BUS_WIDTH_1) 437 err = -EINVAL; 438 goto out; 439 } 440 441 if (bus_width == MMC_BUS_WIDTH_1) 442 goto out; 443 444 /* only compare read only fields */ 445 err = (!(card->ext_csd.raw_partition_support == 446 bw_ext_csd[EXT_CSD_PARTITION_SUPPORT]) && 447 (card->ext_csd.raw_erased_mem_count == 448 bw_ext_csd[EXT_CSD_ERASED_MEM_CONT]) && 449 (card->ext_csd.rev == 450 bw_ext_csd[EXT_CSD_REV]) && 451 (card->ext_csd.raw_ext_csd_structure == 452 bw_ext_csd[EXT_CSD_STRUCTURE]) && 453 (card->ext_csd.raw_card_type == 454 bw_ext_csd[EXT_CSD_CARD_TYPE]) && 455 (card->ext_csd.raw_s_a_timeout == 456 bw_ext_csd[EXT_CSD_S_A_TIMEOUT]) && 457 (card->ext_csd.raw_hc_erase_gap_size == 458 bw_ext_csd[EXT_CSD_HC_WP_GRP_SIZE]) && 459 (card->ext_csd.raw_erase_timeout_mult == 460 bw_ext_csd[EXT_CSD_ERASE_TIMEOUT_MULT]) && 461 (card->ext_csd.raw_hc_erase_grp_size == 462 bw_ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]) && 463 (card->ext_csd.raw_sec_trim_mult == 464 bw_ext_csd[EXT_CSD_SEC_TRIM_MULT]) && 465 (card->ext_csd.raw_sec_erase_mult == 466 bw_ext_csd[EXT_CSD_SEC_ERASE_MULT]) && 467 (card->ext_csd.raw_sec_feature_support == 468 bw_ext_csd[EXT_CSD_SEC_FEATURE_SUPPORT]) && 469 (card->ext_csd.raw_trim_mult == 470 bw_ext_csd[EXT_CSD_TRIM_MULT]) && 471 (card->ext_csd.raw_sectors[0] == 472 bw_ext_csd[EXT_CSD_SEC_CNT + 0]) && 473 (card->ext_csd.raw_sectors[1] == 474 bw_ext_csd[EXT_CSD_SEC_CNT + 1]) && 475 (card->ext_csd.raw_sectors[2] == 476 bw_ext_csd[EXT_CSD_SEC_CNT + 2]) && 477 (card->ext_csd.raw_sectors[3] == 478 bw_ext_csd[EXT_CSD_SEC_CNT + 3])); 479 if (err) 480 err = -EINVAL; 481 482 out: 483 mmc_free_ext_csd(bw_ext_csd); 484 return err; 485 } 486 487 MMC_DEV_ATTR(cid, "%08x%08x%08x%08x\n", card->raw_cid[0], card->raw_cid[1], 488 card->raw_cid[2], card->raw_cid[3]); 489 MMC_DEV_ATTR(csd, "%08x%08x%08x%08x\n", card->raw_csd[0], card->raw_csd[1], 490 card->raw_csd[2], card->raw_csd[3]); 491 MMC_DEV_ATTR(date, "%02d/%04d\n", card->cid.month, card->cid.year); 492 MMC_DEV_ATTR(erase_size, "%u\n", card->erase_size << 9); 493 MMC_DEV_ATTR(preferred_erase_size, "%u\n", card->pref_erase << 9); 494 MMC_DEV_ATTR(fwrev, "0x%x\n", card->cid.fwrev); 495 MMC_DEV_ATTR(hwrev, "0x%x\n", card->cid.hwrev); 496 MMC_DEV_ATTR(manfid, "0x%06x\n", card->cid.manfid); 497 MMC_DEV_ATTR(name, "%s\n", card->cid.prod_name); 498 MMC_DEV_ATTR(oemid, "0x%04x\n", card->cid.oemid); 499 MMC_DEV_ATTR(serial, "0x%08x\n", card->cid.serial); 500 MMC_DEV_ATTR(enhanced_area_offset, "%llu\n", 501 card->ext_csd.enhanced_area_offset); 502 MMC_DEV_ATTR(enhanced_area_size, "%u\n", card->ext_csd.enhanced_area_size); 503 504 static struct attribute *mmc_std_attrs[] = { 505 &dev_attr_cid.attr, 506 &dev_attr_csd.attr, 507 &dev_attr_date.attr, 508 &dev_attr_erase_size.attr, 509 &dev_attr_preferred_erase_size.attr, 510 &dev_attr_fwrev.attr, 511 &dev_attr_hwrev.attr, 512 &dev_attr_manfid.attr, 513 &dev_attr_name.attr, 514 &dev_attr_oemid.attr, 515 &dev_attr_serial.attr, 516 &dev_attr_enhanced_area_offset.attr, 517 &dev_attr_enhanced_area_size.attr, 518 NULL, 519 }; 520 521 static struct attribute_group mmc_std_attr_group = { 522 .attrs = mmc_std_attrs, 523 }; 524 525 static const struct attribute_group *mmc_attr_groups[] = { 526 &mmc_std_attr_group, 527 NULL, 528 }; 529 530 static struct device_type mmc_type = { 531 .groups = mmc_attr_groups, 532 }; 533 534 /* 535 * Select the PowerClass for the current bus width 536 * If power class is defined for 4/8 bit bus in the 537 * extended CSD register, select it by executing the 538 * mmc_switch command. 539 */ 540 static int mmc_select_powerclass(struct mmc_card *card, 541 unsigned int bus_width, u8 *ext_csd) 542 { 543 int err = 0; 544 unsigned int pwrclass_val; 545 unsigned int index = 0; 546 struct mmc_host *host; 547 548 BUG_ON(!card); 549 550 host = card->host; 551 BUG_ON(!host); 552 553 if (ext_csd == NULL) 554 return 0; 555 556 /* Power class selection is supported for versions >= 4.0 */ 557 if (card->csd.mmca_vsn < CSD_SPEC_VER_4) 558 return 0; 559 560 /* Power class values are defined only for 4/8 bit bus */ 561 if (bus_width == EXT_CSD_BUS_WIDTH_1) 562 return 0; 563 564 switch (1 << host->ios.vdd) { 565 case MMC_VDD_165_195: 566 if (host->ios.clock <= 26000000) 567 index = EXT_CSD_PWR_CL_26_195; 568 else if (host->ios.clock <= 52000000) 569 index = (bus_width <= EXT_CSD_BUS_WIDTH_8) ? 570 EXT_CSD_PWR_CL_52_195 : 571 EXT_CSD_PWR_CL_DDR_52_195; 572 else if (host->ios.clock <= 200000000) 573 index = EXT_CSD_PWR_CL_200_195; 574 break; 575 case MMC_VDD_32_33: 576 case MMC_VDD_33_34: 577 case MMC_VDD_34_35: 578 case MMC_VDD_35_36: 579 if (host->ios.clock <= 26000000) 580 index = EXT_CSD_PWR_CL_26_360; 581 else if (host->ios.clock <= 52000000) 582 index = (bus_width <= EXT_CSD_BUS_WIDTH_8) ? 583 EXT_CSD_PWR_CL_52_360 : 584 EXT_CSD_PWR_CL_DDR_52_360; 585 else if (host->ios.clock <= 200000000) 586 index = EXT_CSD_PWR_CL_200_360; 587 break; 588 default: 589 pr_warning("%s: Voltage range not supported " 590 "for power class.\n", mmc_hostname(host)); 591 return -EINVAL; 592 } 593 594 pwrclass_val = ext_csd[index]; 595 596 if (bus_width & (EXT_CSD_BUS_WIDTH_8 | EXT_CSD_DDR_BUS_WIDTH_8)) 597 pwrclass_val = (pwrclass_val & EXT_CSD_PWR_CL_8BIT_MASK) >> 598 EXT_CSD_PWR_CL_8BIT_SHIFT; 599 else 600 pwrclass_val = (pwrclass_val & EXT_CSD_PWR_CL_4BIT_MASK) >> 601 EXT_CSD_PWR_CL_4BIT_SHIFT; 602 603 /* If the power class is different from the default value */ 604 if (pwrclass_val > 0) { 605 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 606 EXT_CSD_POWER_CLASS, 607 pwrclass_val, 608 0); 609 } 610 611 return err; 612 } 613 614 /* 615 * Handle the detection and initialisation of a card. 616 * 617 * In the case of a resume, "oldcard" will contain the card 618 * we're trying to reinitialise. 619 */ 620 static int mmc_init_card(struct mmc_host *host, u32 ocr, 621 struct mmc_card *oldcard) 622 { 623 struct mmc_card *card; 624 int err, ddr = 0; 625 u32 cid[4]; 626 unsigned int max_dtr; 627 u32 rocr; 628 u8 *ext_csd = NULL; 629 630 BUG_ON(!host); 631 WARN_ON(!host->claimed); 632 633 /* Set correct bus mode for MMC before attempting init */ 634 if (!mmc_host_is_spi(host)) 635 mmc_set_bus_mode(host, MMC_BUSMODE_OPENDRAIN); 636 637 /* 638 * Since we're changing the OCR value, we seem to 639 * need to tell some cards to go back to the idle 640 * state. We wait 1ms to give cards time to 641 * respond. 642 * mmc_go_idle is needed for eMMC that are asleep 643 */ 644 mmc_go_idle(host); 645 646 /* The extra bit indicates that we support high capacity */ 647 err = mmc_send_op_cond(host, ocr | (1 << 30), &rocr); 648 if (err) 649 goto err; 650 651 /* 652 * For SPI, enable CRC as appropriate. 653 */ 654 if (mmc_host_is_spi(host)) { 655 err = mmc_spi_set_crc(host, use_spi_crc); 656 if (err) 657 goto err; 658 } 659 660 /* 661 * Fetch CID from card. 662 */ 663 if (mmc_host_is_spi(host)) 664 err = mmc_send_cid(host, cid); 665 else 666 err = mmc_all_send_cid(host, cid); 667 if (err) 668 goto err; 669 670 if (oldcard) { 671 if (memcmp(cid, oldcard->raw_cid, sizeof(cid)) != 0) { 672 err = -ENOENT; 673 goto err; 674 } 675 676 card = oldcard; 677 } else { 678 /* 679 * Allocate card structure. 680 */ 681 card = mmc_alloc_card(host, &mmc_type); 682 if (IS_ERR(card)) { 683 err = PTR_ERR(card); 684 goto err; 685 } 686 687 card->type = MMC_TYPE_MMC; 688 card->rca = 1; 689 memcpy(card->raw_cid, cid, sizeof(card->raw_cid)); 690 } 691 692 /* 693 * For native busses: set card RCA and quit open drain mode. 694 */ 695 if (!mmc_host_is_spi(host)) { 696 err = mmc_set_relative_addr(card); 697 if (err) 698 goto free_card; 699 700 mmc_set_bus_mode(host, MMC_BUSMODE_PUSHPULL); 701 } 702 703 if (!oldcard) { 704 /* 705 * Fetch CSD from card. 706 */ 707 err = mmc_send_csd(card, card->raw_csd); 708 if (err) 709 goto free_card; 710 711 err = mmc_decode_csd(card); 712 if (err) 713 goto free_card; 714 err = mmc_decode_cid(card); 715 if (err) 716 goto free_card; 717 } 718 719 /* 720 * Select card, as all following commands rely on that. 721 */ 722 if (!mmc_host_is_spi(host)) { 723 err = mmc_select_card(card); 724 if (err) 725 goto free_card; 726 } 727 728 if (!oldcard) { 729 /* 730 * Fetch and process extended CSD. 731 */ 732 733 err = mmc_get_ext_csd(card, &ext_csd); 734 if (err) 735 goto free_card; 736 err = mmc_read_ext_csd(card, ext_csd); 737 if (err) 738 goto free_card; 739 740 /* If doing byte addressing, check if required to do sector 741 * addressing. Handle the case of <2GB cards needing sector 742 * addressing. See section 8.1 JEDEC Standard JED84-A441; 743 * ocr register has bit 30 set for sector addressing. 744 */ 745 if (!(mmc_card_blockaddr(card)) && (rocr & (1<<30))) 746 mmc_card_set_blockaddr(card); 747 748 /* Erase size depends on CSD and Extended CSD */ 749 mmc_set_erase_size(card); 750 } 751 752 /* 753 * If enhanced_area_en is TRUE, host needs to enable ERASE_GRP_DEF 754 * bit. This bit will be lost every time after a reset or power off. 755 */ 756 if (card->ext_csd.enhanced_area_en) { 757 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 758 EXT_CSD_ERASE_GROUP_DEF, 1, 0); 759 760 if (err && err != -EBADMSG) 761 goto free_card; 762 763 if (err) { 764 err = 0; 765 /* 766 * Just disable enhanced area off & sz 767 * will try to enable ERASE_GROUP_DEF 768 * during next time reinit 769 */ 770 card->ext_csd.enhanced_area_offset = -EINVAL; 771 card->ext_csd.enhanced_area_size = -EINVAL; 772 } else { 773 card->ext_csd.erase_group_def = 1; 774 /* 775 * enable ERASE_GRP_DEF successfully. 776 * This will affect the erase size, so 777 * here need to reset erase size 778 */ 779 mmc_set_erase_size(card); 780 } 781 } 782 783 /* 784 * Ensure eMMC user default partition is enabled 785 */ 786 if (card->ext_csd.part_config & EXT_CSD_PART_CONFIG_ACC_MASK) { 787 card->ext_csd.part_config &= ~EXT_CSD_PART_CONFIG_ACC_MASK; 788 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_PART_CONFIG, 789 card->ext_csd.part_config, 790 card->ext_csd.part_time); 791 if (err && err != -EBADMSG) 792 goto free_card; 793 } 794 795 /* 796 * Activate high speed (if supported) 797 */ 798 if ((card->ext_csd.hs_max_dtr != 0) && 799 (host->caps & MMC_CAP_MMC_HIGHSPEED)) { 800 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 801 EXT_CSD_HS_TIMING, 1, 0); 802 if (err && err != -EBADMSG) 803 goto free_card; 804 805 if (err) { 806 printk(KERN_WARNING "%s: switch to highspeed failed\n", 807 mmc_hostname(card->host)); 808 err = 0; 809 } else { 810 mmc_card_set_highspeed(card); 811 mmc_set_timing(card->host, MMC_TIMING_MMC_HS); 812 } 813 } 814 815 /* 816 * Compute bus speed. 817 */ 818 max_dtr = (unsigned int)-1; 819 820 if (mmc_card_highspeed(card)) { 821 if (max_dtr > card->ext_csd.hs_max_dtr) 822 max_dtr = card->ext_csd.hs_max_dtr; 823 } else if (max_dtr > card->csd.max_dtr) { 824 max_dtr = card->csd.max_dtr; 825 } 826 827 mmc_set_clock(host, max_dtr); 828 829 /* 830 * Indicate DDR mode (if supported). 831 */ 832 if (mmc_card_highspeed(card)) { 833 if ((card->ext_csd.card_type & EXT_CSD_CARD_TYPE_DDR_1_8V) 834 && ((host->caps & (MMC_CAP_1_8V_DDR | 835 MMC_CAP_UHS_DDR50)) 836 == (MMC_CAP_1_8V_DDR | MMC_CAP_UHS_DDR50))) 837 ddr = MMC_1_8V_DDR_MODE; 838 else if ((card->ext_csd.card_type & EXT_CSD_CARD_TYPE_DDR_1_2V) 839 && ((host->caps & (MMC_CAP_1_2V_DDR | 840 MMC_CAP_UHS_DDR50)) 841 == (MMC_CAP_1_2V_DDR | MMC_CAP_UHS_DDR50))) 842 ddr = MMC_1_2V_DDR_MODE; 843 } 844 845 /* 846 * Activate wide bus and DDR (if supported). 847 */ 848 if ((card->csd.mmca_vsn >= CSD_SPEC_VER_4) && 849 (host->caps & (MMC_CAP_4_BIT_DATA | MMC_CAP_8_BIT_DATA))) { 850 static unsigned ext_csd_bits[][2] = { 851 { EXT_CSD_BUS_WIDTH_8, EXT_CSD_DDR_BUS_WIDTH_8 }, 852 { EXT_CSD_BUS_WIDTH_4, EXT_CSD_DDR_BUS_WIDTH_4 }, 853 { EXT_CSD_BUS_WIDTH_1, EXT_CSD_BUS_WIDTH_1 }, 854 }; 855 static unsigned bus_widths[] = { 856 MMC_BUS_WIDTH_8, 857 MMC_BUS_WIDTH_4, 858 MMC_BUS_WIDTH_1 859 }; 860 unsigned idx, bus_width = 0; 861 862 if (host->caps & MMC_CAP_8_BIT_DATA) 863 idx = 0; 864 else 865 idx = 1; 866 for (; idx < ARRAY_SIZE(bus_widths); idx++) { 867 bus_width = bus_widths[idx]; 868 if (bus_width == MMC_BUS_WIDTH_1) 869 ddr = 0; /* no DDR for 1-bit width */ 870 err = mmc_select_powerclass(card, ext_csd_bits[idx][0], 871 ext_csd); 872 if (err) 873 pr_err("%s: power class selection to " 874 "bus width %d failed\n", 875 mmc_hostname(card->host), 876 1 << bus_width); 877 878 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 879 EXT_CSD_BUS_WIDTH, 880 ext_csd_bits[idx][0], 881 0); 882 if (!err) { 883 mmc_set_bus_width(card->host, bus_width); 884 885 /* 886 * If controller can't handle bus width test, 887 * compare ext_csd previously read in 1 bit mode 888 * against ext_csd at new bus width 889 */ 890 if (!(host->caps & MMC_CAP_BUS_WIDTH_TEST)) 891 err = mmc_compare_ext_csds(card, 892 bus_width); 893 else 894 err = mmc_bus_test(card, bus_width); 895 if (!err) 896 break; 897 } 898 } 899 900 if (!err && ddr) { 901 err = mmc_select_powerclass(card, ext_csd_bits[idx][1], 902 ext_csd); 903 if (err) 904 pr_err("%s: power class selection to " 905 "bus width %d ddr %d failed\n", 906 mmc_hostname(card->host), 907 1 << bus_width, ddr); 908 909 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, 910 EXT_CSD_BUS_WIDTH, 911 ext_csd_bits[idx][1], 912 0); 913 } 914 if (err) { 915 printk(KERN_WARNING "%s: switch to bus width %d ddr %d " 916 "failed\n", mmc_hostname(card->host), 917 1 << bus_width, ddr); 918 goto free_card; 919 } else if (ddr) { 920 /* 921 * eMMC cards can support 3.3V to 1.2V i/o (vccq) 922 * signaling. 923 * 924 * EXT_CSD_CARD_TYPE_DDR_1_8V means 3.3V or 1.8V vccq. 925 * 926 * 1.8V vccq at 3.3V core voltage (vcc) is not required 927 * in the JEDEC spec for DDR. 928 * 929 * Do not force change in vccq since we are obviously 930 * working and no change to vccq is needed. 931 * 932 * WARNING: eMMC rules are NOT the same as SD DDR 933 */ 934 if (ddr == EXT_CSD_CARD_TYPE_DDR_1_2V) { 935 err = mmc_set_signal_voltage(host, 936 MMC_SIGNAL_VOLTAGE_120, 0); 937 if (err) 938 goto err; 939 } 940 mmc_card_set_ddr_mode(card); 941 mmc_set_timing(card->host, MMC_TIMING_UHS_DDR50); 942 mmc_set_bus_width(card->host, bus_width); 943 } 944 } 945 946 if (!oldcard) 947 host->card = card; 948 949 mmc_free_ext_csd(ext_csd); 950 return 0; 951 952 free_card: 953 if (!oldcard) 954 mmc_remove_card(card); 955 err: 956 mmc_free_ext_csd(ext_csd); 957 958 return err; 959 } 960 961 /* 962 * Host is being removed. Free up the current card. 963 */ 964 static void mmc_remove(struct mmc_host *host) 965 { 966 BUG_ON(!host); 967 BUG_ON(!host->card); 968 969 mmc_remove_card(host->card); 970 host->card = NULL; 971 } 972 973 /* 974 * Card detection callback from host. 975 */ 976 static void mmc_detect(struct mmc_host *host) 977 { 978 int err; 979 980 BUG_ON(!host); 981 BUG_ON(!host->card); 982 983 mmc_claim_host(host); 984 985 /* 986 * Just check if our card has been removed. 987 */ 988 err = mmc_send_status(host->card, NULL); 989 990 mmc_release_host(host); 991 992 if (err) { 993 mmc_remove(host); 994 995 mmc_claim_host(host); 996 mmc_detach_bus(host); 997 mmc_power_off(host); 998 mmc_release_host(host); 999 } 1000 } 1001 1002 /* 1003 * Suspend callback from host. 1004 */ 1005 static int mmc_suspend(struct mmc_host *host) 1006 { 1007 int err = 0; 1008 1009 BUG_ON(!host); 1010 BUG_ON(!host->card); 1011 1012 mmc_claim_host(host); 1013 if (mmc_card_can_sleep(host)) 1014 err = mmc_card_sleep(host); 1015 else if (!mmc_host_is_spi(host)) 1016 mmc_deselect_cards(host); 1017 host->card->state &= ~MMC_STATE_HIGHSPEED; 1018 mmc_release_host(host); 1019 1020 return err; 1021 } 1022 1023 /* 1024 * Resume callback from host. 1025 * 1026 * This function tries to determine if the same card is still present 1027 * and, if so, restore all state to it. 1028 */ 1029 static int mmc_resume(struct mmc_host *host) 1030 { 1031 int err; 1032 1033 BUG_ON(!host); 1034 BUG_ON(!host->card); 1035 1036 mmc_claim_host(host); 1037 err = mmc_init_card(host, host->ocr, host->card); 1038 mmc_release_host(host); 1039 1040 return err; 1041 } 1042 1043 static int mmc_power_restore(struct mmc_host *host) 1044 { 1045 int ret; 1046 1047 host->card->state &= ~MMC_STATE_HIGHSPEED; 1048 mmc_claim_host(host); 1049 ret = mmc_init_card(host, host->ocr, host->card); 1050 mmc_release_host(host); 1051 1052 return ret; 1053 } 1054 1055 static int mmc_sleep(struct mmc_host *host) 1056 { 1057 struct mmc_card *card = host->card; 1058 int err = -ENOSYS; 1059 1060 if (card && card->ext_csd.rev >= 3) { 1061 err = mmc_card_sleepawake(host, 1); 1062 if (err < 0) 1063 pr_debug("%s: Error %d while putting card into sleep", 1064 mmc_hostname(host), err); 1065 } 1066 1067 return err; 1068 } 1069 1070 static int mmc_awake(struct mmc_host *host) 1071 { 1072 struct mmc_card *card = host->card; 1073 int err = -ENOSYS; 1074 1075 if (card && card->ext_csd.rev >= 3) { 1076 err = mmc_card_sleepawake(host, 0); 1077 if (err < 0) 1078 pr_debug("%s: Error %d while awaking sleeping card", 1079 mmc_hostname(host), err); 1080 } 1081 1082 return err; 1083 } 1084 1085 static const struct mmc_bus_ops mmc_ops = { 1086 .awake = mmc_awake, 1087 .sleep = mmc_sleep, 1088 .remove = mmc_remove, 1089 .detect = mmc_detect, 1090 .suspend = NULL, 1091 .resume = NULL, 1092 .power_restore = mmc_power_restore, 1093 }; 1094 1095 static const struct mmc_bus_ops mmc_ops_unsafe = { 1096 .awake = mmc_awake, 1097 .sleep = mmc_sleep, 1098 .remove = mmc_remove, 1099 .detect = mmc_detect, 1100 .suspend = mmc_suspend, 1101 .resume = mmc_resume, 1102 .power_restore = mmc_power_restore, 1103 }; 1104 1105 static void mmc_attach_bus_ops(struct mmc_host *host) 1106 { 1107 const struct mmc_bus_ops *bus_ops; 1108 1109 if (!mmc_card_is_removable(host)) 1110 bus_ops = &mmc_ops_unsafe; 1111 else 1112 bus_ops = &mmc_ops; 1113 mmc_attach_bus(host, bus_ops); 1114 } 1115 1116 /* 1117 * Starting point for MMC card init. 1118 */ 1119 int mmc_attach_mmc(struct mmc_host *host) 1120 { 1121 int err; 1122 u32 ocr; 1123 1124 BUG_ON(!host); 1125 WARN_ON(!host->claimed); 1126 1127 /* Set correct bus mode for MMC before attempting attach */ 1128 if (!mmc_host_is_spi(host)) 1129 mmc_set_bus_mode(host, MMC_BUSMODE_OPENDRAIN); 1130 1131 err = mmc_send_op_cond(host, 0, &ocr); 1132 if (err) 1133 return err; 1134 1135 mmc_attach_bus_ops(host); 1136 if (host->ocr_avail_mmc) 1137 host->ocr_avail = host->ocr_avail_mmc; 1138 1139 /* 1140 * We need to get OCR a different way for SPI. 1141 */ 1142 if (mmc_host_is_spi(host)) { 1143 err = mmc_spi_read_ocr(host, 1, &ocr); 1144 if (err) 1145 goto err; 1146 } 1147 1148 /* 1149 * Sanity check the voltages that the card claims to 1150 * support. 1151 */ 1152 if (ocr & 0x7F) { 1153 printk(KERN_WARNING "%s: card claims to support voltages " 1154 "below the defined range. These will be ignored.\n", 1155 mmc_hostname(host)); 1156 ocr &= ~0x7F; 1157 } 1158 1159 host->ocr = mmc_select_voltage(host, ocr); 1160 1161 /* 1162 * Can we support the voltage of the card? 1163 */ 1164 if (!host->ocr) { 1165 err = -EINVAL; 1166 goto err; 1167 } 1168 1169 /* 1170 * Detect and init the card. 1171 */ 1172 err = mmc_init_card(host, host->ocr, NULL); 1173 if (err) 1174 goto err; 1175 1176 mmc_release_host(host); 1177 err = mmc_add_card(host->card); 1178 mmc_claim_host(host); 1179 if (err) 1180 goto remove_card; 1181 1182 return 0; 1183 1184 remove_card: 1185 mmc_release_host(host); 1186 mmc_remove_card(host->card); 1187 mmc_claim_host(host); 1188 host->card = NULL; 1189 err: 1190 mmc_detach_bus(host); 1191 1192 printk(KERN_ERR "%s: error %d whilst initialising MMC card\n", 1193 mmc_hostname(host), err); 1194 1195 return err; 1196 } 1197