mmc_write.c 4.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203
  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. #include <config.h>
  10. #include <common.h>
  11. #include <part.h>
  12. #include <div64.h>
  13. #include <linux/math64.h>
  14. #include "mmc_private.h"
  15. static ulong mmc_erase_t(struct mmc *mmc, ulong start, lbaint_t blkcnt)
  16. {
  17. struct mmc_cmd cmd;
  18. ulong end;
  19. int err, start_cmd, end_cmd;
  20. if (mmc->high_capacity) {
  21. end = start + blkcnt - 1;
  22. } else {
  23. end = (start + blkcnt - 1) * mmc->write_bl_len;
  24. start *= mmc->write_bl_len;
  25. }
  26. if (IS_SD(mmc)) {
  27. start_cmd = SD_CMD_ERASE_WR_BLK_START;
  28. end_cmd = SD_CMD_ERASE_WR_BLK_END;
  29. } else {
  30. start_cmd = MMC_CMD_ERASE_GROUP_START;
  31. end_cmd = MMC_CMD_ERASE_GROUP_END;
  32. }
  33. cmd.cmdidx = start_cmd;
  34. cmd.cmdarg = start;
  35. cmd.resp_type = MMC_RSP_R1;
  36. err = mmc_send_cmd(mmc, &cmd, NULL);
  37. if (err)
  38. goto err_out;
  39. cmd.cmdidx = end_cmd;
  40. cmd.cmdarg = end;
  41. err = mmc_send_cmd(mmc, &cmd, NULL);
  42. if (err)
  43. goto err_out;
  44. cmd.cmdidx = MMC_CMD_ERASE;
  45. cmd.cmdarg = MMC_ERASE_ARG;
  46. cmd.resp_type = MMC_RSP_R1b;
  47. err = mmc_send_cmd(mmc, &cmd, NULL);
  48. if (err)
  49. goto err_out;
  50. return 0;
  51. err_out:
  52. puts("mmc erase failed\n");
  53. return err;
  54. }
  55. unsigned long mmc_berase(struct blk_desc *block_dev, lbaint_t start,
  56. lbaint_t blkcnt)
  57. {
  58. int dev_num = block_dev->devnum;
  59. int err = 0;
  60. u32 start_rem, blkcnt_rem;
  61. struct mmc *mmc = find_mmc_device(dev_num);
  62. lbaint_t blk = 0, blk_r = 0;
  63. int timeout = 1000;
  64. if (!mmc)
  65. return -1;
  66. err = mmc_select_hwpart(dev_num, block_dev->hwpart);
  67. if (err < 0)
  68. return -1;
  69. /*
  70. * We want to see if the requested start or total block count are
  71. * unaligned. We discard the whole numbers and only care about the
  72. * remainder.
  73. */
  74. err = div_u64_rem(start, mmc->erase_grp_size, &start_rem);
  75. err = div_u64_rem(blkcnt, mmc->erase_grp_size, &blkcnt_rem);
  76. if (start_rem || blkcnt_rem)
  77. printf("\n\nCaution! Your devices Erase group is 0x%x\n"
  78. "The erase range would be change to "
  79. "0x" LBAF "~0x" LBAF "\n\n",
  80. mmc->erase_grp_size, start & ~(mmc->erase_grp_size - 1),
  81. ((start + blkcnt + mmc->erase_grp_size)
  82. & ~(mmc->erase_grp_size - 1)) - 1);
  83. while (blk < blkcnt) {
  84. blk_r = ((blkcnt - blk) > mmc->erase_grp_size) ?
  85. mmc->erase_grp_size : (blkcnt - blk);
  86. err = mmc_erase_t(mmc, start + blk, blk_r);
  87. if (err)
  88. break;
  89. blk += blk_r;
  90. /* Waiting for the ready status */
  91. if (mmc_send_status(mmc, timeout))
  92. return 0;
  93. }
  94. return blk;
  95. }
  96. static ulong mmc_write_blocks(struct mmc *mmc, lbaint_t start,
  97. lbaint_t blkcnt, const void *src)
  98. {
  99. struct mmc_cmd cmd;
  100. struct mmc_data data;
  101. int timeout = 1000;
  102. if ((start + blkcnt) > mmc->block_dev.lba) {
  103. printf("MMC: block number 0x" LBAF " exceeds max(0x" LBAF ")\n",
  104. start + blkcnt, mmc->block_dev.lba);
  105. return 0;
  106. }
  107. if (blkcnt == 0)
  108. return 0;
  109. else if (blkcnt == 1)
  110. cmd.cmdidx = MMC_CMD_WRITE_SINGLE_BLOCK;
  111. else
  112. cmd.cmdidx = MMC_CMD_WRITE_MULTIPLE_BLOCK;
  113. if (mmc->high_capacity)
  114. cmd.cmdarg = start;
  115. else
  116. cmd.cmdarg = start * mmc->write_bl_len;
  117. cmd.resp_type = MMC_RSP_R1;
  118. data.src = src;
  119. data.blocks = blkcnt;
  120. data.blocksize = mmc->write_bl_len;
  121. data.flags = MMC_DATA_WRITE;
  122. if (mmc_send_cmd(mmc, &cmd, &data)) {
  123. printf("mmc write failed\n");
  124. return 0;
  125. }
  126. /* SPI multiblock writes terminate using a special
  127. * token, not a STOP_TRANSMISSION request.
  128. */
  129. if (!mmc_host_is_spi(mmc) && blkcnt > 1) {
  130. cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION;
  131. cmd.cmdarg = 0;
  132. cmd.resp_type = MMC_RSP_R1b;
  133. if (mmc_send_cmd(mmc, &cmd, NULL)) {
  134. printf("mmc fail to send stop cmd\n");
  135. return 0;
  136. }
  137. }
  138. /* Waiting for the ready status */
  139. if (mmc_send_status(mmc, timeout))
  140. return 0;
  141. return blkcnt;
  142. }
  143. ulong mmc_bwrite(struct blk_desc *block_dev, lbaint_t start, lbaint_t blkcnt,
  144. const void *src)
  145. {
  146. int dev_num = block_dev->devnum;
  147. lbaint_t cur, blocks_todo = blkcnt;
  148. int err;
  149. struct mmc *mmc = find_mmc_device(dev_num);
  150. if (!mmc)
  151. return 0;
  152. err = mmc_select_hwpart(dev_num, block_dev->hwpart);
  153. if (err < 0)
  154. return 0;
  155. if (mmc_set_blocklen(mmc, mmc->write_bl_len))
  156. return 0;
  157. do {
  158. cur = (blocks_todo > mmc->cfg->b_max) ?
  159. mmc->cfg->b_max : blocks_todo;
  160. if (mmc_write_blocks(mmc, start, cur, src) != cur)
  161. return 0;
  162. blocks_todo -= cur;
  163. start += cur;
  164. src += cur * mmc->write_bl_len;
  165. } while (blocks_todo > 0);
  166. return blkcnt;
  167. }