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 } 233