1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37#include <config.h>
38#include <common.h>
39#include <blk.h>
40#include <image-sparse.h>
41#include <div64.h>
42#include <log.h>
43#include <malloc.h>
44#include <part.h>
45#include <sparse_format.h>
46#include <asm/cache.h>
47
48#include <linux/math64.h>
49
50static void default_log(const char *ignored, char *response) {}
51
52int write_sparse_image(struct sparse_storage *info,
53 const char *part_name, void *data, char *response)
54{
55 lbaint_t blk;
56 lbaint_t blkcnt;
57 lbaint_t blks;
58 uint64_t bytes_written = 0;
59 unsigned int chunk;
60 unsigned int offset;
61 uint64_t chunk_data_sz;
62 uint32_t *fill_buf = NULL;
63 uint32_t fill_val;
64 sparse_header_t *sparse_header;
65 chunk_header_t *chunk_header;
66 uint32_t total_blocks = 0;
67 int fill_buf_num_blks;
68 int i;
69 int j;
70
71 fill_buf_num_blks = CONFIG_IMAGE_SPARSE_FILLBUF_SIZE / info->blksz;
72
73
74 sparse_header = (sparse_header_t *)data;
75
76 data += sparse_header->file_hdr_sz;
77 if (sparse_header->file_hdr_sz > sizeof(sparse_header_t)) {
78
79
80
81
82 data += (sparse_header->file_hdr_sz - sizeof(sparse_header_t));
83 }
84
85 if (!info->mssg)
86 info->mssg = default_log;
87
88 debug("=== Sparse Image Header ===\n");
89 debug("magic: 0x%x\n", sparse_header->magic);
90 debug("major_version: 0x%x\n", sparse_header->major_version);
91 debug("minor_version: 0x%x\n", sparse_header->minor_version);
92 debug("file_hdr_sz: %d\n", sparse_header->file_hdr_sz);
93 debug("chunk_hdr_sz: %d\n", sparse_header->chunk_hdr_sz);
94 debug("blk_sz: %d\n", sparse_header->blk_sz);
95 debug("total_blks: %d\n", sparse_header->total_blks);
96 debug("total_chunks: %d\n", sparse_header->total_chunks);
97
98
99
100
101
102 div_u64_rem(sparse_header->blk_sz, info->blksz, &offset);
103 if (offset) {
104 printf("%s: Sparse image block size issue [%u]\n",
105 __func__, sparse_header->blk_sz);
106 info->mssg("sparse image block size issue", response);
107 return -1;
108 }
109
110 puts("Flashing Sparse Image\n");
111
112
113 blk = info->start;
114 for (chunk = 0; chunk < sparse_header->total_chunks; chunk++) {
115
116 chunk_header = (chunk_header_t *)data;
117 data += sizeof(chunk_header_t);
118
119 if (chunk_header->chunk_type != CHUNK_TYPE_RAW) {
120 debug("=== Chunk Header ===\n");
121 debug("chunk_type: 0x%x\n", chunk_header->chunk_type);
122 debug("chunk_data_sz: 0x%x\n", chunk_header->chunk_sz);
123 debug("total_size: 0x%x\n", chunk_header->total_sz);
124 }
125
126 if (sparse_header->chunk_hdr_sz > sizeof(chunk_header_t)) {
127
128
129
130
131 data += (sparse_header->chunk_hdr_sz -
132 sizeof(chunk_header_t));
133 }
134
135 chunk_data_sz = ((u64)sparse_header->blk_sz) * chunk_header->chunk_sz;
136 blkcnt = DIV_ROUND_UP_ULL(chunk_data_sz, info->blksz);
137 switch (chunk_header->chunk_type) {
138 case CHUNK_TYPE_RAW:
139 if (chunk_header->total_sz !=
140 (sparse_header->chunk_hdr_sz + chunk_data_sz)) {
141 info->mssg("Bogus chunk size for chunk type Raw",
142 response);
143 return -1;
144 }
145
146 if (blk + blkcnt > info->start + info->size) {
147 printf(
148 "%s: Request would exceed partition size!\n",
149 __func__);
150 info->mssg("Request would exceed partition size!",
151 response);
152 return -1;
153 }
154
155 blks = info->write(info, blk, blkcnt, data);
156
157 if (blks < blkcnt) {
158 printf("%s: %s" LBAFU " [" LBAFU "]\n",
159 __func__, "Write failed, block #",
160 blk, blks);
161 info->mssg("flash write failure", response);
162 return -1;
163 }
164 blk += blks;
165 bytes_written += ((u64)blkcnt) * info->blksz;
166 total_blocks += chunk_header->chunk_sz;
167 data += chunk_data_sz;
168 break;
169
170 case CHUNK_TYPE_FILL:
171 if (chunk_header->total_sz !=
172 (sparse_header->chunk_hdr_sz + sizeof(uint32_t))) {
173 info->mssg("Bogus chunk size for chunk type FILL", response);
174 return -1;
175 }
176
177 fill_buf = (uint32_t *)
178 memalign(ARCH_DMA_MINALIGN,
179 ROUNDUP(
180 info->blksz * fill_buf_num_blks,
181 ARCH_DMA_MINALIGN));
182 if (!fill_buf) {
183 info->mssg("Malloc failed for: CHUNK_TYPE_FILL",
184 response);
185 return -1;
186 }
187
188 fill_val = *(uint32_t *)data;
189 data = (char *)data + sizeof(uint32_t);
190
191 for (i = 0;
192 i < (info->blksz * fill_buf_num_blks /
193 sizeof(fill_val));
194 i++)
195 fill_buf[i] = fill_val;
196
197 if (blk + blkcnt > info->start + info->size) {
198 printf(
199 "%s: Request would exceed partition size!\n",
200 __func__);
201 info->mssg("Request would exceed partition size!",
202 response);
203 return -1;
204 }
205
206 for (i = 0; i < blkcnt;) {
207 j = blkcnt - i;
208 if (j > fill_buf_num_blks)
209 j = fill_buf_num_blks;
210 blks = info->write(info, blk, j, fill_buf);
211
212 if (blks < j) {
213 printf("%s: %s " LBAFU " [%d]\n",
214 __func__,
215 "Write failed, block #",
216 blk, j);
217 info->mssg("flash write failure",
218 response);
219 free(fill_buf);
220 return -1;
221 }
222 blk += blks;
223 i += j;
224 }
225 bytes_written += ((u64)blkcnt) * info->blksz;
226 total_blocks += DIV_ROUND_UP_ULL(chunk_data_sz,
227 sparse_header->blk_sz);
228 free(fill_buf);
229 break;
230
231 case CHUNK_TYPE_DONT_CARE:
232 blk += info->reserve(info, blk, blkcnt);
233 total_blocks += chunk_header->chunk_sz;
234 break;
235
236 case CHUNK_TYPE_CRC32:
237 if (chunk_header->total_sz !=
238 sparse_header->chunk_hdr_sz) {
239 info->mssg("Bogus chunk size for chunk type Dont Care",
240 response);
241 return -1;
242 }
243 total_blocks += chunk_header->chunk_sz;
244 data += chunk_data_sz;
245 break;
246
247 default:
248 printf("%s: Unknown chunk type: %x\n", __func__,
249 chunk_header->chunk_type);
250 info->mssg("Unknown chunk type", response);
251 return -1;
252 }
253 }
254
255 debug("Wrote %d blocks, expected to write %d blocks\n",
256 total_blocks, sparse_header->total_blks);
257 printf("........ wrote %llu bytes to '%s'\n", bytes_written, part_name);
258
259 if (total_blocks != sparse_header->total_blks) {
260 info->mssg("sparse image write failure", response);
261 return -1;
262 }
263
264 return 0;
265}
266