blob: 690e0af6cb83dc95a474600628b58453ba6be092 [file] [log] [blame]
Marian Balakowiczb97a2a02008-01-08 18:14:09 +01001/*
2 * (C) Copyright 2008 Semihalf
3 *
4 * (C) Copyright 2000-2006
5 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
6 *
7 * See file CREDITS for list of people who contributed to this
8 * project.
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License as
12 * published by the Free Software Foundation; either version 2 of
13 * the License, or (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23 * MA 02111-1307 USA
24 */
Marian Balakowiczceaed2b2008-01-31 13:57:17 +010025
26#define DEBUG
27
Marian Balakowiczb97a2a02008-01-08 18:14:09 +010028#ifndef USE_HOSTCC
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +010029#include <common.h>
30#include <watchdog.h>
31
32#ifdef CONFIG_SHOW_BOOT_PROGRESS
33#include <status_led.h>
34#endif
35
36#ifdef CONFIG_HAS_DATAFLASH
37#include <dataflash.h>
38#endif
39
Marian Balakowiczceaed2b2008-01-31 13:57:17 +010040#ifdef CONFIG_LOGBUFFER
41#include <logbuff.h>
42#endif
43
Marian Balakowicz2242f532008-02-21 17:27:41 +010044#if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE)
45#include <rtc.h>
46#endif
47
Marian Balakowiczfff888a12008-02-21 17:20:19 +010048#if defined(CONFIG_FIT)
49#include <fdt.h>
50#include <libfdt.h>
51#include <fdt_support.h>
52#endif
53
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +010054extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +010055
56#ifdef CONFIG_CMD_BDI
57extern int do_bdinfo(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
58#endif
59
60DECLARE_GLOBAL_DATA_PTR;
Marian Balakowiczb97a2a02008-01-08 18:14:09 +010061#else
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +010062#include "mkimage.h"
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +010063#endif /* USE_HOSTCC*/
Marian Balakowiczb97a2a02008-01-08 18:14:09 +010064
65#include <image.h>
66
67unsigned long crc32 (unsigned long, const unsigned char *, unsigned int);
68
69int image_check_hcrc (image_header_t *hdr)
70{
71 ulong hcrc;
72 ulong len = image_get_header_size ();
73 image_header_t header;
74
75 /* Copy header so we can blank CRC field for re-calculation */
76 memmove (&header, (char *)hdr, image_get_header_size ());
77 image_set_hcrc (&header, 0);
78
79 hcrc = crc32 (0, (unsigned char *)&header, len);
80
81 return (hcrc == image_get_hcrc (hdr));
82}
83
84int image_check_dcrc (image_header_t *hdr)
85{
86 ulong data = image_get_data (hdr);
87 ulong len = image_get_data_size (hdr);
88 ulong dcrc = crc32 (0, (unsigned char *)data, len);
89
90 return (dcrc == image_get_dcrc (hdr));
91}
92
Marian Balakowiczaf13cdb2008-01-08 18:11:45 +010093#ifndef USE_HOSTCC
Marian Balakowiczb97a2a02008-01-08 18:14:09 +010094int image_check_dcrc_wd (image_header_t *hdr, ulong chunksz)
95{
96 ulong dcrc = 0;
97 ulong len = image_get_data_size (hdr);
98 ulong data = image_get_data (hdr);
99
100#if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
101 ulong cdata = data;
102 ulong edata = cdata + len;
103
104 while (cdata < edata) {
105 ulong chunk = edata - cdata;
106
107 if (chunk > chunksz)
108 chunk = chunksz;
109 dcrc = crc32 (dcrc, (unsigned char *)cdata, chunk);
110 cdata += chunk;
111
112 WATCHDOG_RESET ();
113 }
114#else
115 dcrc = crc32 (0, (unsigned char *)data, len);
116#endif
117
118 return (dcrc == image_get_dcrc (hdr));
119}
120
121int getenv_verify (void)
122{
123 char *s = getenv ("verify");
124 return (s && (*s == 'n')) ? 0 : 1;
125}
Marian Balakowiczaf13cdb2008-01-08 18:11:45 +0100126
127void memmove_wd (void *to, void *from, size_t len, ulong chunksz)
128{
129#if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG)
130 while (len > 0) {
131 size_t tail = (len > chunksz) ? chunksz : len;
132 WATCHDOG_RESET ();
133 memmove (to, from, tail);
134 to += tail;
135 from += tail;
136 len -= tail;
137 }
138#else /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */
139 memmove (to, from, len);
140#endif /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */
141}
142#endif /* USE_HOSTCC */
Marian Balakowiczf13e7b22008-01-08 18:12:17 +0100143
144/**
145 * image_multi_count - get component (sub-image) count
146 * @hdr: pointer to the header of the multi component image
147 *
148 * image_multi_count() returns number of components in a multi
149 * component image.
150 *
151 * Note: no checking of the image type is done, caller must pass
152 * a valid multi component image.
153 *
154 * returns:
155 * number of components
156 */
157ulong image_multi_count (image_header_t *hdr)
158{
159 ulong i, count = 0;
160 ulong *size;
161
162 /* get start of the image payload, which in case of multi
163 * component images that points to a table of component sizes */
164 size = (ulong *)image_get_data (hdr);
165
166 /* count non empty slots */
167 for (i = 0; size[i]; ++i)
168 count++;
169
170 return count;
171}
172
173/**
174 * image_multi_getimg - get component data address and size
175 * @hdr: pointer to the header of the multi component image
176 * @idx: index of the requested component
177 * @data: pointer to a ulong variable, will hold component data address
178 * @len: pointer to a ulong variable, will hold component size
179 *
180 * image_multi_getimg() returns size and data address for the requested
181 * component in a multi component image.
182 *
183 * Note: no checking of the image type is done, caller must pass
184 * a valid multi component image.
185 *
186 * returns:
187 * data address and size of the component, if idx is valid
188 * 0 in data and len, if idx is out of range
189 */
190void image_multi_getimg (image_header_t *hdr, ulong idx,
191 ulong *data, ulong *len)
192{
193 int i;
194 ulong *size;
195 ulong offset, tail, count, img_data;
196
197 /* get number of component */
198 count = image_multi_count (hdr);
199
200 /* get start of the image payload, which in case of multi
201 * component images that points to a table of component sizes */
202 size = (ulong *)image_get_data (hdr);
203
204 /* get address of the proper component data start, which means
205 * skipping sizes table (add 1 for last, null entry) */
206 img_data = image_get_data (hdr) + (count + 1) * sizeof (ulong);
207
208 if (idx < count) {
209 *len = size[idx];
210 offset = 0;
211 tail = 0;
212
213 /* go over all indices preceding requested component idx */
214 for (i = 0; i < idx; i++) {
215 /* add up i-th component size */
216 offset += size[i];
217
218 /* add up alignment for i-th component */
219 tail += (4 - size[i] % 4);
220 }
221
222 /* calculate idx-th component data address */
223 *data = img_data + offset + tail;
224 } else {
225 *len = 0;
226 *data = 0;
227 }
228}
Marian Balakowicz42b73e82008-01-31 13:20:07 +0100229
230#ifndef USE_HOSTCC
231const char* image_get_os_name (uint8_t os)
232{
233 const char *name;
234
235 switch (os) {
236 case IH_OS_INVALID: name = "Invalid OS"; break;
237 case IH_OS_NETBSD: name = "NetBSD"; break;
238 case IH_OS_LINUX: name = "Linux"; break;
239 case IH_OS_VXWORKS: name = "VxWorks"; break;
240 case IH_OS_QNX: name = "QNX"; break;
241 case IH_OS_U_BOOT: name = "U-Boot"; break;
242 case IH_OS_RTEMS: name = "RTEMS"; break;
243#ifdef CONFIG_ARTOS
244 case IH_OS_ARTOS: name = "ARTOS"; break;
245#endif
246#ifdef CONFIG_LYNXKDI
247 case IH_OS_LYNXOS: name = "LynxOS"; break;
248#endif
249 default: name = "Unknown OS"; break;
250 }
251
252 return name;
253}
254
255const char* image_get_arch_name (uint8_t arch)
256{
257 const char *name;
258
259 switch (arch) {
260 case IH_ARCH_INVALID: name = "Invalid Architecture"; break;
261 case IH_ARCH_ALPHA: name = "Alpha"; break;
262 case IH_ARCH_ARM: name = "ARM"; break;
263 case IH_ARCH_AVR32: name = "AVR32"; break;
264 case IH_ARCH_BLACKFIN: name = "Blackfin"; break;
265 case IH_ARCH_I386: name = "Intel x86"; break;
266 case IH_ARCH_IA64: name = "IA64"; break;
267 case IH_ARCH_M68K: name = "M68K"; break;
268 case IH_ARCH_MICROBLAZE:name = "Microblaze"; break;
269 case IH_ARCH_MIPS64: name = "MIPS 64 Bit"; break;
270 case IH_ARCH_MIPS: name = "MIPS"; break;
271 case IH_ARCH_NIOS2: name = "Nios-II"; break;
272 case IH_ARCH_NIOS: name = "Nios"; break;
273 case IH_ARCH_PPC: name = "PowerPC"; break;
274 case IH_ARCH_S390: name = "IBM S390"; break;
275 case IH_ARCH_SH: name = "SuperH"; break;
276 case IH_ARCH_SPARC64: name = "SPARC 64 Bit"; break;
277 case IH_ARCH_SPARC: name = "SPARC"; break;
278 default: name = "Unknown Architecture"; break;
279 }
280
281 return name;
282}
283
284const char* image_get_type_name (uint8_t type)
285{
286 const char *name;
287
288 switch (type) {
289 case IH_TYPE_INVALID: name = "Invalid Image"; break;
290 case IH_TYPE_STANDALONE:name = "Standalone Program"; break;
291 case IH_TYPE_KERNEL: name = "Kernel Image"; break;
292 case IH_TYPE_RAMDISK: name = "RAMDisk Image"; break;
293 case IH_TYPE_MULTI: name = "Multi-File Image"; break;
294 case IH_TYPE_FIRMWARE: name = "Firmware"; break;
295 case IH_TYPE_SCRIPT: name = "Script"; break;
296 case IH_TYPE_FLATDT: name = "Flat Device Tree"; break;
297 default: name = "Unknown Image"; break;
298 }
299
300 return name;
301}
302
303const char* image_get_comp_name (uint8_t comp)
304{
305 const char *name;
306
307 switch (comp) {
308 case IH_COMP_NONE: name = "uncompressed"; break;
309 case IH_COMP_GZIP: name = "gzip compressed"; break;
310 case IH_COMP_BZIP2: name = "bzip2 compressed"; break;
311 default: name = "unknown compression"; break;
312 }
313
314 return name;
315}
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100316
Marian Balakowicz2242f532008-02-21 17:27:41 +0100317static void image_print_type (image_header_t *hdr)
318{
319 const char *os, *arch, *type, *comp;
320
321 os = image_get_os_name (image_get_os (hdr));
322 arch = image_get_arch_name (image_get_arch (hdr));
323 type = image_get_type_name (image_get_type (hdr));
324 comp = image_get_comp_name (image_get_comp (hdr));
325
326 printf ("%s %s %s (%s)", arch, os, type, comp);
327}
328
329void image_print_contents (image_header_t *hdr)
330{
331#if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE)
332 time_t timestamp = (time_t)image_get_time (hdr);
333 struct rtc_time tm;
334#endif
335
336 printf (" Image Name: %.*s\n", IH_NMLEN, image_get_name (hdr));
337
338#if defined(CONFIG_TIMESTAMP) || defined(CONFIG_CMD_DATE)
339 to_tm (timestamp, &tm);
340 printf (" Created: %4d-%02d-%02d %2d:%02d:%02d UTC\n",
341 tm.tm_year, tm.tm_mon, tm.tm_mday,
342 tm.tm_hour, tm.tm_min, tm.tm_sec);
343#endif
344 puts (" Image Type: ");
345 image_print_type (hdr);
346
347 printf ("\n Data Size: %d Bytes = ", image_get_data_size (hdr));
348 print_size (image_get_data_size (hdr), "\n");
349 printf (" Load Address: %08x\n"
350 " Entry Point: %08x\n",
351 image_get_load (hdr), image_get_ep (hdr));
352
353 if (image_check_type (hdr, IH_TYPE_MULTI)) {
354 int i;
355 ulong data, len;
356 ulong count = image_multi_count (hdr);
357
358 puts (" Contents:\n");
359 for (i = 0; i < count; i++) {
360 image_multi_getimg (hdr, i, &data, &len);
361 printf (" Image %d: %8ld Bytes = ", i, len);
362 print_size (len, "\n");
363 }
364 }
365}
366
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100367/**
Marian Balakowiczfff888a12008-02-21 17:20:19 +0100368 * gen_image_get_format - get image format type
369 * @img_addr: image start address
370 *
371 * gen_image_get_format() checks whether provided address points to a valid
372 * legacy or FIT image.
373 *
374 * returns:
375 * image format type or IMAGE_FORMAT_INVALID if no image is present
376 */
377int gen_image_get_format (void *img_addr)
378{
379 ulong format = IMAGE_FORMAT_INVALID;
380 image_header_t *hdr;
381#if defined(CONFIG_FIT)
382 char *fit_hdr;
383#endif
384
385 hdr = (image_header_t *)img_addr;
386 if (image_check_magic(hdr))
387 format = IMAGE_FORMAT_LEGACY;
388#if defined(CONFIG_FIT)
389 else {
390 fit_hdr = (char *)img_addr;
391 if (fdt_check_header (fit_hdr) == 0)
392 format = IMAGE_FORMAT_FIT;
393 }
394#endif
395
396 return format;
397}
398
399/**
400 * gen_get_image - get image from special storage (if necessary)
401 * @img_addr: image start address
402 *
403 * gen_get_image() checks if provided image start adddress is located
404 * in a dataflash storage. If so, image is moved to a system RAM memory.
405 *
406 * returns:
407 * image start address after possible relocation from special storage
408 */
409ulong gen_get_image (ulong img_addr)
410{
411 ulong ram_addr, h_size, d_size;
412
413 h_size = image_get_header_size ();
414#if defined(CONFIG_FIT)
415 if (sizeof(struct fdt_header) > h_size)
416 h_size = sizeof(struct fdt_header);
417#endif
418
419#ifdef CONFIG_HAS_DATAFLASH
420 if (addr_dataflash (img_addr)){
421 ram_addr = CFG_LOAD_ADDR;
422 debug (" Reading image header from dataflash address "
423 "%08lx to RAM address %08lx\n", img_addr, ram_addr);
424 read_dataflash (img_addr, h_size, (char *)ram_addr);
425 } else
426#endif
427 return img_addr;
428
429 ram_addr = img_addr;
430
431 switch (gen_image_get_format ((void *)ram_addr)) {
432 case IMAGE_FORMAT_LEGACY:
433 d_size = image_get_data_size ((image_header_t *)ram_addr);
434 debug (" Legacy format image found at 0x%08lx, size 0x%08lx\n",
435 ram_addr, d_size);
436 break;
437#if defined(CONFIG_FIT)
438 case IMAGE_FORMAT_FIT:
439 d_size = fdt_totalsize((void *)ram_addr) - h_size;
440 debug (" FIT/FDT format image found at 0x%08lx, size 0x%08lx\n",
441 ram_addr, d_size);
442
443 break;
444#endif
445 default:
446 printf (" No valid image found at 0x%08lx\n", img_addr);
447 return ram_addr;
448 }
449
450#ifdef CONFIG_HAS_DATAFLASH
451 if (addr_dataflash (img_addr)) {
452 debug (" Reading image remaining data from dataflash address "
453 "%08lx to RAM address %08lx\n", img_addr + h_size,
454 ram_addr + h_size);
455
456 read_dataflash (img_addr + h_size, d_size,
457 (char *)(ram_addr + h_size));
458 }
459#endif
460
461 return ram_addr;
462}
463
464/**
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100465 * image_get_ramdisk - get and verify ramdisk image
466 * @cmdtp: command table pointer
467 * @flag: command flag
468 * @argc: command argument count
469 * @argv: command argument list
470 * @rd_addr: ramdisk image start address
471 * @arch: expected ramdisk architecture
472 * @verify: checksum verification flag
473 *
474 * image_get_ramdisk() returns a pointer to the verified ramdisk image
475 * header. Routine receives image start address and expected architecture
476 * flag. Verification done covers data and header integrity and os/type/arch
477 * fields checking.
478 *
479 * If dataflash support is enabled routine checks for dataflash addresses
480 * and handles required dataflash reads.
481 *
482 * returns:
483 * pointer to a ramdisk image header, if image was found and valid
484 * otherwise, board is reset
485 */
486image_header_t* image_get_ramdisk (cmd_tbl_t *cmdtp, int flag,
487 int argc, char *argv[],
488 ulong rd_addr, uint8_t arch, int verify)
489{
490 image_header_t *rd_hdr;
491
492 show_boot_progress (9);
493
Marian Balakowiczfff888a12008-02-21 17:20:19 +0100494 /* copy from dataflash if needed */
495 rd_addr = gen_get_image (rd_addr);
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100496 rd_hdr = (image_header_t *)rd_addr;
497
498 if (!image_check_magic (rd_hdr)) {
499 puts ("Bad Magic Number\n");
500 show_boot_progress (-10);
501 do_reset (cmdtp, flag, argc, argv);
502 }
503
504 if (!image_check_hcrc (rd_hdr)) {
505 puts ("Bad Header Checksum\n");
506 show_boot_progress (-11);
507 do_reset (cmdtp, flag, argc, argv);
508 }
509
510 show_boot_progress (10);
Marian Balakowicz2242f532008-02-21 17:27:41 +0100511 image_print_contents (rd_hdr);
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100512
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100513 if (verify) {
514 puts(" Verifying Checksum ... ");
515 if (!image_check_dcrc_wd (rd_hdr, CHUNKSZ)) {
516 puts ("Bad Data CRC\n");
517 show_boot_progress (-12);
518 do_reset (cmdtp, flag, argc, argv);
519 }
520 puts("OK\n");
521 }
522
523 show_boot_progress (11);
524
525 if (!image_check_os (rd_hdr, IH_OS_LINUX) ||
526 !image_check_arch (rd_hdr, arch) ||
527 !image_check_type (rd_hdr, IH_TYPE_RAMDISK)) {
528 printf ("No Linux %s Ramdisk Image\n",
529 image_get_arch_name(arch));
530 show_boot_progress (-13);
531 do_reset (cmdtp, flag, argc, argv);
532 }
533
534 return rd_hdr;
535}
536
537/**
538 * get_ramdisk - main ramdisk handling routine
539 * @cmdtp: command table pointer
540 * @flag: command flag
541 * @argc: command argument count
542 * @argv: command argument list
543 * @hdr: pointer to the posiibly multi componet kernel image
544 * @verify: checksum verification flag
545 * @arch: expected ramdisk architecture
546 * @rd_start: pointer to a ulong variable, will hold ramdisk start address
547 * @rd_end: pointer to a ulong variable, will hold ramdisk end
548 *
549 * get_ramdisk() is responsible for finding a valid ramdisk image.
550 * Curently supported are the following ramdisk sources:
551 * - multicomponent kernel/ramdisk image,
552 * - commandline provided address of decicated ramdisk image.
553 *
554 * returns:
555 * rd_start and rd_end are set to ramdisk start/end addresses if
556 * ramdisk image is found and valid
557 * rd_start and rd_end are set to 0 if no ramdisk exists
558 * board is reset if ramdisk image is found but corrupted
559 */
560void get_ramdisk (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[],
561 image_header_t *hdr, int verify, uint8_t arch,
562 ulong *rd_start, ulong *rd_end)
563{
564 ulong rd_addr;
565 ulong rd_data, rd_len;
566 image_header_t *rd_hdr;
567
568 if (argc >= 3) {
569 /*
570 * Look for a '-' which indicates to ignore the
571 * ramdisk argument
572 */
573 if (strcmp(argv[2], "-") == 0) {
574 debug ("## Skipping init Ramdisk\n");
575 rd_len = rd_data = 0;
576 } else {
577 /*
578 * Check if there is an initrd image at the
579 * address provided in the second bootm argument
580 */
581 rd_addr = simple_strtoul (argv[2], NULL, 16);
582 printf ("## Loading init Ramdisk Image at %08lx ...\n",
583 rd_addr);
584
585 rd_hdr = image_get_ramdisk (cmdtp, flag, argc, argv,
586 rd_addr, arch, verify);
587
588 rd_data = image_get_data (rd_hdr);
589 rd_len = image_get_data_size (rd_hdr);
590
591#if defined(CONFIG_B2) || defined(CONFIG_EVB4510) || defined(CONFIG_ARMADILLO)
592 /*
593 *we need to copy the ramdisk to SRAM to let Linux boot
594 */
595 memmove ((void *)image_get_load (rd_hdr),
596 (uchar *)rd_data, rd_len);
597
598 rd_data = image_get_load (rd_hdr);
599#endif /* CONFIG_B2 || CONFIG_EVB4510 || CONFIG_ARMADILLO */
600 }
601
602 } else if (image_check_type (hdr, IH_TYPE_MULTI)) {
603 /*
604 * Now check if we have a multifile image
605 * Get second entry data start address and len
606 */
607 show_boot_progress (13);
608 printf ("## Loading init Ramdisk from multi component "
609 "Image at %08lx ...\n", (ulong)hdr);
610 image_multi_getimg (hdr, 1, &rd_data, &rd_len);
611 } else {
612 /*
613 * no initrd image
614 */
615 show_boot_progress (14);
616 rd_len = rd_data = 0;
617 }
618
619 if (!rd_data) {
620 debug ("## No init Ramdisk\n");
621 *rd_start = 0;
622 *rd_end = 0;
623 } else {
624 *rd_start = rd_data;
625 *rd_end = rd_data + rd_len;
626 }
627 debug (" ramdisk start = 0x%08lx, ramdisk end = 0x%08lx\n",
628 *rd_start, *rd_end);
629}
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100630
631#if defined(CONFIG_PPC) || defined(CONFIG_M68K)
632/**
633 * ramdisk_high - relocate init ramdisk
634 * @rd_data: ramdisk data start address
635 * @rd_len: ramdisk data length
636 * @kbd: kernel board info copy (within BOOTMAPSZ boundary)
637 * @sp_limit: stack pointer limit (including BOOTMAPSZ)
638 * @sp: current stack pointer
639 * @initrd_start: pointer to a ulong variable, will hold final init ramdisk
640 * start address (after possible relocation)
641 * @initrd_end: pointer to a ulong variable, will hold final init ramdisk
642 * end address (after possible relocation)
643 *
644 * ramdisk_high() takes a relocation hint from "initrd_high" environement
645 * variable and if requested ramdisk data is moved to a specified location.
646 *
647 * returns:
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100648 * - initrd_start and initrd_end are set to final (after relocation) ramdisk
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100649 * start/end addresses if ramdisk image start and len were provided
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100650 * otherwise set initrd_start and initrd_end set to zeros
651 * - returns new allc_current, next free address below BOOTMAPSZ
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100652 */
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100653ulong ramdisk_high (ulong alloc_current, ulong rd_data, ulong rd_len,
654 bd_t *kbd, ulong sp_limit, ulong sp,
655 ulong *initrd_start, ulong *initrd_end)
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100656{
657 char *s;
658 ulong initrd_high;
659 int initrd_copy_to_ram = 1;
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100660 ulong new_alloc_current = alloc_current;
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100661
662 if ((s = getenv ("initrd_high")) != NULL) {
663 /* a value of "no" or a similar string will act like 0,
664 * turning the "load high" feature off. This is intentional.
665 */
666 initrd_high = simple_strtoul (s, NULL, 16);
667 if (initrd_high == ~0)
668 initrd_copy_to_ram = 0;
669 } else {
670 /* not set, no restrictions to load high */
671 initrd_high = ~0;
672 }
673
674#ifdef CONFIG_LOGBUFFER
675 /* Prevent initrd from overwriting logbuffer */
676 if (initrd_high < (kbd->bi_memsize - LOGBUFF_LEN - LOGBUFF_OVERHEAD))
677 initrd_high = kbd->bi_memsize - LOGBUFF_LEN - LOGBUFF_OVERHEAD;
678 debug ("## Logbuffer at 0x%08lx ", kbd->bi_memsize - LOGBUFF_LEN);
679#endif
680 debug ("## initrd_high = 0x%08lx, copy_to_ram = %d\n",
681 initrd_high, initrd_copy_to_ram);
682
683 if (rd_data) {
684 if (!initrd_copy_to_ram) { /* zero-copy ramdisk support */
685 debug (" in-place initrd\n");
686 *initrd_start = rd_data;
687 *initrd_end = rd_data + rd_len;
688 } else {
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100689 new_alloc_current = alloc_current - rd_len;
690 *initrd_start = new_alloc_current;
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100691 *initrd_start &= ~(4096 - 1); /* align on page */
692
693 if (initrd_high) {
694 ulong nsp;
695
696 /*
697 * the inital ramdisk does not need to be within
698 * CFG_BOOTMAPSZ as it is not accessed until after
699 * the mm system is initialised.
700 *
701 * do the stack bottom calculation again and see if
702 * the initrd will fit just below the monitor stack
703 * bottom without overwriting the area allocated
704 * for command line args and board info.
705 */
706 nsp = sp;
707 nsp -= 2048; /* just to be sure */
708 nsp &= ~0xF;
709
710 if (nsp > initrd_high) /* limit as specified */
711 nsp = initrd_high;
712
713 nsp -= rd_len;
714 nsp &= ~(4096 - 1); /* align on page */
715
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100716 if (nsp >= sp_limit) {
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100717 *initrd_start = nsp;
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100718 new_alloc_current = alloc_current;
719 }
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100720 }
721
722 show_boot_progress (12);
723
724 *initrd_end = *initrd_start + rd_len;
725 printf (" Loading Ramdisk to %08lx, end %08lx ... ",
726 *initrd_start, *initrd_end);
727
728 memmove_wd((void *)*initrd_start,
729 (void *)rd_data, rd_len, CHUNKSZ);
730
731 puts ("OK\n");
732 }
733 } else {
734 *initrd_start = 0;
735 *initrd_end = 0;
736 }
737 debug (" ramdisk load start = 0x%08lx, ramdisk load end = 0x%08lx\n",
738 *initrd_start, *initrd_end);
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100739
740 return new_alloc_current;
741}
742
743/**
744 * get_boot_sp_limit - calculate stack pointer limit
745 * @sp: current stack pointer
746 *
747 * get_boot_sp_limit() takes current stack pointer adrress and calculates
748 * stack pointer limit, below which kernel boot data (cmdline, board info,
749 * etc.) will be allocated.
750 *
751 * returns:
752 * stack pointer limit
753 */
754ulong get_boot_sp_limit(ulong sp)
755{
756 ulong sp_limit = sp;
757
758 sp_limit -= 2048; /* just to be sure */
759
760 /* make sure sp_limit is within kernel mapped space */
761 if (sp_limit > CFG_BOOTMAPSZ)
762 sp_limit = CFG_BOOTMAPSZ;
763 sp_limit &= ~0xF;
764
765 return sp_limit;
766}
767
768/**
769 * get_boot_cmdline - allocate and initialize kernel cmdline
770 * @alloc_current: current boot allocation address (counting down
771 * from sp_limit)
772 * @cmd_start: pointer to a ulong variable, will hold cmdline start
773 * @cmd_end: pointer to a ulong variable, will hold cmdline end
774 *
775 * get_boot_cmdline() allocates space for kernel command line below
776 * provided alloc_current address. If "bootargs" U-boot environemnt
777 * variable is present its contents is copied to allocated kernel
778 * command line.
779 *
780 * returns:
781 * alloc_current after cmdline allocation
782 */
783ulong get_boot_cmdline (ulong alloc_current, ulong *cmd_start, ulong *cmd_end)
784{
785 char *cmdline;
786 char *s;
787
788 cmdline = (char *)((alloc_current - CFG_BARGSIZE) & ~0xF);
789
790 if ((s = getenv("bootargs")) == NULL)
791 s = "";
792
793 strcpy(cmdline, s);
794
795 *cmd_start = (ulong) & cmdline[0];
796 *cmd_end = *cmd_start + strlen(cmdline);
797
798 debug ("## cmdline at 0x%08lx ... 0x%08lx\n", *cmd_start, *cmd_end);
799
800 return (ulong)cmdline;
801}
802
803/**
804 * get_boot_kbd - allocate and initialize kernel copy of board info
805 * @alloc_current: current boot allocation address (counting down
806 * from sp_limit)
807 * @kbd: double pointer to board info data
808 *
809 * get_boot_kbd() - allocates space for kernel copy of board info data.
810 * Space is allocated below provided alloc_current address and kernel
811 * board info is initialized with the current u-boot board info data.
812 *
813 * returns:
814 * alloc_current after kbd allocation
815 */
816ulong get_boot_kbd (ulong alloc_current, bd_t **kbd)
817{
818 *kbd = (bd_t *) (((ulong)alloc_current - sizeof(bd_t)) & ~0xF);
819 **kbd = *(gd->bd);
820
821 debug ("## kernel board info at 0x%08lx\n", (ulong)*kbd);
822
823#if defined(DEBUG) && defined(CONFIG_CMD_BDI)
824 do_bdinfo(NULL, 0, 0, NULL);
825#endif
826
827 return (ulong)*kbd;
Marian Balakowiczceaed2b2008-01-31 13:57:17 +0100828}
829#endif /* CONFIG_PPC || CONFIG_M68K */
Marian Balakowicz5ad03eb2008-01-31 13:55:39 +0100830
Marian Balakowiczf50433d2008-02-21 17:20:20 +0100831#if defined(CONFIG_FIT)
832/*****************************************************************************/
833/* New uImage format routines */
834/*****************************************************************************/
835static int fit_parse_spec (const char *spec, char sepc, ulong addr_curr,
836 ulong *addr, const char **name)
837{
838 const char *sep;
839
840 *addr = addr_curr;
841 *name = NULL;
842
843 sep = strchr (spec, sepc);
844 if (sep) {
845 if (sep - spec > 0)
846 *addr = simple_strtoul (spec, NULL, 16);
847
848 *name = sep + 1;
849 return 1;
850 }
851
852 return 0;
853}
854
855/**
856 * fit_parse_conf - parse FIT configuration spec
857 * @spec: input string, containing configuration spec
858 * @add_curr: current image address (to be used as a possible default)
859 * @addr: pointer to a ulong variable, will hold FIT image address of a given
860 * configuration
861 * @conf_name double pointer to a char, will hold pointer to a configuration
862 * unit name
863 *
864 * fit_parse_conf() expects configuration spec in the for of [<addr>]#<conf>,
865 * where <addr> is a FIT image address that contains configuration
866 * with a <conf> unit name.
867 *
868 * Address part is optional, and if omitted default add_curr will
869 * be used instead.
870 *
871 * returns:
872 * 1 if spec is a valid configuration string,
873 * addr and conf_name are set accordingly
874 * 0 otherwise
875 */
876inline int fit_parse_conf (const char *spec, ulong addr_curr,
877 ulong *addr, const char **conf_name)
878{
879 return fit_parse_spec (spec, '#', addr_curr, addr, conf_name);
880}
881
882/**
883 * fit_parse_subimage - parse FIT subimage spec
884 * @spec: input string, containing subimage spec
885 * @add_curr: current image address (to be used as a possible default)
886 * @addr: pointer to a ulong variable, will hold FIT image address of a given
887 * subimage
888 * @image_name: double pointer to a char, will hold pointer to a subimage name
889 *
890 * fit_parse_subimage() expects subimage spec in the for of
891 * [<addr>]:<subimage>, where <addr> is a FIT image address that contains
892 * subimage with a <subimg> unit name.
893 *
894 * Address part is optional, and if omitted default add_curr will
895 * be used instead.
896 *
897 * returns:
898 * 1 if spec is a valid subimage string,
899 * addr and image_name are set accordingly
900 * 0 otherwise
901 */
902inline int fit_parse_subimage (const char *spec, ulong addr_curr,
903 ulong *addr, const char **image_name)
904{
905 return fit_parse_spec (spec, ':', addr_curr, addr, image_name);
906}
907#endif /* CONFIG_FIT */
908
Marian Balakowiczb6b0fe62008-01-31 13:58:13 +0100909#endif /* USE_HOSTCC */