Merge git://git.denx.de/u-boot-mmc
[platform/kernel/u-boot.git] / drivers / mmc / mmc.c
1 /*
2  * Copyright 2008, Freescale Semiconductor, Inc
3  * Andy Fleming
4  *
5  * Based vaguely on the Linux code
6  *
7  * SPDX-License-Identifier:     GPL-2.0+
8  */
9
10 #include <config.h>
11 #include <common.h>
12 #include <command.h>
13 #include <dm.h>
14 #include <dm/device-internal.h>
15 #include <errno.h>
16 #include <mmc.h>
17 #include <part.h>
18 #include <power/regulator.h>
19 #include <malloc.h>
20 #include <memalign.h>
21 #include <linux/list.h>
22 #include <div64.h>
23 #include "mmc_private.h"
24
25 static int mmc_set_signal_voltage(struct mmc *mmc, uint signal_voltage);
26 static int mmc_power_cycle(struct mmc *mmc);
27 static int mmc_select_mode_and_width(struct mmc *mmc, uint card_caps);
28
29 #if CONFIG_IS_ENABLED(MMC_TINY)
30 static struct mmc mmc_static;
31 struct mmc *find_mmc_device(int dev_num)
32 {
33         return &mmc_static;
34 }
35
36 void mmc_do_preinit(void)
37 {
38         struct mmc *m = &mmc_static;
39 #ifdef CONFIG_FSL_ESDHC_ADAPTER_IDENT
40         mmc_set_preinit(m, 1);
41 #endif
42         if (m->preinit)
43                 mmc_start_init(m);
44 }
45
46 struct blk_desc *mmc_get_blk_desc(struct mmc *mmc)
47 {
48         return &mmc->block_dev;
49 }
50 #endif
51
52 #if !CONFIG_IS_ENABLED(DM_MMC)
53
54 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
55 static int mmc_wait_dat0(struct mmc *mmc, int state, int timeout)
56 {
57         return -ENOSYS;
58 }
59 #endif
60
61 __weak int board_mmc_getwp(struct mmc *mmc)
62 {
63         return -1;
64 }
65
66 int mmc_getwp(struct mmc *mmc)
67 {
68         int wp;
69
70         wp = board_mmc_getwp(mmc);
71
72         if (wp < 0) {
73                 if (mmc->cfg->ops->getwp)
74                         wp = mmc->cfg->ops->getwp(mmc);
75                 else
76                         wp = 0;
77         }
78
79         return wp;
80 }
81
82 __weak int board_mmc_getcd(struct mmc *mmc)
83 {
84         return -1;
85 }
86 #endif
87
88 #ifdef CONFIG_MMC_TRACE
89 void mmmc_trace_before_send(struct mmc *mmc, struct mmc_cmd *cmd)
90 {
91         printf("CMD_SEND:%d\n", cmd->cmdidx);
92         printf("\t\tARG\t\t\t 0x%08X\n", cmd->cmdarg);
93 }
94
95 void mmmc_trace_after_send(struct mmc *mmc, struct mmc_cmd *cmd, int ret)
96 {
97         int i;
98         u8 *ptr;
99
100         if (ret) {
101                 printf("\t\tRET\t\t\t %d\n", ret);
102         } else {
103                 switch (cmd->resp_type) {
104                 case MMC_RSP_NONE:
105                         printf("\t\tMMC_RSP_NONE\n");
106                         break;
107                 case MMC_RSP_R1:
108                         printf("\t\tMMC_RSP_R1,5,6,7 \t 0x%08X \n",
109                                 cmd->response[0]);
110                         break;
111                 case MMC_RSP_R1b:
112                         printf("\t\tMMC_RSP_R1b\t\t 0x%08X \n",
113                                 cmd->response[0]);
114                         break;
115                 case MMC_RSP_R2:
116                         printf("\t\tMMC_RSP_R2\t\t 0x%08X \n",
117                                 cmd->response[0]);
118                         printf("\t\t          \t\t 0x%08X \n",
119                                 cmd->response[1]);
120                         printf("\t\t          \t\t 0x%08X \n",
121                                 cmd->response[2]);
122                         printf("\t\t          \t\t 0x%08X \n",
123                                 cmd->response[3]);
124                         printf("\n");
125                         printf("\t\t\t\t\tDUMPING DATA\n");
126                         for (i = 0; i < 4; i++) {
127                                 int j;
128                                 printf("\t\t\t\t\t%03d - ", i*4);
129                                 ptr = (u8 *)&cmd->response[i];
130                                 ptr += 3;
131                                 for (j = 0; j < 4; j++)
132                                         printf("%02X ", *ptr--);
133                                 printf("\n");
134                         }
135                         break;
136                 case MMC_RSP_R3:
137                         printf("\t\tMMC_RSP_R3,4\t\t 0x%08X \n",
138                                 cmd->response[0]);
139                         break;
140                 default:
141                         printf("\t\tERROR MMC rsp not supported\n");
142                         break;
143                 }
144         }
145 }
146
147 void mmc_trace_state(struct mmc *mmc, struct mmc_cmd *cmd)
148 {
149         int status;
150
151         status = (cmd->response[0] & MMC_STATUS_CURR_STATE) >> 9;
152         printf("CURR STATE:%d\n", status);
153 }
154 #endif
155
156 #if CONFIG_IS_ENABLED(MMC_VERBOSE) || defined(DEBUG)
157 const char *mmc_mode_name(enum bus_mode mode)
158 {
159         static const char *const names[] = {
160               [MMC_LEGACY]      = "MMC legacy",
161               [SD_LEGACY]       = "SD Legacy",
162               [MMC_HS]          = "MMC High Speed (26MHz)",
163               [SD_HS]           = "SD High Speed (50MHz)",
164               [UHS_SDR12]       = "UHS SDR12 (25MHz)",
165               [UHS_SDR25]       = "UHS SDR25 (50MHz)",
166               [UHS_SDR50]       = "UHS SDR50 (100MHz)",
167               [UHS_SDR104]      = "UHS SDR104 (208MHz)",
168               [UHS_DDR50]       = "UHS DDR50 (50MHz)",
169               [MMC_HS_52]       = "MMC High Speed (52MHz)",
170               [MMC_DDR_52]      = "MMC DDR52 (52MHz)",
171               [MMC_HS_200]      = "HS200 (200MHz)",
172         };
173
174         if (mode >= MMC_MODES_END)
175                 return "Unknown mode";
176         else
177                 return names[mode];
178 }
179 #endif
180
181 static uint mmc_mode2freq(struct mmc *mmc, enum bus_mode mode)
182 {
183         static const int freqs[] = {
184               [MMC_LEGACY]      = 25000000,
185               [SD_LEGACY]       = 25000000,
186               [MMC_HS]          = 26000000,
187               [SD_HS]           = 50000000,
188               [MMC_HS_52]       = 52000000,
189               [MMC_DDR_52]      = 52000000,
190               [UHS_SDR12]       = 25000000,
191               [UHS_SDR25]       = 50000000,
192               [UHS_SDR50]       = 100000000,
193               [UHS_DDR50]       = 50000000,
194               [UHS_SDR104]      = 208000000,
195               [MMC_HS_200]      = 200000000,
196         };
197
198         if (mode == MMC_LEGACY)
199                 return mmc->legacy_speed;
200         else if (mode >= MMC_MODES_END)
201                 return 0;
202         else
203                 return freqs[mode];
204 }
205
206 static int mmc_select_mode(struct mmc *mmc, enum bus_mode mode)
207 {
208         mmc->selected_mode = mode;
209         mmc->tran_speed = mmc_mode2freq(mmc, mode);
210         mmc->ddr_mode = mmc_is_mode_ddr(mode);
211         pr_debug("selecting mode %s (freq : %d MHz)\n", mmc_mode_name(mode),
212                  mmc->tran_speed / 1000000);
213         return 0;
214 }
215
216 #if !CONFIG_IS_ENABLED(DM_MMC)
217 int mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd, struct mmc_data *data)
218 {
219         int ret;
220
221         mmmc_trace_before_send(mmc, cmd);
222         ret = mmc->cfg->ops->send_cmd(mmc, cmd, data);
223         mmmc_trace_after_send(mmc, cmd, ret);
224
225         return ret;
226 }
227 #endif
228
229 int mmc_send_status(struct mmc *mmc, int timeout)
230 {
231         struct mmc_cmd cmd;
232         int err, retries = 5;
233
234         cmd.cmdidx = MMC_CMD_SEND_STATUS;
235         cmd.resp_type = MMC_RSP_R1;
236         if (!mmc_host_is_spi(mmc))
237                 cmd.cmdarg = mmc->rca << 16;
238
239         while (1) {
240                 err = mmc_send_cmd(mmc, &cmd, NULL);
241                 if (!err) {
242                         if ((cmd.response[0] & MMC_STATUS_RDY_FOR_DATA) &&
243                             (cmd.response[0] & MMC_STATUS_CURR_STATE) !=
244                              MMC_STATE_PRG)
245                                 break;
246
247                         if (cmd.response[0] & MMC_STATUS_MASK) {
248 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
249                                 pr_err("Status Error: 0x%08X\n",
250                                        cmd.response[0]);
251 #endif
252                                 return -ECOMM;
253                         }
254                 } else if (--retries < 0)
255                         return err;
256
257                 if (timeout-- <= 0)
258                         break;
259
260                 udelay(1000);
261         }
262
263         mmc_trace_state(mmc, &cmd);
264         if (timeout <= 0) {
265 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
266                 pr_err("Timeout waiting card ready\n");
267 #endif
268                 return -ETIMEDOUT;
269         }
270
271         return 0;
272 }
273
274 int mmc_set_blocklen(struct mmc *mmc, int len)
275 {
276         struct mmc_cmd cmd;
277         int err;
278
279         if (mmc->ddr_mode)
280                 return 0;
281
282         cmd.cmdidx = MMC_CMD_SET_BLOCKLEN;
283         cmd.resp_type = MMC_RSP_R1;
284         cmd.cmdarg = len;
285
286         err = mmc_send_cmd(mmc, &cmd, NULL);
287
288 #ifdef CONFIG_MMC_QUIRKS
289         if (err && (mmc->quirks & MMC_QUIRK_RETRY_SET_BLOCKLEN)) {
290                 int retries = 4;
291                 /*
292                  * It has been seen that SET_BLOCKLEN may fail on the first
293                  * attempt, let's try a few more time
294                  */
295                 do {
296                         err = mmc_send_cmd(mmc, &cmd, NULL);
297                         if (!err)
298                                 break;
299                 } while (retries--);
300         }
301 #endif
302
303         return err;
304 }
305
306 #ifdef MMC_SUPPORTS_TUNING
307 static const u8 tuning_blk_pattern_4bit[] = {
308         0xff, 0x0f, 0xff, 0x00, 0xff, 0xcc, 0xc3, 0xcc,
309         0xc3, 0x3c, 0xcc, 0xff, 0xfe, 0xff, 0xfe, 0xef,
310         0xff, 0xdf, 0xff, 0xdd, 0xff, 0xfb, 0xff, 0xfb,
311         0xbf, 0xff, 0x7f, 0xff, 0x77, 0xf7, 0xbd, 0xef,
312         0xff, 0xf0, 0xff, 0xf0, 0x0f, 0xfc, 0xcc, 0x3c,
313         0xcc, 0x33, 0xcc, 0xcf, 0xff, 0xef, 0xff, 0xee,
314         0xff, 0xfd, 0xff, 0xfd, 0xdf, 0xff, 0xbf, 0xff,
315         0xbb, 0xff, 0xf7, 0xff, 0xf7, 0x7f, 0x7b, 0xde,
316 };
317
318 static const u8 tuning_blk_pattern_8bit[] = {
319         0xff, 0xff, 0x00, 0xff, 0xff, 0xff, 0x00, 0x00,
320         0xff, 0xff, 0xcc, 0xcc, 0xcc, 0x33, 0xcc, 0xcc,
321         0xcc, 0x33, 0x33, 0xcc, 0xcc, 0xcc, 0xff, 0xff,
322         0xff, 0xee, 0xff, 0xff, 0xff, 0xee, 0xee, 0xff,
323         0xff, 0xff, 0xdd, 0xff, 0xff, 0xff, 0xdd, 0xdd,
324         0xff, 0xff, 0xff, 0xbb, 0xff, 0xff, 0xff, 0xbb,
325         0xbb, 0xff, 0xff, 0xff, 0x77, 0xff, 0xff, 0xff,
326         0x77, 0x77, 0xff, 0x77, 0xbb, 0xdd, 0xee, 0xff,
327         0xff, 0xff, 0xff, 0x00, 0xff, 0xff, 0xff, 0x00,
328         0x00, 0xff, 0xff, 0xcc, 0xcc, 0xcc, 0x33, 0xcc,
329         0xcc, 0xcc, 0x33, 0x33, 0xcc, 0xcc, 0xcc, 0xff,
330         0xff, 0xff, 0xee, 0xff, 0xff, 0xff, 0xee, 0xee,
331         0xff, 0xff, 0xff, 0xdd, 0xff, 0xff, 0xff, 0xdd,
332         0xdd, 0xff, 0xff, 0xff, 0xbb, 0xff, 0xff, 0xff,
333         0xbb, 0xbb, 0xff, 0xff, 0xff, 0x77, 0xff, 0xff,
334         0xff, 0x77, 0x77, 0xff, 0x77, 0xbb, 0xdd, 0xee,
335 };
336
337 int mmc_send_tuning(struct mmc *mmc, u32 opcode, int *cmd_error)
338 {
339         struct mmc_cmd cmd;
340         struct mmc_data data;
341         const u8 *tuning_block_pattern;
342         int size, err;
343
344         if (mmc->bus_width == 8) {
345                 tuning_block_pattern = tuning_blk_pattern_8bit;
346                 size = sizeof(tuning_blk_pattern_8bit);
347         } else if (mmc->bus_width == 4) {
348                 tuning_block_pattern = tuning_blk_pattern_4bit;
349                 size = sizeof(tuning_blk_pattern_4bit);
350         } else {
351                 return -EINVAL;
352         }
353
354         ALLOC_CACHE_ALIGN_BUFFER(u8, data_buf, size);
355
356         cmd.cmdidx = opcode;
357         cmd.cmdarg = 0;
358         cmd.resp_type = MMC_RSP_R1;
359
360         data.dest = (void *)data_buf;
361         data.blocks = 1;
362         data.blocksize = size;
363         data.flags = MMC_DATA_READ;
364
365         err = mmc_send_cmd(mmc, &cmd, &data);
366         if (err)
367                 return err;
368
369         if (memcmp(data_buf, tuning_block_pattern, size))
370                 return -EIO;
371
372         return 0;
373 }
374 #endif
375
376 static int mmc_read_blocks(struct mmc *mmc, void *dst, lbaint_t start,
377                            lbaint_t blkcnt)
378 {
379         struct mmc_cmd cmd;
380         struct mmc_data data;
381
382         if (blkcnt > 1)
383                 cmd.cmdidx = MMC_CMD_READ_MULTIPLE_BLOCK;
384         else
385                 cmd.cmdidx = MMC_CMD_READ_SINGLE_BLOCK;
386
387         if (mmc->high_capacity)
388                 cmd.cmdarg = start;
389         else
390                 cmd.cmdarg = start * mmc->read_bl_len;
391
392         cmd.resp_type = MMC_RSP_R1;
393
394         data.dest = dst;
395         data.blocks = blkcnt;
396         data.blocksize = mmc->read_bl_len;
397         data.flags = MMC_DATA_READ;
398
399         if (mmc_send_cmd(mmc, &cmd, &data))
400                 return 0;
401
402         if (blkcnt > 1) {
403                 cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION;
404                 cmd.cmdarg = 0;
405                 cmd.resp_type = MMC_RSP_R1b;
406                 if (mmc_send_cmd(mmc, &cmd, NULL)) {
407 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
408                         pr_err("mmc fail to send stop cmd\n");
409 #endif
410                         return 0;
411                 }
412         }
413
414         return blkcnt;
415 }
416
417 #if CONFIG_IS_ENABLED(BLK)
418 ulong mmc_bread(struct udevice *dev, lbaint_t start, lbaint_t blkcnt, void *dst)
419 #else
420 ulong mmc_bread(struct blk_desc *block_dev, lbaint_t start, lbaint_t blkcnt,
421                 void *dst)
422 #endif
423 {
424 #if CONFIG_IS_ENABLED(BLK)
425         struct blk_desc *block_dev = dev_get_uclass_platdata(dev);
426 #endif
427         int dev_num = block_dev->devnum;
428         int err;
429         lbaint_t cur, blocks_todo = blkcnt;
430
431         if (blkcnt == 0)
432                 return 0;
433
434         struct mmc *mmc = find_mmc_device(dev_num);
435         if (!mmc)
436                 return 0;
437
438         if (CONFIG_IS_ENABLED(MMC_TINY))
439                 err = mmc_switch_part(mmc, block_dev->hwpart);
440         else
441                 err = blk_dselect_hwpart(block_dev, block_dev->hwpart);
442
443         if (err < 0)
444                 return 0;
445
446         if ((start + blkcnt) > block_dev->lba) {
447 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
448                 pr_err("MMC: block number 0x" LBAF " exceeds max(0x" LBAF ")\n",
449                        start + blkcnt, block_dev->lba);
450 #endif
451                 return 0;
452         }
453
454         if (mmc_set_blocklen(mmc, mmc->read_bl_len)) {
455                 pr_debug("%s: Failed to set blocklen\n", __func__);
456                 return 0;
457         }
458
459         do {
460                 cur = (blocks_todo > mmc->cfg->b_max) ?
461                         mmc->cfg->b_max : blocks_todo;
462                 if (mmc_read_blocks(mmc, dst, start, cur) != cur) {
463                         pr_debug("%s: Failed to read blocks\n", __func__);
464                         return 0;
465                 }
466                 blocks_todo -= cur;
467                 start += cur;
468                 dst += cur * mmc->read_bl_len;
469         } while (blocks_todo > 0);
470
471         return blkcnt;
472 }
473
474 static int mmc_go_idle(struct mmc *mmc)
475 {
476         struct mmc_cmd cmd;
477         int err;
478
479         udelay(1000);
480
481         cmd.cmdidx = MMC_CMD_GO_IDLE_STATE;
482         cmd.cmdarg = 0;
483         cmd.resp_type = MMC_RSP_NONE;
484
485         err = mmc_send_cmd(mmc, &cmd, NULL);
486
487         if (err)
488                 return err;
489
490         udelay(2000);
491
492         return 0;
493 }
494
495 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
496 static int mmc_switch_voltage(struct mmc *mmc, int signal_voltage)
497 {
498         struct mmc_cmd cmd;
499         int err = 0;
500
501         /*
502          * Send CMD11 only if the request is to switch the card to
503          * 1.8V signalling.
504          */
505         if (signal_voltage == MMC_SIGNAL_VOLTAGE_330)
506                 return mmc_set_signal_voltage(mmc, signal_voltage);
507
508         cmd.cmdidx = SD_CMD_SWITCH_UHS18V;
509         cmd.cmdarg = 0;
510         cmd.resp_type = MMC_RSP_R1;
511
512         err = mmc_send_cmd(mmc, &cmd, NULL);
513         if (err)
514                 return err;
515
516         if (!mmc_host_is_spi(mmc) && (cmd.response[0] & MMC_STATUS_ERROR))
517                 return -EIO;
518
519         /*
520          * The card should drive cmd and dat[0:3] low immediately
521          * after the response of cmd11, but wait 100 us to be sure
522          */
523         err = mmc_wait_dat0(mmc, 0, 100);
524         if (err == -ENOSYS)
525                 udelay(100);
526         else if (err)
527                 return -ETIMEDOUT;
528
529         /*
530          * During a signal voltage level switch, the clock must be gated
531          * for 5 ms according to the SD spec
532          */
533         mmc_set_clock(mmc, mmc->clock, true);
534
535         err = mmc_set_signal_voltage(mmc, signal_voltage);
536         if (err)
537                 return err;
538
539         /* Keep clock gated for at least 10 ms, though spec only says 5 ms */
540         mdelay(10);
541         mmc_set_clock(mmc, mmc->clock, false);
542
543         /*
544          * Failure to switch is indicated by the card holding
545          * dat[0:3] low. Wait for at least 1 ms according to spec
546          */
547         err = mmc_wait_dat0(mmc, 1, 1000);
548         if (err == -ENOSYS)
549                 udelay(1000);
550         else if (err)
551                 return -ETIMEDOUT;
552
553         return 0;
554 }
555 #endif
556
557 static int sd_send_op_cond(struct mmc *mmc, bool uhs_en)
558 {
559         int timeout = 1000;
560         int err;
561         struct mmc_cmd cmd;
562
563         while (1) {
564                 cmd.cmdidx = MMC_CMD_APP_CMD;
565                 cmd.resp_type = MMC_RSP_R1;
566                 cmd.cmdarg = 0;
567
568                 err = mmc_send_cmd(mmc, &cmd, NULL);
569
570                 if (err)
571                         return err;
572
573                 cmd.cmdidx = SD_CMD_APP_SEND_OP_COND;
574                 cmd.resp_type = MMC_RSP_R3;
575
576                 /*
577                  * Most cards do not answer if some reserved bits
578                  * in the ocr are set. However, Some controller
579                  * can set bit 7 (reserved for low voltages), but
580                  * how to manage low voltages SD card is not yet
581                  * specified.
582                  */
583                 cmd.cmdarg = mmc_host_is_spi(mmc) ? 0 :
584                         (mmc->cfg->voltages & 0xff8000);
585
586                 if (mmc->version == SD_VERSION_2)
587                         cmd.cmdarg |= OCR_HCS;
588
589                 if (uhs_en)
590                         cmd.cmdarg |= OCR_S18R;
591
592                 err = mmc_send_cmd(mmc, &cmd, NULL);
593
594                 if (err)
595                         return err;
596
597                 if (cmd.response[0] & OCR_BUSY)
598                         break;
599
600                 if (timeout-- <= 0)
601                         return -EOPNOTSUPP;
602
603                 udelay(1000);
604         }
605
606         if (mmc->version != SD_VERSION_2)
607                 mmc->version = SD_VERSION_1_0;
608
609         if (mmc_host_is_spi(mmc)) { /* read OCR for spi */
610                 cmd.cmdidx = MMC_CMD_SPI_READ_OCR;
611                 cmd.resp_type = MMC_RSP_R3;
612                 cmd.cmdarg = 0;
613
614                 err = mmc_send_cmd(mmc, &cmd, NULL);
615
616                 if (err)
617                         return err;
618         }
619
620         mmc->ocr = cmd.response[0];
621
622 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
623         if (uhs_en && !(mmc_host_is_spi(mmc)) && (cmd.response[0] & 0x41000000)
624             == 0x41000000) {
625                 err = mmc_switch_voltage(mmc, MMC_SIGNAL_VOLTAGE_180);
626                 if (err)
627                         return err;
628         }
629 #endif
630
631         mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS);
632         mmc->rca = 0;
633
634         return 0;
635 }
636
637 static int mmc_send_op_cond_iter(struct mmc *mmc, int use_arg)
638 {
639         struct mmc_cmd cmd;
640         int err;
641
642         cmd.cmdidx = MMC_CMD_SEND_OP_COND;
643         cmd.resp_type = MMC_RSP_R3;
644         cmd.cmdarg = 0;
645         if (use_arg && !mmc_host_is_spi(mmc))
646                 cmd.cmdarg = OCR_HCS |
647                         (mmc->cfg->voltages &
648                         (mmc->ocr & OCR_VOLTAGE_MASK)) |
649                         (mmc->ocr & OCR_ACCESS_MODE);
650
651         err = mmc_send_cmd(mmc, &cmd, NULL);
652         if (err)
653                 return err;
654         mmc->ocr = cmd.response[0];
655         return 0;
656 }
657
658 static int mmc_send_op_cond(struct mmc *mmc)
659 {
660         int err, i;
661
662         /* Some cards seem to need this */
663         mmc_go_idle(mmc);
664
665         /* Asking to the card its capabilities */
666         for (i = 0; i < 2; i++) {
667                 err = mmc_send_op_cond_iter(mmc, i != 0);
668                 if (err)
669                         return err;
670
671                 /* exit if not busy (flag seems to be inverted) */
672                 if (mmc->ocr & OCR_BUSY)
673                         break;
674         }
675         mmc->op_cond_pending = 1;
676         return 0;
677 }
678
679 static int mmc_complete_op_cond(struct mmc *mmc)
680 {
681         struct mmc_cmd cmd;
682         int timeout = 1000;
683         uint start;
684         int err;
685
686         mmc->op_cond_pending = 0;
687         if (!(mmc->ocr & OCR_BUSY)) {
688                 /* Some cards seem to need this */
689                 mmc_go_idle(mmc);
690
691                 start = get_timer(0);
692                 while (1) {
693                         err = mmc_send_op_cond_iter(mmc, 1);
694                         if (err)
695                                 return err;
696                         if (mmc->ocr & OCR_BUSY)
697                                 break;
698                         if (get_timer(start) > timeout)
699                                 return -EOPNOTSUPP;
700                         udelay(100);
701                 }
702         }
703
704         if (mmc_host_is_spi(mmc)) { /* read OCR for spi */
705                 cmd.cmdidx = MMC_CMD_SPI_READ_OCR;
706                 cmd.resp_type = MMC_RSP_R3;
707                 cmd.cmdarg = 0;
708
709                 err = mmc_send_cmd(mmc, &cmd, NULL);
710
711                 if (err)
712                         return err;
713
714                 mmc->ocr = cmd.response[0];
715         }
716
717         mmc->version = MMC_VERSION_UNKNOWN;
718
719         mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS);
720         mmc->rca = 1;
721
722         return 0;
723 }
724
725
726 static int mmc_send_ext_csd(struct mmc *mmc, u8 *ext_csd)
727 {
728         struct mmc_cmd cmd;
729         struct mmc_data data;
730         int err;
731
732         /* Get the Card Status Register */
733         cmd.cmdidx = MMC_CMD_SEND_EXT_CSD;
734         cmd.resp_type = MMC_RSP_R1;
735         cmd.cmdarg = 0;
736
737         data.dest = (char *)ext_csd;
738         data.blocks = 1;
739         data.blocksize = MMC_MAX_BLOCK_LEN;
740         data.flags = MMC_DATA_READ;
741
742         err = mmc_send_cmd(mmc, &cmd, &data);
743
744         return err;
745 }
746
747 int mmc_switch(struct mmc *mmc, u8 set, u8 index, u8 value)
748 {
749         struct mmc_cmd cmd;
750         int timeout = 1000;
751         int retries = 3;
752         int ret;
753
754         cmd.cmdidx = MMC_CMD_SWITCH;
755         cmd.resp_type = MMC_RSP_R1b;
756         cmd.cmdarg = (MMC_SWITCH_MODE_WRITE_BYTE << 24) |
757                                  (index << 16) |
758                                  (value << 8);
759
760         while (retries > 0) {
761                 ret = mmc_send_cmd(mmc, &cmd, NULL);
762
763                 /* Waiting for the ready status */
764                 if (!ret) {
765                         ret = mmc_send_status(mmc, timeout);
766                         return ret;
767                 }
768
769                 retries--;
770         }
771
772         return ret;
773
774 }
775
776 static int mmc_set_card_speed(struct mmc *mmc, enum bus_mode mode)
777 {
778         int err;
779         int speed_bits;
780
781         ALLOC_CACHE_ALIGN_BUFFER(u8, test_csd, MMC_MAX_BLOCK_LEN);
782
783         switch (mode) {
784         case MMC_HS:
785         case MMC_HS_52:
786         case MMC_DDR_52:
787                 speed_bits = EXT_CSD_TIMING_HS;
788                 break;
789 #if CONFIG_IS_ENABLED(MMC_HS200_SUPPORT)
790         case MMC_HS_200:
791                 speed_bits = EXT_CSD_TIMING_HS200;
792                 break;
793 #endif
794         case MMC_LEGACY:
795                 speed_bits = EXT_CSD_TIMING_LEGACY;
796                 break;
797         default:
798                 return -EINVAL;
799         }
800         err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING,
801                          speed_bits);
802         if (err)
803                 return err;
804
805         if ((mode == MMC_HS) || (mode == MMC_HS_52)) {
806                 /* Now check to see that it worked */
807                 err = mmc_send_ext_csd(mmc, test_csd);
808                 if (err)
809                         return err;
810
811                 /* No high-speed support */
812                 if (!test_csd[EXT_CSD_HS_TIMING])
813                         return -ENOTSUPP;
814         }
815
816         return 0;
817 }
818
819 static int mmc_get_capabilities(struct mmc *mmc)
820 {
821         u8 *ext_csd = mmc->ext_csd;
822         char cardtype;
823
824         mmc->card_caps = MMC_MODE_1BIT | MMC_CAP(MMC_LEGACY);
825
826         if (mmc_host_is_spi(mmc))
827                 return 0;
828
829         /* Only version 4 supports high-speed */
830         if (mmc->version < MMC_VERSION_4)
831                 return 0;
832
833         if (!ext_csd) {
834                 pr_err("No ext_csd found!\n"); /* this should enver happen */
835                 return -ENOTSUPP;
836         }
837
838         mmc->card_caps |= MMC_MODE_4BIT | MMC_MODE_8BIT;
839
840         cardtype = ext_csd[EXT_CSD_CARD_TYPE] & 0x3f;
841         mmc->cardtype = cardtype;
842
843 #if CONFIG_IS_ENABLED(MMC_HS200_SUPPORT)
844         if (cardtype & (EXT_CSD_CARD_TYPE_HS200_1_2V |
845                         EXT_CSD_CARD_TYPE_HS200_1_8V)) {
846                 mmc->card_caps |= MMC_MODE_HS200;
847         }
848 #endif
849         if (cardtype & EXT_CSD_CARD_TYPE_52) {
850                 if (cardtype & EXT_CSD_CARD_TYPE_DDR_52)
851                         mmc->card_caps |= MMC_MODE_DDR_52MHz;
852                 mmc->card_caps |= MMC_MODE_HS_52MHz;
853         }
854         if (cardtype & EXT_CSD_CARD_TYPE_26)
855                 mmc->card_caps |= MMC_MODE_HS;
856
857         return 0;
858 }
859
860 static int mmc_set_capacity(struct mmc *mmc, int part_num)
861 {
862         switch (part_num) {
863         case 0:
864                 mmc->capacity = mmc->capacity_user;
865                 break;
866         case 1:
867         case 2:
868                 mmc->capacity = mmc->capacity_boot;
869                 break;
870         case 3:
871                 mmc->capacity = mmc->capacity_rpmb;
872                 break;
873         case 4:
874         case 5:
875         case 6:
876         case 7:
877                 mmc->capacity = mmc->capacity_gp[part_num - 4];
878                 break;
879         default:
880                 return -1;
881         }
882
883         mmc_get_blk_desc(mmc)->lba = lldiv(mmc->capacity, mmc->read_bl_len);
884
885         return 0;
886 }
887
888 #if CONFIG_IS_ENABLED(MMC_HS200_SUPPORT)
889 static int mmc_boot_part_access_chk(struct mmc *mmc, unsigned int part_num)
890 {
891         int forbidden = 0;
892         bool change = false;
893
894         if (part_num & PART_ACCESS_MASK)
895                 forbidden = MMC_CAP(MMC_HS_200);
896
897         if (MMC_CAP(mmc->selected_mode) & forbidden) {
898                 pr_debug("selected mode (%s) is forbidden for part %d\n",
899                          mmc_mode_name(mmc->selected_mode), part_num);
900                 change = true;
901         } else if (mmc->selected_mode != mmc->best_mode) {
902                 pr_debug("selected mode is not optimal\n");
903                 change = true;
904         }
905
906         if (change)
907                 return mmc_select_mode_and_width(mmc,
908                                                  mmc->card_caps & ~forbidden);
909
910         return 0;
911 }
912 #else
913 static inline int mmc_boot_part_access_chk(struct mmc *mmc,
914                                            unsigned int part_num)
915 {
916         return 0;
917 }
918 #endif
919
920 int mmc_switch_part(struct mmc *mmc, unsigned int part_num)
921 {
922         int ret;
923
924         ret = mmc_boot_part_access_chk(mmc, part_num);
925         if (ret)
926                 return ret;
927
928         ret = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_PART_CONF,
929                          (mmc->part_config & ~PART_ACCESS_MASK)
930                          | (part_num & PART_ACCESS_MASK));
931
932         /*
933          * Set the capacity if the switch succeeded or was intended
934          * to return to representing the raw device.
935          */
936         if ((ret == 0) || ((ret == -ENODEV) && (part_num == 0))) {
937                 ret = mmc_set_capacity(mmc, part_num);
938                 mmc_get_blk_desc(mmc)->hwpart = part_num;
939         }
940
941         return ret;
942 }
943
944 #if CONFIG_IS_ENABLED(MMC_HW_PARTITIONING)
945 int mmc_hwpart_config(struct mmc *mmc,
946                       const struct mmc_hwpart_conf *conf,
947                       enum mmc_hwpart_conf_mode mode)
948 {
949         u8 part_attrs = 0;
950         u32 enh_size_mult;
951         u32 enh_start_addr;
952         u32 gp_size_mult[4];
953         u32 max_enh_size_mult;
954         u32 tot_enh_size_mult = 0;
955         u8 wr_rel_set;
956         int i, pidx, err;
957         ALLOC_CACHE_ALIGN_BUFFER(u8, ext_csd, MMC_MAX_BLOCK_LEN);
958
959         if (mode < MMC_HWPART_CONF_CHECK || mode > MMC_HWPART_CONF_COMPLETE)
960                 return -EINVAL;
961
962         if (IS_SD(mmc) || (mmc->version < MMC_VERSION_4_41)) {
963                 pr_err("eMMC >= 4.4 required for enhanced user data area\n");
964                 return -EMEDIUMTYPE;
965         }
966
967         if (!(mmc->part_support & PART_SUPPORT)) {
968                 pr_err("Card does not support partitioning\n");
969                 return -EMEDIUMTYPE;
970         }
971
972         if (!mmc->hc_wp_grp_size) {
973                 pr_err("Card does not define HC WP group size\n");
974                 return -EMEDIUMTYPE;
975         }
976
977         /* check partition alignment and total enhanced size */
978         if (conf->user.enh_size) {
979                 if (conf->user.enh_size % mmc->hc_wp_grp_size ||
980                     conf->user.enh_start % mmc->hc_wp_grp_size) {
981                         pr_err("User data enhanced area not HC WP group "
982                                "size aligned\n");
983                         return -EINVAL;
984                 }
985                 part_attrs |= EXT_CSD_ENH_USR;
986                 enh_size_mult = conf->user.enh_size / mmc->hc_wp_grp_size;
987                 if (mmc->high_capacity) {
988                         enh_start_addr = conf->user.enh_start;
989                 } else {
990                         enh_start_addr = (conf->user.enh_start << 9);
991                 }
992         } else {
993                 enh_size_mult = 0;
994                 enh_start_addr = 0;
995         }
996         tot_enh_size_mult += enh_size_mult;
997
998         for (pidx = 0; pidx < 4; pidx++) {
999                 if (conf->gp_part[pidx].size % mmc->hc_wp_grp_size) {
1000                         pr_err("GP%i partition not HC WP group size "
1001                                "aligned\n", pidx+1);
1002                         return -EINVAL;
1003                 }
1004                 gp_size_mult[pidx] = conf->gp_part[pidx].size / mmc->hc_wp_grp_size;
1005                 if (conf->gp_part[pidx].size && conf->gp_part[pidx].enhanced) {
1006                         part_attrs |= EXT_CSD_ENH_GP(pidx);
1007                         tot_enh_size_mult += gp_size_mult[pidx];
1008                 }
1009         }
1010
1011         if (part_attrs && ! (mmc->part_support & ENHNCD_SUPPORT)) {
1012                 pr_err("Card does not support enhanced attribute\n");
1013                 return -EMEDIUMTYPE;
1014         }
1015
1016         err = mmc_send_ext_csd(mmc, ext_csd);
1017         if (err)
1018                 return err;
1019
1020         max_enh_size_mult =
1021                 (ext_csd[EXT_CSD_MAX_ENH_SIZE_MULT+2] << 16) +
1022                 (ext_csd[EXT_CSD_MAX_ENH_SIZE_MULT+1] << 8) +
1023                 ext_csd[EXT_CSD_MAX_ENH_SIZE_MULT];
1024         if (tot_enh_size_mult > max_enh_size_mult) {
1025                 pr_err("Total enhanced size exceeds maximum (%u > %u)\n",
1026                        tot_enh_size_mult, max_enh_size_mult);
1027                 return -EMEDIUMTYPE;
1028         }
1029
1030         /* The default value of EXT_CSD_WR_REL_SET is device
1031          * dependent, the values can only be changed if the
1032          * EXT_CSD_HS_CTRL_REL bit is set. The values can be
1033          * changed only once and before partitioning is completed. */
1034         wr_rel_set = ext_csd[EXT_CSD_WR_REL_SET];
1035         if (conf->user.wr_rel_change) {
1036                 if (conf->user.wr_rel_set)
1037                         wr_rel_set |= EXT_CSD_WR_DATA_REL_USR;
1038                 else
1039                         wr_rel_set &= ~EXT_CSD_WR_DATA_REL_USR;
1040         }
1041         for (pidx = 0; pidx < 4; pidx++) {
1042                 if (conf->gp_part[pidx].wr_rel_change) {
1043                         if (conf->gp_part[pidx].wr_rel_set)
1044                                 wr_rel_set |= EXT_CSD_WR_DATA_REL_GP(pidx);
1045                         else
1046                                 wr_rel_set &= ~EXT_CSD_WR_DATA_REL_GP(pidx);
1047                 }
1048         }
1049
1050         if (wr_rel_set != ext_csd[EXT_CSD_WR_REL_SET] &&
1051             !(ext_csd[EXT_CSD_WR_REL_PARAM] & EXT_CSD_HS_CTRL_REL)) {
1052                 puts("Card does not support host controlled partition write "
1053                      "reliability settings\n");
1054                 return -EMEDIUMTYPE;
1055         }
1056
1057         if (ext_csd[EXT_CSD_PARTITION_SETTING] &
1058             EXT_CSD_PARTITION_SETTING_COMPLETED) {
1059                 pr_err("Card already partitioned\n");
1060                 return -EPERM;
1061         }
1062
1063         if (mode == MMC_HWPART_CONF_CHECK)
1064                 return 0;
1065
1066         /* Partitioning requires high-capacity size definitions */
1067         if (!(ext_csd[EXT_CSD_ERASE_GROUP_DEF] & 0x01)) {
1068                 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1069                                  EXT_CSD_ERASE_GROUP_DEF, 1);
1070
1071                 if (err)
1072                         return err;
1073
1074                 ext_csd[EXT_CSD_ERASE_GROUP_DEF] = 1;
1075
1076                 /* update erase group size to be high-capacity */
1077                 mmc->erase_grp_size =
1078                         ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE] * 1024;
1079
1080         }
1081
1082         /* all OK, write the configuration */
1083         for (i = 0; i < 4; i++) {
1084                 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1085                                  EXT_CSD_ENH_START_ADDR+i,
1086                                  (enh_start_addr >> (i*8)) & 0xFF);
1087                 if (err)
1088                         return err;
1089         }
1090         for (i = 0; i < 3; i++) {
1091                 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1092                                  EXT_CSD_ENH_SIZE_MULT+i,
1093                                  (enh_size_mult >> (i*8)) & 0xFF);
1094                 if (err)
1095                         return err;
1096         }
1097         for (pidx = 0; pidx < 4; pidx++) {
1098                 for (i = 0; i < 3; i++) {
1099                         err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1100                                          EXT_CSD_GP_SIZE_MULT+pidx*3+i,
1101                                          (gp_size_mult[pidx] >> (i*8)) & 0xFF);
1102                         if (err)
1103                                 return err;
1104                 }
1105         }
1106         err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1107                          EXT_CSD_PARTITIONS_ATTRIBUTE, part_attrs);
1108         if (err)
1109                 return err;
1110
1111         if (mode == MMC_HWPART_CONF_SET)
1112                 return 0;
1113
1114         /* The WR_REL_SET is a write-once register but shall be
1115          * written before setting PART_SETTING_COMPLETED. As it is
1116          * write-once we can only write it when completing the
1117          * partitioning. */
1118         if (wr_rel_set != ext_csd[EXT_CSD_WR_REL_SET]) {
1119                 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1120                                  EXT_CSD_WR_REL_SET, wr_rel_set);
1121                 if (err)
1122                         return err;
1123         }
1124
1125         /* Setting PART_SETTING_COMPLETED confirms the partition
1126          * configuration but it only becomes effective after power
1127          * cycle, so we do not adjust the partition related settings
1128          * in the mmc struct. */
1129
1130         err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1131                          EXT_CSD_PARTITION_SETTING,
1132                          EXT_CSD_PARTITION_SETTING_COMPLETED);
1133         if (err)
1134                 return err;
1135
1136         return 0;
1137 }
1138 #endif
1139
1140 #if !CONFIG_IS_ENABLED(DM_MMC)
1141 int mmc_getcd(struct mmc *mmc)
1142 {
1143         int cd;
1144
1145         cd = board_mmc_getcd(mmc);
1146
1147         if (cd < 0) {
1148                 if (mmc->cfg->ops->getcd)
1149                         cd = mmc->cfg->ops->getcd(mmc);
1150                 else
1151                         cd = 1;
1152         }
1153
1154         return cd;
1155 }
1156 #endif
1157
1158 static int sd_switch(struct mmc *mmc, int mode, int group, u8 value, u8 *resp)
1159 {
1160         struct mmc_cmd cmd;
1161         struct mmc_data data;
1162
1163         /* Switch the frequency */
1164         cmd.cmdidx = SD_CMD_SWITCH_FUNC;
1165         cmd.resp_type = MMC_RSP_R1;
1166         cmd.cmdarg = (mode << 31) | 0xffffff;
1167         cmd.cmdarg &= ~(0xf << (group * 4));
1168         cmd.cmdarg |= value << (group * 4);
1169
1170         data.dest = (char *)resp;
1171         data.blocksize = 64;
1172         data.blocks = 1;
1173         data.flags = MMC_DATA_READ;
1174
1175         return mmc_send_cmd(mmc, &cmd, &data);
1176 }
1177
1178
1179 static int sd_get_capabilities(struct mmc *mmc)
1180 {
1181         int err;
1182         struct mmc_cmd cmd;
1183         ALLOC_CACHE_ALIGN_BUFFER(__be32, scr, 2);
1184         ALLOC_CACHE_ALIGN_BUFFER(__be32, switch_status, 16);
1185         struct mmc_data data;
1186         int timeout;
1187 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
1188         u32 sd3_bus_mode;
1189 #endif
1190
1191         mmc->card_caps = MMC_MODE_1BIT | MMC_CAP(SD_LEGACY);
1192
1193         if (mmc_host_is_spi(mmc))
1194                 return 0;
1195
1196         /* Read the SCR to find out if this card supports higher speeds */
1197         cmd.cmdidx = MMC_CMD_APP_CMD;
1198         cmd.resp_type = MMC_RSP_R1;
1199         cmd.cmdarg = mmc->rca << 16;
1200
1201         err = mmc_send_cmd(mmc, &cmd, NULL);
1202
1203         if (err)
1204                 return err;
1205
1206         cmd.cmdidx = SD_CMD_APP_SEND_SCR;
1207         cmd.resp_type = MMC_RSP_R1;
1208         cmd.cmdarg = 0;
1209
1210         timeout = 3;
1211
1212 retry_scr:
1213         data.dest = (char *)scr;
1214         data.blocksize = 8;
1215         data.blocks = 1;
1216         data.flags = MMC_DATA_READ;
1217
1218         err = mmc_send_cmd(mmc, &cmd, &data);
1219
1220         if (err) {
1221                 if (timeout--)
1222                         goto retry_scr;
1223
1224                 return err;
1225         }
1226
1227         mmc->scr[0] = __be32_to_cpu(scr[0]);
1228         mmc->scr[1] = __be32_to_cpu(scr[1]);
1229
1230         switch ((mmc->scr[0] >> 24) & 0xf) {
1231         case 0:
1232                 mmc->version = SD_VERSION_1_0;
1233                 break;
1234         case 1:
1235                 mmc->version = SD_VERSION_1_10;
1236                 break;
1237         case 2:
1238                 mmc->version = SD_VERSION_2;
1239                 if ((mmc->scr[0] >> 15) & 0x1)
1240                         mmc->version = SD_VERSION_3;
1241                 break;
1242         default:
1243                 mmc->version = SD_VERSION_1_0;
1244                 break;
1245         }
1246
1247         if (mmc->scr[0] & SD_DATA_4BIT)
1248                 mmc->card_caps |= MMC_MODE_4BIT;
1249
1250         /* Version 1.0 doesn't support switching */
1251         if (mmc->version == SD_VERSION_1_0)
1252                 return 0;
1253
1254         timeout = 4;
1255         while (timeout--) {
1256                 err = sd_switch(mmc, SD_SWITCH_CHECK, 0, 1,
1257                                 (u8 *)switch_status);
1258
1259                 if (err)
1260                         return err;
1261
1262                 /* The high-speed function is busy.  Try again */
1263                 if (!(__be32_to_cpu(switch_status[7]) & SD_HIGHSPEED_BUSY))
1264                         break;
1265         }
1266
1267         /* If high-speed isn't supported, we return */
1268         if (__be32_to_cpu(switch_status[3]) & SD_HIGHSPEED_SUPPORTED)
1269                 mmc->card_caps |= MMC_CAP(SD_HS);
1270
1271 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
1272         /* Version before 3.0 don't support UHS modes */
1273         if (mmc->version < SD_VERSION_3)
1274                 return 0;
1275
1276         sd3_bus_mode = __be32_to_cpu(switch_status[3]) >> 16 & 0x1f;
1277         if (sd3_bus_mode & SD_MODE_UHS_SDR104)
1278                 mmc->card_caps |= MMC_CAP(UHS_SDR104);
1279         if (sd3_bus_mode & SD_MODE_UHS_SDR50)
1280                 mmc->card_caps |= MMC_CAP(UHS_SDR50);
1281         if (sd3_bus_mode & SD_MODE_UHS_SDR25)
1282                 mmc->card_caps |= MMC_CAP(UHS_SDR25);
1283         if (sd3_bus_mode & SD_MODE_UHS_SDR12)
1284                 mmc->card_caps |= MMC_CAP(UHS_SDR12);
1285         if (sd3_bus_mode & SD_MODE_UHS_DDR50)
1286                 mmc->card_caps |= MMC_CAP(UHS_DDR50);
1287 #endif
1288
1289         return 0;
1290 }
1291
1292 static int sd_set_card_speed(struct mmc *mmc, enum bus_mode mode)
1293 {
1294         int err;
1295
1296         ALLOC_CACHE_ALIGN_BUFFER(uint, switch_status, 16);
1297         int speed;
1298
1299         switch (mode) {
1300         case SD_LEGACY:
1301                 speed = UHS_SDR12_BUS_SPEED;
1302                 break;
1303         case SD_HS:
1304                 speed = HIGH_SPEED_BUS_SPEED;
1305                 break;
1306 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
1307         case UHS_SDR12:
1308                 speed = UHS_SDR12_BUS_SPEED;
1309                 break;
1310         case UHS_SDR25:
1311                 speed = UHS_SDR25_BUS_SPEED;
1312                 break;
1313         case UHS_SDR50:
1314                 speed = UHS_SDR50_BUS_SPEED;
1315                 break;
1316         case UHS_DDR50:
1317                 speed = UHS_DDR50_BUS_SPEED;
1318                 break;
1319         case UHS_SDR104:
1320                 speed = UHS_SDR104_BUS_SPEED;
1321                 break;
1322 #endif
1323         default:
1324                 return -EINVAL;
1325         }
1326
1327         err = sd_switch(mmc, SD_SWITCH_SWITCH, 0, speed, (u8 *)switch_status);
1328         if (err)
1329                 return err;
1330
1331         if (((__be32_to_cpu(switch_status[4]) >> 24) & 0xF) != speed)
1332                 return -ENOTSUPP;
1333
1334         return 0;
1335 }
1336
1337 static int sd_select_bus_width(struct mmc *mmc, int w)
1338 {
1339         int err;
1340         struct mmc_cmd cmd;
1341
1342         if ((w != 4) && (w != 1))
1343                 return -EINVAL;
1344
1345         cmd.cmdidx = MMC_CMD_APP_CMD;
1346         cmd.resp_type = MMC_RSP_R1;
1347         cmd.cmdarg = mmc->rca << 16;
1348
1349         err = mmc_send_cmd(mmc, &cmd, NULL);
1350         if (err)
1351                 return err;
1352
1353         cmd.cmdidx = SD_CMD_APP_SET_BUS_WIDTH;
1354         cmd.resp_type = MMC_RSP_R1;
1355         if (w == 4)
1356                 cmd.cmdarg = 2;
1357         else if (w == 1)
1358                 cmd.cmdarg = 0;
1359         err = mmc_send_cmd(mmc, &cmd, NULL);
1360         if (err)
1361                 return err;
1362
1363         return 0;
1364 }
1365
1366 #if CONFIG_IS_ENABLED(MMC_WRITE)
1367 static int sd_read_ssr(struct mmc *mmc)
1368 {
1369         static const unsigned int sd_au_size[] = {
1370                 0,              SZ_16K / 512,           SZ_32K / 512,
1371                 SZ_64K / 512,   SZ_128K / 512,          SZ_256K / 512,
1372                 SZ_512K / 512,  SZ_1M / 512,            SZ_2M / 512,
1373                 SZ_4M / 512,    SZ_8M / 512,            (SZ_8M + SZ_4M) / 512,
1374                 SZ_16M / 512,   (SZ_16M + SZ_8M) / 512, SZ_32M / 512,
1375                 SZ_64M / 512,
1376         };
1377         int err, i;
1378         struct mmc_cmd cmd;
1379         ALLOC_CACHE_ALIGN_BUFFER(uint, ssr, 16);
1380         struct mmc_data data;
1381         int timeout = 3;
1382         unsigned int au, eo, et, es;
1383
1384         cmd.cmdidx = MMC_CMD_APP_CMD;
1385         cmd.resp_type = MMC_RSP_R1;
1386         cmd.cmdarg = mmc->rca << 16;
1387
1388         err = mmc_send_cmd(mmc, &cmd, NULL);
1389         if (err)
1390                 return err;
1391
1392         cmd.cmdidx = SD_CMD_APP_SD_STATUS;
1393         cmd.resp_type = MMC_RSP_R1;
1394         cmd.cmdarg = 0;
1395
1396 retry_ssr:
1397         data.dest = (char *)ssr;
1398         data.blocksize = 64;
1399         data.blocks = 1;
1400         data.flags = MMC_DATA_READ;
1401
1402         err = mmc_send_cmd(mmc, &cmd, &data);
1403         if (err) {
1404                 if (timeout--)
1405                         goto retry_ssr;
1406
1407                 return err;
1408         }
1409
1410         for (i = 0; i < 16; i++)
1411                 ssr[i] = be32_to_cpu(ssr[i]);
1412
1413         au = (ssr[2] >> 12) & 0xF;
1414         if ((au <= 9) || (mmc->version == SD_VERSION_3)) {
1415                 mmc->ssr.au = sd_au_size[au];
1416                 es = (ssr[3] >> 24) & 0xFF;
1417                 es |= (ssr[2] & 0xFF) << 8;
1418                 et = (ssr[3] >> 18) & 0x3F;
1419                 if (es && et) {
1420                         eo = (ssr[3] >> 16) & 0x3;
1421                         mmc->ssr.erase_timeout = (et * 1000) / es;
1422                         mmc->ssr.erase_offset = eo * 1000;
1423                 }
1424         } else {
1425                 pr_debug("Invalid Allocation Unit Size.\n");
1426         }
1427
1428         return 0;
1429 }
1430 #endif
1431 /* frequency bases */
1432 /* divided by 10 to be nice to platforms without floating point */
1433 static const int fbase[] = {
1434         10000,
1435         100000,
1436         1000000,
1437         10000000,
1438 };
1439
1440 /* Multiplier values for TRAN_SPEED.  Multiplied by 10 to be nice
1441  * to platforms without floating point.
1442  */
1443 static const u8 multipliers[] = {
1444         0,      /* reserved */
1445         10,
1446         12,
1447         13,
1448         15,
1449         20,
1450         25,
1451         30,
1452         35,
1453         40,
1454         45,
1455         50,
1456         55,
1457         60,
1458         70,
1459         80,
1460 };
1461
1462 static inline int bus_width(uint cap)
1463 {
1464         if (cap == MMC_MODE_8BIT)
1465                 return 8;
1466         if (cap == MMC_MODE_4BIT)
1467                 return 4;
1468         if (cap == MMC_MODE_1BIT)
1469                 return 1;
1470         pr_warn("invalid bus witdh capability 0x%x\n", cap);
1471         return 0;
1472 }
1473
1474 #if !CONFIG_IS_ENABLED(DM_MMC)
1475 #ifdef MMC_SUPPORTS_TUNING
1476 static int mmc_execute_tuning(struct mmc *mmc, uint opcode)
1477 {
1478         return -ENOTSUPP;
1479 }
1480 #endif
1481
1482 static void mmc_send_init_stream(struct mmc *mmc)
1483 {
1484 }
1485
1486 static int mmc_set_ios(struct mmc *mmc)
1487 {
1488         int ret = 0;
1489
1490         if (mmc->cfg->ops->set_ios)
1491                 ret = mmc->cfg->ops->set_ios(mmc);
1492
1493         return ret;
1494 }
1495 #endif
1496
1497 int mmc_set_clock(struct mmc *mmc, uint clock, bool disable)
1498 {
1499         if (!disable) {
1500                 if (clock > mmc->cfg->f_max)
1501                         clock = mmc->cfg->f_max;
1502
1503                 if (clock < mmc->cfg->f_min)
1504                         clock = mmc->cfg->f_min;
1505         }
1506
1507         mmc->clock = clock;
1508         mmc->clk_disable = disable;
1509
1510         return mmc_set_ios(mmc);
1511 }
1512
1513 static int mmc_set_bus_width(struct mmc *mmc, uint width)
1514 {
1515         mmc->bus_width = width;
1516
1517         return mmc_set_ios(mmc);
1518 }
1519
1520 #if CONFIG_IS_ENABLED(MMC_VERBOSE) || defined(DEBUG)
1521 /*
1522  * helper function to display the capabilities in a human
1523  * friendly manner. The capabilities include bus width and
1524  * supported modes.
1525  */
1526 void mmc_dump_capabilities(const char *text, uint caps)
1527 {
1528         enum bus_mode mode;
1529
1530         pr_debug("%s: widths [", text);
1531         if (caps & MMC_MODE_8BIT)
1532                 pr_debug("8, ");
1533         if (caps & MMC_MODE_4BIT)
1534                 pr_debug("4, ");
1535         if (caps & MMC_MODE_1BIT)
1536                 pr_debug("1, ");
1537         pr_debug("\b\b] modes [");
1538         for (mode = MMC_LEGACY; mode < MMC_MODES_END; mode++)
1539                 if (MMC_CAP(mode) & caps)
1540                         pr_debug("%s, ", mmc_mode_name(mode));
1541         pr_debug("\b\b]\n");
1542 }
1543 #endif
1544
1545 struct mode_width_tuning {
1546         enum bus_mode mode;
1547         uint widths;
1548 #ifdef MMC_SUPPORTS_TUNING
1549         uint tuning;
1550 #endif
1551 };
1552
1553 #if CONFIG_IS_ENABLED(MMC_IO_VOLTAGE)
1554 int mmc_voltage_to_mv(enum mmc_voltage voltage)
1555 {
1556         switch (voltage) {
1557         case MMC_SIGNAL_VOLTAGE_000: return 0;
1558         case MMC_SIGNAL_VOLTAGE_330: return 3300;
1559         case MMC_SIGNAL_VOLTAGE_180: return 1800;
1560         case MMC_SIGNAL_VOLTAGE_120: return 1200;
1561         }
1562         return -EINVAL;
1563 }
1564
1565 static int mmc_set_signal_voltage(struct mmc *mmc, uint signal_voltage)
1566 {
1567         int err;
1568
1569         if (mmc->signal_voltage == signal_voltage)
1570                 return 0;
1571
1572         mmc->signal_voltage = signal_voltage;
1573         err = mmc_set_ios(mmc);
1574         if (err)
1575                 pr_debug("unable to set voltage (err %d)\n", err);
1576
1577         return err;
1578 }
1579 #else
1580 static inline int mmc_set_signal_voltage(struct mmc *mmc, uint signal_voltage)
1581 {
1582         return 0;
1583 }
1584 #endif
1585
1586 static const struct mode_width_tuning sd_modes_by_pref[] = {
1587 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
1588 #ifdef MMC_SUPPORTS_TUNING
1589         {
1590                 .mode = UHS_SDR104,
1591                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1592                 .tuning = MMC_CMD_SEND_TUNING_BLOCK
1593         },
1594 #endif
1595         {
1596                 .mode = UHS_SDR50,
1597                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1598         },
1599         {
1600                 .mode = UHS_DDR50,
1601                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1602         },
1603         {
1604                 .mode = UHS_SDR25,
1605                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1606         },
1607 #endif
1608         {
1609                 .mode = SD_HS,
1610                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1611         },
1612 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
1613         {
1614                 .mode = UHS_SDR12,
1615                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1616         },
1617 #endif
1618         {
1619                 .mode = SD_LEGACY,
1620                 .widths = MMC_MODE_4BIT | MMC_MODE_1BIT,
1621         }
1622 };
1623
1624 #define for_each_sd_mode_by_pref(caps, mwt) \
1625         for (mwt = sd_modes_by_pref;\
1626              mwt < sd_modes_by_pref + ARRAY_SIZE(sd_modes_by_pref);\
1627              mwt++) \
1628                 if (caps & MMC_CAP(mwt->mode))
1629
1630 static int sd_select_mode_and_width(struct mmc *mmc, uint card_caps)
1631 {
1632         int err;
1633         uint widths[] = {MMC_MODE_4BIT, MMC_MODE_1BIT};
1634         const struct mode_width_tuning *mwt;
1635 #if CONFIG_IS_ENABLED(MMC_UHS_SUPPORT)
1636         bool uhs_en = (mmc->ocr & OCR_S18R) ? true : false;
1637 #else
1638         bool uhs_en = false;
1639 #endif
1640         uint caps;
1641
1642 #ifdef DEBUG
1643         mmc_dump_capabilities("sd card", card_caps);
1644         mmc_dump_capabilities("host", mmc->host_caps);
1645 #endif
1646
1647         /* Restrict card's capabilities by what the host can do */
1648         caps = card_caps & mmc->host_caps;
1649
1650         if (!uhs_en)
1651                 caps &= ~UHS_CAPS;
1652
1653         for_each_sd_mode_by_pref(caps, mwt) {
1654                 uint *w;
1655
1656                 for (w = widths; w < widths + ARRAY_SIZE(widths); w++) {
1657                         if (*w & caps & mwt->widths) {
1658                                 pr_debug("trying mode %s width %d (at %d MHz)\n",
1659                                          mmc_mode_name(mwt->mode),
1660                                          bus_width(*w),
1661                                          mmc_mode2freq(mmc, mwt->mode) / 1000000);
1662
1663                                 /* configure the bus width (card + host) */
1664                                 err = sd_select_bus_width(mmc, bus_width(*w));
1665                                 if (err)
1666                                         goto error;
1667                                 mmc_set_bus_width(mmc, bus_width(*w));
1668
1669                                 /* configure the bus mode (card) */
1670                                 err = sd_set_card_speed(mmc, mwt->mode);
1671                                 if (err)
1672                                         goto error;
1673
1674                                 /* configure the bus mode (host) */
1675                                 mmc_select_mode(mmc, mwt->mode);
1676                                 mmc_set_clock(mmc, mmc->tran_speed, false);
1677
1678 #ifdef MMC_SUPPORTS_TUNING
1679                                 /* execute tuning if needed */
1680                                 if (mwt->tuning && !mmc_host_is_spi(mmc)) {
1681                                         err = mmc_execute_tuning(mmc,
1682                                                                  mwt->tuning);
1683                                         if (err) {
1684                                                 pr_debug("tuning failed\n");
1685                                                 goto error;
1686                                         }
1687                                 }
1688 #endif
1689
1690 #if CONFIG_IS_ENABLED(MMC_WRITE)
1691                                 err = sd_read_ssr(mmc);
1692                                 if (err)
1693                                         pr_warn("unable to read ssr\n");
1694 #endif
1695                                 if (!err)
1696                                         return 0;
1697
1698 error:
1699                                 /* revert to a safer bus speed */
1700                                 mmc_select_mode(mmc, SD_LEGACY);
1701                                 mmc_set_clock(mmc, mmc->tran_speed, false);
1702                         }
1703                 }
1704         }
1705
1706         pr_err("unable to select a mode\n");
1707         return -ENOTSUPP;
1708 }
1709
1710 /*
1711  * read the compare the part of ext csd that is constant.
1712  * This can be used to check that the transfer is working
1713  * as expected.
1714  */
1715 static int mmc_read_and_compare_ext_csd(struct mmc *mmc)
1716 {
1717         int err;
1718         const u8 *ext_csd = mmc->ext_csd;
1719         ALLOC_CACHE_ALIGN_BUFFER(u8, test_csd, MMC_MAX_BLOCK_LEN);
1720
1721         if (mmc->version < MMC_VERSION_4)
1722                 return 0;
1723
1724         err = mmc_send_ext_csd(mmc, test_csd);
1725         if (err)
1726                 return err;
1727
1728         /* Only compare read only fields */
1729         if (ext_csd[EXT_CSD_PARTITIONING_SUPPORT]
1730                 == test_csd[EXT_CSD_PARTITIONING_SUPPORT] &&
1731             ext_csd[EXT_CSD_HC_WP_GRP_SIZE]
1732                 == test_csd[EXT_CSD_HC_WP_GRP_SIZE] &&
1733             ext_csd[EXT_CSD_REV]
1734                 == test_csd[EXT_CSD_REV] &&
1735             ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]
1736                 == test_csd[EXT_CSD_HC_ERASE_GRP_SIZE] &&
1737             memcmp(&ext_csd[EXT_CSD_SEC_CNT],
1738                    &test_csd[EXT_CSD_SEC_CNT], 4) == 0)
1739                 return 0;
1740
1741         return -EBADMSG;
1742 }
1743
1744 #if CONFIG_IS_ENABLED(MMC_IO_VOLTAGE)
1745 static int mmc_set_lowest_voltage(struct mmc *mmc, enum bus_mode mode,
1746                                   uint32_t allowed_mask)
1747 {
1748         u32 card_mask = 0;
1749
1750         switch (mode) {
1751         case MMC_HS_200:
1752                 if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS200_1_8V)
1753                         card_mask |= MMC_SIGNAL_VOLTAGE_180;
1754                 if (mmc->cardtype & EXT_CSD_CARD_TYPE_HS200_1_2V)
1755                         card_mask |= MMC_SIGNAL_VOLTAGE_120;
1756                 break;
1757         case MMC_DDR_52:
1758                 if (mmc->cardtype & EXT_CSD_CARD_TYPE_DDR_1_8V)
1759                         card_mask |= MMC_SIGNAL_VOLTAGE_330 |
1760                                      MMC_SIGNAL_VOLTAGE_180;
1761                 if (mmc->cardtype & EXT_CSD_CARD_TYPE_DDR_1_2V)
1762                         card_mask |= MMC_SIGNAL_VOLTAGE_120;
1763                 break;
1764         default:
1765                 card_mask |= MMC_SIGNAL_VOLTAGE_330;
1766                 break;
1767         }
1768
1769         while (card_mask & allowed_mask) {
1770                 enum mmc_voltage best_match;
1771
1772                 best_match = 1 << (ffs(card_mask & allowed_mask) - 1);
1773                 if (!mmc_set_signal_voltage(mmc,  best_match))
1774                         return 0;
1775
1776                 allowed_mask &= ~best_match;
1777         }
1778
1779         return -ENOTSUPP;
1780 }
1781 #else
1782 static inline int mmc_set_lowest_voltage(struct mmc *mmc, enum bus_mode mode,
1783                                          uint32_t allowed_mask)
1784 {
1785         return 0;
1786 }
1787 #endif
1788
1789 static const struct mode_width_tuning mmc_modes_by_pref[] = {
1790 #if CONFIG_IS_ENABLED(MMC_HS200_SUPPORT)
1791         {
1792                 .mode = MMC_HS_200,
1793                 .widths = MMC_MODE_8BIT | MMC_MODE_4BIT,
1794                 .tuning = MMC_CMD_SEND_TUNING_BLOCK_HS200
1795         },
1796 #endif
1797         {
1798                 .mode = MMC_DDR_52,
1799                 .widths = MMC_MODE_8BIT | MMC_MODE_4BIT,
1800         },
1801         {
1802                 .mode = MMC_HS_52,
1803                 .widths = MMC_MODE_8BIT | MMC_MODE_4BIT | MMC_MODE_1BIT,
1804         },
1805         {
1806                 .mode = MMC_HS,
1807                 .widths = MMC_MODE_8BIT | MMC_MODE_4BIT | MMC_MODE_1BIT,
1808         },
1809         {
1810                 .mode = MMC_LEGACY,
1811                 .widths = MMC_MODE_8BIT | MMC_MODE_4BIT | MMC_MODE_1BIT,
1812         }
1813 };
1814
1815 #define for_each_mmc_mode_by_pref(caps, mwt) \
1816         for (mwt = mmc_modes_by_pref;\
1817             mwt < mmc_modes_by_pref + ARRAY_SIZE(mmc_modes_by_pref);\
1818             mwt++) \
1819                 if (caps & MMC_CAP(mwt->mode))
1820
1821 static const struct ext_csd_bus_width {
1822         uint cap;
1823         bool is_ddr;
1824         uint ext_csd_bits;
1825 } ext_csd_bus_width[] = {
1826         {MMC_MODE_8BIT, true, EXT_CSD_DDR_BUS_WIDTH_8},
1827         {MMC_MODE_4BIT, true, EXT_CSD_DDR_BUS_WIDTH_4},
1828         {MMC_MODE_8BIT, false, EXT_CSD_BUS_WIDTH_8},
1829         {MMC_MODE_4BIT, false, EXT_CSD_BUS_WIDTH_4},
1830         {MMC_MODE_1BIT, false, EXT_CSD_BUS_WIDTH_1},
1831 };
1832
1833 #define for_each_supported_width(caps, ddr, ecbv) \
1834         for (ecbv = ext_csd_bus_width;\
1835             ecbv < ext_csd_bus_width + ARRAY_SIZE(ext_csd_bus_width);\
1836             ecbv++) \
1837                 if ((ddr == ecbv->is_ddr) && (caps & ecbv->cap))
1838
1839 static int mmc_select_mode_and_width(struct mmc *mmc, uint card_caps)
1840 {
1841         int err;
1842         const struct mode_width_tuning *mwt;
1843         const struct ext_csd_bus_width *ecbw;
1844
1845 #ifdef DEBUG
1846         mmc_dump_capabilities("mmc", card_caps);
1847         mmc_dump_capabilities("host", mmc->host_caps);
1848 #endif
1849
1850         /* Restrict card's capabilities by what the host can do */
1851         card_caps &= mmc->host_caps;
1852
1853         /* Only version 4 of MMC supports wider bus widths */
1854         if (mmc->version < MMC_VERSION_4)
1855                 return 0;
1856
1857         if (!mmc->ext_csd) {
1858                 pr_debug("No ext_csd found!\n"); /* this should enver happen */
1859                 return -ENOTSUPP;
1860         }
1861
1862         mmc_set_clock(mmc, mmc->legacy_speed, false);
1863
1864         for_each_mmc_mode_by_pref(card_caps, mwt) {
1865                 for_each_supported_width(card_caps & mwt->widths,
1866                                          mmc_is_mode_ddr(mwt->mode), ecbw) {
1867                         enum mmc_voltage old_voltage;
1868                         pr_debug("trying mode %s width %d (at %d MHz)\n",
1869                                  mmc_mode_name(mwt->mode),
1870                                  bus_width(ecbw->cap),
1871                                  mmc_mode2freq(mmc, mwt->mode) / 1000000);
1872                         old_voltage = mmc->signal_voltage;
1873                         err = mmc_set_lowest_voltage(mmc, mwt->mode,
1874                                                      MMC_ALL_SIGNAL_VOLTAGE);
1875                         if (err)
1876                                 continue;
1877
1878                         /* configure the bus width (card + host) */
1879                         err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1880                                     EXT_CSD_BUS_WIDTH,
1881                                     ecbw->ext_csd_bits & ~EXT_CSD_DDR_FLAG);
1882                         if (err)
1883                                 goto error;
1884                         mmc_set_bus_width(mmc, bus_width(ecbw->cap));
1885
1886                         /* configure the bus speed (card) */
1887                         err = mmc_set_card_speed(mmc, mwt->mode);
1888                         if (err)
1889                                 goto error;
1890
1891                         /*
1892                          * configure the bus width AND the ddr mode (card)
1893                          * The host side will be taken care of in the next step
1894                          */
1895                         if (ecbw->ext_csd_bits & EXT_CSD_DDR_FLAG) {
1896                                 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1897                                                  EXT_CSD_BUS_WIDTH,
1898                                                  ecbw->ext_csd_bits);
1899                                 if (err)
1900                                         goto error;
1901                         }
1902
1903                         /* configure the bus mode (host) */
1904                         mmc_select_mode(mmc, mwt->mode);
1905                         mmc_set_clock(mmc, mmc->tran_speed, false);
1906 #ifdef MMC_SUPPORTS_TUNING
1907
1908                         /* execute tuning if needed */
1909                         if (mwt->tuning) {
1910                                 err = mmc_execute_tuning(mmc, mwt->tuning);
1911                                 if (err) {
1912                                         pr_debug("tuning failed\n");
1913                                         goto error;
1914                                 }
1915                         }
1916 #endif
1917
1918                         /* do a transfer to check the configuration */
1919                         err = mmc_read_and_compare_ext_csd(mmc);
1920                         if (!err)
1921                                 return 0;
1922 error:
1923                         mmc_set_signal_voltage(mmc, old_voltage);
1924                         /* if an error occured, revert to a safer bus mode */
1925                         mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
1926                                    EXT_CSD_BUS_WIDTH, EXT_CSD_BUS_WIDTH_1);
1927                         mmc_select_mode(mmc, MMC_LEGACY);
1928                         mmc_set_bus_width(mmc, 1);
1929                 }
1930         }
1931
1932         pr_err("unable to select a mode\n");
1933
1934         return -ENOTSUPP;
1935 }
1936
1937 static int mmc_startup_v4(struct mmc *mmc)
1938 {
1939         int err, i;
1940         u64 capacity;
1941         bool has_parts = false;
1942         bool part_completed;
1943         static const u32 mmc_versions[] = {
1944                 MMC_VERSION_4,
1945                 MMC_VERSION_4_1,
1946                 MMC_VERSION_4_2,
1947                 MMC_VERSION_4_3,
1948                 MMC_VERSION_4_4,
1949                 MMC_VERSION_4_41,
1950                 MMC_VERSION_4_5,
1951                 MMC_VERSION_5_0,
1952                 MMC_VERSION_5_1
1953         };
1954
1955         ALLOC_CACHE_ALIGN_BUFFER(u8, ext_csd, MMC_MAX_BLOCK_LEN);
1956
1957         if (IS_SD(mmc) || (mmc->version < MMC_VERSION_4))
1958                 return 0;
1959
1960         /* check  ext_csd version and capacity */
1961         err = mmc_send_ext_csd(mmc, ext_csd);
1962         if (err)
1963                 goto error;
1964
1965         /* store the ext csd for future reference */
1966         if (!mmc->ext_csd)
1967                 mmc->ext_csd = malloc(MMC_MAX_BLOCK_LEN);
1968         if (!mmc->ext_csd)
1969                 return -ENOMEM;
1970         memcpy(mmc->ext_csd, ext_csd, MMC_MAX_BLOCK_LEN);
1971
1972         if (ext_csd[EXT_CSD_REV] >= ARRAY_SIZE(mmc_versions))
1973                 return -EINVAL;
1974
1975         mmc->version = mmc_versions[ext_csd[EXT_CSD_REV]];
1976
1977         if (mmc->version >= MMC_VERSION_4_2) {
1978                 /*
1979                  * According to the JEDEC Standard, the value of
1980                  * ext_csd's capacity is valid if the value is more
1981                  * than 2GB
1982                  */
1983                 capacity = ext_csd[EXT_CSD_SEC_CNT] << 0
1984                                 | ext_csd[EXT_CSD_SEC_CNT + 1] << 8
1985                                 | ext_csd[EXT_CSD_SEC_CNT + 2] << 16
1986                                 | ext_csd[EXT_CSD_SEC_CNT + 3] << 24;
1987                 capacity *= MMC_MAX_BLOCK_LEN;
1988                 if ((capacity >> 20) > 2 * 1024)
1989                         mmc->capacity_user = capacity;
1990         }
1991
1992         /* The partition data may be non-zero but it is only
1993          * effective if PARTITION_SETTING_COMPLETED is set in
1994          * EXT_CSD, so ignore any data if this bit is not set,
1995          * except for enabling the high-capacity group size
1996          * definition (see below).
1997          */
1998         part_completed = !!(ext_csd[EXT_CSD_PARTITION_SETTING] &
1999                             EXT_CSD_PARTITION_SETTING_COMPLETED);
2000
2001         /* store the partition info of emmc */
2002         mmc->part_support = ext_csd[EXT_CSD_PARTITIONING_SUPPORT];
2003         if ((ext_csd[EXT_CSD_PARTITIONING_SUPPORT] & PART_SUPPORT) ||
2004             ext_csd[EXT_CSD_BOOT_MULT])
2005                 mmc->part_config = ext_csd[EXT_CSD_PART_CONF];
2006         if (part_completed &&
2007             (ext_csd[EXT_CSD_PARTITIONING_SUPPORT] & ENHNCD_SUPPORT))
2008                 mmc->part_attr = ext_csd[EXT_CSD_PARTITIONS_ATTRIBUTE];
2009
2010         mmc->capacity_boot = ext_csd[EXT_CSD_BOOT_MULT] << 17;
2011
2012         mmc->capacity_rpmb = ext_csd[EXT_CSD_RPMB_MULT] << 17;
2013
2014         for (i = 0; i < 4; i++) {
2015                 int idx = EXT_CSD_GP_SIZE_MULT + i * 3;
2016                 uint mult = (ext_csd[idx + 2] << 16) +
2017                         (ext_csd[idx + 1] << 8) + ext_csd[idx];
2018                 if (mult)
2019                         has_parts = true;
2020                 if (!part_completed)
2021                         continue;
2022                 mmc->capacity_gp[i] = mult;
2023                 mmc->capacity_gp[i] *=
2024                         ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE];
2025                 mmc->capacity_gp[i] *= ext_csd[EXT_CSD_HC_WP_GRP_SIZE];
2026                 mmc->capacity_gp[i] <<= 19;
2027         }
2028
2029 #ifndef CONFIG_SPL_BUILD
2030         if (part_completed) {
2031                 mmc->enh_user_size =
2032                         (ext_csd[EXT_CSD_ENH_SIZE_MULT + 2] << 16) +
2033                         (ext_csd[EXT_CSD_ENH_SIZE_MULT + 1] << 8) +
2034                         ext_csd[EXT_CSD_ENH_SIZE_MULT];
2035                 mmc->enh_user_size *= ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE];
2036                 mmc->enh_user_size *= ext_csd[EXT_CSD_HC_WP_GRP_SIZE];
2037                 mmc->enh_user_size <<= 19;
2038                 mmc->enh_user_start =
2039                         (ext_csd[EXT_CSD_ENH_START_ADDR + 3] << 24) +
2040                         (ext_csd[EXT_CSD_ENH_START_ADDR + 2] << 16) +
2041                         (ext_csd[EXT_CSD_ENH_START_ADDR + 1] << 8) +
2042                         ext_csd[EXT_CSD_ENH_START_ADDR];
2043                 if (mmc->high_capacity)
2044                         mmc->enh_user_start <<= 9;
2045         }
2046 #endif
2047
2048         /*
2049          * Host needs to enable ERASE_GRP_DEF bit if device is
2050          * partitioned. This bit will be lost every time after a reset
2051          * or power off. This will affect erase size.
2052          */
2053         if (part_completed)
2054                 has_parts = true;
2055         if ((ext_csd[EXT_CSD_PARTITIONING_SUPPORT] & PART_SUPPORT) &&
2056             (ext_csd[EXT_CSD_PARTITIONS_ATTRIBUTE] & PART_ENH_ATTRIB))
2057                 has_parts = true;
2058         if (has_parts) {
2059                 err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
2060                                  EXT_CSD_ERASE_GROUP_DEF, 1);
2061
2062                 if (err)
2063                         goto error;
2064
2065                 ext_csd[EXT_CSD_ERASE_GROUP_DEF] = 1;
2066         }
2067
2068         if (ext_csd[EXT_CSD_ERASE_GROUP_DEF] & 0x01) {
2069 #if CONFIG_IS_ENABLED(MMC_WRITE)
2070                 /* Read out group size from ext_csd */
2071                 mmc->erase_grp_size =
2072                         ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE] * 1024;
2073 #endif
2074                 /*
2075                  * if high capacity and partition setting completed
2076                  * SEC_COUNT is valid even if it is smaller than 2 GiB
2077                  * JEDEC Standard JESD84-B45, 6.2.4
2078                  */
2079                 if (mmc->high_capacity && part_completed) {
2080                         capacity = (ext_csd[EXT_CSD_SEC_CNT]) |
2081                                 (ext_csd[EXT_CSD_SEC_CNT + 1] << 8) |
2082                                 (ext_csd[EXT_CSD_SEC_CNT + 2] << 16) |
2083                                 (ext_csd[EXT_CSD_SEC_CNT + 3] << 24);
2084                         capacity *= MMC_MAX_BLOCK_LEN;
2085                         mmc->capacity_user = capacity;
2086                 }
2087         }
2088 #if CONFIG_IS_ENABLED(MMC_WRITE)
2089         else {
2090                 /* Calculate the group size from the csd value. */
2091                 int erase_gsz, erase_gmul;
2092
2093                 erase_gsz = (mmc->csd[2] & 0x00007c00) >> 10;
2094                 erase_gmul = (mmc->csd[2] & 0x000003e0) >> 5;
2095                 mmc->erase_grp_size = (erase_gsz + 1)
2096                         * (erase_gmul + 1);
2097         }
2098 #endif
2099 #if CONFIG_IS_ENABLED(MMC_HW_PARTITIONING)
2100         mmc->hc_wp_grp_size = 1024
2101                 * ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE]
2102                 * ext_csd[EXT_CSD_HC_WP_GRP_SIZE];
2103 #endif
2104
2105         mmc->wr_rel_set = ext_csd[EXT_CSD_WR_REL_SET];
2106
2107         return 0;
2108 error:
2109         if (mmc->ext_csd) {
2110                 free(mmc->ext_csd);
2111                 mmc->ext_csd = NULL;
2112         }
2113         return err;
2114 }
2115
2116 static int mmc_startup(struct mmc *mmc)
2117 {
2118         int err, i;
2119         uint mult, freq;
2120         u64 cmult, csize;
2121         struct mmc_cmd cmd;
2122         struct blk_desc *bdesc;
2123
2124 #ifdef CONFIG_MMC_SPI_CRC_ON
2125         if (mmc_host_is_spi(mmc)) { /* enable CRC check for spi */
2126                 cmd.cmdidx = MMC_CMD_SPI_CRC_ON_OFF;
2127                 cmd.resp_type = MMC_RSP_R1;
2128                 cmd.cmdarg = 1;
2129                 err = mmc_send_cmd(mmc, &cmd, NULL);
2130                 if (err)
2131                         return err;
2132         }
2133 #endif
2134
2135         /* Put the Card in Identify Mode */
2136         cmd.cmdidx = mmc_host_is_spi(mmc) ? MMC_CMD_SEND_CID :
2137                 MMC_CMD_ALL_SEND_CID; /* cmd not supported in spi */
2138         cmd.resp_type = MMC_RSP_R2;
2139         cmd.cmdarg = 0;
2140
2141         err = mmc_send_cmd(mmc, &cmd, NULL);
2142
2143 #ifdef CONFIG_MMC_QUIRKS
2144         if (err && (mmc->quirks & MMC_QUIRK_RETRY_SEND_CID)) {
2145                 int retries = 4;
2146                 /*
2147                  * It has been seen that SEND_CID may fail on the first
2148                  * attempt, let's try a few more time
2149                  */
2150                 do {
2151                         err = mmc_send_cmd(mmc, &cmd, NULL);
2152                         if (!err)
2153                                 break;
2154                 } while (retries--);
2155         }
2156 #endif
2157
2158         if (err)
2159                 return err;
2160
2161         memcpy(mmc->cid, cmd.response, 16);
2162
2163         /*
2164          * For MMC cards, set the Relative Address.
2165          * For SD cards, get the Relatvie Address.
2166          * This also puts the cards into Standby State
2167          */
2168         if (!mmc_host_is_spi(mmc)) { /* cmd not supported in spi */
2169                 cmd.cmdidx = SD_CMD_SEND_RELATIVE_ADDR;
2170                 cmd.cmdarg = mmc->rca << 16;
2171                 cmd.resp_type = MMC_RSP_R6;
2172
2173                 err = mmc_send_cmd(mmc, &cmd, NULL);
2174
2175                 if (err)
2176                         return err;
2177
2178                 if (IS_SD(mmc))
2179                         mmc->rca = (cmd.response[0] >> 16) & 0xffff;
2180         }
2181
2182         /* Get the Card-Specific Data */
2183         cmd.cmdidx = MMC_CMD_SEND_CSD;
2184         cmd.resp_type = MMC_RSP_R2;
2185         cmd.cmdarg = mmc->rca << 16;
2186
2187         err = mmc_send_cmd(mmc, &cmd, NULL);
2188
2189         if (err)
2190                 return err;
2191
2192         mmc->csd[0] = cmd.response[0];
2193         mmc->csd[1] = cmd.response[1];
2194         mmc->csd[2] = cmd.response[2];
2195         mmc->csd[3] = cmd.response[3];
2196
2197         if (mmc->version == MMC_VERSION_UNKNOWN) {
2198                 int version = (cmd.response[0] >> 26) & 0xf;
2199
2200                 switch (version) {
2201                 case 0:
2202                         mmc->version = MMC_VERSION_1_2;
2203                         break;
2204                 case 1:
2205                         mmc->version = MMC_VERSION_1_4;
2206                         break;
2207                 case 2:
2208                         mmc->version = MMC_VERSION_2_2;
2209                         break;
2210                 case 3:
2211                         mmc->version = MMC_VERSION_3;
2212                         break;
2213                 case 4:
2214                         mmc->version = MMC_VERSION_4;
2215                         break;
2216                 default:
2217                         mmc->version = MMC_VERSION_1_2;
2218                         break;
2219                 }
2220         }
2221
2222         /* divide frequency by 10, since the mults are 10x bigger */
2223         freq = fbase[(cmd.response[0] & 0x7)];
2224         mult = multipliers[((cmd.response[0] >> 3) & 0xf)];
2225
2226         mmc->legacy_speed = freq * mult;
2227         mmc_select_mode(mmc, MMC_LEGACY);
2228
2229         mmc->dsr_imp = ((cmd.response[1] >> 12) & 0x1);
2230         mmc->read_bl_len = 1 << ((cmd.response[1] >> 16) & 0xf);
2231 #if CONFIG_IS_ENABLED(MMC_WRITE)
2232
2233         if (IS_SD(mmc))
2234                 mmc->write_bl_len = mmc->read_bl_len;
2235         else
2236                 mmc->write_bl_len = 1 << ((cmd.response[3] >> 22) & 0xf);
2237 #endif
2238
2239         if (mmc->high_capacity) {
2240                 csize = (mmc->csd[1] & 0x3f) << 16
2241                         | (mmc->csd[2] & 0xffff0000) >> 16;
2242                 cmult = 8;
2243         } else {
2244                 csize = (mmc->csd[1] & 0x3ff) << 2
2245                         | (mmc->csd[2] & 0xc0000000) >> 30;
2246                 cmult = (mmc->csd[2] & 0x00038000) >> 15;
2247         }
2248
2249         mmc->capacity_user = (csize + 1) << (cmult + 2);
2250         mmc->capacity_user *= mmc->read_bl_len;
2251         mmc->capacity_boot = 0;
2252         mmc->capacity_rpmb = 0;
2253         for (i = 0; i < 4; i++)
2254                 mmc->capacity_gp[i] = 0;
2255
2256         if (mmc->read_bl_len > MMC_MAX_BLOCK_LEN)
2257                 mmc->read_bl_len = MMC_MAX_BLOCK_LEN;
2258
2259 #if CONFIG_IS_ENABLED(MMC_WRITE)
2260         if (mmc->write_bl_len > MMC_MAX_BLOCK_LEN)
2261                 mmc->write_bl_len = MMC_MAX_BLOCK_LEN;
2262 #endif
2263
2264         if ((mmc->dsr_imp) && (0xffffffff != mmc->dsr)) {
2265                 cmd.cmdidx = MMC_CMD_SET_DSR;
2266                 cmd.cmdarg = (mmc->dsr & 0xffff) << 16;
2267                 cmd.resp_type = MMC_RSP_NONE;
2268                 if (mmc_send_cmd(mmc, &cmd, NULL))
2269                         pr_warn("MMC: SET_DSR failed\n");
2270         }
2271
2272         /* Select the card, and put it into Transfer Mode */
2273         if (!mmc_host_is_spi(mmc)) { /* cmd not supported in spi */
2274                 cmd.cmdidx = MMC_CMD_SELECT_CARD;
2275                 cmd.resp_type = MMC_RSP_R1;
2276                 cmd.cmdarg = mmc->rca << 16;
2277                 err = mmc_send_cmd(mmc, &cmd, NULL);
2278
2279                 if (err)
2280                         return err;
2281         }
2282
2283         /*
2284          * For SD, its erase group is always one sector
2285          */
2286 #if CONFIG_IS_ENABLED(MMC_WRITE)
2287         mmc->erase_grp_size = 1;
2288 #endif
2289         mmc->part_config = MMCPART_NOAVAILABLE;
2290
2291         err = mmc_startup_v4(mmc);
2292         if (err)
2293                 return err;
2294
2295         err = mmc_set_capacity(mmc, mmc_get_blk_desc(mmc)->hwpart);
2296         if (err)
2297                 return err;
2298
2299         if (IS_SD(mmc)) {
2300                 err = sd_get_capabilities(mmc);
2301                 if (err)
2302                         return err;
2303                 err = sd_select_mode_and_width(mmc, mmc->card_caps);
2304         } else {
2305                 err = mmc_get_capabilities(mmc);
2306                 if (err)
2307                         return err;
2308                 mmc_select_mode_and_width(mmc, mmc->card_caps);
2309         }
2310
2311         if (err)
2312                 return err;
2313
2314         mmc->best_mode = mmc->selected_mode;
2315
2316         /* Fix the block length for DDR mode */
2317         if (mmc->ddr_mode) {
2318                 mmc->read_bl_len = MMC_MAX_BLOCK_LEN;
2319 #if CONFIG_IS_ENABLED(MMC_WRITE)
2320                 mmc->write_bl_len = MMC_MAX_BLOCK_LEN;
2321 #endif
2322         }
2323
2324         /* fill in device description */
2325         bdesc = mmc_get_blk_desc(mmc);
2326         bdesc->lun = 0;
2327         bdesc->hwpart = 0;
2328         bdesc->type = 0;
2329         bdesc->blksz = mmc->read_bl_len;
2330         bdesc->log2blksz = LOG2(bdesc->blksz);
2331         bdesc->lba = lldiv(mmc->capacity, mmc->read_bl_len);
2332 #if !defined(CONFIG_SPL_BUILD) || \
2333                 (defined(CONFIG_SPL_LIBCOMMON_SUPPORT) && \
2334                 !defined(CONFIG_USE_TINY_PRINTF))
2335         sprintf(bdesc->vendor, "Man %06x Snr %04x%04x",
2336                 mmc->cid[0] >> 24, (mmc->cid[2] & 0xffff),
2337                 (mmc->cid[3] >> 16) & 0xffff);
2338         sprintf(bdesc->product, "%c%c%c%c%c%c", mmc->cid[0] & 0xff,
2339                 (mmc->cid[1] >> 24), (mmc->cid[1] >> 16) & 0xff,
2340                 (mmc->cid[1] >> 8) & 0xff, mmc->cid[1] & 0xff,
2341                 (mmc->cid[2] >> 24) & 0xff);
2342         sprintf(bdesc->revision, "%d.%d", (mmc->cid[2] >> 20) & 0xf,
2343                 (mmc->cid[2] >> 16) & 0xf);
2344 #else
2345         bdesc->vendor[0] = 0;
2346         bdesc->product[0] = 0;
2347         bdesc->revision[0] = 0;
2348 #endif
2349 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBDISK_SUPPORT)
2350         part_init(bdesc);
2351 #endif
2352
2353         return 0;
2354 }
2355
2356 static int mmc_send_if_cond(struct mmc *mmc)
2357 {
2358         struct mmc_cmd cmd;
2359         int err;
2360
2361         cmd.cmdidx = SD_CMD_SEND_IF_COND;
2362         /* We set the bit if the host supports voltages between 2.7 and 3.6 V */
2363         cmd.cmdarg = ((mmc->cfg->voltages & 0xff8000) != 0) << 8 | 0xaa;
2364         cmd.resp_type = MMC_RSP_R7;
2365
2366         err = mmc_send_cmd(mmc, &cmd, NULL);
2367
2368         if (err)
2369                 return err;
2370
2371         if ((cmd.response[0] & 0xff) != 0xaa)
2372                 return -EOPNOTSUPP;
2373         else
2374                 mmc->version = SD_VERSION_2;
2375
2376         return 0;
2377 }
2378
2379 #if !CONFIG_IS_ENABLED(DM_MMC)
2380 /* board-specific MMC power initializations. */
2381 __weak void board_mmc_power_init(void)
2382 {
2383 }
2384 #endif
2385
2386 static int mmc_power_init(struct mmc *mmc)
2387 {
2388 #if CONFIG_IS_ENABLED(DM_MMC)
2389 #if CONFIG_IS_ENABLED(DM_REGULATOR)
2390         int ret;
2391
2392         ret = device_get_supply_regulator(mmc->dev, "vmmc-supply",
2393                                           &mmc->vmmc_supply);
2394         if (ret)
2395                 pr_debug("%s: No vmmc supply\n", mmc->dev->name);
2396
2397         ret = device_get_supply_regulator(mmc->dev, "vqmmc-supply",
2398                                           &mmc->vqmmc_supply);
2399         if (ret)
2400                 pr_debug("%s: No vqmmc supply\n", mmc->dev->name);
2401 #endif
2402 #else /* !CONFIG_DM_MMC */
2403         /*
2404          * Driver model should use a regulator, as above, rather than calling
2405          * out to board code.
2406          */
2407         board_mmc_power_init();
2408 #endif
2409         return 0;
2410 }
2411
2412 /*
2413  * put the host in the initial state:
2414  * - turn on Vdd (card power supply)
2415  * - configure the bus width and clock to minimal values
2416  */
2417 static void mmc_set_initial_state(struct mmc *mmc)
2418 {
2419         int err;
2420
2421         /* First try to set 3.3V. If it fails set to 1.8V */
2422         err = mmc_set_signal_voltage(mmc, MMC_SIGNAL_VOLTAGE_330);
2423         if (err != 0)
2424                 err = mmc_set_signal_voltage(mmc, MMC_SIGNAL_VOLTAGE_180);
2425         if (err != 0)
2426                 pr_warn("mmc: failed to set signal voltage\n");
2427
2428         mmc_select_mode(mmc, MMC_LEGACY);
2429         mmc_set_bus_width(mmc, 1);
2430         mmc_set_clock(mmc, 0, false);
2431 }
2432
2433 static int mmc_power_on(struct mmc *mmc)
2434 {
2435 #if CONFIG_IS_ENABLED(DM_MMC) && CONFIG_IS_ENABLED(DM_REGULATOR)
2436         if (mmc->vmmc_supply) {
2437                 int ret = regulator_set_enable(mmc->vmmc_supply, true);
2438
2439                 if (ret) {
2440                         puts("Error enabling VMMC supply\n");
2441                         return ret;
2442                 }
2443         }
2444 #endif
2445         return 0;
2446 }
2447
2448 static int mmc_power_off(struct mmc *mmc)
2449 {
2450         mmc_set_clock(mmc, 0, true);
2451 #if CONFIG_IS_ENABLED(DM_MMC) && CONFIG_IS_ENABLED(DM_REGULATOR)
2452         if (mmc->vmmc_supply) {
2453                 int ret = regulator_set_enable(mmc->vmmc_supply, false);
2454
2455                 if (ret) {
2456                         pr_debug("Error disabling VMMC supply\n");
2457                         return ret;
2458                 }
2459         }
2460 #endif
2461         return 0;
2462 }
2463
2464 static int mmc_power_cycle(struct mmc *mmc)
2465 {
2466         int ret;
2467
2468         ret = mmc_power_off(mmc);
2469         if (ret)
2470                 return ret;
2471         /*
2472          * SD spec recommends at least 1ms of delay. Let's wait for 2ms
2473          * to be on the safer side.
2474          */
2475         udelay(2000);
2476         return mmc_power_on(mmc);
2477 }
2478
2479 int mmc_start_init(struct mmc *mmc)
2480 {
2481         bool no_card;
2482         bool uhs_en = supports_uhs(mmc->cfg->host_caps);
2483         int err;
2484
2485         /*
2486          * all hosts are capable of 1 bit bus-width and able to use the legacy
2487          * timings.
2488          */
2489         mmc->host_caps = mmc->cfg->host_caps | MMC_CAP(SD_LEGACY) |
2490                          MMC_CAP(MMC_LEGACY) | MMC_MODE_1BIT;
2491
2492 #if !defined(CONFIG_MMC_BROKEN_CD)
2493         /* we pretend there's no card when init is NULL */
2494         no_card = mmc_getcd(mmc) == 0;
2495 #else
2496         no_card = 0;
2497 #endif
2498 #if !CONFIG_IS_ENABLED(DM_MMC)
2499         no_card = no_card || (mmc->cfg->ops->init == NULL);
2500 #endif
2501         if (no_card) {
2502                 mmc->has_init = 0;
2503 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
2504                 pr_err("MMC: no card present\n");
2505 #endif
2506                 return -ENOMEDIUM;
2507         }
2508
2509         if (mmc->has_init)
2510                 return 0;
2511
2512 #ifdef CONFIG_FSL_ESDHC_ADAPTER_IDENT
2513         mmc_adapter_card_type_ident();
2514 #endif
2515         err = mmc_power_init(mmc);
2516         if (err)
2517                 return err;
2518
2519 #ifdef CONFIG_MMC_QUIRKS
2520         mmc->quirks = MMC_QUIRK_RETRY_SET_BLOCKLEN |
2521                       MMC_QUIRK_RETRY_SEND_CID;
2522 #endif
2523
2524         err = mmc_power_cycle(mmc);
2525         if (err) {
2526                 /*
2527                  * if power cycling is not supported, we should not try
2528                  * to use the UHS modes, because we wouldn't be able to
2529                  * recover from an error during the UHS initialization.
2530                  */
2531                 pr_debug("Unable to do a full power cycle. Disabling the UHS modes for safety\n");
2532                 uhs_en = false;
2533                 mmc->host_caps &= ~UHS_CAPS;
2534                 err = mmc_power_on(mmc);
2535         }
2536         if (err)
2537                 return err;
2538
2539 #if CONFIG_IS_ENABLED(DM_MMC)
2540         /* The device has already been probed ready for use */
2541 #else
2542         /* made sure it's not NULL earlier */
2543         err = mmc->cfg->ops->init(mmc);
2544         if (err)
2545                 return err;
2546 #endif
2547         mmc->ddr_mode = 0;
2548
2549 retry:
2550         mmc_set_initial_state(mmc);
2551         mmc_send_init_stream(mmc);
2552
2553         /* Reset the Card */
2554         err = mmc_go_idle(mmc);
2555
2556         if (err)
2557                 return err;
2558
2559         /* The internal partition reset to user partition(0) at every CMD0*/
2560         mmc_get_blk_desc(mmc)->hwpart = 0;
2561
2562         /* Test for SD version 2 */
2563         err = mmc_send_if_cond(mmc);
2564
2565         /* Now try to get the SD card's operating condition */
2566         err = sd_send_op_cond(mmc, uhs_en);
2567         if (err && uhs_en) {
2568                 uhs_en = false;
2569                 mmc_power_cycle(mmc);
2570                 goto retry;
2571         }
2572
2573         /* If the command timed out, we check for an MMC card */
2574         if (err == -ETIMEDOUT) {
2575                 err = mmc_send_op_cond(mmc);
2576
2577                 if (err) {
2578 #if !defined(CONFIG_SPL_BUILD) || defined(CONFIG_SPL_LIBCOMMON_SUPPORT)
2579                         pr_err("Card did not respond to voltage select!\n");
2580 #endif
2581                         return -EOPNOTSUPP;
2582                 }
2583         }
2584
2585         if (!err)
2586                 mmc->init_in_progress = 1;
2587
2588         return err;
2589 }
2590
2591 static int mmc_complete_init(struct mmc *mmc)
2592 {
2593         int err = 0;
2594
2595         mmc->init_in_progress = 0;
2596         if (mmc->op_cond_pending)
2597                 err = mmc_complete_op_cond(mmc);
2598
2599         if (!err)
2600                 err = mmc_startup(mmc);
2601         if (err)
2602                 mmc->has_init = 0;
2603         else
2604                 mmc->has_init = 1;
2605         return err;
2606 }
2607
2608 int mmc_init(struct mmc *mmc)
2609 {
2610         int err = 0;
2611         __maybe_unused unsigned start;
2612 #if CONFIG_IS_ENABLED(DM_MMC)
2613         struct mmc_uclass_priv *upriv = dev_get_uclass_priv(mmc->dev);
2614
2615         upriv->mmc = mmc;
2616 #endif
2617         if (mmc->has_init)
2618                 return 0;
2619
2620         start = get_timer(0);
2621
2622         if (!mmc->init_in_progress)
2623                 err = mmc_start_init(mmc);
2624
2625         if (!err)
2626                 err = mmc_complete_init(mmc);
2627         if (err)
2628                 pr_info("%s: %d, time %lu\n", __func__, err, get_timer(start));
2629
2630         return err;
2631 }
2632
2633 int mmc_set_dsr(struct mmc *mmc, u16 val)
2634 {
2635         mmc->dsr = val;
2636         return 0;
2637 }
2638
2639 /* CPU-specific MMC initializations */
2640 __weak int cpu_mmc_init(bd_t *bis)
2641 {
2642         return -1;
2643 }
2644
2645 /* board-specific MMC initializations. */
2646 __weak int board_mmc_init(bd_t *bis)
2647 {
2648         return -1;
2649 }
2650
2651 void mmc_set_preinit(struct mmc *mmc, int preinit)
2652 {
2653         mmc->preinit = preinit;
2654 }
2655
2656 #if CONFIG_IS_ENABLED(DM_MMC)
2657 static int mmc_probe(bd_t *bis)
2658 {
2659         int ret, i;
2660         struct uclass *uc;
2661         struct udevice *dev;
2662
2663         ret = uclass_get(UCLASS_MMC, &uc);
2664         if (ret)
2665                 return ret;
2666
2667         /*
2668          * Try to add them in sequence order. Really with driver model we
2669          * should allow holes, but the current MMC list does not allow that.
2670          * So if we request 0, 1, 3 we will get 0, 1, 2.
2671          */
2672         for (i = 0; ; i++) {
2673                 ret = uclass_get_device_by_seq(UCLASS_MMC, i, &dev);
2674                 if (ret == -ENODEV)
2675                         break;
2676         }
2677         uclass_foreach_dev(dev, uc) {
2678                 ret = device_probe(dev);
2679                 if (ret)
2680                         pr_err("%s - probe failed: %d\n", dev->name, ret);
2681         }
2682
2683         return 0;
2684 }
2685 #else
2686 static int mmc_probe(bd_t *bis)
2687 {
2688         if (board_mmc_init(bis) < 0)
2689                 cpu_mmc_init(bis);
2690
2691         return 0;
2692 }
2693 #endif
2694
2695 int mmc_initialize(bd_t *bis)
2696 {
2697         static int initialized = 0;
2698         int ret;
2699         if (initialized)        /* Avoid initializing mmc multiple times */
2700                 return 0;
2701         initialized = 1;
2702
2703 #if !CONFIG_IS_ENABLED(BLK)
2704 #if !CONFIG_IS_ENABLED(MMC_TINY)
2705         mmc_list_init();
2706 #endif
2707 #endif
2708         ret = mmc_probe(bis);
2709         if (ret)
2710                 return ret;
2711
2712 #ifndef CONFIG_SPL_BUILD
2713         print_mmc_devices(',');
2714 #endif
2715
2716         mmc_do_preinit();
2717         return 0;
2718 }
2719
2720 #ifdef CONFIG_CMD_BKOPS_ENABLE
2721 int mmc_set_bkops_enable(struct mmc *mmc)
2722 {
2723         int err;
2724         ALLOC_CACHE_ALIGN_BUFFER(u8, ext_csd, MMC_MAX_BLOCK_LEN);
2725
2726         err = mmc_send_ext_csd(mmc, ext_csd);
2727         if (err) {
2728                 puts("Could not get ext_csd register values\n");
2729                 return err;
2730         }
2731
2732         if (!(ext_csd[EXT_CSD_BKOPS_SUPPORT] & 0x1)) {
2733                 puts("Background operations not supported on device\n");
2734                 return -EMEDIUMTYPE;
2735         }
2736
2737         if (ext_csd[EXT_CSD_BKOPS_EN] & 0x1) {
2738                 puts("Background operations already enabled\n");
2739                 return 0;
2740         }
2741
2742         err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_BKOPS_EN, 1);
2743         if (err) {
2744                 puts("Failed to enable manual background operations\n");
2745                 return err;
2746         }
2747
2748         puts("Enabled manual background operations\n");
2749
2750         return 0;
2751 }
2752 #endif