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 <errno.h>
  10 #include <fastboot.h>
  11 #include <fb_mmc.h>
  12 #include <part.h>
  13 #include <aboot.h>
  14 #include <sparse_format.h>
  15 #include <mmc.h>
  16
  17 #ifndef CONFIG_FASTBOOT_GPT_NAME
  18 #define CONFIG_FASTBOOT_GPT_NAME GPT_ENTRY_NAME
  19 #endif
  20
  21 static char *response_str;
  22
  23 struct fb_mmc_sparse {
  24         block_dev_desc_t        *dev_desc;
  25 };
  26
  27 static int get_partition_info_efi_by_name_or_alias(block_dev_desc_t *dev_desc,
  28                 const char *name, disk_partition_t *info)
  29 {
  30         int ret;
  31
  32         ret = get_partition_info_efi_by_name(dev_desc, name, info);
  33         if (ret) {
  34                 /* strlen("fastboot_partition_alias_") + 32(part_name) + 1 */
  35                 char env_alias_name[25 + 32 + 1];
  36                 char *aliased_part_name;
  37
  38                 /* check for alias */
  39                 strcpy(env_alias_name, "fastboot_partition_alias_");
  40                 strncat(env_alias_name, name, 32);
  41                 aliased_part_name = getenv(env_alias_name);
  42                 if (aliased_part_name != NULL)
  43                         ret = get_partition_info_efi_by_name(dev_desc,
  44                                         aliased_part_name, info);
  45         }
  46         return ret;
  47 }
  48
  49
  50 static int fb_mmc_sparse_write(struct sparse_storage *storage,
  51                                void *priv,
  52                                unsigned int offset,
  53                                unsigned int size,
  54                                char *data)
  55 {
  56         struct fb_mmc_sparse *sparse = priv;
  57         block_dev_desc_t *dev_desc = sparse->dev_desc;
  58         int ret;
  59
  60         ret = dev_desc->block_write(dev_desc->dev, offset, size, data);
  61         if (!ret)
  62                 return -EIO;
  63
  64         return ret;
  65 }
  66
  67 static void write_raw_image(block_dev_desc_t *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 = blkcnt / info->blksz;
  77
  78         if (blkcnt > info->size) {
  79                 error("too large for partition: '%s'\n", part_name);
  80                 fastboot_fail(response_str, "too large for partition");
  81                 return;
  82         }
  83
  84         puts("Flashing Raw Image\n");
  85
  86         blks = dev_desc->block_write(dev_desc->dev, info->start, blkcnt,
  87                                      buffer);
  88         if (blks != blkcnt) {
  89                 error("failed writing to device %d\n", dev_desc->dev);
  90                 fastboot_fail(response_str, "failed writing to device");
  91                 return;
  92         }
  93
  94         printf("........ wrote " LBAFU " bytes to '%s'\n", blkcnt * info->blksz,
  95                part_name);
  96         fastboot_okay(response_str, "");
  97 }
  98
  99 void fb_mmc_flash_write(const char *cmd, void *download_buffer,
 100                         unsigned int download_bytes, char *response)
 101 {
 102         block_dev_desc_t *dev_desc;
 103         disk_partition_t info;
 104
 105         /* initialize the response buffer */
 106         response_str = response;
 107
 108         dev_desc = 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(response_str, "invalid mmc device");
 112                 return;
 113         }
 114
 115         if (strcmp(cmd, CONFIG_FASTBOOT_GPT_NAME) == 0) {
 116                 printf("%s: updating MBR, Primary and Backup GPT(s)\n",
 117                        __func__);
 118                 if (is_valid_gpt_buf(dev_desc, download_buffer)) {
 119                         printf("%s: invalid GPT - refusing to write to flash\n",
 120                                __func__);
 121                         fastboot_fail(response_str, "invalid GPT partition");
 122                         return;
 123                 }
 124                 if (write_mbr_and_gpt_partitions(dev_desc, download_buffer)) {
 125                         printf("%s: writing GPT partitions failed\n", __func__);
 126                         fastboot_fail(response_str,
 127                                       "writing GPT partitions failed");
 128                         return;
 129                 }
 130                 printf("........ success\n");
 131                 fastboot_okay(response_str, "");
 132                 return;
 133         } else if (get_partition_info_efi_by_name_or_alias(dev_desc, cmd, &info)) {
 134                 error("cannot find partition: '%s'\n", cmd);
 135                 fastboot_fail(response_str, "cannot find partition");
 136                 return;
 137         }
 138
 139         if (is_sparse_image(download_buffer)) {
 140                 struct fb_mmc_sparse sparse_priv;
 141                 sparse_storage_t sparse;
 142
 143                 sparse_priv.dev_desc = dev_desc;
 144
 145                 sparse.block_sz = info.blksz;
 146                 sparse.start = info.start;
 147                 sparse.size = info.size;
 148                 sparse.name = cmd;
 149                 sparse.write = fb_mmc_sparse_write;
 150
 151                 printf("Flashing sparse image at offset " LBAFU "\n",
 152                        info.start);
 153
 154                 store_sparse_image(&sparse, &sparse_priv, download_buffer);
 155         } else {
 156                 write_raw_image(dev_desc, &info, cmd, download_buffer,
 157                                 download_bytes);
 158         }
 159
 160         fastboot_okay(response_str, "");
 161 }
 162
 163 void fb_mmc_erase(const char *cmd, char *response)
 164 {
 165         int ret;
 166         block_dev_desc_t *dev_desc;
 167         disk_partition_t info;
 168         lbaint_t blks, blks_start, blks_size, grp_size;
 169         struct mmc *mmc = find_mmc_device(CONFIG_FASTBOOT_FLASH_MMC_DEV);
 170
 171         if (mmc == NULL) {
 172                 error("invalid mmc device");
 173                 fastboot_fail(response_str, "invalid mmc device");
 174                 return;
 175         }
 176
 177         /* initialize the response buffer */
 178         response_str = response;
 179
 180         dev_desc = get_dev("mmc", CONFIG_FASTBOOT_FLASH_MMC_DEV);
 181         if (!dev_desc || dev_desc->type == DEV_TYPE_UNKNOWN) {
 182                 error("invalid mmc device");
 183                 fastboot_fail(response_str, "invalid mmc device");
 184                 return;
 185         }
 186
 187         ret = get_partition_info_efi_by_name_or_alias(dev_desc, cmd, &info);
 188         if (ret) {
 189                 error("cannot find partition: '%s'", cmd);
 190                 fastboot_fail(response_str, "cannot find partition");
 191                 return;
 192         }
 193
 194         /* Align blocks to erase group size to avoid erasing other partitions */
 195         grp_size = mmc->erase_grp_size;
 196         blks_start = (info.start + grp_size - 1) & ~(grp_size - 1);
 197         if (info.size >= grp_size)
 198                 blks_size = (info.size - (blks_start - info.start)) &
 199                                 (~(grp_size - 1));
 200         else
 201                 blks_size = 0;
 202
 203         printf("Erasing blocks " LBAFU " to " LBAFU " due to alignment\n",
 204                blks_start, blks_start + blks_size);
 205
 206         blks = dev_desc->block_erase(dev_desc->dev, blks_start, blks_size);
 207         if (blks != blks_size) {
 208                 error("failed erasing from device %d", dev_desc->dev);
 209                 fastboot_fail(response_str, "failed erasing from device");
 210                 return;
 211         }
 212
 213         printf("........ erased " LBAFU " bytes from '%s'\n",
 214                blks_size * info.blksz, cmd);
 215         fastboot_okay(response_str, "");
 216 }