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