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