common/fb_mmc.c

   1 /*
   2  * Copyright 2014 Broadcom Corporation.
   3  *
   4  * SPDX-License-Identifier:     GPL-2.0+
   5  */
   6
   7 #include <config.h>
   8 #include <common.h>
   9 #include <blk.h>
  10 #include <fastboot.h>
  11 #include <fb_mmc.h>
  12 #include <image-sparse.h>
  13 #include <part.h>
  14 #include <mmc.h>
  15 #include <div64.h>
  16
  17 #if defined(CONFIG_EFI_PARTITION) && !defined(CONFIG_FASTBOOT_GPT_NAME)
  18 #define CONFIG_FASTBOOT_GPT_NAME GPT_ENTRY_NAME
  19 #endif
  20
  21
  22 #if defined(CONFIG_DOS_PARTITION) && !defined(CONFIG_FASTBOOT_MBR_NAME)
  23 #define CONFIG_FASTBOOT_MBR_NAME "mbr"
  24 #endif
  25
  26 struct fb_mmc_sparse {
  27         struct blk_desc *dev_desc;
  28 };
  29
  30 static int part_get_info_by_name_or_alias(struct blk_desc *dev_desc,
  31                 const char *name, disk_partition_t *info)
  32 {
  33         int ret;
  34
  35         ret = part_get_info_by_name(dev_desc, name, info);
  36         if (ret) {
  37                 /* strlen("fastboot_partition_alias_") + 32(part_name) + 1 */
  38                 char env_alias_name[25 + 32 + 1];
  39                 char *aliased_part_name;
  40
  41                 /* check for alias */
  42                 strcpy(env_alias_name, "fastboot_partition_alias_");
  43                 strncat(env_alias_name, name, 32);
  44                 aliased_part_name = getenv(env_alias_name);
  45                 if (aliased_part_name != NULL)
  46                         ret = part_get_info_by_name(dev_desc,
  47                                         aliased_part_name, info);
  48         }
  49         return ret;
  50 }
  51
  52 static lbaint_t fb_mmc_sparse_write(struct sparse_storage *info,
  53                 lbaint_t blk, lbaint_t blkcnt, const void *buffer)
  54 {
  55         struct fb_mmc_sparse *sparse = info->priv;
  56         struct blk_desc *dev_desc = sparse->dev_desc;
  57
  58         return blk_dwrite(dev_desc, blk, blkcnt, buffer);
  59 }
  60
  61 static lbaint_t fb_mmc_sparse_reserve(struct sparse_storage *info,
  62                 lbaint_t blk, lbaint_t blkcnt)
  63 {
  64         return blkcnt;
  65 }
  66
  67 static void write_raw_image(struct blk_desc *dev_desc, disk_partition_t *info,
  68                 const char *part_name, void *buffer,
  69                 unsigned int download_bytes)
  70 {
  71         lbaint_t blkcnt;
  72         lbaint_t blks;
  73
  74         /* determine number of blocks to write */
  75         blkcnt = ((download_bytes + (info->blksz - 1)) & ~(info->blksz - 1));
  76         blkcnt = lldiv(blkcnt, info->blksz);
  77
  78         if (blkcnt > info->size) {
  79                 error("too large for partition: '%s'\n", part_name);
  80                 fastboot_fail("too large for partition");
  81                 return;
  82         }
  83
  84         puts("Flashing Raw Image\n");
  85
  86         blks = blk_dwrite(dev_desc, info->start, blkcnt, buffer);
  87         if (blks != blkcnt) {
  88                 error("failed writing to device %d\n", dev_desc->devnum);
  89                 fastboot_fail("failed writing to device");
  90                 return;
  91         }
  92
  93         printf("........ wrote " LBAFU " bytes to '%s'\n", blkcnt * info->blksz,
  94                part_name);
  95         fastboot_okay("");
  96 }
  97
  98 void fb_mmc_flash_write(const char *cmd, void *download_buffer,
  99                         unsigned int download_bytes)
 100 {
 101         struct blk_desc *dev_desc;
 102         disk_partition_t info;
 103
 104         dev_desc = blk_get_dev("mmc", CONFIG_FASTBOOT_FLASH_MMC_DEV);
 105         if (!dev_desc || dev_desc->type == DEV_TYPE_UNKNOWN) {
 106                 error("invalid mmc device\n");
 107                 fastboot_fail("invalid mmc device");
 108                 return;
 109         }
 110
 111 #ifdef CONFIG_EFI_PARTITION
 112         if (strcmp(cmd, CONFIG_FASTBOOT_GPT_NAME) == 0) {
 113                 printf("%s: updating MBR, Primary and Backup GPT(s)\n",
 114                        __func__);
 115                 if (is_valid_gpt_buf(dev_desc, download_buffer)) {
 116                         printf("%s: invalid GPT - refusing to write to flash\n",
 117                                __func__);
 118                         fastboot_fail("invalid GPT partition");
 119                         return;
 120                 }
 121                 if (write_mbr_and_gpt_partitions(dev_desc, download_buffer)) {
 122                         printf("%s: writing GPT partitions failed\n", __func__);
 123                         fastboot_fail("writing GPT partitions failed");
 124                         return;
 125                 }
 126                 printf("........ success\n");
 127                 fastboot_okay("");
 128                 return;
 129         }
 130 #endif
 131
 132 #ifdef CONFIG_DOS_PARTITION
 133         if (strcmp(cmd, CONFIG_FASTBOOT_MBR_NAME) == 0) {
 134                 printf("%s: updating MBR\n", __func__);
 135                 if (is_valid_dos_buf(download_buffer)) {
 136                         printf("%s: invalid MBR - refusing to write to flash\n",
 137                                __func__);
 138                         fastboot_fail("invalid MBR partition");
 139                         return;
 140                 }
 141                 if (write_mbr_partition(dev_desc, download_buffer)) {
 142                         printf("%s: writing MBR partition failed\n", __func__);
 143                         fastboot_fail("writing MBR partition failed");
 144                         return;
 145                 }
 146                 printf("........ success\n");
 147                 fastboot_okay("");
 148                 return;
 149         }
 150 #endif
 151
 152         if (part_get_info_by_name_or_alias(dev_desc, cmd, &info)) {
 153                 error("cannot find partition: '%s'\n", cmd);
 154                 fastboot_fail("cannot find partition");
 155                 return;
 156         }
 157
 158         if (is_sparse_image(download_buffer)) {
 159                 struct fb_mmc_sparse sparse_priv;
 160                 struct sparse_storage sparse;
 161
 162                 sparse_priv.dev_desc = dev_desc;
 163
 164                 sparse.blksz = info.blksz;
 165                 sparse.start = info.start;
 166                 sparse.size = info.size;
 167                 sparse.write = fb_mmc_sparse_write;
 168                 sparse.reserve = fb_mmc_sparse_reserve;
 169
 170                 printf("Flashing sparse image at offset " LBAFU "\n",
 171                        sparse.start);
 172
 173                 sparse.priv = &sparse_priv;
 174                 write_sparse_image(&sparse, cmd, download_buffer,
 175                                    download_bytes);
 176         } else {
 177                 write_raw_image(dev_desc, &info, cmd, download_buffer,
 178                                 download_bytes);
 179         }
 180 }
 181
 182 void fb_mmc_erase(const char *cmd)
 183 {
 184         int ret;
 185         struct blk_desc *dev_desc;
 186         disk_partition_t info;
 187         lbaint_t blks, blks_start, blks_size, grp_size;
 188         struct mmc *mmc = find_mmc_device(CONFIG_FASTBOOT_FLASH_MMC_DEV);
 189
 190         if (mmc == NULL) {
 191                 error("invalid mmc device");
 192                 fastboot_fail("invalid mmc device");
 193                 return;
 194         }
 195
 196         dev_desc = blk_get_dev("mmc", CONFIG_FASTBOOT_FLASH_MMC_DEV);
 197         if (!dev_desc || dev_desc->type == DEV_TYPE_UNKNOWN) {
 198                 error("invalid mmc device");
 199                 fastboot_fail("invalid mmc device");
 200                 return;
 201         }
 202
 203         ret = part_get_info_by_name_or_alias(dev_desc, cmd, &info);
 204         if (ret) {
 205                 error("cannot find partition: '%s'", cmd);
 206                 fastboot_fail("cannot find partition");
 207                 return;
 208         }
 209
 210         /* Align blocks to erase group size to avoid erasing other partitions */
 211         grp_size = mmc->erase_grp_size;
 212         blks_start = (info.start + grp_size - 1) & ~(grp_size - 1);
 213         if (info.size >= grp_size)
 214                 blks_size = (info.size - (blks_start - info.start)) &
 215                                 (~(grp_size - 1));
 216         else
 217                 blks_size = 0;
 218
 219         printf("Erasing blocks " LBAFU " to " LBAFU " due to alignment\n",
 220                blks_start, blks_start + blks_size);
 221
 222         blks = blk_derase(dev_desc, blks_start, blks_size);
 223         if (blks != blks_size) {
 224                 error("failed erasing from device %d", dev_desc->devnum);
 225                 fastboot_fail("failed erasing from device");
 226                 return;
 227         }
 228
 229         printf("........ erased " LBAFU " bytes from '%s'\n",
 230                blks_size * info.blksz, cmd);
 231         fastboot_okay("");
 232 }