2 * Copyright 2012 Freescale Semiconductor, Inc.
4 * See file CREDITS for list of people who contributed to this
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 2 of
10 * the License, or (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
29 * Initialize to an invalid value.
31 static uint32_t next_pbl_cmd = 0x82000000;
33 * need to store all bytes in memory for calculating crc32, then write the
34 * bytes to image file for PBL boot.
36 static unsigned char mem_buf[1000000];
37 static unsigned char *pmem_buf = mem_buf;
39 static char *fname = "Unknown";
40 static int lineno = -1;
41 static struct pbl_header pblimage_header;
47 } endian_test = { {'l', '?', '?', 'b'} };
49 #define ENDIANNESS ((char)endian_test.l)
52 * The PBL can load up to 64 bytes at a time, so we split the U-Boot
53 * image into 64 byte chunks. PBL needs a command for each piece, of
54 * the form "81xxxxxx", where "xxxxxx" is the offset. Calculate the
55 * start offset by subtracting the size of the u-boot image from the
56 * top of the allowable 24-bit range.
58 static void init_next_pbl_cmd(FILE *fp_uboot)
61 int fd = fileno(fp_uboot);
63 if (fstat(fd, &st) == -1) {
64 printf("Error: Could not determine u-boot image size. %s\n",
69 next_pbl_cmd = 0x82000000 - st.st_size;
72 static void generate_pbl_cmd(void)
74 uint32_t val = next_pbl_cmd;
78 for (i = 3; i >= 0; i--) {
79 *pmem_buf++ = (val >> (i * 8)) & 0xff;
84 static void pbl_fget(size_t size, FILE *stream)
89 while (size && (c_temp = fgetc(stream)) != EOF) {
90 c = (unsigned char)c_temp;
97 /* load split u-boot with PBI command 81xxxxxx. */
98 static void load_uboot(FILE *fp_uboot)
100 init_next_pbl_cmd(fp_uboot);
101 while (next_pbl_cmd < 0x82000000) {
103 pbl_fget(64, fp_uboot);
107 static void check_get_hexval(char *token)
112 if (!sscanf(token, "%x", &hexval)) {
113 printf("Error:%s[%d] - Invalid hex data(%s)\n", fname,
117 for (i = 3; i >= 0; i--) {
118 *pmem_buf++ = (hexval >> (i * 8)) & 0xff;
123 static void pbl_parser(char *name)
127 char *token, *saveptr1, *saveptr2;
131 fd = fopen(name, "r");
133 printf("Error:%s - Can't open\n", fname);
137 while ((getline(&line, &len, fd)) > 0) {
139 token = strtok_r(line, "\r\n", &saveptr1);
140 /* drop all lines with zero tokens (= empty lines) */
143 for (line = token;; line = NULL) {
144 token = strtok_r(line, " \t", &saveptr2);
147 /* Drop all text starting with '#' as comments */
150 check_get_hexval(token);
158 static uint32_t crc_table[256];
160 static void make_crc_table(void)
164 uint32_t poly; /* polynomial exclusive-or pattern */
167 * the polynomial used by PBL is 1 + x1 + x2 + x4 + x5 + x7 + x8 + x10
168 * + x11 + x12 + x16 + x22 + x23 + x26 + x32.
172 for (i = 0; i < 256; i++) {
174 for (j = 0; j < 8; j++) {
175 if (mask & 0x80000000)
176 mask = (mask << 1) ^ poly;
184 unsigned long pbl_crc32(unsigned long crc, const char *buf, uint32_t len)
186 uint32_t crc32_val = 0xffffffff;
192 for (i = 0; i < len; i++)
193 crc32_val = (crc32_val << 8) ^
194 crc_table[(crc32_val >> 24) ^ (*buf++ & 0xff)];
196 crc32_val = crc32_val ^ xor;
198 crc32_val += 0xffffffff;
204 static uint32_t reverse_byte(uint32_t val)
211 p1 = (unsigned char *)&temp;
212 for (j = 3; j >= 0; j--)
213 *p1++ = (val >> (j * 8)) & 0xff;
217 /* write end command and crc command to memory. */
218 static void add_end_cmd(void)
220 uint32_t pbl_end_cmd[4] = {0x09138000, 0x00000000,
221 0x091380c0, 0x00000000};
224 unsigned char *p = (unsigned char *)&pbl_end_cmd;
226 if (ENDIANNESS == 'l') {
227 for (i = 0; i < 4; i++)
228 pbl_end_cmd[i] = reverse_byte(pbl_end_cmd[i]);
231 for (i = 0; i < 16; i++) {
236 /* Add PBI CRC command. */
243 /* calculated CRC32 and write it to memory. */
244 crc32_pbl = pbl_crc32(0, (const char *)mem_buf, pbl_size);
245 *pmem_buf++ = (crc32_pbl >> 24) & 0xff;
246 *pmem_buf++ = (crc32_pbl >> 16) & 0xff;
247 *pmem_buf++ = (crc32_pbl >> 8) & 0xff;
248 *pmem_buf++ = (crc32_pbl) & 0xff;
251 if ((pbl_size % 16) != 0) {
252 for (i = 0; i < 8; i++) {
257 if ((pbl_size % 16 != 0)) {
258 printf("Error: Bad size of image file\n");
263 void pbl_load_uboot(int ifd, struct mkimage_params *params)
268 /* parse the rcw.cfg file. */
269 pbl_parser(params->imagename);
271 /* parse the pbi.cfg file. */
272 pbl_parser(params->imagename2);
274 fp_uboot = fopen(params->datafile, "r");
275 if (fp_uboot == NULL) {
276 printf("Error: %s open failed\n", params->datafile);
280 load_uboot(fp_uboot);
283 lseek(ifd, 0, SEEK_SET);
286 if (write(ifd, (const void *)&mem_buf, size) != size) {
287 fprintf(stderr, "Write error on %s: %s\n",
288 params->imagefile, strerror(errno));
293 static int pblimage_check_image_types(uint8_t type)
295 if (type == IH_TYPE_PBLIMAGE)
301 static int pblimage_verify_header(unsigned char *ptr, int image_size,
302 struct mkimage_params *params)
304 struct pbl_header *pbl_hdr = (struct pbl_header *) ptr;
306 /* Only a few checks can be done: search for magic numbers */
307 if (ENDIANNESS == 'l') {
308 if (pbl_hdr->preamble != reverse_byte(RCW_PREAMBLE))
309 return -FDT_ERR_BADSTRUCTURE;
311 if (pbl_hdr->rcwheader != reverse_byte(RCW_HEADER))
312 return -FDT_ERR_BADSTRUCTURE;
314 if (pbl_hdr->preamble != RCW_PREAMBLE)
315 return -FDT_ERR_BADSTRUCTURE;
317 if (pbl_hdr->rcwheader != RCW_HEADER)
318 return -FDT_ERR_BADSTRUCTURE;
323 static void pblimage_print_header(const void *ptr)
325 printf("Image Type: Freescale PBL Boot Image\n");
328 static void pblimage_set_header(void *ptr, struct stat *sbuf, int ifd,
329 struct mkimage_params *params)
331 /*nothing need to do, pbl_load_uboot takes care of whole file. */
334 /* pblimage parameters */
335 static struct image_type_params pblimage_params = {
336 .name = "Freescale PBL Boot Image support",
337 .header_size = sizeof(struct pbl_header),
338 .hdr = (void *)&pblimage_header,
339 .check_image_type = pblimage_check_image_types,
340 .verify_header = pblimage_verify_header,
341 .print_header = pblimage_print_header,
342 .set_header = pblimage_set_header,
345 void init_pbl_image_type(void)
348 mkimage_register(&pblimage_params);