Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/drzeus/mmc
[linux-2.6.git] / drivers / mmc / mmc.c
1 /*
2  *  linux/drivers/mmc/mmc.c
3  *
4  *  Copyright (C) 2003-2004 Russell King, All Rights Reserved.
5  *  SD support Copyright (C) 2004 Ian Molton, All Rights Reserved.
6  *  SD support Copyright (C) 2005 Pierre Ossman, All Rights Reserved.
7  *  MMCv4 support Copyright (C) 2006 Philip Langdale, All Rights Reserved.
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License version 2 as
11  * published by the Free Software Foundation.
12  */
13 #include <linux/module.h>
14 #include <linux/init.h>
15 #include <linux/interrupt.h>
16 #include <linux/completion.h>
17 #include <linux/device.h>
18 #include <linux/delay.h>
19 #include <linux/pagemap.h>
20 #include <linux/err.h>
21 #include <asm/scatterlist.h>
22 #include <linux/scatterlist.h>
23
24 #include <linux/mmc/card.h>
25 #include <linux/mmc/host.h>
26 #include <linux/mmc/protocol.h>
27
28 #include "mmc.h"
29
30 #define CMD_RETRIES     3
31
32 /*
33  * OCR Bit positions to 10s of Vdd mV.
34  */
35 static const unsigned short mmc_ocr_bit_to_vdd[] = {
36         150,    155,    160,    165,    170,    180,    190,    200,
37         210,    220,    230,    240,    250,    260,    270,    280,
38         290,    300,    310,    320,    330,    340,    350,    360
39 };
40
41 static const unsigned int tran_exp[] = {
42         10000,          100000,         1000000,        10000000,
43         0,              0,              0,              0
44 };
45
46 static const unsigned char tran_mant[] = {
47         0,      10,     12,     13,     15,     20,     25,     30,
48         35,     40,     45,     50,     55,     60,     70,     80,
49 };
50
51 static const unsigned int tacc_exp[] = {
52         1,      10,     100,    1000,   10000,  100000, 1000000, 10000000,
53 };
54
55 static const unsigned int tacc_mant[] = {
56         0,      10,     12,     13,     15,     20,     25,     30,
57         35,     40,     45,     50,     55,     60,     70,     80,
58 };
59
60
61 /**
62  *      mmc_request_done - finish processing an MMC request
63  *      @host: MMC host which completed request
64  *      @mrq: MMC request which request
65  *
66  *      MMC drivers should call this function when they have completed
67  *      their processing of a request.
68  */
69 void mmc_request_done(struct mmc_host *host, struct mmc_request *mrq)
70 {
71         struct mmc_command *cmd = mrq->cmd;
72         int err = cmd->error;
73
74         pr_debug("%s: req done (CMD%u): %d/%d/%d: %08x %08x %08x %08x\n",
75                  mmc_hostname(host), cmd->opcode, err,
76                  mrq->data ? mrq->data->error : 0,
77                  mrq->stop ? mrq->stop->error : 0,
78                  cmd->resp[0], cmd->resp[1], cmd->resp[2], cmd->resp[3]);
79
80         if (err && cmd->retries) {
81                 cmd->retries--;
82                 cmd->error = 0;
83                 host->ops->request(host, mrq);
84         } else if (mrq->done) {
85                 mrq->done(mrq);
86         }
87 }
88
89 EXPORT_SYMBOL(mmc_request_done);
90
91 /**
92  *      mmc_start_request - start a command on a host
93  *      @host: MMC host to start command on
94  *      @mrq: MMC request to start
95  *
96  *      Queue a command on the specified host.  We expect the
97  *      caller to be holding the host lock with interrupts disabled.
98  */
99 void
100 mmc_start_request(struct mmc_host *host, struct mmc_request *mrq)
101 {
102         pr_debug("%s: starting CMD%u arg %08x flags %08x\n",
103                  mmc_hostname(host), mrq->cmd->opcode,
104                  mrq->cmd->arg, mrq->cmd->flags);
105
106         WARN_ON(!host->claimed);
107
108         mrq->cmd->error = 0;
109         mrq->cmd->mrq = mrq;
110         if (mrq->data) {
111                 BUG_ON(mrq->data->blksz > host->max_blk_size);
112                 BUG_ON(mrq->data->blocks > host->max_blk_count);
113                 BUG_ON(mrq->data->blocks * mrq->data->blksz >
114                         host->max_req_size);
115
116                 mrq->cmd->data = mrq->data;
117                 mrq->data->error = 0;
118                 mrq->data->mrq = mrq;
119                 if (mrq->stop) {
120                         mrq->data->stop = mrq->stop;
121                         mrq->stop->error = 0;
122                         mrq->stop->mrq = mrq;
123                 }
124         }
125         host->ops->request(host, mrq);
126 }
127
128 EXPORT_SYMBOL(mmc_start_request);
129
130 static void mmc_wait_done(struct mmc_request *mrq)
131 {
132         complete(mrq->done_data);
133 }
134
135 int mmc_wait_for_req(struct mmc_host *host, struct mmc_request *mrq)
136 {
137         DECLARE_COMPLETION_ONSTACK(complete);
138
139         mrq->done_data = &complete;
140         mrq->done = mmc_wait_done;
141
142         mmc_start_request(host, mrq);
143
144         wait_for_completion(&complete);
145
146         return 0;
147 }
148
149 EXPORT_SYMBOL(mmc_wait_for_req);
150
151 /**
152  *      mmc_wait_for_cmd - start a command and wait for completion
153  *      @host: MMC host to start command
154  *      @cmd: MMC command to start
155  *      @retries: maximum number of retries
156  *
157  *      Start a new MMC command for a host, and wait for the command
158  *      to complete.  Return any error that occurred while the command
159  *      was executing.  Do not attempt to parse the response.
160  */
161 int mmc_wait_for_cmd(struct mmc_host *host, struct mmc_command *cmd, int retries)
162 {
163         struct mmc_request mrq;
164
165         BUG_ON(!host->claimed);
166
167         memset(&mrq, 0, sizeof(struct mmc_request));
168
169         memset(cmd->resp, 0, sizeof(cmd->resp));
170         cmd->retries = retries;
171
172         mrq.cmd = cmd;
173         cmd->data = NULL;
174
175         mmc_wait_for_req(host, &mrq);
176
177         return cmd->error;
178 }
179
180 EXPORT_SYMBOL(mmc_wait_for_cmd);
181
182 /**
183  *      mmc_wait_for_app_cmd - start an application command and wait for
184                                completion
185  *      @host: MMC host to start command
186  *      @rca: RCA to send MMC_APP_CMD to
187  *      @cmd: MMC command to start
188  *      @retries: maximum number of retries
189  *
190  *      Sends a MMC_APP_CMD, checks the card response, sends the command
191  *      in the parameter and waits for it to complete. Return any error
192  *      that occurred while the command was executing.  Do not attempt to
193  *      parse the response.
194  */
195 int mmc_wait_for_app_cmd(struct mmc_host *host, unsigned int rca,
196         struct mmc_command *cmd, int retries)
197 {
198         struct mmc_request mrq;
199         struct mmc_command appcmd;
200
201         int i, err;
202
203         BUG_ON(!host->claimed);
204         BUG_ON(retries < 0);
205
206         err = MMC_ERR_INVALID;
207
208         /*
209          * We have to resend MMC_APP_CMD for each attempt so
210          * we cannot use the retries field in mmc_command.
211          */
212         for (i = 0;i <= retries;i++) {
213                 memset(&mrq, 0, sizeof(struct mmc_request));
214
215                 appcmd.opcode = MMC_APP_CMD;
216                 appcmd.arg = rca << 16;
217                 appcmd.flags = MMC_RSP_R1 | MMC_CMD_AC;
218                 appcmd.retries = 0;
219                 memset(appcmd.resp, 0, sizeof(appcmd.resp));
220                 appcmd.data = NULL;
221
222                 mrq.cmd = &appcmd;
223                 appcmd.data = NULL;
224
225                 mmc_wait_for_req(host, &mrq);
226
227                 if (appcmd.error) {
228                         err = appcmd.error;
229                         continue;
230                 }
231
232                 /* Check that card supported application commands */
233                 if (!(appcmd.resp[0] & R1_APP_CMD))
234                         return MMC_ERR_FAILED;
235
236                 memset(&mrq, 0, sizeof(struct mmc_request));
237
238                 memset(cmd->resp, 0, sizeof(cmd->resp));
239                 cmd->retries = 0;
240
241                 mrq.cmd = cmd;
242                 cmd->data = NULL;
243
244                 mmc_wait_for_req(host, &mrq);
245
246                 err = cmd->error;
247                 if (cmd->error == MMC_ERR_NONE)
248                         break;
249         }
250
251         return err;
252 }
253
254 EXPORT_SYMBOL(mmc_wait_for_app_cmd);
255
256 /**
257  *      mmc_set_data_timeout - set the timeout for a data command
258  *      @data: data phase for command
259  *      @card: the MMC card associated with the data transfer
260  *      @write: flag to differentiate reads from writes
261  */
262 void mmc_set_data_timeout(struct mmc_data *data, const struct mmc_card *card,
263                           int write)
264 {
265         unsigned int mult;
266
267         /*
268          * SD cards use a 100 multiplier rather than 10
269          */
270         mult = mmc_card_sd(card) ? 100 : 10;
271
272         /*
273          * Scale up the multiplier (and therefore the timeout) by
274          * the r2w factor for writes.
275          */
276         if (write)
277                 mult <<= card->csd.r2w_factor;
278
279         data->timeout_ns = card->csd.tacc_ns * mult;
280         data->timeout_clks = card->csd.tacc_clks * mult;
281
282         /*
283          * SD cards also have an upper limit on the timeout.
284          */
285         if (mmc_card_sd(card)) {
286                 unsigned int timeout_us, limit_us;
287
288                 timeout_us = data->timeout_ns / 1000;
289                 timeout_us += data->timeout_clks * 1000 /
290                         (card->host->ios.clock / 1000);
291
292                 if (write)
293                         limit_us = 250000;
294                 else
295                         limit_us = 100000;
296
297                 /*
298                  * SDHC cards always use these fixed values.
299                  */
300                 if (timeout_us > limit_us || mmc_card_blockaddr(card)) {
301                         data->timeout_ns = limit_us * 1000;
302                         data->timeout_clks = 0;
303                 }
304         }
305 }
306 EXPORT_SYMBOL(mmc_set_data_timeout);
307
308 static int mmc_select_card(struct mmc_host *host, struct mmc_card *card);
309
310 /**
311  *      __mmc_claim_host - exclusively claim a host
312  *      @host: mmc host to claim
313  *      @card: mmc card to claim host for
314  *
315  *      Claim a host for a set of operations.  If a valid card
316  *      is passed and this wasn't the last card selected, select
317  *      the card before returning.
318  *
319  *      Note: you should use mmc_card_claim_host or mmc_claim_host.
320  */
321 int __mmc_claim_host(struct mmc_host *host, struct mmc_card *card)
322 {
323         DECLARE_WAITQUEUE(wait, current);
324         unsigned long flags;
325         int err = 0;
326
327         add_wait_queue(&host->wq, &wait);
328         spin_lock_irqsave(&host->lock, flags);
329         while (1) {
330                 set_current_state(TASK_UNINTERRUPTIBLE);
331                 if (!host->claimed)
332                         break;
333                 spin_unlock_irqrestore(&host->lock, flags);
334                 schedule();
335                 spin_lock_irqsave(&host->lock, flags);
336         }
337         set_current_state(TASK_RUNNING);
338         host->claimed = 1;
339         spin_unlock_irqrestore(&host->lock, flags);
340         remove_wait_queue(&host->wq, &wait);
341
342         if (card != (void *)-1) {
343                 err = mmc_select_card(host, card);
344                 if (err != MMC_ERR_NONE)
345                         return err;
346         }
347
348         return err;
349 }
350
351 EXPORT_SYMBOL(__mmc_claim_host);
352
353 /**
354  *      mmc_release_host - release a host
355  *      @host: mmc host to release
356  *
357  *      Release a MMC host, allowing others to claim the host
358  *      for their operations.
359  */
360 void mmc_release_host(struct mmc_host *host)
361 {
362         unsigned long flags;
363
364         BUG_ON(!host->claimed);
365
366         spin_lock_irqsave(&host->lock, flags);
367         host->claimed = 0;
368         spin_unlock_irqrestore(&host->lock, flags);
369
370         wake_up(&host->wq);
371 }
372
373 EXPORT_SYMBOL(mmc_release_host);
374
375 static inline void mmc_set_ios(struct mmc_host *host)
376 {
377         struct mmc_ios *ios = &host->ios;
378
379         pr_debug("%s: clock %uHz busmode %u powermode %u cs %u Vdd %u width %u\n",
380                  mmc_hostname(host), ios->clock, ios->bus_mode,
381                  ios->power_mode, ios->chip_select, ios->vdd,
382                  ios->bus_width);
383
384         host->ops->set_ios(host, ios);
385 }
386
387 static int mmc_select_card(struct mmc_host *host, struct mmc_card *card)
388 {
389         int err;
390         struct mmc_command cmd;
391
392         BUG_ON(!host->claimed);
393
394         if (host->card_selected == card)
395                 return MMC_ERR_NONE;
396
397         host->card_selected = card;
398
399         cmd.opcode = MMC_SELECT_CARD;
400         cmd.arg = card->rca << 16;
401         cmd.flags = MMC_RSP_R1 | MMC_CMD_AC;
402
403         err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
404         if (err != MMC_ERR_NONE)
405                 return err;
406
407         /*
408          * We can only change the bus width of SD cards when
409          * they are selected so we have to put the handling
410          * here.
411          *
412          * The card is in 1 bit mode by default so
413          * we only need to change if it supports the
414          * wider version.
415          */
416         if (mmc_card_sd(card) &&
417                 (card->scr.bus_widths & SD_SCR_BUS_WIDTH_4)) {
418
419                 /*
420                 * Default bus width is 1 bit.
421                 */
422                 host->ios.bus_width = MMC_BUS_WIDTH_1;
423
424                 if (host->caps & MMC_CAP_4_BIT_DATA) {
425                         struct mmc_command cmd;
426                         cmd.opcode = SD_APP_SET_BUS_WIDTH;
427                         cmd.arg = SD_BUS_WIDTH_4;
428                         cmd.flags = MMC_RSP_R1 | MMC_CMD_AC;
429
430                         err = mmc_wait_for_app_cmd(host, card->rca, &cmd,
431                                 CMD_RETRIES);
432                         if (err != MMC_ERR_NONE)
433                                 return err;
434
435                         host->ios.bus_width = MMC_BUS_WIDTH_4;
436                 }
437         }
438
439         mmc_set_ios(host);
440
441         return MMC_ERR_NONE;
442 }
443
444 /*
445  * Ensure that no card is selected.
446  */
447 static void mmc_deselect_cards(struct mmc_host *host)
448 {
449         struct mmc_command cmd;
450
451         if (host->card_selected) {
452                 host->card_selected = NULL;
453
454                 cmd.opcode = MMC_SELECT_CARD;
455                 cmd.arg = 0;
456                 cmd.flags = MMC_RSP_NONE | MMC_CMD_AC;
457
458                 mmc_wait_for_cmd(host, &cmd, 0);
459         }
460 }
461
462
463 static inline void mmc_delay(unsigned int ms)
464 {
465         if (ms < 1000 / HZ) {
466                 cond_resched();
467                 mdelay(ms);
468         } else {
469                 msleep(ms);
470         }
471 }
472
473 /*
474  * Mask off any voltages we don't support and select
475  * the lowest voltage
476  */
477 static u32 mmc_select_voltage(struct mmc_host *host, u32 ocr)
478 {
479         int bit;
480
481         ocr &= host->ocr_avail;
482
483         bit = ffs(ocr);
484         if (bit) {
485                 bit -= 1;
486
487                 ocr &= 3 << bit;
488
489                 host->ios.vdd = bit;
490                 mmc_set_ios(host);
491         } else {
492                 ocr = 0;
493         }
494
495         return ocr;
496 }
497
498 #define UNSTUFF_BITS(resp,start,size)                                   \
499         ({                                                              \
500                 const int __size = size;                                \
501                 const u32 __mask = (__size < 32 ? 1 << __size : 0) - 1; \
502                 const int __off = 3 - ((start) / 32);                   \
503                 const int __shft = (start) & 31;                        \
504                 u32 __res;                                              \
505                                                                         \
506                 __res = resp[__off] >> __shft;                          \
507                 if (__size + __shft > 32)                               \
508                         __res |= resp[__off-1] << ((32 - __shft) % 32); \
509                 __res & __mask;                                         \
510         })
511
512 /*
513  * Given the decoded CSD structure, decode the raw CID to our CID structure.
514  */
515 static void mmc_decode_cid(struct mmc_card *card)
516 {
517         u32 *resp = card->raw_cid;
518
519         memset(&card->cid, 0, sizeof(struct mmc_cid));
520
521         if (mmc_card_sd(card)) {
522                 /*
523                  * SD doesn't currently have a version field so we will
524                  * have to assume we can parse this.
525                  */
526                 card->cid.manfid                = UNSTUFF_BITS(resp, 120, 8);
527                 card->cid.oemid                 = UNSTUFF_BITS(resp, 104, 16);
528                 card->cid.prod_name[0]          = UNSTUFF_BITS(resp, 96, 8);
529                 card->cid.prod_name[1]          = UNSTUFF_BITS(resp, 88, 8);
530                 card->cid.prod_name[2]          = UNSTUFF_BITS(resp, 80, 8);
531                 card->cid.prod_name[3]          = UNSTUFF_BITS(resp, 72, 8);
532                 card->cid.prod_name[4]          = UNSTUFF_BITS(resp, 64, 8);
533                 card->cid.hwrev                 = UNSTUFF_BITS(resp, 60, 4);
534                 card->cid.fwrev                 = UNSTUFF_BITS(resp, 56, 4);
535                 card->cid.serial                = UNSTUFF_BITS(resp, 24, 32);
536                 card->cid.year                  = UNSTUFF_BITS(resp, 12, 8);
537                 card->cid.month                 = UNSTUFF_BITS(resp, 8, 4);
538
539                 card->cid.year += 2000; /* SD cards year offset */
540         } else {
541                 /*
542                  * The selection of the format here is based upon published
543                  * specs from sandisk and from what people have reported.
544                  */
545                 switch (card->csd.mmca_vsn) {
546                 case 0: /* MMC v1.0 - v1.2 */
547                 case 1: /* MMC v1.4 */
548                         card->cid.manfid        = UNSTUFF_BITS(resp, 104, 24);
549                         card->cid.prod_name[0]  = UNSTUFF_BITS(resp, 96, 8);
550                         card->cid.prod_name[1]  = UNSTUFF_BITS(resp, 88, 8);
551                         card->cid.prod_name[2]  = UNSTUFF_BITS(resp, 80, 8);
552                         card->cid.prod_name[3]  = UNSTUFF_BITS(resp, 72, 8);
553                         card->cid.prod_name[4]  = UNSTUFF_BITS(resp, 64, 8);
554                         card->cid.prod_name[5]  = UNSTUFF_BITS(resp, 56, 8);
555                         card->cid.prod_name[6]  = UNSTUFF_BITS(resp, 48, 8);
556                         card->cid.hwrev         = UNSTUFF_BITS(resp, 44, 4);
557                         card->cid.fwrev         = UNSTUFF_BITS(resp, 40, 4);
558                         card->cid.serial        = UNSTUFF_BITS(resp, 16, 24);
559                         card->cid.month         = UNSTUFF_BITS(resp, 12, 4);
560                         card->cid.year          = UNSTUFF_BITS(resp, 8, 4) + 1997;
561                         break;
562
563                 case 2: /* MMC v2.0 - v2.2 */
564                 case 3: /* MMC v3.1 - v3.3 */
565                 case 4: /* MMC v4 */
566                         card->cid.manfid        = UNSTUFF_BITS(resp, 120, 8);
567                         card->cid.oemid         = UNSTUFF_BITS(resp, 104, 16);
568                         card->cid.prod_name[0]  = UNSTUFF_BITS(resp, 96, 8);
569                         card->cid.prod_name[1]  = UNSTUFF_BITS(resp, 88, 8);
570                         card->cid.prod_name[2]  = UNSTUFF_BITS(resp, 80, 8);
571                         card->cid.prod_name[3]  = UNSTUFF_BITS(resp, 72, 8);
572                         card->cid.prod_name[4]  = UNSTUFF_BITS(resp, 64, 8);
573                         card->cid.prod_name[5]  = UNSTUFF_BITS(resp, 56, 8);
574                         card->cid.serial        = UNSTUFF_BITS(resp, 16, 32);
575                         card->cid.month         = UNSTUFF_BITS(resp, 12, 4);
576                         card->cid.year          = UNSTUFF_BITS(resp, 8, 4) + 1997;
577                         break;
578
579                 default:
580                         printk("%s: card has unknown MMCA version %d\n",
581                                 mmc_hostname(card->host), card->csd.mmca_vsn);
582                         mmc_card_set_bad(card);
583                         break;
584                 }
585         }
586 }
587
588 /*
589  * Given a 128-bit response, decode to our card CSD structure.
590  */
591 static void mmc_decode_csd(struct mmc_card *card)
592 {
593         struct mmc_csd *csd = &card->csd;
594         unsigned int e, m, csd_struct;
595         u32 *resp = card->raw_csd;
596
597         if (mmc_card_sd(card)) {
598                 csd_struct = UNSTUFF_BITS(resp, 126, 2);
599
600                 switch (csd_struct) {
601                 case 0:
602                         m = UNSTUFF_BITS(resp, 115, 4);
603                         e = UNSTUFF_BITS(resp, 112, 3);
604                         csd->tacc_ns     = (tacc_exp[e] * tacc_mant[m] + 9) / 10;
605                         csd->tacc_clks   = UNSTUFF_BITS(resp, 104, 8) * 100;
606
607                         m = UNSTUFF_BITS(resp, 99, 4);
608                         e = UNSTUFF_BITS(resp, 96, 3);
609                         csd->max_dtr      = tran_exp[e] * tran_mant[m];
610                         csd->cmdclass     = UNSTUFF_BITS(resp, 84, 12);
611
612                         e = UNSTUFF_BITS(resp, 47, 3);
613                         m = UNSTUFF_BITS(resp, 62, 12);
614                         csd->capacity     = (1 + m) << (e + 2);
615
616                         csd->read_blkbits = UNSTUFF_BITS(resp, 80, 4);
617                         csd->read_partial = UNSTUFF_BITS(resp, 79, 1);
618                         csd->write_misalign = UNSTUFF_BITS(resp, 78, 1);
619                         csd->read_misalign = UNSTUFF_BITS(resp, 77, 1);
620                         csd->r2w_factor = UNSTUFF_BITS(resp, 26, 3);
621                         csd->write_blkbits = UNSTUFF_BITS(resp, 22, 4);
622                         csd->write_partial = UNSTUFF_BITS(resp, 21, 1);
623                         break;
624                 case 1:
625                         /*
626                          * This is a block-addressed SDHC card. Most
627                          * interesting fields are unused and have fixed
628                          * values. To avoid getting tripped by buggy cards,
629                          * we assume those fixed values ourselves.
630                          */
631                         mmc_card_set_blockaddr(card);
632
633                         csd->tacc_ns     = 0; /* Unused */
634                         csd->tacc_clks   = 0; /* Unused */
635
636                         m = UNSTUFF_BITS(resp, 99, 4);
637                         e = UNSTUFF_BITS(resp, 96, 3);
638                         csd->max_dtr      = tran_exp[e] * tran_mant[m];
639                         csd->cmdclass     = UNSTUFF_BITS(resp, 84, 12);
640
641                         m = UNSTUFF_BITS(resp, 48, 22);
642                         csd->capacity     = (1 + m) << 10;
643
644                         csd->read_blkbits = 9;
645                         csd->read_partial = 0;
646                         csd->write_misalign = 0;
647                         csd->read_misalign = 0;
648                         csd->r2w_factor = 4; /* Unused */
649                         csd->write_blkbits = 9;
650                         csd->write_partial = 0;
651                         break;
652                 default:
653                         printk("%s: unrecognised CSD structure version %d\n",
654                                 mmc_hostname(card->host), csd_struct);
655                         mmc_card_set_bad(card);
656                         return;
657                 }
658         } else {
659                 /*
660                  * We only understand CSD structure v1.1 and v1.2.
661                  * v1.2 has extra information in bits 15, 11 and 10.
662                  */
663                 csd_struct = UNSTUFF_BITS(resp, 126, 2);
664                 if (csd_struct != 1 && csd_struct != 2) {
665                         printk("%s: unrecognised CSD structure version %d\n",
666                                 mmc_hostname(card->host), csd_struct);
667                         mmc_card_set_bad(card);
668                         return;
669                 }
670
671                 csd->mmca_vsn    = UNSTUFF_BITS(resp, 122, 4);
672                 m = UNSTUFF_BITS(resp, 115, 4);
673                 e = UNSTUFF_BITS(resp, 112, 3);
674                 csd->tacc_ns     = (tacc_exp[e] * tacc_mant[m] + 9) / 10;
675                 csd->tacc_clks   = UNSTUFF_BITS(resp, 104, 8) * 100;
676
677                 m = UNSTUFF_BITS(resp, 99, 4);
678                 e = UNSTUFF_BITS(resp, 96, 3);
679                 csd->max_dtr      = tran_exp[e] * tran_mant[m];
680                 csd->cmdclass     = UNSTUFF_BITS(resp, 84, 12);
681
682                 e = UNSTUFF_BITS(resp, 47, 3);
683                 m = UNSTUFF_BITS(resp, 62, 12);
684                 csd->capacity     = (1 + m) << (e + 2);
685
686                 csd->read_blkbits = UNSTUFF_BITS(resp, 80, 4);
687                 csd->read_partial = UNSTUFF_BITS(resp, 79, 1);
688                 csd->write_misalign = UNSTUFF_BITS(resp, 78, 1);
689                 csd->read_misalign = UNSTUFF_BITS(resp, 77, 1);
690                 csd->r2w_factor = UNSTUFF_BITS(resp, 26, 3);
691                 csd->write_blkbits = UNSTUFF_BITS(resp, 22, 4);
692                 csd->write_partial = UNSTUFF_BITS(resp, 21, 1);
693         }
694 }
695
696 /*
697  * Given a 64-bit response, decode to our card SCR structure.
698  */
699 static void mmc_decode_scr(struct mmc_card *card)
700 {
701         struct sd_scr *scr = &card->scr;
702         unsigned int scr_struct;
703         u32 resp[4];
704
705         BUG_ON(!mmc_card_sd(card));
706
707         resp[3] = card->raw_scr[1];
708         resp[2] = card->raw_scr[0];
709
710         scr_struct = UNSTUFF_BITS(resp, 60, 4);
711         if (scr_struct != 0) {
712                 printk("%s: unrecognised SCR structure version %d\n",
713                         mmc_hostname(card->host), scr_struct);
714                 mmc_card_set_bad(card);
715                 return;
716         }
717
718         scr->sda_vsn = UNSTUFF_BITS(resp, 56, 4);
719         scr->bus_widths = UNSTUFF_BITS(resp, 48, 4);
720 }
721
722 /*
723  * Locate a MMC card on this MMC host given a raw CID.
724  */
725 static struct mmc_card *mmc_find_card(struct mmc_host *host, u32 *raw_cid)
726 {
727         struct mmc_card *card;
728
729         list_for_each_entry(card, &host->cards, node) {
730                 if (memcmp(card->raw_cid, raw_cid, sizeof(card->raw_cid)) == 0)
731                         return card;
732         }
733         return NULL;
734 }
735
736 /*
737  * Allocate a new MMC card, and assign a unique RCA.
738  */
739 static struct mmc_card *
740 mmc_alloc_card(struct mmc_host *host, u32 *raw_cid, unsigned int *frca)
741 {
742         struct mmc_card *card, *c;
743         unsigned int rca = *frca;
744
745         card = kmalloc(sizeof(struct mmc_card), GFP_KERNEL);
746         if (!card)
747                 return ERR_PTR(-ENOMEM);
748
749         mmc_init_card(card, host);
750         memcpy(card->raw_cid, raw_cid, sizeof(card->raw_cid));
751
752  again:
753         list_for_each_entry(c, &host->cards, node)
754                 if (c->rca == rca) {
755                         rca++;
756                         goto again;
757                 }
758
759         card->rca = rca;
760
761         *frca = rca;
762
763         return card;
764 }
765
766 /*
767  * Tell attached cards to go to IDLE state
768  */
769 static void mmc_idle_cards(struct mmc_host *host)
770 {
771         struct mmc_command cmd;
772
773         host->ios.chip_select = MMC_CS_HIGH;
774         mmc_set_ios(host);
775
776         mmc_delay(1);
777
778         cmd.opcode = MMC_GO_IDLE_STATE;
779         cmd.arg = 0;
780         cmd.flags = MMC_RSP_NONE | MMC_CMD_BC;
781
782         mmc_wait_for_cmd(host, &cmd, 0);
783
784         mmc_delay(1);
785
786         host->ios.chip_select = MMC_CS_DONTCARE;
787         mmc_set_ios(host);
788
789         mmc_delay(1);
790 }
791
792 /*
793  * Apply power to the MMC stack.  This is a two-stage process.
794  * First, we enable power to the card without the clock running.
795  * We then wait a bit for the power to stabilise.  Finally,
796  * enable the bus drivers and clock to the card.
797  *
798  * We must _NOT_ enable the clock prior to power stablising.
799  *
800  * If a host does all the power sequencing itself, ignore the
801  * initial MMC_POWER_UP stage.
802  */
803 static void mmc_power_up(struct mmc_host *host)
804 {
805         int bit = fls(host->ocr_avail) - 1;
806
807         host->ios.vdd = bit;
808         host->ios.bus_mode = MMC_BUSMODE_OPENDRAIN;
809         host->ios.chip_select = MMC_CS_DONTCARE;
810         host->ios.power_mode = MMC_POWER_UP;
811         host->ios.bus_width = MMC_BUS_WIDTH_1;
812         mmc_set_ios(host);
813
814         mmc_delay(1);
815
816         host->ios.clock = host->f_min;
817         host->ios.power_mode = MMC_POWER_ON;
818         mmc_set_ios(host);
819
820         mmc_delay(2);
821 }
822
823 static void mmc_power_off(struct mmc_host *host)
824 {
825         host->ios.clock = 0;
826         host->ios.vdd = 0;
827         host->ios.bus_mode = MMC_BUSMODE_OPENDRAIN;
828         host->ios.chip_select = MMC_CS_DONTCARE;
829         host->ios.power_mode = MMC_POWER_OFF;
830         host->ios.bus_width = MMC_BUS_WIDTH_1;
831         mmc_set_ios(host);
832 }
833
834 static int mmc_send_op_cond(struct mmc_host *host, u32 ocr, u32 *rocr)
835 {
836         struct mmc_command cmd;
837         int i, err = 0;
838
839         cmd.opcode = MMC_SEND_OP_COND;
840         cmd.arg = ocr;
841         cmd.flags = MMC_RSP_R3 | MMC_CMD_BCR;
842
843         for (i = 100; i; i--) {
844                 err = mmc_wait_for_cmd(host, &cmd, 0);
845                 if (err != MMC_ERR_NONE)
846                         break;
847
848                 if (cmd.resp[0] & MMC_CARD_BUSY || ocr == 0)
849                         break;
850
851                 err = MMC_ERR_TIMEOUT;
852
853                 mmc_delay(10);
854         }
855
856         if (rocr)
857                 *rocr = cmd.resp[0];
858
859         return err;
860 }
861
862 static int mmc_send_app_op_cond(struct mmc_host *host, u32 ocr, u32 *rocr)
863 {
864         struct mmc_command cmd;
865         int i, err = 0;
866
867         cmd.opcode = SD_APP_OP_COND;
868         cmd.arg = ocr;
869         cmd.flags = MMC_RSP_R3 | MMC_CMD_BCR;
870
871         for (i = 100; i; i--) {
872                 err = mmc_wait_for_app_cmd(host, 0, &cmd, CMD_RETRIES);
873                 if (err != MMC_ERR_NONE)
874                         break;
875
876                 if (cmd.resp[0] & MMC_CARD_BUSY || ocr == 0)
877                         break;
878
879                 err = MMC_ERR_TIMEOUT;
880
881                 mmc_delay(10);
882         }
883
884         if (rocr)
885                 *rocr = cmd.resp[0];
886
887         return err;
888 }
889
890 static int mmc_send_if_cond(struct mmc_host *host, u32 ocr, int *rsd2)
891 {
892         struct mmc_command cmd;
893         int err, sd2;
894         static const u8 test_pattern = 0xAA;
895
896         /*
897         * To support SD 2.0 cards, we must always invoke SD_SEND_IF_COND
898         * before SD_APP_OP_COND. This command will harmlessly fail for
899         * SD 1.0 cards.
900         */
901         cmd.opcode = SD_SEND_IF_COND;
902         cmd.arg = ((ocr & 0xFF8000) != 0) << 8 | test_pattern;
903         cmd.flags = MMC_RSP_R7 | MMC_CMD_BCR;
904
905         err = mmc_wait_for_cmd(host, &cmd, 0);
906         if (err == MMC_ERR_NONE) {
907                 if ((cmd.resp[0] & 0xFF) == test_pattern) {
908                         sd2 = 1;
909                 } else {
910                         sd2 = 0;
911                         err = MMC_ERR_FAILED;
912                 }
913         } else {
914                 /*
915                  * Treat errors as SD 1.0 card.
916                  */
917                 sd2 = 0;
918                 err = MMC_ERR_NONE;
919         }
920         if (rsd2)
921                 *rsd2 = sd2;
922         return err;
923 }
924
925 /*
926  * Discover cards by requesting their CID.  If this command
927  * times out, it is not an error; there are no further cards
928  * to be discovered.  Add new cards to the list.
929  *
930  * Create a mmc_card entry for each discovered card, assigning
931  * it an RCA, and save the raw CID for decoding later.
932  */
933 static void mmc_discover_cards(struct mmc_host *host)
934 {
935         struct mmc_card *card;
936         unsigned int first_rca = 1, err;
937
938         while (1) {
939                 struct mmc_command cmd;
940
941                 cmd.opcode = MMC_ALL_SEND_CID;
942                 cmd.arg = 0;
943                 cmd.flags = MMC_RSP_R2 | MMC_CMD_BCR;
944
945                 err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
946                 if (err == MMC_ERR_TIMEOUT) {
947                         err = MMC_ERR_NONE;
948                         break;
949                 }
950                 if (err != MMC_ERR_NONE) {
951                         printk(KERN_ERR "%s: error requesting CID: %d\n",
952                                 mmc_hostname(host), err);
953                         break;
954                 }
955
956                 card = mmc_find_card(host, cmd.resp);
957                 if (!card) {
958                         card = mmc_alloc_card(host, cmd.resp, &first_rca);
959                         if (IS_ERR(card)) {
960                                 err = PTR_ERR(card);
961                                 break;
962                         }
963                         list_add(&card->node, &host->cards);
964                 }
965
966                 card->state &= ~MMC_STATE_DEAD;
967
968                 if (host->mode == MMC_MODE_SD) {
969                         mmc_card_set_sd(card);
970
971                         cmd.opcode = SD_SEND_RELATIVE_ADDR;
972                         cmd.arg = 0;
973                         cmd.flags = MMC_RSP_R6 | MMC_CMD_BCR;
974
975                         err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
976                         if (err != MMC_ERR_NONE)
977                                 mmc_card_set_dead(card);
978                         else {
979                                 card->rca = cmd.resp[0] >> 16;
980
981                                 if (!host->ops->get_ro) {
982                                         printk(KERN_WARNING "%s: host does not "
983                                                 "support reading read-only "
984                                                 "switch. assuming write-enable.\n",
985                                                 mmc_hostname(host));
986                                 } else {
987                                         if (host->ops->get_ro(host))
988                                                 mmc_card_set_readonly(card);
989                                 }
990                         }
991                 } else {
992                         cmd.opcode = MMC_SET_RELATIVE_ADDR;
993                         cmd.arg = card->rca << 16;
994                         cmd.flags = MMC_RSP_R1 | MMC_CMD_AC;
995
996                         err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
997                         if (err != MMC_ERR_NONE)
998                                 mmc_card_set_dead(card);
999                 }
1000         }
1001 }
1002
1003 static void mmc_read_csds(struct mmc_host *host)
1004 {
1005         struct mmc_card *card;
1006
1007         list_for_each_entry(card, &host->cards, node) {
1008                 struct mmc_command cmd;
1009                 int err;
1010
1011                 if (card->state & (MMC_STATE_DEAD|MMC_STATE_PRESENT))
1012                         continue;
1013
1014                 cmd.opcode = MMC_SEND_CSD;
1015                 cmd.arg = card->rca << 16;
1016                 cmd.flags = MMC_RSP_R2 | MMC_CMD_AC;
1017
1018                 err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
1019                 if (err != MMC_ERR_NONE) {
1020                         mmc_card_set_dead(card);
1021                         continue;
1022                 }
1023
1024                 memcpy(card->raw_csd, cmd.resp, sizeof(card->raw_csd));
1025
1026                 mmc_decode_csd(card);
1027                 mmc_decode_cid(card);
1028         }
1029 }
1030
1031 static void mmc_process_ext_csds(struct mmc_host *host)
1032 {
1033         int err;
1034         struct mmc_card *card;
1035
1036         struct mmc_request mrq;
1037         struct mmc_command cmd;
1038         struct mmc_data data;
1039
1040         struct scatterlist sg;
1041
1042         /*
1043          * As the ext_csd is so large and mostly unused, we don't store the
1044          * raw block in mmc_card.
1045          */
1046         u8 *ext_csd;
1047         ext_csd = kmalloc(512, GFP_KERNEL);
1048         if (!ext_csd) {
1049                 printk("%s: could not allocate a buffer to receive the ext_csd."
1050                        "mmc v4 cards will be treated as v3.\n",
1051                         mmc_hostname(host));
1052                 return;
1053         }
1054
1055         list_for_each_entry(card, &host->cards, node) {
1056                 if (card->state & (MMC_STATE_DEAD|MMC_STATE_PRESENT))
1057                         continue;
1058                 if (mmc_card_sd(card))
1059                         continue;
1060                 if (card->csd.mmca_vsn < CSD_SPEC_VER_4)
1061                         continue;
1062
1063                 err = mmc_select_card(host, card);
1064                 if (err != MMC_ERR_NONE) {
1065                         mmc_card_set_dead(card);
1066                         continue;
1067                 }
1068
1069                 memset(&cmd, 0, sizeof(struct mmc_command));
1070
1071                 cmd.opcode = MMC_SEND_EXT_CSD;
1072                 cmd.arg = 0;
1073                 cmd.flags = MMC_RSP_R1 | MMC_CMD_ADTC;
1074
1075                 memset(&data, 0, sizeof(struct mmc_data));
1076
1077                 mmc_set_data_timeout(&data, card, 0);
1078
1079                 data.blksz = 512;
1080                 data.blocks = 1;
1081                 data.flags = MMC_DATA_READ;
1082                 data.sg = &sg;
1083                 data.sg_len = 1;
1084
1085                 memset(&mrq, 0, sizeof(struct mmc_request));
1086
1087                 mrq.cmd = &cmd;
1088                 mrq.data = &data;
1089
1090                 sg_init_one(&sg, ext_csd, 512);
1091
1092                 mmc_wait_for_req(host, &mrq);
1093
1094                 if (cmd.error != MMC_ERR_NONE || data.error != MMC_ERR_NONE) {
1095                         printk("%s: unable to read EXT_CSD, performance "
1096                                 "might suffer.\n", mmc_hostname(card->host));
1097                         continue;
1098                 }
1099
1100                 switch (ext_csd[EXT_CSD_CARD_TYPE]) {
1101                 case EXT_CSD_CARD_TYPE_52 | EXT_CSD_CARD_TYPE_26:
1102                         card->ext_csd.hs_max_dtr = 52000000;
1103                         break;
1104                 case EXT_CSD_CARD_TYPE_26:
1105                         card->ext_csd.hs_max_dtr = 26000000;
1106                         break;
1107                 default:
1108                         /* MMC v4 spec says this cannot happen */
1109                         printk("%s: card is mmc v4 but doesn't support "
1110                                "any high-speed modes.\n",
1111                                 mmc_hostname(card->host));
1112                         continue;
1113                 }
1114
1115                 /* Activate highspeed support. */
1116                 cmd.opcode = MMC_SWITCH;
1117                 cmd.arg = (MMC_SWITCH_MODE_WRITE_BYTE << 24) |
1118                           (EXT_CSD_HS_TIMING << 16) |
1119                           (1 << 8) |
1120                           EXT_CSD_CMD_SET_NORMAL;
1121                 cmd.flags = MMC_RSP_R1B | MMC_CMD_AC;
1122
1123                 err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
1124                 if (err != MMC_ERR_NONE) {
1125                         printk("%s: failed to switch card to mmc v4 "
1126                                "high-speed mode.\n",
1127                                mmc_hostname(card->host));
1128                         continue;
1129                 }
1130
1131                 mmc_card_set_highspeed(card);
1132
1133                 /* Check for host support for wide-bus modes. */
1134                 if (!(host->caps & MMC_CAP_4_BIT_DATA)) {
1135                         continue;
1136                 }
1137
1138                 /* Activate 4-bit support. */
1139                 cmd.opcode = MMC_SWITCH;
1140                 cmd.arg = (MMC_SWITCH_MODE_WRITE_BYTE << 24) |
1141                           (EXT_CSD_BUS_WIDTH << 16) |
1142                           (EXT_CSD_BUS_WIDTH_4 << 8) |
1143                           EXT_CSD_CMD_SET_NORMAL;
1144                 cmd.flags = MMC_RSP_R1B | MMC_CMD_AC;
1145
1146                 err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
1147                 if (err != MMC_ERR_NONE) {
1148                         printk("%s: failed to switch card to "
1149                                "mmc v4 4-bit bus mode.\n",
1150                                mmc_hostname(card->host));
1151                         continue;
1152                 }
1153
1154                 host->ios.bus_width = MMC_BUS_WIDTH_4;
1155         }
1156
1157         kfree(ext_csd);
1158
1159         mmc_deselect_cards(host);
1160 }
1161
1162 static void mmc_read_scrs(struct mmc_host *host)
1163 {
1164         int err;
1165         struct mmc_card *card;
1166         struct mmc_request mrq;
1167         struct mmc_command cmd;
1168         struct mmc_data data;
1169         struct scatterlist sg;
1170
1171         list_for_each_entry(card, &host->cards, node) {
1172                 if (card->state & (MMC_STATE_DEAD|MMC_STATE_PRESENT))
1173                         continue;
1174                 if (!mmc_card_sd(card))
1175                         continue;
1176
1177                 err = mmc_select_card(host, card);
1178                 if (err != MMC_ERR_NONE) {
1179                         mmc_card_set_dead(card);
1180                         continue;
1181                 }
1182
1183                 memset(&cmd, 0, sizeof(struct mmc_command));
1184
1185                 cmd.opcode = MMC_APP_CMD;
1186                 cmd.arg = card->rca << 16;
1187                 cmd.flags = MMC_RSP_R1 | MMC_CMD_AC;
1188
1189                 err = mmc_wait_for_cmd(host, &cmd, 0);
1190                 if ((err != MMC_ERR_NONE) || !(cmd.resp[0] & R1_APP_CMD)) {
1191                         mmc_card_set_dead(card);
1192                         continue;
1193                 }
1194
1195                 memset(&cmd, 0, sizeof(struct mmc_command));
1196
1197                 cmd.opcode = SD_APP_SEND_SCR;
1198                 cmd.arg = 0;
1199                 cmd.flags = MMC_RSP_R1 | MMC_CMD_ADTC;
1200
1201                 memset(&data, 0, sizeof(struct mmc_data));
1202
1203                 mmc_set_data_timeout(&data, card, 0);
1204
1205                 data.blksz = 1 << 3;
1206                 data.blocks = 1;
1207                 data.flags = MMC_DATA_READ;
1208                 data.sg = &sg;
1209                 data.sg_len = 1;
1210
1211                 memset(&mrq, 0, sizeof(struct mmc_request));
1212
1213                 mrq.cmd = &cmd;
1214                 mrq.data = &data;
1215
1216                 sg_init_one(&sg, (u8*)card->raw_scr, 8);
1217
1218                 mmc_wait_for_req(host, &mrq);
1219
1220                 if (cmd.error != MMC_ERR_NONE || data.error != MMC_ERR_NONE) {
1221                         mmc_card_set_dead(card);
1222                         continue;
1223                 }
1224
1225                 card->raw_scr[0] = ntohl(card->raw_scr[0]);
1226                 card->raw_scr[1] = ntohl(card->raw_scr[1]);
1227
1228                 mmc_decode_scr(card);
1229         }
1230
1231         mmc_deselect_cards(host);
1232 }
1233
1234 static void mmc_read_switch_caps(struct mmc_host *host)
1235 {
1236         int err;
1237         struct mmc_card *card;
1238         struct mmc_request mrq;
1239         struct mmc_command cmd;
1240         struct mmc_data data;
1241         unsigned char *status;
1242         struct scatterlist sg;
1243
1244         status = kmalloc(64, GFP_KERNEL);
1245         if (!status) {
1246                 printk(KERN_WARNING "%s: Unable to allocate buffer for "
1247                         "reading switch capabilities.\n",
1248                         mmc_hostname(host));
1249                 return;
1250         }
1251
1252         list_for_each_entry(card, &host->cards, node) {
1253                 if (card->state & (MMC_STATE_DEAD|MMC_STATE_PRESENT))
1254                         continue;
1255                 if (!mmc_card_sd(card))
1256                         continue;
1257                 if (card->scr.sda_vsn < SCR_SPEC_VER_1)
1258                         continue;
1259
1260                 err = mmc_select_card(host, card);
1261                 if (err != MMC_ERR_NONE) {
1262                         mmc_card_set_dead(card);
1263                         continue;
1264                 }
1265
1266                 memset(&cmd, 0, sizeof(struct mmc_command));
1267
1268                 cmd.opcode = SD_SWITCH;
1269                 cmd.arg = 0x00FFFFF1;
1270                 cmd.flags = MMC_RSP_R1 | MMC_CMD_ADTC;
1271
1272                 memset(&data, 0, sizeof(struct mmc_data));
1273
1274                 mmc_set_data_timeout(&data, card, 0);
1275
1276                 data.blksz = 64;
1277                 data.blocks = 1;
1278                 data.flags = MMC_DATA_READ;
1279                 data.sg = &sg;
1280                 data.sg_len = 1;
1281
1282                 memset(&mrq, 0, sizeof(struct mmc_request));
1283
1284                 mrq.cmd = &cmd;
1285                 mrq.data = &data;
1286
1287                 sg_init_one(&sg, status, 64);
1288
1289                 mmc_wait_for_req(host, &mrq);
1290
1291                 if (cmd.error != MMC_ERR_NONE || data.error != MMC_ERR_NONE) {
1292                         printk("%s: unable to read switch capabilities, "
1293                                 "performance might suffer.\n",
1294                                 mmc_hostname(card->host));
1295                         continue;
1296                 }
1297
1298                 if (status[13] & 0x02)
1299                         card->sw_caps.hs_max_dtr = 50000000;
1300
1301                 memset(&cmd, 0, sizeof(struct mmc_command));
1302
1303                 cmd.opcode = SD_SWITCH;
1304                 cmd.arg = 0x80FFFFF1;
1305                 cmd.flags = MMC_RSP_R1 | MMC_CMD_ADTC;
1306
1307                 memset(&data, 0, sizeof(struct mmc_data));
1308
1309                 mmc_set_data_timeout(&data, card, 0);
1310
1311                 data.blksz = 64;
1312                 data.blocks = 1;
1313                 data.flags = MMC_DATA_READ;
1314                 data.sg = &sg;
1315                 data.sg_len = 1;
1316
1317                 memset(&mrq, 0, sizeof(struct mmc_request));
1318
1319                 mrq.cmd = &cmd;
1320                 mrq.data = &data;
1321
1322                 sg_init_one(&sg, status, 64);
1323
1324                 mmc_wait_for_req(host, &mrq);
1325
1326                 if (cmd.error != MMC_ERR_NONE || data.error != MMC_ERR_NONE ||
1327                         (status[16] & 0xF) != 1) {
1328                         printk(KERN_WARNING "%s: Problem switching card "
1329                                 "into high-speed mode!\n",
1330                                 mmc_hostname(host));
1331                         continue;
1332                 }
1333
1334                 mmc_card_set_highspeed(card);
1335         }
1336
1337         kfree(status);
1338
1339         mmc_deselect_cards(host);
1340 }
1341
1342 static unsigned int mmc_calculate_clock(struct mmc_host *host)
1343 {
1344         struct mmc_card *card;
1345         unsigned int max_dtr = host->f_max;
1346
1347         list_for_each_entry(card, &host->cards, node)
1348                 if (!mmc_card_dead(card)) {
1349                         if (mmc_card_highspeed(card) && mmc_card_sd(card)) {
1350                                 if (max_dtr > card->sw_caps.hs_max_dtr)
1351                                         max_dtr = card->sw_caps.hs_max_dtr;
1352                         } else if (mmc_card_highspeed(card) && !mmc_card_sd(card)) {
1353                                 if (max_dtr > card->ext_csd.hs_max_dtr)
1354                                         max_dtr = card->ext_csd.hs_max_dtr;
1355                         } else if (max_dtr > card->csd.max_dtr) {
1356                                 max_dtr = card->csd.max_dtr;
1357                         }
1358                 }
1359
1360         pr_debug("%s: selected %d.%03dMHz transfer rate\n",
1361                  mmc_hostname(host),
1362                  max_dtr / 1000000, (max_dtr / 1000) % 1000);
1363
1364         return max_dtr;
1365 }
1366
1367 /*
1368  * Check whether cards we already know about are still present.
1369  * We do this by requesting status, and checking whether a card
1370  * responds.
1371  *
1372  * A request for status does not cause a state change in data
1373  * transfer mode.
1374  */
1375 static void mmc_check_cards(struct mmc_host *host)
1376 {
1377         struct list_head *l, *n;
1378
1379         mmc_deselect_cards(host);
1380
1381         list_for_each_safe(l, n, &host->cards) {
1382                 struct mmc_card *card = mmc_list_to_card(l);
1383                 struct mmc_command cmd;
1384                 int err;
1385
1386                 cmd.opcode = MMC_SEND_STATUS;
1387                 cmd.arg = card->rca << 16;
1388                 cmd.flags = MMC_RSP_R1 | MMC_CMD_AC;
1389
1390                 err = mmc_wait_for_cmd(host, &cmd, CMD_RETRIES);
1391                 if (err == MMC_ERR_NONE)
1392                         continue;
1393
1394                 mmc_card_set_dead(card);
1395         }
1396 }
1397
1398 static void mmc_setup(struct mmc_host *host)
1399 {
1400         if (host->ios.power_mode != MMC_POWER_ON) {
1401                 int err;
1402                 u32 ocr;
1403
1404                 host->mode = MMC_MODE_SD;
1405
1406                 mmc_power_up(host);
1407                 mmc_idle_cards(host);
1408
1409                 err = mmc_send_if_cond(host, host->ocr_avail, NULL);
1410                 if (err != MMC_ERR_NONE) {
1411                         return;
1412                 }
1413                 err = mmc_send_app_op_cond(host, 0, &ocr);
1414
1415                 /*
1416                  * If we fail to detect any SD cards then try
1417                  * searching for MMC cards.
1418                  */
1419                 if (err != MMC_ERR_NONE) {
1420                         host->mode = MMC_MODE_MMC;
1421
1422                         err = mmc_send_op_cond(host, 0, &ocr);
1423                         if (err != MMC_ERR_NONE)
1424                                 return;
1425                 }
1426
1427                 host->ocr = mmc_select_voltage(host, ocr);
1428
1429                 /*
1430                  * Since we're changing the OCR value, we seem to
1431                  * need to tell some cards to go back to the idle
1432                  * state.  We wait 1ms to give cards time to
1433                  * respond.
1434                  */
1435                 if (host->ocr)
1436                         mmc_idle_cards(host);
1437         } else {
1438                 host->ios.bus_mode = MMC_BUSMODE_OPENDRAIN;
1439                 host->ios.clock = host->f_min;
1440                 mmc_set_ios(host);
1441
1442                 /*
1443                  * We should remember the OCR mask from the existing
1444                  * cards, and detect the new cards OCR mask, combine
1445                  * the two and re-select the VDD.  However, if we do
1446                  * change VDD, we should do an idle, and then do a
1447                  * full re-initialisation.  We would need to notify
1448                  * drivers so that they can re-setup the cards as
1449                  * well, while keeping their queues at bay.
1450                  *
1451                  * For the moment, we take the easy way out - if the
1452                  * new cards don't like our currently selected VDD,
1453                  * they drop off the bus.
1454                  */
1455         }
1456
1457         if (host->ocr == 0)
1458                 return;
1459
1460         /*
1461          * Send the selected OCR multiple times... until the cards
1462          * all get the idea that they should be ready for CMD2.
1463          * (My SanDisk card seems to need this.)
1464          */
1465         if (host->mode == MMC_MODE_SD) {
1466                 int err, sd2;
1467                 err = mmc_send_if_cond(host, host->ocr, &sd2);
1468                 if (err == MMC_ERR_NONE) {
1469                         /*
1470                         * If SD_SEND_IF_COND indicates an SD 2.0
1471                         * compliant card and we should set bit 30
1472                         * of the ocr to indicate that we can handle
1473                         * block-addressed SDHC cards.
1474                         */
1475                         mmc_send_app_op_cond(host, host->ocr | (sd2 << 30), NULL);
1476                 }
1477         } else {
1478                 mmc_send_op_cond(host, host->ocr, NULL);
1479         }
1480
1481         mmc_discover_cards(host);
1482
1483         /*
1484          * Ok, now switch to push-pull mode.
1485          */
1486         host->ios.bus_mode = MMC_BUSMODE_PUSHPULL;
1487         mmc_set_ios(host);
1488
1489         mmc_read_csds(host);
1490
1491         if (host->mode == MMC_MODE_SD) {
1492                 mmc_read_scrs(host);
1493                 mmc_read_switch_caps(host);
1494         } else
1495                 mmc_process_ext_csds(host);
1496 }
1497
1498
1499 /**
1500  *      mmc_detect_change - process change of state on a MMC socket
1501  *      @host: host which changed state.
1502  *      @delay: optional delay to wait before detection (jiffies)
1503  *
1504  *      All we know is that card(s) have been inserted or removed
1505  *      from the socket(s).  We don't know which socket or cards.
1506  */
1507 void mmc_detect_change(struct mmc_host *host, unsigned long delay)
1508 {
1509         mmc_schedule_delayed_work(&host->detect, delay);
1510 }
1511
1512 EXPORT_SYMBOL(mmc_detect_change);
1513
1514
1515 static void mmc_rescan(struct work_struct *work)
1516 {
1517         struct mmc_host *host =
1518                 container_of(work, struct mmc_host, detect.work);
1519         struct list_head *l, *n;
1520         unsigned char power_mode;
1521
1522         mmc_claim_host(host);
1523
1524         /*
1525          * Check for removed cards and newly inserted ones. We check for
1526          * removed cards first so we can intelligently re-select the VDD.
1527          */
1528         power_mode = host->ios.power_mode;
1529         if (power_mode == MMC_POWER_ON)
1530                 mmc_check_cards(host);
1531
1532         mmc_setup(host);
1533
1534         /*
1535          * Some broken cards process CMD1 even in stand-by state. There is
1536          * no reply, but an ILLEGAL_COMMAND error is cached and returned
1537          * after next command. We poll for card status here to clear any
1538          * possibly pending error.
1539          */
1540         if (power_mode == MMC_POWER_ON)
1541                 mmc_check_cards(host);
1542
1543         if (!list_empty(&host->cards)) {
1544                 /*
1545                  * (Re-)calculate the fastest clock rate which the
1546                  * attached cards and the host support.
1547                  */
1548                 host->ios.clock = mmc_calculate_clock(host);
1549                 mmc_set_ios(host);
1550         }
1551
1552         mmc_release_host(host);
1553
1554         list_for_each_safe(l, n, &host->cards) {
1555                 struct mmc_card *card = mmc_list_to_card(l);
1556
1557                 /*
1558                  * If this is a new and good card, register it.
1559                  */
1560                 if (!mmc_card_present(card) && !mmc_card_dead(card)) {
1561                         if (mmc_register_card(card))
1562                                 mmc_card_set_dead(card);
1563                         else
1564                                 mmc_card_set_present(card);
1565                 }
1566
1567                 /*
1568                  * If this card is dead, destroy it.
1569                  */
1570                 if (mmc_card_dead(card)) {
1571                         list_del(&card->node);
1572                         mmc_remove_card(card);
1573                 }
1574         }
1575
1576         /*
1577          * If we discover that there are no cards on the
1578          * bus, turn off the clock and power down.
1579          */
1580         if (list_empty(&host->cards))
1581                 mmc_power_off(host);
1582 }
1583
1584
1585 /**
1586  *      mmc_alloc_host - initialise the per-host structure.
1587  *      @extra: sizeof private data structure
1588  *      @dev: pointer to host device model structure
1589  *
1590  *      Initialise the per-host structure.
1591  */
1592 struct mmc_host *mmc_alloc_host(int extra, struct device *dev)
1593 {
1594         struct mmc_host *host;
1595
1596         host = mmc_alloc_host_sysfs(extra, dev);
1597         if (host) {
1598                 spin_lock_init(&host->lock);
1599                 init_waitqueue_head(&host->wq);
1600                 INIT_LIST_HEAD(&host->cards);
1601                 INIT_DELAYED_WORK(&host->detect, mmc_rescan);
1602
1603                 /*
1604                  * By default, hosts do not support SGIO or large requests.
1605                  * They have to set these according to their abilities.
1606                  */
1607                 host->max_hw_segs = 1;
1608                 host->max_phys_segs = 1;
1609                 host->max_seg_size = PAGE_CACHE_SIZE;
1610
1611                 host->max_req_size = PAGE_CACHE_SIZE;
1612                 host->max_blk_size = 512;
1613                 host->max_blk_count = PAGE_CACHE_SIZE / 512;
1614         }
1615
1616         return host;
1617 }
1618
1619 EXPORT_SYMBOL(mmc_alloc_host);
1620
1621 /**
1622  *      mmc_add_host - initialise host hardware
1623  *      @host: mmc host
1624  */
1625 int mmc_add_host(struct mmc_host *host)
1626 {
1627         int ret;
1628
1629         ret = mmc_add_host_sysfs(host);
1630         if (ret == 0) {
1631                 mmc_power_off(host);
1632                 mmc_detect_change(host, 0);
1633         }
1634
1635         return ret;
1636 }
1637
1638 EXPORT_SYMBOL(mmc_add_host);
1639
1640 /**
1641  *      mmc_remove_host - remove host hardware
1642  *      @host: mmc host
1643  *
1644  *      Unregister and remove all cards associated with this host,
1645  *      and power down the MMC bus.
1646  */
1647 void mmc_remove_host(struct mmc_host *host)
1648 {
1649         struct list_head *l, *n;
1650
1651         list_for_each_safe(l, n, &host->cards) {
1652                 struct mmc_card *card = mmc_list_to_card(l);
1653
1654                 mmc_remove_card(card);
1655         }
1656
1657         mmc_power_off(host);
1658         mmc_remove_host_sysfs(host);
1659 }
1660
1661 EXPORT_SYMBOL(mmc_remove_host);
1662
1663 /**
1664  *      mmc_free_host - free the host structure
1665  *      @host: mmc host
1666  *
1667  *      Free the host once all references to it have been dropped.
1668  */
1669 void mmc_free_host(struct mmc_host *host)
1670 {
1671         mmc_flush_scheduled_work();
1672         mmc_free_host_sysfs(host);
1673 }
1674
1675 EXPORT_SYMBOL(mmc_free_host);
1676
1677 #ifdef CONFIG_PM
1678
1679 /**
1680  *      mmc_suspend_host - suspend a host
1681  *      @host: mmc host
1682  *      @state: suspend mode (PM_SUSPEND_xxx)
1683  */
1684 int mmc_suspend_host(struct mmc_host *host, pm_message_t state)
1685 {
1686         mmc_claim_host(host);
1687         mmc_deselect_cards(host);
1688         mmc_power_off(host);
1689         mmc_release_host(host);
1690
1691         return 0;
1692 }
1693
1694 EXPORT_SYMBOL(mmc_suspend_host);
1695
1696 /**
1697  *      mmc_resume_host - resume a previously suspended host
1698  *      @host: mmc host
1699  */
1700 int mmc_resume_host(struct mmc_host *host)
1701 {
1702         mmc_rescan(&host->detect.work);
1703
1704         return 0;
1705 }
1706
1707 EXPORT_SYMBOL(mmc_resume_host);
1708
1709 #endif
1710
1711 MODULE_LICENSE("GPL");