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