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