2a7e43bc796dfd1e798ad60a1ae6d0e7b98278a2
[pandora-kernel.git] / drivers / mmc / core / mmc.c
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 }