fastboot: sparse: resync common/image-sparse.c (part 1)
[oweals/u-boot.git] / 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 #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 }