drivers/mmc/sdhci.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * Copyright 2011, Marvell Semiconductor Inc.
   4  * Lei Wen <leiwen@marvell.com>
   5  *
   6  * Back ported to the 8xx platform (from the 8260 platform) by
   7  * Murray.Jensen@cmst.csiro.au, 27-Jan-01.
   8  */
   9
  10 #include <common.h>
  11 #include <dm.h>
  12 #include <errno.h>
  13 #include <malloc.h>
  14 #include <mmc.h>
  15 #include <sdhci.h>
  16 #include <dm.h>
  17
  18 #if defined(CONFIG_FIXED_SDHCI_ALIGNED_BUFFER)
  19 void *aligned_buffer = (void *)CONFIG_FIXED_SDHCI_ALIGNED_BUFFER;
  20 #else
  21 void *aligned_buffer;
  22 #endif
  23
  24 static void sdhci_reset(struct sdhci_host *host, u8 mask)
  25 {
  26         unsigned long timeout;
  27
  28         /* Wait max 100 ms */
  29         timeout = 100;
  30         sdhci_writeb(host, mask, SDHCI_SOFTWARE_RESET);
  31         while (sdhci_readb(host, SDHCI_SOFTWARE_RESET) & mask) {
  32                 if (timeout == 0) {
  33                         printf("%s: Reset 0x%x never completed.\n",
  34                                __func__, (int)mask);
  35                         return;
  36                 }
  37                 timeout--;
  38                 udelay(1000);
  39         }
  40 }
  41
  42 static void sdhci_cmd_done(struct sdhci_host *host, struct mmc_cmd *cmd)
  43 {
  44         int i;
  45         if (cmd->resp_type & MMC_RSP_136) {
  46                 /* CRC is stripped so we need to do some shifting. */
  47                 for (i = 0; i < 4; i++) {
  48                         cmd->response[i] = sdhci_readl(host,
  49                                         SDHCI_RESPONSE + (3-i)*4) << 8;
  50                         if (i != 3)
  51                                 cmd->response[i] |= sdhci_readb(host,
  52                                                 SDHCI_RESPONSE + (3-i)*4-1);
  53                 }
  54         } else {
  55                 cmd->response[0] = sdhci_readl(host, SDHCI_RESPONSE);
  56         }
  57 }
  58
  59 static void sdhci_transfer_pio(struct sdhci_host *host, struct mmc_data *data)
  60 {
  61         int i;
  62         char *offs;
  63         for (i = 0; i < data->blocksize; i += 4) {
  64                 offs = data->dest + i;
  65                 if (data->flags == MMC_DATA_READ)
  66                         *(u32 *)offs = sdhci_readl(host, SDHCI_BUFFER);
  67                 else
  68                         sdhci_writel(host, *(u32 *)offs, SDHCI_BUFFER);
  69         }
  70 }
  71
  72 #if CONFIG_IS_ENABLED(MMC_SDHCI_ADMA)
  73 static void sdhci_adma_desc(struct sdhci_host *host, char *buf, u16 len,
  74                             bool end)
  75 {
  76         struct sdhci_adma_desc *desc;
  77         u8 attr;
  78
  79         desc = &host->adma_desc_table[host->desc_slot];
  80
  81         attr = ADMA_DESC_ATTR_VALID | ADMA_DESC_TRANSFER_DATA;
  82         if (!end)
  83                 host->desc_slot++;
  84         else
  85                 attr |= ADMA_DESC_ATTR_END;
  86
  87         desc->attr = attr;
  88         desc->len = len;
  89         desc->reserved = 0;
  90         desc->addr_lo = (dma_addr_t)buf;
  91 #ifdef CONFIG_DMA_ADDR_T_64BIT
  92         desc->addr_hi = (u64)buf >> 32;
  93 #endif
  94 }
  95
  96 static void sdhci_prepare_adma_table(struct sdhci_host *host,
  97                                      struct mmc_data *data)
  98 {
  99         uint trans_bytes = data->blocksize * data->blocks;
 100         uint desc_count = DIV_ROUND_UP(trans_bytes, ADMA_MAX_LEN);
 101         int i = desc_count;
 102         char *buf;
 103
 104         host->desc_slot = 0;
 105
 106         if (data->flags & MMC_DATA_READ)
 107                 buf = data->dest;
 108         else
 109                 buf = (char *)data->src;
 110
 111         while (--i) {
 112                 sdhci_adma_desc(host, buf, ADMA_MAX_LEN, false);
 113                 buf += ADMA_MAX_LEN;
 114                 trans_bytes -= ADMA_MAX_LEN;
 115         }
 116
 117         sdhci_adma_desc(host, buf, trans_bytes, true);
 118
 119         flush_cache((dma_addr_t)host->adma_desc_table,
 120                     ROUND(desc_count * sizeof(struct sdhci_adma_desc),
 121                           ARCH_DMA_MINALIGN));
 122 }
 123 #elif defined(CONFIG_MMC_SDHCI_SDMA)
 124 static void sdhci_prepare_adma_table(struct sdhci_host *host,
 125                                      struct mmc_data *data)
 126 {}
 127 #endif
 128 #if (defined(CONFIG_MMC_SDHCI_SDMA) || CONFIG_IS_ENABLED(MMC_SDHCI_ADMA))
 129 static void sdhci_prepare_dma(struct sdhci_host *host, struct mmc_data *data,
 130                               int *is_aligned, int trans_bytes)
 131 {
 132         unsigned char ctrl;
 133
 134         if (data->flags == MMC_DATA_READ)
 135                 host->start_addr = (dma_addr_t)data->dest;
 136         else
 137                 host->start_addr = (dma_addr_t)data->src;
 138
 139         ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
 140         ctrl &= ~SDHCI_CTRL_DMA_MASK;
 141         if (host->flags & USE_ADMA64)
 142                 ctrl |= SDHCI_CTRL_ADMA64;
 143         else if (host->flags & USE_ADMA)
 144                 ctrl |= SDHCI_CTRL_ADMA32;
 145         sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
 146
 147         if (host->flags & USE_SDMA) {
 148                 if ((host->quirks & SDHCI_QUIRK_32BIT_DMA_ADDR) &&
 149                     (host->start_addr & 0x7) != 0x0) {
 150                         *is_aligned = 0;
 151                         host->start_addr = (unsigned long)aligned_buffer;
 152                         if (data->flags != MMC_DATA_READ)
 153                                 memcpy(aligned_buffer, data->src, trans_bytes);
 154                 }
 155
 156 #if defined(CONFIG_FIXED_SDHCI_ALIGNED_BUFFER)
 157                 /*
 158                  * Always use this bounce-buffer when
 159                  * CONFIG_FIXED_SDHCI_ALIGNED_BUFFER is defined
 160                  */
 161                 *is_aligned = 0;
 162                 host->start_addr = (unsigned long)aligned_buffer;
 163                 if (data->flags != MMC_DATA_READ)
 164                         memcpy(aligned_buffer, data->src, trans_bytes);
 165 #endif
 166                 sdhci_writel(host, host->start_addr, SDHCI_DMA_ADDRESS);
 167
 168         } else if (host->flags & (USE_ADMA | USE_ADMA64)) {
 169                 sdhci_prepare_adma_table(host, data);
 170
 171                 sdhci_writel(host, (u32)host->adma_addr, SDHCI_ADMA_ADDRESS);
 172                 if (host->flags & USE_ADMA64)
 173                         sdhci_writel(host, (u64)host->adma_addr >> 32,
 174                                      SDHCI_ADMA_ADDRESS_HI);
 175         }
 176
 177         flush_cache(host->start_addr, ROUND(trans_bytes, ARCH_DMA_MINALIGN));
 178 }
 179 #else
 180 static void sdhci_prepare_dma(struct sdhci_host *host, struct mmc_data *data,
 181                               int *is_aligned, int trans_bytes)
 182 {}
 183 #endif
 184 static int sdhci_transfer_data(struct sdhci_host *host, struct mmc_data *data)
 185 {
 186         dma_addr_t start_addr = host->start_addr;
 187         unsigned int stat, rdy, mask, timeout, block = 0;
 188         bool transfer_done = false;
 189
 190         timeout = 1000000;
 191         rdy = SDHCI_INT_SPACE_AVAIL | SDHCI_INT_DATA_AVAIL;
 192         mask = SDHCI_DATA_AVAILABLE | SDHCI_SPACE_AVAILABLE;
 193         do {
 194                 stat = sdhci_readl(host, SDHCI_INT_STATUS);
 195                 if (stat & SDHCI_INT_ERROR) {
 196                         pr_debug("%s: Error detected in status(0x%X)!\n",
 197                                  __func__, stat);
 198                         return -EIO;
 199                 }
 200                 if (!transfer_done && (stat & rdy)) {
 201                         if (!(sdhci_readl(host, SDHCI_PRESENT_STATE) & mask))
 202                                 continue;
 203                         sdhci_writel(host, rdy, SDHCI_INT_STATUS);
 204                         sdhci_transfer_pio(host, data);
 205                         data->dest += data->blocksize;
 206                         if (++block >= data->blocks) {
 207                                 /* Keep looping until the SDHCI_INT_DATA_END is
 208                                  * cleared, even if we finished sending all the
 209                                  * blocks.
 210                                  */
 211                                 transfer_done = true;
 212                                 continue;
 213                         }
 214                 }
 215                 if ((host->flags & USE_DMA) && !transfer_done &&
 216                     (stat & SDHCI_INT_DMA_END)) {
 217                         sdhci_writel(host, SDHCI_INT_DMA_END, SDHCI_INT_STATUS);
 218                         if (host->flags & USE_SDMA) {
 219                                 start_addr &=
 220                                 ~(SDHCI_DEFAULT_BOUNDARY_SIZE - 1);
 221                                 start_addr += SDHCI_DEFAULT_BOUNDARY_SIZE;
 222                                 sdhci_writel(host, start_addr,
 223                                              SDHCI_DMA_ADDRESS);
 224                         }
 225                 }
 226                 if (timeout-- > 0)
 227                         udelay(10);
 228                 else {
 229                         printf("%s: Transfer data timeout\n", __func__);
 230                         return -ETIMEDOUT;
 231                 }
 232         } while (!(stat & SDHCI_INT_DATA_END));
 233         return 0;
 234 }
 235
 236 /*
 237  * No command will be sent by driver if card is busy, so driver must wait
 238  * for card ready state.
 239  * Every time when card is busy after timeout then (last) timeout value will be
 240  * increased twice but only if it doesn't exceed global defined maximum.
 241  * Each function call will use last timeout value.
 242  */
 243 #define SDHCI_CMD_MAX_TIMEOUT                   3200
 244 #define SDHCI_CMD_DEFAULT_TIMEOUT               100
 245 #define SDHCI_READ_STATUS_TIMEOUT               1000
 246
 247 #ifdef CONFIG_DM_MMC
 248 static int sdhci_send_command(struct udevice *dev, struct mmc_cmd *cmd,
 249                               struct mmc_data *data)
 250 {
 251         struct mmc *mmc = mmc_get_mmc_dev(dev);
 252
 253 #else
 254 static int sdhci_send_command(struct mmc *mmc, struct mmc_cmd *cmd,
 255                               struct mmc_data *data)
 256 {
 257 #endif
 258         struct sdhci_host *host = mmc->priv;
 259         unsigned int stat = 0;
 260         int ret = 0;
 261         int trans_bytes = 0, is_aligned = 1;
 262         u32 mask, flags, mode;
 263         unsigned int time = 0;
 264         int mmc_dev = mmc_get_blk_desc(mmc)->devnum;
 265         ulong start = get_timer(0);
 266
 267         host->start_addr = 0;
 268         /* Timeout unit - ms */
 269         static unsigned int cmd_timeout = SDHCI_CMD_DEFAULT_TIMEOUT;
 270
 271         mask = SDHCI_CMD_INHIBIT | SDHCI_DATA_INHIBIT;
 272
 273         /* We shouldn't wait for data inihibit for stop commands, even
 274            though they might use busy signaling */
 275         if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION ||
 276             ((cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK ||
 277               cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK_HS200) && !data))
 278                 mask &= ~SDHCI_DATA_INHIBIT;
 279
 280         while (sdhci_readl(host, SDHCI_PRESENT_STATE) & mask) {
 281                 if (time >= cmd_timeout) {
 282                         printf("%s: MMC: %d busy ", __func__, mmc_dev);
 283                         if (2 * cmd_timeout <= SDHCI_CMD_MAX_TIMEOUT) {
 284                                 cmd_timeout += cmd_timeout;
 285                                 printf("timeout increasing to: %u ms.\n",
 286                                        cmd_timeout);
 287                         } else {
 288                                 puts("timeout.\n");
 289                                 return -ECOMM;
 290                         }
 291                 }
 292                 time++;
 293                 udelay(1000);
 294         }
 295
 296         sdhci_writel(host, SDHCI_INT_ALL_MASK, SDHCI_INT_STATUS);
 297
 298         mask = SDHCI_INT_RESPONSE;
 299         if ((cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK ||
 300              cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK_HS200) && !data)
 301                 mask = SDHCI_INT_DATA_AVAIL;
 302
 303         if (!(cmd->resp_type & MMC_RSP_PRESENT))
 304                 flags = SDHCI_CMD_RESP_NONE;
 305         else if (cmd->resp_type & MMC_RSP_136)
 306                 flags = SDHCI_CMD_RESP_LONG;
 307         else if (cmd->resp_type & MMC_RSP_BUSY) {
 308                 flags = SDHCI_CMD_RESP_SHORT_BUSY;
 309                 if (data)
 310                         mask |= SDHCI_INT_DATA_END;
 311         } else
 312                 flags = SDHCI_CMD_RESP_SHORT;
 313
 314         if (cmd->resp_type & MMC_RSP_CRC)
 315                 flags |= SDHCI_CMD_CRC;
 316         if (cmd->resp_type & MMC_RSP_OPCODE)
 317                 flags |= SDHCI_CMD_INDEX;
 318         if (data || cmd->cmdidx ==  MMC_CMD_SEND_TUNING_BLOCK ||
 319             cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK_HS200)
 320                 flags |= SDHCI_CMD_DATA;
 321
 322         /* Set Transfer mode regarding to data flag */
 323         if (data) {
 324                 sdhci_writeb(host, 0xe, SDHCI_TIMEOUT_CONTROL);
 325                 mode = SDHCI_TRNS_BLK_CNT_EN;
 326                 trans_bytes = data->blocks * data->blocksize;
 327                 if (data->blocks > 1)
 328                         mode |= SDHCI_TRNS_MULTI;
 329
 330                 if (data->flags == MMC_DATA_READ)
 331                         mode |= SDHCI_TRNS_READ;
 332
 333                 if (host->flags & USE_DMA) {
 334                         mode |= SDHCI_TRNS_DMA;
 335                         sdhci_prepare_dma(host, data, &is_aligned, trans_bytes);
 336                 }
 337
 338                 sdhci_writew(host, SDHCI_MAKE_BLKSZ(SDHCI_DEFAULT_BOUNDARY_ARG,
 339                                 data->blocksize),
 340                                 SDHCI_BLOCK_SIZE);
 341                 sdhci_writew(host, data->blocks, SDHCI_BLOCK_COUNT);
 342                 sdhci_writew(host, mode, SDHCI_TRANSFER_MODE);
 343         } else if (cmd->resp_type & MMC_RSP_BUSY) {
 344                 sdhci_writeb(host, 0xe, SDHCI_TIMEOUT_CONTROL);
 345         }
 346
 347         sdhci_writel(host, cmd->cmdarg, SDHCI_ARGUMENT);
 348         sdhci_writew(host, SDHCI_MAKE_CMD(cmd->cmdidx, flags), SDHCI_COMMAND);
 349         start = get_timer(0);
 350         do {
 351                 stat = sdhci_readl(host, SDHCI_INT_STATUS);
 352                 if (stat & SDHCI_INT_ERROR)
 353                         break;
 354
 355                 if (get_timer(start) >= SDHCI_READ_STATUS_TIMEOUT) {
 356                         if (host->quirks & SDHCI_QUIRK_BROKEN_R1B) {
 357                                 return 0;
 358                         } else {
 359                                 printf("%s: Timeout for status update!\n",
 360                                        __func__);
 361                                 return -ETIMEDOUT;
 362                         }
 363                 }
 364         } while ((stat & mask) != mask);
 365
 366         if ((stat & (SDHCI_INT_ERROR | mask)) == mask) {
 367                 sdhci_cmd_done(host, cmd);
 368                 sdhci_writel(host, mask, SDHCI_INT_STATUS);
 369         } else
 370                 ret = -1;
 371
 372         if (!ret && data)
 373                 ret = sdhci_transfer_data(host, data);
 374
 375         if (host->quirks & SDHCI_QUIRK_WAIT_SEND_CMD)
 376                 udelay(1000);
 377
 378         stat = sdhci_readl(host, SDHCI_INT_STATUS);
 379         sdhci_writel(host, SDHCI_INT_ALL_MASK, SDHCI_INT_STATUS);
 380         if (!ret) {
 381                 if ((host->quirks & SDHCI_QUIRK_32BIT_DMA_ADDR) &&
 382                                 !is_aligned && (data->flags == MMC_DATA_READ))
 383                         memcpy(data->dest, aligned_buffer, trans_bytes);
 384                 return 0;
 385         }
 386
 387         sdhci_reset(host, SDHCI_RESET_CMD);
 388         sdhci_reset(host, SDHCI_RESET_DATA);
 389         if (stat & SDHCI_INT_TIMEOUT)
 390                 return -ETIMEDOUT;
 391         else
 392                 return -ECOMM;
 393 }
 394
 395 #if defined(CONFIG_DM_MMC) && defined(MMC_SUPPORTS_TUNING)
 396 static int sdhci_execute_tuning(struct udevice *dev, uint opcode)
 397 {
 398         int err;
 399         struct mmc *mmc = mmc_get_mmc_dev(dev);
 400         struct sdhci_host *host = mmc->priv;
 401
 402         debug("%s\n", __func__);
 403
 404         if (host->ops && host->ops->platform_execute_tuning) {
 405                 err = host->ops->platform_execute_tuning(mmc, opcode);
 406                 if (err)
 407                         return err;
 408                 return 0;
 409         }
 410         return 0;
 411 }
 412 #endif
 413 int sdhci_set_clock(struct mmc *mmc, unsigned int clock)
 414 {
 415         struct sdhci_host *host = mmc->priv;
 416         unsigned int div, clk = 0, timeout;
 417
 418         /* Wait max 20 ms */
 419         timeout = 200;
 420         while (sdhci_readl(host, SDHCI_PRESENT_STATE) &
 421                            (SDHCI_CMD_INHIBIT | SDHCI_DATA_INHIBIT)) {
 422                 if (timeout == 0) {
 423                         printf("%s: Timeout to wait cmd & data inhibit\n",
 424                                __func__);
 425                         return -EBUSY;
 426                 }
 427
 428                 timeout--;
 429                 udelay(100);
 430         }
 431
 432         sdhci_writew(host, 0, SDHCI_CLOCK_CONTROL);
 433
 434         if (clock == 0)
 435                 return 0;
 436
 437         if (host->ops && host->ops->set_delay)
 438                 host->ops->set_delay(host);
 439
 440         if (SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300) {
 441                 /*
 442                  * Check if the Host Controller supports Programmable Clock
 443                  * Mode.
 444                  */
 445                 if (host->clk_mul) {
 446                         for (div = 1; div <= 1024; div++) {
 447                                 if ((host->max_clk / div) <= clock)
 448                                         break;
 449                         }
 450
 451                         /*
 452                          * Set Programmable Clock Mode in the Clock
 453                          * Control register.
 454                          */
 455                         clk = SDHCI_PROG_CLOCK_MODE;
 456                         div--;
 457                 } else {
 458                         /* Version 3.00 divisors must be a multiple of 2. */
 459                         if (host->max_clk <= clock) {
 460                                 div = 1;
 461                         } else {
 462                                 for (div = 2;
 463                                      div < SDHCI_MAX_DIV_SPEC_300;
 464                                      div += 2) {
 465                                         if ((host->max_clk / div) <= clock)
 466                                                 break;
 467                                 }
 468                         }
 469                         div >>= 1;
 470                 }
 471         } else {
 472                 /* Version 2.00 divisors must be a power of 2. */
 473                 for (div = 1; div < SDHCI_MAX_DIV_SPEC_200; div *= 2) {
 474                         if ((host->max_clk / div) <= clock)
 475                                 break;
 476                 }
 477                 div >>= 1;
 478         }
 479
 480         if (host->ops && host->ops->set_clock)
 481                 host->ops->set_clock(host, div);
 482
 483         clk |= (div & SDHCI_DIV_MASK) << SDHCI_DIVIDER_SHIFT;
 484         clk |= ((div & SDHCI_DIV_HI_MASK) >> SDHCI_DIV_MASK_LEN)
 485                 << SDHCI_DIVIDER_HI_SHIFT;
 486         clk |= SDHCI_CLOCK_INT_EN;
 487         sdhci_writew(host, clk, SDHCI_CLOCK_CONTROL);
 488
 489         /* Wait max 20 ms */
 490         timeout = 20;
 491         while (!((clk = sdhci_readw(host, SDHCI_CLOCK_CONTROL))
 492                 & SDHCI_CLOCK_INT_STABLE)) {
 493                 if (timeout == 0) {
 494                         printf("%s: Internal clock never stabilised.\n",
 495                                __func__);
 496                         return -EBUSY;
 497                 }
 498                 timeout--;
 499                 udelay(1000);
 500         }
 501
 502         clk |= SDHCI_CLOCK_CARD_EN;
 503         sdhci_writew(host, clk, SDHCI_CLOCK_CONTROL);
 504         return 0;
 505 }
 506
 507 static void sdhci_set_power(struct sdhci_host *host, unsigned short power)
 508 {
 509         u8 pwr = 0;
 510
 511         if (power != (unsigned short)-1) {
 512                 switch (1 << power) {
 513                 case MMC_VDD_165_195:
 514                         pwr = SDHCI_POWER_180;
 515                         break;
 516                 case MMC_VDD_29_30:
 517                 case MMC_VDD_30_31:
 518                         pwr = SDHCI_POWER_300;
 519                         break;
 520                 case MMC_VDD_32_33:
 521                 case MMC_VDD_33_34:
 522                         pwr = SDHCI_POWER_330;
 523                         break;
 524                 }
 525         }
 526
 527         if (pwr == 0) {
 528                 sdhci_writeb(host, 0, SDHCI_POWER_CONTROL);
 529                 return;
 530         }
 531
 532         pwr |= SDHCI_POWER_ON;
 533
 534         sdhci_writeb(host, pwr, SDHCI_POWER_CONTROL);
 535 }
 536
 537 #ifdef CONFIG_DM_MMC
 538 static int sdhci_set_ios(struct udevice *dev)
 539 {
 540         struct mmc *mmc = mmc_get_mmc_dev(dev);
 541 #else
 542 static int sdhci_set_ios(struct mmc *mmc)
 543 {
 544 #endif
 545         u32 ctrl;
 546         struct sdhci_host *host = mmc->priv;
 547
 548         if (host->ops && host->ops->set_control_reg)
 549                 host->ops->set_control_reg(host);
 550
 551         if (mmc->clock != host->clock)
 552                 sdhci_set_clock(mmc, mmc->clock);
 553
 554         if (mmc->clk_disable)
 555                 sdhci_set_clock(mmc, 0);
 556
 557         /* Set bus width */
 558         ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
 559         if (mmc->bus_width == 8) {
 560                 ctrl &= ~SDHCI_CTRL_4BITBUS;
 561                 if ((SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300) ||
 562                                 (host->quirks & SDHCI_QUIRK_USE_WIDE8))
 563                         ctrl |= SDHCI_CTRL_8BITBUS;
 564         } else {
 565                 if ((SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300) ||
 566                                 (host->quirks & SDHCI_QUIRK_USE_WIDE8))
 567                         ctrl &= ~SDHCI_CTRL_8BITBUS;
 568                 if (mmc->bus_width == 4)
 569                         ctrl |= SDHCI_CTRL_4BITBUS;
 570                 else
 571                         ctrl &= ~SDHCI_CTRL_4BITBUS;
 572         }
 573
 574         if (mmc->clock > 26000000)
 575                 ctrl |= SDHCI_CTRL_HISPD;
 576         else
 577                 ctrl &= ~SDHCI_CTRL_HISPD;
 578
 579         if ((host->quirks & SDHCI_QUIRK_NO_HISPD_BIT) ||
 580             (host->quirks & SDHCI_QUIRK_BROKEN_HISPD_MODE))
 581                 ctrl &= ~SDHCI_CTRL_HISPD;
 582
 583         sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
 584
 585         /* If available, call the driver specific "post" set_ios() function */
 586         if (host->ops && host->ops->set_ios_post)
 587                 host->ops->set_ios_post(host);
 588
 589         return 0;
 590 }
 591
 592 static int sdhci_init(struct mmc *mmc)
 593 {
 594         struct sdhci_host *host = mmc->priv;
 595 #if CONFIG_IS_ENABLED(DM_MMC) && CONFIG_IS_ENABLED(DM_GPIO)
 596         struct udevice *dev = mmc->dev;
 597
 598         gpio_request_by_name(dev, "cd-gpio", 0,
 599                              &host->cd_gpio, GPIOD_IS_IN);
 600 #endif
 601
 602         sdhci_reset(host, SDHCI_RESET_ALL);
 603
 604         if ((host->quirks & SDHCI_QUIRK_32BIT_DMA_ADDR) && !aligned_buffer) {
 605                 aligned_buffer = memalign(8, 512*1024);
 606                 if (!aligned_buffer) {
 607                         printf("%s: Aligned buffer alloc failed!!!\n",
 608                                __func__);
 609                         return -ENOMEM;
 610                 }
 611         }
 612
 613         sdhci_set_power(host, fls(mmc->cfg->voltages) - 1);
 614
 615         if (host->ops && host->ops->get_cd)
 616                 host->ops->get_cd(host);
 617
 618         /* Enable only interrupts served by the SD controller */
 619         sdhci_writel(host, SDHCI_INT_DATA_MASK | SDHCI_INT_CMD_MASK,
 620                      SDHCI_INT_ENABLE);
 621         /* Mask all sdhci interrupt sources */
 622         sdhci_writel(host, 0x0, SDHCI_SIGNAL_ENABLE);
 623
 624         return 0;
 625 }
 626
 627 #ifdef CONFIG_DM_MMC
 628 int sdhci_probe(struct udevice *dev)
 629 {
 630         struct mmc *mmc = mmc_get_mmc_dev(dev);
 631
 632         return sdhci_init(mmc);
 633 }
 634
 635 int sdhci_get_cd(struct udevice *dev)
 636 {
 637         struct mmc *mmc = mmc_get_mmc_dev(dev);
 638         struct sdhci_host *host = mmc->priv;
 639         int value;
 640
 641         /* If nonremovable, assume that the card is always present. */
 642         if (mmc->cfg->host_caps & MMC_CAP_NONREMOVABLE)
 643                 return 1;
 644         /* If polling, assume that the card is always present. */
 645         if (mmc->cfg->host_caps & MMC_CAP_NEEDS_POLL)
 646                 return 1;
 647
 648 #if CONFIG_IS_ENABLED(DM_GPIO)
 649         value = dm_gpio_get_value(&host->cd_gpio);
 650         if (value >= 0) {
 651                 if (mmc->cfg->host_caps & MMC_CAP_CD_ACTIVE_HIGH)
 652                         return !value;
 653                 else
 654                         return value;
 655         }
 656 #endif
 657         value = !!(sdhci_readl(host, SDHCI_PRESENT_STATE) &
 658                    SDHCI_CARD_PRESENT);
 659         if (mmc->cfg->host_caps & MMC_CAP_CD_ACTIVE_HIGH)
 660                 return !value;
 661         else
 662                 return value;
 663 }
 664
 665 const struct dm_mmc_ops sdhci_ops = {
 666         .send_cmd       = sdhci_send_command,
 667         .set_ios        = sdhci_set_ios,
 668         .get_cd         = sdhci_get_cd,
 669 #ifdef MMC_SUPPORTS_TUNING
 670         .execute_tuning = sdhci_execute_tuning,
 671 #endif
 672 };
 673 #else
 674 static const struct mmc_ops sdhci_ops = {
 675         .send_cmd       = sdhci_send_command,
 676         .set_ios        = sdhci_set_ios,
 677         .init           = sdhci_init,
 678 };
 679 #endif
 680
 681 int sdhci_setup_cfg(struct mmc_config *cfg, struct sdhci_host *host,
 682                 u32 f_max, u32 f_min)
 683 {
 684         u32 caps, caps_1 = 0;
 685 #if CONFIG_IS_ENABLED(DM_MMC)
 686         u32 mask[2] = {0};
 687         int ret;
 688         ret = dev_read_u32_array(host->mmc->dev, "sdhci-caps-mask",
 689                                  mask, 2);
 690         if (ret && ret != -1)
 691                 return ret;
 692
 693         caps = ~mask[1] & sdhci_readl(host, SDHCI_CAPABILITIES);
 694 #else
 695         caps = sdhci_readl(host, SDHCI_CAPABILITIES);
 696 #endif
 697
 698 #ifdef CONFIG_MMC_SDHCI_SDMA
 699         if (!(caps & SDHCI_CAN_DO_SDMA)) {
 700                 printf("%s: Your controller doesn't support SDMA!!\n",
 701                        __func__);
 702                 return -EINVAL;
 703         }
 704
 705         host->flags |= USE_SDMA;
 706 #endif
 707 #if CONFIG_IS_ENABLED(MMC_SDHCI_ADMA)
 708         if (!(caps & SDHCI_CAN_DO_ADMA2)) {
 709                 printf("%s: Your controller doesn't support SDMA!!\n",
 710                        __func__);
 711                 return -EINVAL;
 712         }
 713         host->adma_desc_table = (struct sdhci_adma_desc *)
 714                                 memalign(ARCH_DMA_MINALIGN, ADMA_TABLE_SZ);
 715
 716         host->adma_addr = (dma_addr_t)host->adma_desc_table;
 717 #ifdef CONFIG_DMA_ADDR_T_64BIT
 718         host->flags |= USE_ADMA64;
 719 #else
 720         host->flags |= USE_ADMA;
 721 #endif
 722 #endif
 723         if (host->quirks & SDHCI_QUIRK_REG32_RW)
 724                 host->version =
 725                         sdhci_readl(host, SDHCI_HOST_VERSION - 2) >> 16;
 726         else
 727                 host->version = sdhci_readw(host, SDHCI_HOST_VERSION);
 728
 729         cfg->name = host->name;
 730 #ifndef CONFIG_DM_MMC
 731         cfg->ops = &sdhci_ops;
 732 #endif
 733
 734         /* Check whether the clock multiplier is supported or not */
 735         if (SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300) {
 736 #if CONFIG_IS_ENABLED(DM_MMC)
 737                 caps_1 = ~mask[0] & sdhci_readl(host, SDHCI_CAPABILITIES_1);
 738 #else
 739                 caps_1 = sdhci_readl(host, SDHCI_CAPABILITIES_1);
 740 #endif
 741                 host->clk_mul = (caps_1 & SDHCI_CLOCK_MUL_MASK) >>
 742                                 SDHCI_CLOCK_MUL_SHIFT;
 743         }
 744
 745         if (host->max_clk == 0) {
 746                 if (SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300)
 747                         host->max_clk = (caps & SDHCI_CLOCK_V3_BASE_MASK) >>
 748                                 SDHCI_CLOCK_BASE_SHIFT;
 749                 else
 750                         host->max_clk = (caps & SDHCI_CLOCK_BASE_MASK) >>
 751                                 SDHCI_CLOCK_BASE_SHIFT;
 752                 host->max_clk *= 1000000;
 753                 if (host->clk_mul)
 754                         host->max_clk *= host->clk_mul;
 755         }
 756         if (host->max_clk == 0) {
 757                 printf("%s: Hardware doesn't specify base clock frequency\n",
 758                        __func__);
 759                 return -EINVAL;
 760         }
 761         if (f_max && (f_max < host->max_clk))
 762                 cfg->f_max = f_max;
 763         else
 764                 cfg->f_max = host->max_clk;
 765         if (f_min)
 766                 cfg->f_min = f_min;
 767         else {
 768                 if (SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300)
 769                         cfg->f_min = cfg->f_max / SDHCI_MAX_DIV_SPEC_300;
 770                 else
 771                         cfg->f_min = cfg->f_max / SDHCI_MAX_DIV_SPEC_200;
 772         }
 773         cfg->voltages = 0;
 774         if (caps & SDHCI_CAN_VDD_330)
 775                 cfg->voltages |= MMC_VDD_32_33 | MMC_VDD_33_34;
 776         if (caps & SDHCI_CAN_VDD_300)
 777                 cfg->voltages |= MMC_VDD_29_30 | MMC_VDD_30_31;
 778         if (caps & SDHCI_CAN_VDD_180)
 779                 cfg->voltages |= MMC_VDD_165_195;
 780
 781         if (host->quirks & SDHCI_QUIRK_BROKEN_VOLTAGE)
 782                 cfg->voltages |= host->voltages;
 783
 784         cfg->host_caps |= MMC_MODE_HS | MMC_MODE_HS_52MHz | MMC_MODE_4BIT;
 785
 786         /* Since Host Controller Version3.0 */
 787         if (SDHCI_GET_VERSION(host) >= SDHCI_SPEC_300) {
 788                 if (!(caps & SDHCI_CAN_DO_8BIT))
 789                         cfg->host_caps &= ~MMC_MODE_8BIT;
 790         }
 791
 792         if (host->quirks & SDHCI_QUIRK_BROKEN_HISPD_MODE) {
 793                 cfg->host_caps &= ~MMC_MODE_HS;
 794                 cfg->host_caps &= ~MMC_MODE_HS_52MHz;
 795         }
 796
 797         if (!(cfg->voltages & MMC_VDD_165_195) ||
 798             (host->quirks & SDHCI_QUIRK_NO_1_8_V))
 799                 caps_1 &= ~(SDHCI_SUPPORT_SDR104 | SDHCI_SUPPORT_SDR50 |
 800                             SDHCI_SUPPORT_DDR50);
 801
 802         if (caps_1 & (SDHCI_SUPPORT_SDR104 | SDHCI_SUPPORT_SDR50 |
 803                       SDHCI_SUPPORT_DDR50))
 804                 cfg->host_caps |= MMC_CAP(UHS_SDR12) | MMC_CAP(UHS_SDR25);
 805
 806         if (caps_1 & SDHCI_SUPPORT_SDR104) {
 807                 cfg->host_caps |= MMC_CAP(UHS_SDR104) | MMC_CAP(UHS_SDR50);
 808                 /*
 809                  * SD3.0: SDR104 is supported so (for eMMC) the caps2
 810                  * field can be promoted to support HS200.
 811                  */
 812                 cfg->host_caps |= MMC_CAP(MMC_HS_200);
 813         } else if (caps_1 & SDHCI_SUPPORT_SDR50) {
 814                 cfg->host_caps |= MMC_CAP(UHS_SDR50);
 815         }
 816
 817         if (caps_1 & SDHCI_SUPPORT_DDR50)
 818                 cfg->host_caps |= MMC_CAP(UHS_DDR50);
 819
 820         if (host->host_caps)
 821                 cfg->host_caps |= host->host_caps;
 822
 823         cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
 824
 825         return 0;
 826 }
 827
 828 #ifdef CONFIG_BLK
 829 int sdhci_bind(struct udevice *dev, struct mmc *mmc, struct mmc_config *cfg)
 830 {
 831         return mmc_bind(dev, mmc, cfg);
 832 }
 833 #else
 834 int add_sdhci(struct sdhci_host *host, u32 f_max, u32 f_min)
 835 {
 836         int ret;
 837
 838         ret = sdhci_setup_cfg(&host->cfg, host, f_max, f_min);
 839         if (ret)
 840                 return ret;
 841
 842         host->mmc = mmc_create(&host->cfg, host);
 843         if (host->mmc == NULL) {
 844                 printf("%s: mmc create fail!\n", __func__);
 845                 return -ENOMEM;
 846         }
 847
 848         return 0;
 849 }
 850 #endif