]>
Commit | Line | Data |
---|---|---|
47d1a6e1 | 1 | /* |
15940c9a | 2 | * (C) Copyright 2000-2006 |
47d1a6e1 WD |
3 | * Wolfgang Denk, DENX Software Engineering, wd@denx.de. |
4 | * | |
5 | * See file CREDITS for list of people who contributed to this | |
6 | * project. | |
7 | * | |
8 | * This program is free software; you can redistribute it and/or | |
9 | * modify it under the terms of the GNU General Public License as | |
10 | * published by the Free Software Foundation; either version 2 of | |
11 | * the License, or (at your option) any later version. | |
12 | * | |
13 | * This program is distributed in the hope that it will be useful, | |
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | * GNU General Public License for more details. | |
17 | * | |
18 | * You should have received a copy of the GNU General Public License | |
19 | * along with this program; if not, write to the Free Software | |
20 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, | |
21 | * MA 02111-1307 USA | |
22 | */ | |
23 | ||
24 | /* | |
25 | * Boot support | |
26 | */ | |
27 | #include <common.h> | |
28 | #include <watchdog.h> | |
29 | #include <command.h> | |
47d1a6e1 WD |
30 | #include <image.h> |
31 | #include <malloc.h> | |
32 | #include <zlib.h> | |
c29fdfc1 | 33 | #include <bzlib.h> |
7f70e853 | 34 | #include <environment.h> |
47d1a6e1 | 35 | #include <asm/byteorder.h> |
8bde7f77 | 36 | |
f57f70aa WD |
37 | #ifdef CONFIG_OF_FLAT_TREE |
38 | #include <ft_build.h> | |
39 | #endif | |
40 | ||
8bde7f77 WD |
41 | /*cmd_boot.c*/ |
42 | extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]); | |
43 | ||
47d1a6e1 WD |
44 | #if (CONFIG_COMMANDS & CFG_CMD_DATE) || defined(CONFIG_TIMESTAMP) |
45 | #include <rtc.h> | |
46 | #endif | |
47 | ||
48 | #ifdef CFG_HUSH_PARSER | |
49 | #include <hush.h> | |
50 | #endif | |
51 | ||
52 | #ifdef CONFIG_SHOW_BOOT_PROGRESS | |
53 | # include <status_led.h> | |
54 | # define SHOW_BOOT_PROGRESS(arg) show_boot_progress(arg) | |
55 | #else | |
56 | # define SHOW_BOOT_PROGRESS(arg) | |
57 | #endif | |
58 | ||
59 | #ifdef CFG_INIT_RAM_LOCK | |
60 | #include <asm/cache.h> | |
61 | #endif | |
62 | ||
228f29ac WD |
63 | #ifdef CONFIG_LOGBUFFER |
64 | #include <logbuff.h> | |
65 | #endif | |
66 | ||
2abbe075 WD |
67 | #ifdef CONFIG_HAS_DATAFLASH |
68 | #include <dataflash.h> | |
69 | #endif | |
70 | ||
47d1a6e1 WD |
71 | /* |
72 | * Some systems (for example LWMON) have very short watchdog periods; | |
73 | * we must make sure to split long operations like memmove() or | |
74 | * crc32() into reasonable chunks. | |
75 | */ | |
76 | #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG) | |
77 | # define CHUNKSZ (64 * 1024) | |
78 | #endif | |
79 | ||
eedcd078 | 80 | int gunzip (void *, int, unsigned char *, unsigned long *); |
47d1a6e1 WD |
81 | |
82 | static void *zalloc(void *, unsigned, unsigned); | |
83 | static void zfree(void *, void *, unsigned); | |
84 | ||
85 | #if (CONFIG_COMMANDS & CFG_CMD_IMI) | |
86 | static int image_info (unsigned long addr); | |
87 | #endif | |
27b207fd WD |
88 | |
89 | #if (CONFIG_COMMANDS & CFG_CMD_IMLS) | |
90 | #include <flash.h> | |
e6f2e902 | 91 | extern flash_info_t flash_info[]; /* info for FLASH chips */ |
27b207fd WD |
92 | static int do_imls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]); |
93 | #endif | |
94 | ||
47d1a6e1 WD |
95 | static void print_type (image_header_t *hdr); |
96 | ||
2262cfee WD |
97 | #ifdef __I386__ |
98 | image_header_t *fake_header(image_header_t *hdr, void *ptr, int size); | |
99 | #endif | |
100 | ||
47d1a6e1 WD |
101 | /* |
102 | * Continue booting an OS image; caller already has: | |
103 | * - copied image header to global variable `header' | |
104 | * - checked header magic number, checksums (both header & image), | |
105 | * - verified image architecture (PPC) and type (KERNEL or MULTI), | |
106 | * - loaded (first part of) image to header load address, | |
107 | * - disabled interrupts. | |
108 | */ | |
109 | typedef void boot_os_Fcn (cmd_tbl_t *cmdtp, int flag, | |
110 | int argc, char *argv[], | |
111 | ulong addr, /* of image to boot */ | |
112 | ulong *len_ptr, /* multi-file image length table */ | |
113 | int verify); /* getenv("verify")[0] != 'n' */ | |
114 | ||
8bde7f77 WD |
115 | #ifdef DEBUG |
116 | extern int do_bdinfo ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]); | |
117 | #endif | |
118 | ||
2262cfee | 119 | #ifdef CONFIG_PPC |
47d1a6e1 WD |
120 | static boot_os_Fcn do_bootm_linux; |
121 | #else | |
122 | extern boot_os_Fcn do_bootm_linux; | |
123 | #endif | |
f72da340 WD |
124 | #ifdef CONFIG_SILENT_CONSOLE |
125 | static void fixup_silent_linux (void); | |
126 | #endif | |
47d1a6e1 | 127 | static boot_os_Fcn do_bootm_netbsd; |
d791b1dc | 128 | static boot_os_Fcn do_bootm_rtems; |
47d1a6e1 WD |
129 | #if (CONFIG_COMMANDS & CFG_CMD_ELF) |
130 | static boot_os_Fcn do_bootm_vxworks; | |
131 | static boot_os_Fcn do_bootm_qnxelf; | |
132 | int do_bootvx ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[] ); | |
133 | int do_bootelf (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[] ); | |
134 | #endif /* CFG_CMD_ELF */ | |
7f70e853 WD |
135 | #if defined(CONFIG_ARTOS) && defined(CONFIG_PPC) |
136 | static boot_os_Fcn do_bootm_artos; | |
137 | #endif | |
1f4bb37d WD |
138 | #ifdef CONFIG_LYNXKDI |
139 | static boot_os_Fcn do_bootm_lynxkdi; | |
140 | extern void lynxkdi_boot( image_header_t * ); | |
141 | #endif | |
47d1a6e1 | 142 | |
15940c9a SR |
143 | #ifndef CFG_BOOTM_LEN |
144 | #define CFG_BOOTM_LEN 0x800000 /* use 8MByte as default max gunzip size */ | |
145 | #endif | |
146 | ||
47d1a6e1 WD |
147 | image_header_t header; |
148 | ||
149 | ulong load_addr = CFG_LOAD_ADDR; /* Default Load Address */ | |
150 | ||
151 | int do_bootm (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
152 | { | |
153 | ulong iflag; | |
154 | ulong addr; | |
155 | ulong data, len, checksum; | |
156 | ulong *len_ptr; | |
15940c9a | 157 | uint unc_len = CFG_BOOTM_LEN; |
47d1a6e1 WD |
158 | int i, verify; |
159 | char *name, *s; | |
b13fb01a | 160 | int (*appl)(int, char *[]); |
47d1a6e1 WD |
161 | image_header_t *hdr = &header; |
162 | ||
163 | s = getenv ("verify"); | |
164 | verify = (s && (*s == 'n')) ? 0 : 1; | |
165 | ||
166 | if (argc < 2) { | |
167 | addr = load_addr; | |
168 | } else { | |
169 | addr = simple_strtoul(argv[1], NULL, 16); | |
170 | } | |
171 | ||
172 | SHOW_BOOT_PROGRESS (1); | |
173 | printf ("## Booting image at %08lx ...\n", addr); | |
174 | ||
175 | /* Copy header so we can blank CRC field for re-calculation */ | |
2abbe075 WD |
176 | #ifdef CONFIG_HAS_DATAFLASH |
177 | if (addr_dataflash(addr)){ | |
178 | read_dataflash(addr, sizeof(image_header_t), (char *)&header); | |
179 | } else | |
180 | #endif | |
47d1a6e1 WD |
181 | memmove (&header, (char *)addr, sizeof(image_header_t)); |
182 | ||
183 | if (ntohl(hdr->ih_magic) != IH_MAGIC) { | |
2262cfee WD |
184 | #ifdef __I386__ /* correct image format not implemented yet - fake it */ |
185 | if (fake_header(hdr, (void*)addr, -1) != NULL) { | |
186 | /* to compensate for the addition below */ | |
187 | addr -= sizeof(image_header_t); | |
188 | /* turnof verify, | |
189 | * fake_header() does not fake the data crc | |
190 | */ | |
191 | verify = 0; | |
192 | } else | |
193 | #endif /* __I386__ */ | |
194 | { | |
4b9206ed | 195 | puts ("Bad Magic Number\n"); |
47d1a6e1 WD |
196 | SHOW_BOOT_PROGRESS (-1); |
197 | return 1; | |
2262cfee | 198 | } |
47d1a6e1 WD |
199 | } |
200 | SHOW_BOOT_PROGRESS (2); | |
201 | ||
202 | data = (ulong)&header; | |
203 | len = sizeof(image_header_t); | |
204 | ||
205 | checksum = ntohl(hdr->ih_hcrc); | |
206 | hdr->ih_hcrc = 0; | |
207 | ||
77ddac94 | 208 | if (crc32 (0, (uchar *)data, len) != checksum) { |
4b9206ed | 209 | puts ("Bad Header Checksum\n"); |
47d1a6e1 WD |
210 | SHOW_BOOT_PROGRESS (-2); |
211 | return 1; | |
212 | } | |
213 | SHOW_BOOT_PROGRESS (3); | |
214 | ||
bccae903 WD |
215 | #ifdef CONFIG_HAS_DATAFLASH |
216 | if (addr_dataflash(addr)){ | |
217 | len = ntohl(hdr->ih_size) + sizeof(image_header_t); | |
218 | read_dataflash(addr, len, (char *)CFG_LOAD_ADDR); | |
219 | addr = CFG_LOAD_ADDR; | |
220 | } | |
221 | #endif | |
222 | ||
223 | ||
47d1a6e1 | 224 | /* for multi-file images we need the data part, too */ |
a57a496f | 225 | print_image_hdr ((image_header_t *)addr); |
47d1a6e1 WD |
226 | |
227 | data = addr + sizeof(image_header_t); | |
228 | len = ntohl(hdr->ih_size); | |
229 | ||
230 | if (verify) { | |
4b9206ed | 231 | puts (" Verifying Checksum ... "); |
77ddac94 | 232 | if (crc32 (0, (uchar *)data, len) != ntohl(hdr->ih_dcrc)) { |
47d1a6e1 WD |
233 | printf ("Bad Data CRC\n"); |
234 | SHOW_BOOT_PROGRESS (-3); | |
235 | return 1; | |
236 | } | |
4b9206ed | 237 | puts ("OK\n"); |
47d1a6e1 WD |
238 | } |
239 | SHOW_BOOT_PROGRESS (4); | |
240 | ||
241 | len_ptr = (ulong *)data; | |
242 | ||
2262cfee WD |
243 | #if defined(__PPC__) |
244 | if (hdr->ih_arch != IH_CPU_PPC) | |
245 | #elif defined(__ARM__) | |
246 | if (hdr->ih_arch != IH_CPU_ARM) | |
247 | #elif defined(__I386__) | |
248 | if (hdr->ih_arch != IH_CPU_I386) | |
6069ff26 | 249 | #elif defined(__mips__) |
8bde7f77 | 250 | if (hdr->ih_arch != IH_CPU_MIPS) |
4a551709 WD |
251 | #elif defined(__nios__) |
252 | if (hdr->ih_arch != IH_CPU_NIOS) | |
4e5ca3eb WD |
253 | #elif defined(__M68K__) |
254 | if (hdr->ih_arch != IH_CPU_M68K) | |
507bbe3e WD |
255 | #elif defined(__microblaze__) |
256 | if (hdr->ih_arch != IH_CPU_MICROBLAZE) | |
5c952cf0 WD |
257 | #elif defined(__nios2__) |
258 | if (hdr->ih_arch != IH_CPU_NIOS2) | |
0afe519a WD |
259 | #elif defined(__blackfin__) |
260 | if (hdr->ih_arch != IH_CPU_BLACKFIN) | |
2262cfee WD |
261 | #else |
262 | # error Unknown CPU type | |
263 | #endif | |
264 | { | |
265 | printf ("Unsupported Architecture 0x%x\n", hdr->ih_arch); | |
47d1a6e1 WD |
266 | SHOW_BOOT_PROGRESS (-4); |
267 | return 1; | |
268 | } | |
269 | SHOW_BOOT_PROGRESS (5); | |
270 | ||
271 | switch (hdr->ih_type) { | |
b13fb01a WD |
272 | case IH_TYPE_STANDALONE: |
273 | name = "Standalone Application"; | |
274 | /* A second argument overwrites the load address */ | |
275 | if (argc > 2) { | |
b2532eff | 276 | hdr->ih_load = htonl(simple_strtoul(argv[2], NULL, 16)); |
b13fb01a WD |
277 | } |
278 | break; | |
279 | case IH_TYPE_KERNEL: | |
280 | name = "Kernel Image"; | |
281 | break; | |
d4ca31c4 | 282 | case IH_TYPE_MULTI: |
b13fb01a WD |
283 | name = "Multi-File Image"; |
284 | len = ntohl(len_ptr[0]); | |
285 | /* OS kernel is always the first image */ | |
286 | data += 8; /* kernel_len + terminator */ | |
287 | for (i=1; len_ptr[i]; ++i) | |
288 | data += 4; | |
289 | break; | |
47d1a6e1 WD |
290 | default: printf ("Wrong Image Type for %s command\n", cmdtp->name); |
291 | SHOW_BOOT_PROGRESS (-5); | |
292 | return 1; | |
293 | } | |
294 | SHOW_BOOT_PROGRESS (6); | |
295 | ||
296 | /* | |
297 | * We have reached the point of no return: we are going to | |
298 | * overwrite all exception vector code, so we cannot easily | |
299 | * recover from any failures any more... | |
300 | */ | |
301 | ||
302 | iflag = disable_interrupts(); | |
303 | ||
c7de829c WD |
304 | #ifdef CONFIG_AMIGAONEG3SE |
305 | /* | |
8bde7f77 | 306 | * We've possible left the caches enabled during |
c7de829c WD |
307 | * bios emulation, so turn them off again |
308 | */ | |
309 | icache_disable(); | |
310 | invalidate_l1_instruction_cache(); | |
311 | flush_data_cache(); | |
312 | dcache_disable(); | |
313 | #endif | |
314 | ||
47d1a6e1 WD |
315 | switch (hdr->ih_comp) { |
316 | case IH_COMP_NONE: | |
2262cfee | 317 | if(ntohl(hdr->ih_load) == addr) { |
47d1a6e1 WD |
318 | printf (" XIP %s ... ", name); |
319 | } else { | |
320 | #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG) | |
321 | size_t l = len; | |
322 | void *to = (void *)ntohl(hdr->ih_load); | |
323 | void *from = (void *)data; | |
324 | ||
325 | printf (" Loading %s ... ", name); | |
326 | ||
327 | while (l > 0) { | |
328 | size_t tail = (l > CHUNKSZ) ? CHUNKSZ : l; | |
329 | WATCHDOG_RESET(); | |
330 | memmove (to, from, tail); | |
331 | to += tail; | |
332 | from += tail; | |
333 | l -= tail; | |
334 | } | |
335 | #else /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */ | |
336 | memmove ((void *) ntohl(hdr->ih_load), (uchar *)data, len); | |
337 | #endif /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */ | |
338 | } | |
339 | break; | |
340 | case IH_COMP_GZIP: | |
341 | printf (" Uncompressing %s ... ", name); | |
c29fdfc1 | 342 | if (gunzip ((void *)ntohl(hdr->ih_load), unc_len, |
eedcd078 | 343 | (uchar *)data, &len) != 0) { |
4b9206ed | 344 | puts ("GUNZIP ERROR - must RESET board to recover\n"); |
47d1a6e1 WD |
345 | SHOW_BOOT_PROGRESS (-6); |
346 | do_reset (cmdtp, flag, argc, argv); | |
347 | } | |
348 | break; | |
c29fdfc1 WD |
349 | #ifdef CONFIG_BZIP2 |
350 | case IH_COMP_BZIP2: | |
351 | printf (" Uncompressing %s ... ", name); | |
5653fc33 WD |
352 | /* |
353 | * If we've got less than 4 MB of malloc() space, | |
354 | * use slower decompression algorithm which requires | |
355 | * at most 2300 KB of memory. | |
356 | */ | |
c29fdfc1 | 357 | i = BZ2_bzBuffToBuffDecompress ((char*)ntohl(hdr->ih_load), |
5653fc33 WD |
358 | &unc_len, (char *)data, len, |
359 | CFG_MALLOC_LEN < (4096 * 1024), 0); | |
c29fdfc1 WD |
360 | if (i != BZ_OK) { |
361 | printf ("BUNZIP2 ERROR %d - must RESET board to recover\n", i); | |
362 | SHOW_BOOT_PROGRESS (-6); | |
363 | udelay(100000); | |
364 | do_reset (cmdtp, flag, argc, argv); | |
365 | } | |
366 | break; | |
367 | #endif /* CONFIG_BZIP2 */ | |
47d1a6e1 WD |
368 | default: |
369 | if (iflag) | |
370 | enable_interrupts(); | |
371 | printf ("Unimplemented compression type %d\n", hdr->ih_comp); | |
372 | SHOW_BOOT_PROGRESS (-7); | |
373 | return 1; | |
374 | } | |
4b9206ed | 375 | puts ("OK\n"); |
47d1a6e1 WD |
376 | SHOW_BOOT_PROGRESS (7); |
377 | ||
378 | switch (hdr->ih_type) { | |
379 | case IH_TYPE_STANDALONE: | |
47d1a6e1 WD |
380 | if (iflag) |
381 | enable_interrupts(); | |
382 | ||
4a6fd34b WD |
383 | /* load (and uncompress), but don't start if "autostart" |
384 | * is set to "no" | |
385 | */ | |
4a551709 WD |
386 | if (((s = getenv("autostart")) != NULL) && (strcmp(s,"no") == 0)) { |
387 | char buf[32]; | |
388 | sprintf(buf, "%lX", len); | |
389 | setenv("filesize", buf); | |
4a6fd34b | 390 | return 0; |
4a551709 | 391 | } |
b13fb01a WD |
392 | appl = (int (*)(int, char *[]))ntohl(hdr->ih_ep); |
393 | (*appl)(argc-1, &argv[1]); | |
4a6fd34b | 394 | return 0; |
47d1a6e1 WD |
395 | case IH_TYPE_KERNEL: |
396 | case IH_TYPE_MULTI: | |
397 | /* handled below */ | |
398 | break; | |
399 | default: | |
400 | if (iflag) | |
401 | enable_interrupts(); | |
402 | printf ("Can't boot image type %d\n", hdr->ih_type); | |
403 | SHOW_BOOT_PROGRESS (-8); | |
404 | return 1; | |
405 | } | |
406 | SHOW_BOOT_PROGRESS (8); | |
407 | ||
408 | switch (hdr->ih_os) { | |
409 | default: /* handled by (original) Linux case */ | |
410 | case IH_OS_LINUX: | |
f72da340 WD |
411 | #ifdef CONFIG_SILENT_CONSOLE |
412 | fixup_silent_linux(); | |
413 | #endif | |
47d1a6e1 WD |
414 | do_bootm_linux (cmdtp, flag, argc, argv, |
415 | addr, len_ptr, verify); | |
416 | break; | |
417 | case IH_OS_NETBSD: | |
418 | do_bootm_netbsd (cmdtp, flag, argc, argv, | |
419 | addr, len_ptr, verify); | |
420 | break; | |
8bde7f77 | 421 | |
1f4bb37d WD |
422 | #ifdef CONFIG_LYNXKDI |
423 | case IH_OS_LYNXOS: | |
424 | do_bootm_lynxkdi (cmdtp, flag, argc, argv, | |
425 | addr, len_ptr, verify); | |
426 | break; | |
427 | #endif | |
428 | ||
d791b1dc WD |
429 | case IH_OS_RTEMS: |
430 | do_bootm_rtems (cmdtp, flag, argc, argv, | |
431 | addr, len_ptr, verify); | |
432 | break; | |
8bde7f77 | 433 | |
47d1a6e1 WD |
434 | #if (CONFIG_COMMANDS & CFG_CMD_ELF) |
435 | case IH_OS_VXWORKS: | |
436 | do_bootm_vxworks (cmdtp, flag, argc, argv, | |
437 | addr, len_ptr, verify); | |
438 | break; | |
439 | case IH_OS_QNX: | |
440 | do_bootm_qnxelf (cmdtp, flag, argc, argv, | |
441 | addr, len_ptr, verify); | |
442 | break; | |
443 | #endif /* CFG_CMD_ELF */ | |
7f70e853 WD |
444 | #ifdef CONFIG_ARTOS |
445 | case IH_OS_ARTOS: | |
446 | do_bootm_artos (cmdtp, flag, argc, argv, | |
447 | addr, len_ptr, verify); | |
448 | break; | |
449 | #endif | |
47d1a6e1 WD |
450 | } |
451 | ||
452 | SHOW_BOOT_PROGRESS (-9); | |
453 | #ifdef DEBUG | |
4b9206ed | 454 | puts ("\n## Control returned to monitor - resetting...\n"); |
47d1a6e1 WD |
455 | do_reset (cmdtp, flag, argc, argv); |
456 | #endif | |
457 | return 1; | |
458 | } | |
459 | ||
0d498393 WD |
460 | U_BOOT_CMD( |
461 | bootm, CFG_MAXARGS, 1, do_bootm, | |
8bde7f77 WD |
462 | "bootm - boot application image from memory\n", |
463 | "[addr [arg ...]]\n - boot application image stored in memory\n" | |
9d5028c2 WD |
464 | "\tpassing arguments 'arg ...'; when booting a Linux kernel,\n" |
465 | "\t'arg' can be the address of an initrd image\n" | |
8bde7f77 WD |
466 | ); |
467 | ||
f72da340 WD |
468 | #ifdef CONFIG_SILENT_CONSOLE |
469 | static void | |
470 | fixup_silent_linux () | |
471 | { | |
472 | DECLARE_GLOBAL_DATA_PTR; | |
473 | char buf[256], *start, *end; | |
474 | char *cmdline = getenv ("bootargs"); | |
475 | ||
476 | /* Only fix cmdline when requested */ | |
477 | if (!(gd->flags & GD_FLG_SILENT)) | |
478 | return; | |
479 | ||
480 | debug ("before silent fix-up: %s\n", cmdline); | |
481 | if (cmdline) { | |
482 | if ((start = strstr (cmdline, "console=")) != NULL) { | |
483 | end = strchr (start, ' '); | |
484 | strncpy (buf, cmdline, (start - cmdline + 8)); | |
485 | if (end) | |
486 | strcpy (buf + (start - cmdline + 8), end); | |
487 | else | |
488 | buf[start - cmdline + 8] = '\0'; | |
489 | } else { | |
490 | strcpy (buf, cmdline); | |
491 | strcat (buf, " console="); | |
492 | } | |
493 | } else { | |
494 | strcpy (buf, "console="); | |
495 | } | |
496 | ||
497 | setenv ("bootargs", buf); | |
498 | debug ("after silent fix-up: %s\n", buf); | |
499 | } | |
500 | #endif /* CONFIG_SILENT_CONSOLE */ | |
501 | ||
f57f70aa WD |
502 | #ifdef CONFIG_OF_FLAT_TREE |
503 | extern const unsigned char oftree_dtb[]; | |
504 | extern const unsigned int oftree_dtb_len; | |
505 | #endif | |
506 | ||
2262cfee | 507 | #ifdef CONFIG_PPC |
47d1a6e1 WD |
508 | static void |
509 | do_bootm_linux (cmd_tbl_t *cmdtp, int flag, | |
510 | int argc, char *argv[], | |
511 | ulong addr, | |
512 | ulong *len_ptr, | |
513 | int verify) | |
514 | { | |
515 | DECLARE_GLOBAL_DATA_PTR; | |
516 | ||
517 | ulong sp; | |
518 | ulong len, checksum; | |
519 | ulong initrd_start, initrd_end; | |
520 | ulong cmd_start, cmd_end; | |
521 | ulong initrd_high; | |
522 | ulong data; | |
38b99261 | 523 | int initrd_copy_to_ram = 1; |
47d1a6e1 WD |
524 | char *cmdline; |
525 | char *s; | |
526 | bd_t *kbd; | |
527 | void (*kernel)(bd_t *, ulong, ulong, ulong, ulong); | |
528 | image_header_t *hdr = &header; | |
f57f70aa WD |
529 | #ifdef CONFIG_OF_FLAT_TREE |
530 | char *of_flat_tree; | |
531 | #endif | |
47d1a6e1 WD |
532 | |
533 | if ((s = getenv ("initrd_high")) != NULL) { | |
534 | /* a value of "no" or a similar string will act like 0, | |
535 | * turning the "load high" feature off. This is intentional. | |
536 | */ | |
537 | initrd_high = simple_strtoul(s, NULL, 16); | |
38b99261 WD |
538 | if (initrd_high == ~0) |
539 | initrd_copy_to_ram = 0; | |
228f29ac | 540 | } else { /* not set, no restrictions to load high */ |
47d1a6e1 WD |
541 | initrd_high = ~0; |
542 | } | |
543 | ||
56f94be3 | 544 | #ifdef CONFIG_LOGBUFFER |
6aff3115 | 545 | kbd=gd->bd; |
228f29ac WD |
546 | /* Prevent initrd from overwriting logbuffer */ |
547 | if (initrd_high < (kbd->bi_memsize-LOGBUFF_LEN-LOGBUFF_OVERHEAD)) | |
548 | initrd_high = kbd->bi_memsize-LOGBUFF_LEN-LOGBUFF_OVERHEAD; | |
549 | debug ("## Logbuffer at 0x%08lX ", kbd->bi_memsize-LOGBUFF_LEN); | |
56f94be3 WD |
550 | #endif |
551 | ||
47d1a6e1 WD |
552 | /* |
553 | * Booting a (Linux) kernel image | |
554 | * | |
555 | * Allocate space for command line and board info - the | |
556 | * address should be as high as possible within the reach of | |
557 | * the kernel (see CFG_BOOTMAPSZ settings), but in unused | |
558 | * memory, which means far enough below the current stack | |
559 | * pointer. | |
560 | */ | |
561 | ||
562 | asm( "mr %0,1": "=r"(sp) : ); | |
563 | ||
56f94be3 WD |
564 | debug ("## Current stack ends at 0x%08lX ", sp); |
565 | ||
47d1a6e1 WD |
566 | sp -= 2048; /* just to be sure */ |
567 | if (sp > CFG_BOOTMAPSZ) | |
568 | sp = CFG_BOOTMAPSZ; | |
569 | sp &= ~0xF; | |
570 | ||
56f94be3 WD |
571 | debug ("=> set upper limit to 0x%08lX\n", sp); |
572 | ||
47d1a6e1 WD |
573 | cmdline = (char *)((sp - CFG_BARGSIZE) & ~0xF); |
574 | kbd = (bd_t *)(((ulong)cmdline - sizeof(bd_t)) & ~0xF); | |
575 | ||
576 | if ((s = getenv("bootargs")) == NULL) | |
577 | s = ""; | |
578 | ||
579 | strcpy (cmdline, s); | |
580 | ||
581 | cmd_start = (ulong)&cmdline[0]; | |
582 | cmd_end = cmd_start + strlen(cmdline); | |
583 | ||
584 | *kbd = *(gd->bd); | |
585 | ||
586 | #ifdef DEBUG | |
587 | printf ("## cmdline at 0x%08lX ... 0x%08lX\n", cmd_start, cmd_end); | |
588 | ||
589 | do_bdinfo (NULL, 0, 0, NULL); | |
590 | #endif | |
591 | ||
592 | if ((s = getenv ("clocks_in_mhz")) != NULL) { | |
593 | /* convert all clock information to MHz */ | |
594 | kbd->bi_intfreq /= 1000000L; | |
595 | kbd->bi_busfreq /= 1000000L; | |
983fda83 | 596 | #if defined(CONFIG_MPC8220) |
9d5028c2 WD |
597 | kbd->bi_inpfreq /= 1000000L; |
598 | kbd->bi_pcifreq /= 1000000L; | |
599 | kbd->bi_pevfreq /= 1000000L; | |
600 | kbd->bi_flbfreq /= 1000000L; | |
601 | kbd->bi_vcofreq /= 1000000L; | |
983fda83 | 602 | #endif |
9c4c5ae3 | 603 | #if defined(CONFIG_CPM2) |
47d1a6e1 WD |
604 | kbd->bi_cpmfreq /= 1000000L; |
605 | kbd->bi_brgfreq /= 1000000L; | |
606 | kbd->bi_sccfreq /= 1000000L; | |
607 | kbd->bi_vco /= 1000000L; | |
9c4c5ae3 | 608 | #endif |
cbd8a35c | 609 | #if defined(CONFIG_MPC5xxx) |
945af8d7 WD |
610 | kbd->bi_ipbfreq /= 1000000L; |
611 | kbd->bi_pcifreq /= 1000000L; | |
cbd8a35c | 612 | #endif /* CONFIG_MPC5xxx */ |
47d1a6e1 WD |
613 | } |
614 | ||
dc013d46 | 615 | kernel = (void (*)(bd_t *, ulong, ulong, ulong, ulong)) ntohl(hdr->ih_ep); |
47d1a6e1 WD |
616 | |
617 | /* | |
618 | * Check if there is an initrd image | |
619 | */ | |
620 | if (argc >= 3) { | |
621 | SHOW_BOOT_PROGRESS (9); | |
622 | ||
623 | addr = simple_strtoul(argv[2], NULL, 16); | |
624 | ||
625 | printf ("## Loading RAMDisk Image at %08lx ...\n", addr); | |
626 | ||
627 | /* Copy header so we can blank CRC field for re-calculation */ | |
628 | memmove (&header, (char *)addr, sizeof(image_header_t)); | |
629 | ||
dc013d46 | 630 | if (ntohl(hdr->ih_magic) != IH_MAGIC) { |
4b9206ed | 631 | puts ("Bad Magic Number\n"); |
47d1a6e1 WD |
632 | SHOW_BOOT_PROGRESS (-10); |
633 | do_reset (cmdtp, flag, argc, argv); | |
634 | } | |
635 | ||
636 | data = (ulong)&header; | |
637 | len = sizeof(image_header_t); | |
638 | ||
dc013d46 | 639 | checksum = ntohl(hdr->ih_hcrc); |
47d1a6e1 WD |
640 | hdr->ih_hcrc = 0; |
641 | ||
77ddac94 | 642 | if (crc32 (0, (uchar *)data, len) != checksum) { |
4b9206ed | 643 | puts ("Bad Header Checksum\n"); |
47d1a6e1 WD |
644 | SHOW_BOOT_PROGRESS (-11); |
645 | do_reset (cmdtp, flag, argc, argv); | |
646 | } | |
647 | ||
648 | SHOW_BOOT_PROGRESS (10); | |
649 | ||
650 | print_image_hdr (hdr); | |
651 | ||
652 | data = addr + sizeof(image_header_t); | |
dc013d46 | 653 | len = ntohl(hdr->ih_size); |
47d1a6e1 WD |
654 | |
655 | if (verify) { | |
656 | ulong csum = 0; | |
657 | #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG) | |
658 | ulong cdata = data, edata = cdata + len; | |
659 | #endif /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */ | |
660 | ||
4b9206ed | 661 | puts (" Verifying Checksum ... "); |
47d1a6e1 WD |
662 | |
663 | #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG) | |
664 | ||
665 | while (cdata < edata) { | |
666 | ulong chunk = edata - cdata; | |
667 | ||
668 | if (chunk > CHUNKSZ) | |
669 | chunk = CHUNKSZ; | |
77ddac94 | 670 | csum = crc32 (csum, (uchar *)cdata, chunk); |
47d1a6e1 WD |
671 | cdata += chunk; |
672 | ||
673 | WATCHDOG_RESET(); | |
674 | } | |
675 | #else /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */ | |
77ddac94 | 676 | csum = crc32 (0, (uchar *)data, len); |
47d1a6e1 WD |
677 | #endif /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */ |
678 | ||
dc013d46 | 679 | if (csum != ntohl(hdr->ih_dcrc)) { |
4b9206ed | 680 | puts ("Bad Data CRC\n"); |
47d1a6e1 WD |
681 | SHOW_BOOT_PROGRESS (-12); |
682 | do_reset (cmdtp, flag, argc, argv); | |
683 | } | |
4b9206ed | 684 | puts ("OK\n"); |
47d1a6e1 WD |
685 | } |
686 | ||
687 | SHOW_BOOT_PROGRESS (11); | |
688 | ||
689 | if ((hdr->ih_os != IH_OS_LINUX) || | |
690 | (hdr->ih_arch != IH_CPU_PPC) || | |
691 | (hdr->ih_type != IH_TYPE_RAMDISK) ) { | |
4b9206ed | 692 | puts ("No Linux PPC Ramdisk Image\n"); |
47d1a6e1 WD |
693 | SHOW_BOOT_PROGRESS (-13); |
694 | do_reset (cmdtp, flag, argc, argv); | |
695 | } | |
696 | ||
697 | /* | |
698 | * Now check if we have a multifile image | |
699 | */ | |
700 | } else if ((hdr->ih_type==IH_TYPE_MULTI) && (len_ptr[1])) { | |
701 | u_long tail = ntohl(len_ptr[0]) % 4; | |
702 | int i; | |
703 | ||
704 | SHOW_BOOT_PROGRESS (13); | |
705 | ||
706 | /* skip kernel length and terminator */ | |
707 | data = (ulong)(&len_ptr[2]); | |
708 | /* skip any additional image length fields */ | |
709 | for (i=1; len_ptr[i]; ++i) | |
710 | data += 4; | |
711 | /* add kernel length, and align */ | |
712 | data += ntohl(len_ptr[0]); | |
713 | if (tail) { | |
714 | data += 4 - tail; | |
715 | } | |
716 | ||
717 | len = ntohl(len_ptr[1]); | |
718 | ||
719 | } else { | |
720 | /* | |
721 | * no initrd image | |
722 | */ | |
723 | SHOW_BOOT_PROGRESS (14); | |
724 | ||
725 | len = data = 0; | |
726 | } | |
727 | ||
47d1a6e1 | 728 | if (!data) { |
56f94be3 | 729 | debug ("No initrd\n"); |
47d1a6e1 | 730 | } |
47d1a6e1 WD |
731 | |
732 | if (data) { | |
38b99261 WD |
733 | if (!initrd_copy_to_ram) { /* zero-copy ramdisk support */ |
734 | initrd_start = data; | |
735 | initrd_end = initrd_start + len; | |
736 | } else { | |
47d1a6e1 WD |
737 | initrd_start = (ulong)kbd - len; |
738 | initrd_start &= ~(4096 - 1); /* align on page */ | |
739 | ||
740 | if (initrd_high) { | |
741 | ulong nsp; | |
742 | ||
743 | /* | |
744 | * the inital ramdisk does not need to be within | |
745 | * CFG_BOOTMAPSZ as it is not accessed until after | |
746 | * the mm system is initialised. | |
747 | * | |
748 | * do the stack bottom calculation again and see if | |
749 | * the initrd will fit just below the monitor stack | |
750 | * bottom without overwriting the area allocated | |
751 | * above for command line args and board info. | |
752 | */ | |
753 | asm( "mr %0,1": "=r"(nsp) : ); | |
754 | nsp -= 2048; /* just to be sure */ | |
755 | nsp &= ~0xF; | |
756 | if (nsp > initrd_high) /* limit as specified */ | |
757 | nsp = initrd_high; | |
758 | nsp -= len; | |
759 | nsp &= ~(4096 - 1); /* align on page */ | |
760 | if (nsp >= sp) | |
761 | initrd_start = nsp; | |
762 | } | |
763 | ||
764 | SHOW_BOOT_PROGRESS (12); | |
56f94be3 WD |
765 | |
766 | debug ("## initrd at 0x%08lX ... 0x%08lX (len=%ld=0x%lX)\n", | |
47d1a6e1 | 767 | data, data + len - 1, len, len); |
56f94be3 | 768 | |
47d1a6e1 WD |
769 | initrd_end = initrd_start + len; |
770 | printf (" Loading Ramdisk to %08lx, end %08lx ... ", | |
771 | initrd_start, initrd_end); | |
772 | #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG) | |
773 | { | |
774 | size_t l = len; | |
775 | void *to = (void *)initrd_start; | |
776 | void *from = (void *)data; | |
777 | ||
778 | while (l > 0) { | |
779 | size_t tail = (l > CHUNKSZ) ? CHUNKSZ : l; | |
780 | WATCHDOG_RESET(); | |
781 | memmove (to, from, tail); | |
782 | to += tail; | |
783 | from += tail; | |
784 | l -= tail; | |
785 | } | |
786 | } | |
787 | #else /* !(CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG) */ | |
788 | memmove ((void *)initrd_start, (void *)data, len); | |
789 | #endif /* CONFIG_HW_WATCHDOG || CONFIG_WATCHDOG */ | |
4b9206ed | 790 | puts ("OK\n"); |
38b99261 | 791 | } |
47d1a6e1 WD |
792 | } else { |
793 | initrd_start = 0; | |
794 | initrd_end = 0; | |
795 | } | |
796 | ||
f57f70aa WD |
797 | #ifdef CONFIG_OF_FLAT_TREE |
798 | if (initrd_start == 0) | |
799 | of_flat_tree = (char *)(((ulong)kbd - OF_FLAT_TREE_MAX_SIZE - | |
800 | sizeof(bd_t)) & ~0xF); | |
801 | else | |
802 | of_flat_tree = (char *)((initrd_start - OF_FLAT_TREE_MAX_SIZE - | |
803 | sizeof(bd_t)) & ~0xF); | |
804 | #endif | |
56f94be3 WD |
805 | |
806 | debug ("## Transferring control to Linux (at address %08lx) ...\n", | |
47d1a6e1 | 807 | (ulong)kernel); |
56f94be3 | 808 | |
47d1a6e1 WD |
809 | SHOW_BOOT_PROGRESS (15); |
810 | ||
f57f70aa WD |
811 | #ifndef CONFIG_OF_FLAT_TREE |
812 | ||
42d1f039 | 813 | #if defined(CFG_INIT_RAM_LOCK) && !defined(CONFIG_E500) |
47d1a6e1 WD |
814 | unlock_ram_in_cache(); |
815 | #endif | |
f57f70aa | 816 | |
47d1a6e1 WD |
817 | /* |
818 | * Linux Kernel Parameters: | |
819 | * r3: ptr to board info data | |
820 | * r4: initrd_start or 0 if no initrd | |
821 | * r5: initrd_end - unused if r4 is 0 | |
822 | * r6: Start of command line string | |
823 | * r7: End of command line string | |
824 | */ | |
825 | (*kernel) (kbd, initrd_start, initrd_end, cmd_start, cmd_end); | |
f57f70aa WD |
826 | |
827 | #else | |
e559a690 | 828 | ft_setup(of_flat_tree, OF_FLAT_TREE_MAX_SIZE, kbd, initrd_start, initrd_end); |
f57f70aa WD |
829 | /* ft_dump_blob(of_flat_tree); */ |
830 | ||
831 | #if defined(CFG_INIT_RAM_LOCK) && !defined(CONFIG_E500) | |
832 | unlock_ram_in_cache(); | |
833 | #endif | |
834 | /* | |
835 | * Linux Kernel Parameters: | |
836 | * r3: ptr to OF flat tree, followed by the board info data | |
e559a690 KG |
837 | * r4: physical pointer to the kernel itself |
838 | * r5: NULL | |
839 | * r6: NULL | |
840 | * r7: NULL | |
f57f70aa | 841 | */ |
e559a690 KG |
842 | if (getenv("disable_of") != NULL) |
843 | (*kernel) ((bd_t *)of_flat_tree, initrd_start, initrd_end, | |
844 | cmd_start, cmd_end); | |
845 | else | |
846 | (*kernel) ((bd_t *)of_flat_tree, (ulong)kernel, 0, 0, 0); | |
f57f70aa WD |
847 | |
848 | #endif | |
47d1a6e1 | 849 | } |
1cb8e980 | 850 | #endif /* CONFIG_PPC */ |
47d1a6e1 WD |
851 | |
852 | static void | |
853 | do_bootm_netbsd (cmd_tbl_t *cmdtp, int flag, | |
854 | int argc, char *argv[], | |
855 | ulong addr, | |
856 | ulong *len_ptr, | |
857 | int verify) | |
858 | { | |
859 | DECLARE_GLOBAL_DATA_PTR; | |
860 | ||
861 | image_header_t *hdr = &header; | |
862 | ||
863 | void (*loader)(bd_t *, image_header_t *, char *, char *); | |
864 | image_header_t *img_addr; | |
865 | char *consdev; | |
866 | char *cmdline; | |
867 | ||
868 | ||
869 | /* | |
870 | * Booting a (NetBSD) kernel image | |
871 | * | |
872 | * This process is pretty similar to a standalone application: | |
873 | * The (first part of an multi-) image must be a stage-2 loader, | |
874 | * which in turn is responsible for loading & invoking the actual | |
875 | * kernel. The only differences are the parameters being passed: | |
876 | * besides the board info strucure, the loader expects a command | |
877 | * line, the name of the console device, and (optionally) the | |
878 | * address of the original image header. | |
879 | */ | |
880 | ||
881 | img_addr = 0; | |
882 | if ((hdr->ih_type==IH_TYPE_MULTI) && (len_ptr[1])) | |
883 | img_addr = (image_header_t *) addr; | |
884 | ||
885 | ||
886 | consdev = ""; | |
887 | #if defined (CONFIG_8xx_CONS_SMC1) | |
888 | consdev = "smc1"; | |
889 | #elif defined (CONFIG_8xx_CONS_SMC2) | |
890 | consdev = "smc2"; | |
891 | #elif defined (CONFIG_8xx_CONS_SCC2) | |
892 | consdev = "scc2"; | |
893 | #elif defined (CONFIG_8xx_CONS_SCC3) | |
894 | consdev = "scc3"; | |
895 | #endif | |
896 | ||
897 | if (argc > 2) { | |
898 | ulong len; | |
899 | int i; | |
900 | ||
901 | for (i=2, len=0 ; i<argc ; i+=1) | |
902 | len += strlen (argv[i]) + 1; | |
903 | cmdline = malloc (len); | |
904 | ||
905 | for (i=2, len=0 ; i<argc ; i+=1) { | |
906 | if (i > 2) | |
907 | cmdline[len++] = ' '; | |
908 | strcpy (&cmdline[len], argv[i]); | |
909 | len += strlen (argv[i]); | |
910 | } | |
911 | } else if ((cmdline = getenv("bootargs")) == NULL) { | |
912 | cmdline = ""; | |
913 | } | |
914 | ||
dc013d46 | 915 | loader = (void (*)(bd_t *, image_header_t *, char *, char *)) ntohl(hdr->ih_ep); |
47d1a6e1 WD |
916 | |
917 | printf ("## Transferring control to NetBSD stage-2 loader (at address %08lx) ...\n", | |
918 | (ulong)loader); | |
919 | ||
920 | SHOW_BOOT_PROGRESS (15); | |
921 | ||
922 | /* | |
923 | * NetBSD Stage-2 Loader Parameters: | |
924 | * r3: ptr to board info data | |
925 | * r4: image address | |
926 | * r5: console device | |
927 | * r6: boot args string | |
928 | */ | |
929 | (*loader) (gd->bd, img_addr, consdev, cmdline); | |
930 | } | |
931 | ||
7f70e853 WD |
932 | #if defined(CONFIG_ARTOS) && defined(CONFIG_PPC) |
933 | ||
934 | /* Function that returns a character from the environment */ | |
935 | extern uchar (*env_get_char)(int); | |
936 | ||
937 | static void | |
938 | do_bootm_artos (cmd_tbl_t *cmdtp, int flag, | |
939 | int argc, char *argv[], | |
940 | ulong addr, | |
941 | ulong *len_ptr, | |
942 | int verify) | |
943 | { | |
944 | DECLARE_GLOBAL_DATA_PTR; | |
945 | ulong top; | |
946 | char *s, *cmdline; | |
947 | char **fwenv, **ss; | |
948 | int i, j, nxt, len, envno, envsz; | |
949 | bd_t *kbd; | |
950 | void (*entry)(bd_t *bd, char *cmdline, char **fwenv, ulong top); | |
951 | image_header_t *hdr = &header; | |
952 | ||
953 | /* | |
954 | * Booting an ARTOS kernel image + application | |
955 | */ | |
956 | ||
957 | /* this used to be the top of memory, but was wrong... */ | |
958 | #ifdef CONFIG_PPC | |
959 | /* get stack pointer */ | |
960 | asm volatile ("mr %0,1" : "=r"(top) ); | |
961 | #endif | |
962 | debug ("## Current stack ends at 0x%08lX ", top); | |
963 | ||
964 | top -= 2048; /* just to be sure */ | |
965 | if (top > CFG_BOOTMAPSZ) | |
966 | top = CFG_BOOTMAPSZ; | |
967 | top &= ~0xF; | |
968 | ||
969 | debug ("=> set upper limit to 0x%08lX\n", top); | |
970 | ||
971 | /* first check the artos specific boot args, then the linux args*/ | |
972 | if ((s = getenv("abootargs")) == NULL && (s = getenv("bootargs")) == NULL) | |
973 | s = ""; | |
974 | ||
975 | /* get length of cmdline, and place it */ | |
976 | len = strlen(s); | |
977 | top = (top - (len + 1)) & ~0xF; | |
978 | cmdline = (char *)top; | |
979 | debug ("## cmdline at 0x%08lX ", top); | |
980 | strcpy(cmdline, s); | |
981 | ||
982 | /* copy bdinfo */ | |
983 | top = (top - sizeof(bd_t)) & ~0xF; | |
984 | debug ("## bd at 0x%08lX ", top); | |
985 | kbd = (bd_t *)top; | |
986 | memcpy(kbd, gd->bd, sizeof(bd_t)); | |
987 | ||
988 | /* first find number of env entries, and their size */ | |
989 | envno = 0; | |
990 | envsz = 0; | |
991 | for (i = 0; env_get_char(i) != '\0'; i = nxt + 1) { | |
992 | for (nxt = i; env_get_char(nxt) != '\0'; ++nxt) | |
993 | ; | |
994 | envno++; | |
995 | envsz += (nxt - i) + 1; /* plus trailing zero */ | |
996 | } | |
997 | envno++; /* plus the terminating zero */ | |
998 | debug ("## %u envvars total size %u ", envno, envsz); | |
999 | ||
1000 | top = (top - sizeof(char **)*envno) & ~0xF; | |
1001 | fwenv = (char **)top; | |
1002 | debug ("## fwenv at 0x%08lX ", top); | |
1003 | ||
1004 | top = (top - envsz) & ~0xF; | |
1005 | s = (char *)top; | |
1006 | ss = fwenv; | |
1007 | ||
1008 | /* now copy them */ | |
1009 | for (i = 0; env_get_char(i) != '\0'; i = nxt + 1) { | |
1010 | for (nxt = i; env_get_char(nxt) != '\0'; ++nxt) | |
1011 | ; | |
1012 | *ss++ = s; | |
1013 | for (j = i; j < nxt; ++j) | |
1014 | *s++ = env_get_char(j); | |
1015 | *s++ = '\0'; | |
1016 | } | |
1017 | *ss++ = NULL; /* terminate */ | |
1018 | ||
1019 | entry = (void (*)(bd_t *, char *, char **, ulong))ntohl(hdr->ih_ep); | |
1020 | (*entry)(kbd, cmdline, fwenv, top); | |
1021 | } | |
1022 | #endif | |
1023 | ||
1024 | ||
47d1a6e1 WD |
1025 | #if (CONFIG_COMMANDS & CFG_CMD_BOOTD) |
1026 | int do_bootd (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
1027 | { | |
1028 | int rcode = 0; | |
1029 | #ifndef CFG_HUSH_PARSER | |
1030 | if (run_command (getenv ("bootcmd"), flag) < 0) rcode = 1; | |
1031 | #else | |
1032 | if (parse_string_outer(getenv("bootcmd"), | |
1033 | FLAG_PARSE_SEMICOLON | FLAG_EXIT_FROM_LOOP) != 0 ) rcode = 1; | |
1034 | #endif | |
1035 | return rcode; | |
1036 | } | |
8bde7f77 | 1037 | |
0d498393 WD |
1038 | U_BOOT_CMD( |
1039 | boot, 1, 1, do_bootd, | |
9d2b18a0 WD |
1040 | "boot - boot default, i.e., run 'bootcmd'\n", |
1041 | NULL | |
1042 | ); | |
1043 | ||
1044 | /* keep old command name "bootd" for backward compatibility */ | |
0d498393 WD |
1045 | U_BOOT_CMD( |
1046 | bootd, 1, 1, do_bootd, | |
8bde7f77 WD |
1047 | "bootd - boot default, i.e., run 'bootcmd'\n", |
1048 | NULL | |
1049 | ); | |
1050 | ||
47d1a6e1 WD |
1051 | #endif |
1052 | ||
1053 | #if (CONFIG_COMMANDS & CFG_CMD_IMI) | |
1054 | int do_iminfo ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
1055 | { | |
1056 | int arg; | |
1057 | ulong addr; | |
1058 | int rcode=0; | |
1059 | ||
1060 | if (argc < 2) { | |
1061 | return image_info (load_addr); | |
1062 | } | |
1063 | ||
1064 | for (arg=1; arg <argc; ++arg) { | |
1065 | addr = simple_strtoul(argv[arg], NULL, 16); | |
1066 | if (image_info (addr) != 0) rcode = 1; | |
1067 | } | |
1068 | return rcode; | |
1069 | } | |
1070 | ||
1071 | static int image_info (ulong addr) | |
1072 | { | |
1073 | ulong data, len, checksum; | |
1074 | image_header_t *hdr = &header; | |
1075 | ||
1076 | printf ("\n## Checking Image at %08lx ...\n", addr); | |
1077 | ||
1078 | /* Copy header so we can blank CRC field for re-calculation */ | |
1079 | memmove (&header, (char *)addr, sizeof(image_header_t)); | |
1080 | ||
1081 | if (ntohl(hdr->ih_magic) != IH_MAGIC) { | |
4b9206ed | 1082 | puts (" Bad Magic Number\n"); |
47d1a6e1 WD |
1083 | return 1; |
1084 | } | |
1085 | ||
1086 | data = (ulong)&header; | |
1087 | len = sizeof(image_header_t); | |
1088 | ||
1089 | checksum = ntohl(hdr->ih_hcrc); | |
1090 | hdr->ih_hcrc = 0; | |
1091 | ||
77ddac94 | 1092 | if (crc32 (0, (uchar *)data, len) != checksum) { |
4b9206ed | 1093 | puts (" Bad Header Checksum\n"); |
47d1a6e1 WD |
1094 | return 1; |
1095 | } | |
1096 | ||
1097 | /* for multi-file images we need the data part, too */ | |
1098 | print_image_hdr ((image_header_t *)addr); | |
1099 | ||
1100 | data = addr + sizeof(image_header_t); | |
1101 | len = ntohl(hdr->ih_size); | |
1102 | ||
4b9206ed | 1103 | puts (" Verifying Checksum ... "); |
77ddac94 | 1104 | if (crc32 (0, (uchar *)data, len) != ntohl(hdr->ih_dcrc)) { |
4b9206ed | 1105 | puts (" Bad Data CRC\n"); |
47d1a6e1 WD |
1106 | return 1; |
1107 | } | |
4b9206ed | 1108 | puts ("OK\n"); |
47d1a6e1 WD |
1109 | return 0; |
1110 | } | |
0d498393 WD |
1111 | |
1112 | U_BOOT_CMD( | |
1113 | iminfo, CFG_MAXARGS, 1, do_iminfo, | |
8bde7f77 WD |
1114 | "iminfo - print header information for application image\n", |
1115 | "addr [addr ...]\n" | |
1116 | " - print header information for application image starting at\n" | |
1117 | " address 'addr' in memory; this includes verification of the\n" | |
1118 | " image contents (magic number, header and payload checksums)\n" | |
1119 | ); | |
1120 | ||
47d1a6e1 WD |
1121 | #endif /* CFG_CMD_IMI */ |
1122 | ||
27b207fd WD |
1123 | #if (CONFIG_COMMANDS & CFG_CMD_IMLS) |
1124 | /*----------------------------------------------------------------------- | |
1125 | * List all images found in flash. | |
1126 | */ | |
1127 | int do_imls (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
1128 | { | |
1129 | flash_info_t *info; | |
1130 | int i, j; | |
1131 | image_header_t *hdr; | |
5bb226e8 | 1132 | ulong data, len, checksum; |
27b207fd WD |
1133 | |
1134 | for (i=0, info=&flash_info[0]; i<CFG_MAX_FLASH_BANKS; ++i, ++info) { | |
1135 | if (info->flash_id == FLASH_UNKNOWN) | |
1136 | goto next_bank; | |
e6f2e902 | 1137 | for (j=0; j<info->sector_count; ++j) { |
27b207fd WD |
1138 | |
1139 | if (!(hdr=(image_header_t *)info->start[j]) || | |
1140 | (ntohl(hdr->ih_magic) != IH_MAGIC)) | |
1141 | goto next_sector; | |
1142 | ||
1143 | /* Copy header so we can blank CRC field for re-calculation */ | |
1144 | memmove (&header, (char *)hdr, sizeof(image_header_t)); | |
1145 | ||
1146 | checksum = ntohl(header.ih_hcrc); | |
1147 | header.ih_hcrc = 0; | |
1148 | ||
77ddac94 | 1149 | if (crc32 (0, (uchar *)&header, sizeof(image_header_t)) |
27b207fd WD |
1150 | != checksum) |
1151 | goto next_sector; | |
1152 | ||
1153 | printf ("Image at %08lX:\n", (ulong)hdr); | |
1154 | print_image_hdr( hdr ); | |
5bb226e8 WD |
1155 | |
1156 | data = (ulong)hdr + sizeof(image_header_t); | |
1157 | len = ntohl(hdr->ih_size); | |
1158 | ||
4b9206ed | 1159 | puts (" Verifying Checksum ... "); |
77ddac94 | 1160 | if (crc32 (0, (uchar *)data, len) != ntohl(hdr->ih_dcrc)) { |
4b9206ed | 1161 | puts (" Bad Data CRC\n"); |
5bb226e8 | 1162 | } |
4b9206ed | 1163 | puts ("OK\n"); |
bdccc4fe | 1164 | next_sector: ; |
27b207fd | 1165 | } |
bdccc4fe | 1166 | next_bank: ; |
27b207fd WD |
1167 | } |
1168 | ||
1169 | return (0); | |
1170 | } | |
1171 | ||
1172 | U_BOOT_CMD( | |
1173 | imls, 1, 1, do_imls, | |
1174 | "imls - list all images found in flash\n", | |
1175 | "\n" | |
1176 | " - Prints information about all images found at sector\n" | |
1177 | " boundaries in flash.\n" | |
1178 | ); | |
1179 | #endif /* CFG_CMD_IMLS */ | |
1180 | ||
47d1a6e1 WD |
1181 | void |
1182 | print_image_hdr (image_header_t *hdr) | |
1183 | { | |
1184 | #if (CONFIG_COMMANDS & CFG_CMD_DATE) || defined(CONFIG_TIMESTAMP) | |
1185 | time_t timestamp = (time_t)ntohl(hdr->ih_time); | |
1186 | struct rtc_time tm; | |
1187 | #endif | |
1188 | ||
1189 | printf (" Image Name: %.*s\n", IH_NMLEN, hdr->ih_name); | |
1190 | #if (CONFIG_COMMANDS & CFG_CMD_DATE) || defined(CONFIG_TIMESTAMP) | |
1191 | to_tm (timestamp, &tm); | |
1192 | printf (" Created: %4d-%02d-%02d %2d:%02d:%02d UTC\n", | |
1193 | tm.tm_year, tm.tm_mon, tm.tm_mday, | |
1194 | tm.tm_hour, tm.tm_min, tm.tm_sec); | |
1195 | #endif /* CFG_CMD_DATE, CONFIG_TIMESTAMP */ | |
4b9206ed WD |
1196 | puts (" Image Type: "); print_type(hdr); |
1197 | printf ("\n Data Size: %d Bytes = ", ntohl(hdr->ih_size)); | |
47d1a6e1 | 1198 | print_size (ntohl(hdr->ih_size), "\n"); |
4b9206ed WD |
1199 | printf (" Load Address: %08x\n" |
1200 | " Entry Point: %08x\n", | |
1201 | ntohl(hdr->ih_load), ntohl(hdr->ih_ep)); | |
47d1a6e1 WD |
1202 | |
1203 | if (hdr->ih_type == IH_TYPE_MULTI) { | |
1204 | int i; | |
1205 | ulong len; | |
1206 | ulong *len_ptr = (ulong *)((ulong)hdr + sizeof(image_header_t)); | |
1207 | ||
4b9206ed | 1208 | puts (" Contents:\n"); |
47d1a6e1 WD |
1209 | for (i=0; (len = ntohl(*len_ptr)); ++i, ++len_ptr) { |
1210 | printf (" Image %d: %8ld Bytes = ", i, len); | |
1211 | print_size (len, "\n"); | |
1212 | } | |
1213 | } | |
1214 | } | |
1215 | ||
1216 | ||
1217 | static void | |
1218 | print_type (image_header_t *hdr) | |
1219 | { | |
1220 | char *os, *arch, *type, *comp; | |
1221 | ||
1222 | switch (hdr->ih_os) { | |
1223 | case IH_OS_INVALID: os = "Invalid OS"; break; | |
1224 | case IH_OS_NETBSD: os = "NetBSD"; break; | |
1225 | case IH_OS_LINUX: os = "Linux"; break; | |
1226 | case IH_OS_VXWORKS: os = "VxWorks"; break; | |
1227 | case IH_OS_QNX: os = "QNX"; break; | |
1228 | case IH_OS_U_BOOT: os = "U-Boot"; break; | |
d791b1dc | 1229 | case IH_OS_RTEMS: os = "RTEMS"; break; |
7f70e853 WD |
1230 | #ifdef CONFIG_ARTOS |
1231 | case IH_OS_ARTOS: os = "ARTOS"; break; | |
1f4bb37d WD |
1232 | #endif |
1233 | #ifdef CONFIG_LYNXKDI | |
1234 | case IH_OS_LYNXOS: os = "LynxOS"; break; | |
7f70e853 | 1235 | #endif |
47d1a6e1 WD |
1236 | default: os = "Unknown OS"; break; |
1237 | } | |
1238 | ||
1239 | switch (hdr->ih_arch) { | |
1240 | case IH_CPU_INVALID: arch = "Invalid CPU"; break; | |
1241 | case IH_CPU_ALPHA: arch = "Alpha"; break; | |
1242 | case IH_CPU_ARM: arch = "ARM"; break; | |
1243 | case IH_CPU_I386: arch = "Intel x86"; break; | |
1244 | case IH_CPU_IA64: arch = "IA64"; break; | |
1245 | case IH_CPU_MIPS: arch = "MIPS"; break; | |
1246 | case IH_CPU_MIPS64: arch = "MIPS 64 Bit"; break; | |
1247 | case IH_CPU_PPC: arch = "PowerPC"; break; | |
1248 | case IH_CPU_S390: arch = "IBM S390"; break; | |
1249 | case IH_CPU_SH: arch = "SuperH"; break; | |
1250 | case IH_CPU_SPARC: arch = "SPARC"; break; | |
1251 | case IH_CPU_SPARC64: arch = "SPARC 64 Bit"; break; | |
8564acf9 | 1252 | case IH_CPU_M68K: arch = "M68K"; break; |
507bbe3e | 1253 | case IH_CPU_MICROBLAZE: arch = "Microblaze"; break; |
c1a11c19 WD |
1254 | case IH_CPU_NIOS: arch = "Nios"; break; |
1255 | case IH_CPU_NIOS2: arch = "Nios-II"; break; | |
47d1a6e1 WD |
1256 | default: arch = "Unknown Architecture"; break; |
1257 | } | |
1258 | ||
1259 | switch (hdr->ih_type) { | |
1260 | case IH_TYPE_INVALID: type = "Invalid Image"; break; | |
1261 | case IH_TYPE_STANDALONE:type = "Standalone Program"; break; | |
1262 | case IH_TYPE_KERNEL: type = "Kernel Image"; break; | |
1263 | case IH_TYPE_RAMDISK: type = "RAMDisk Image"; break; | |
1264 | case IH_TYPE_MULTI: type = "Multi-File Image"; break; | |
1265 | case IH_TYPE_FIRMWARE: type = "Firmware"; break; | |
1266 | case IH_TYPE_SCRIPT: type = "Script"; break; | |
1267 | default: type = "Unknown Image"; break; | |
1268 | } | |
1269 | ||
1270 | switch (hdr->ih_comp) { | |
1271 | case IH_COMP_NONE: comp = "uncompressed"; break; | |
1272 | case IH_COMP_GZIP: comp = "gzip compressed"; break; | |
1273 | case IH_COMP_BZIP2: comp = "bzip2 compressed"; break; | |
1274 | default: comp = "unknown compression"; break; | |
1275 | } | |
1276 | ||
1277 | printf ("%s %s %s (%s)", arch, os, type, comp); | |
1278 | } | |
1279 | ||
1280 | #define ZALLOC_ALIGNMENT 16 | |
1281 | ||
1282 | static void *zalloc(void *x, unsigned items, unsigned size) | |
1283 | { | |
1284 | void *p; | |
1285 | ||
1286 | size *= items; | |
1287 | size = (size + ZALLOC_ALIGNMENT - 1) & ~(ZALLOC_ALIGNMENT - 1); | |
1288 | ||
1289 | p = malloc (size); | |
1290 | ||
1291 | return (p); | |
1292 | } | |
1293 | ||
1294 | static void zfree(void *x, void *addr, unsigned nb) | |
1295 | { | |
1296 | free (addr); | |
1297 | } | |
1298 | ||
1299 | #define HEAD_CRC 2 | |
1300 | #define EXTRA_FIELD 4 | |
1301 | #define ORIG_NAME 8 | |
1302 | #define COMMENT 0x10 | |
1303 | #define RESERVED 0xe0 | |
1304 | ||
1305 | #define DEFLATED 8 | |
1306 | ||
eedcd078 | 1307 | int gunzip(void *dst, int dstlen, unsigned char *src, unsigned long *lenp) |
47d1a6e1 WD |
1308 | { |
1309 | z_stream s; | |
1310 | int r, i, flags; | |
1311 | ||
1312 | /* skip header */ | |
1313 | i = 10; | |
1314 | flags = src[3]; | |
1315 | if (src[2] != DEFLATED || (flags & RESERVED) != 0) { | |
4b9206ed | 1316 | puts ("Error: Bad gzipped data\n"); |
47d1a6e1 WD |
1317 | return (-1); |
1318 | } | |
1319 | if ((flags & EXTRA_FIELD) != 0) | |
1320 | i = 12 + src[10] + (src[11] << 8); | |
1321 | if ((flags & ORIG_NAME) != 0) | |
1322 | while (src[i++] != 0) | |
1323 | ; | |
1324 | if ((flags & COMMENT) != 0) | |
1325 | while (src[i++] != 0) | |
1326 | ; | |
1327 | if ((flags & HEAD_CRC) != 0) | |
1328 | i += 2; | |
1329 | if (i >= *lenp) { | |
4b9206ed | 1330 | puts ("Error: gunzip out of data in header\n"); |
47d1a6e1 WD |
1331 | return (-1); |
1332 | } | |
1333 | ||
1334 | s.zalloc = zalloc; | |
1335 | s.zfree = zfree; | |
1336 | #if defined(CONFIG_HW_WATCHDOG) || defined(CONFIG_WATCHDOG) | |
1337 | s.outcb = (cb_func)WATCHDOG_RESET; | |
1338 | #else | |
1339 | s.outcb = Z_NULL; | |
1340 | #endif /* CONFIG_HW_WATCHDOG */ | |
1341 | ||
1342 | r = inflateInit2(&s, -MAX_WBITS); | |
1343 | if (r != Z_OK) { | |
1344 | printf ("Error: inflateInit2() returned %d\n", r); | |
1345 | return (-1); | |
1346 | } | |
1347 | s.next_in = src + i; | |
1348 | s.avail_in = *lenp - i; | |
1349 | s.next_out = dst; | |
1350 | s.avail_out = dstlen; | |
1351 | r = inflate(&s, Z_FINISH); | |
1352 | if (r != Z_OK && r != Z_STREAM_END) { | |
1353 | printf ("Error: inflate() returned %d\n", r); | |
1354 | return (-1); | |
1355 | } | |
1356 | *lenp = s.next_out - (unsigned char *) dst; | |
1357 | inflateEnd(&s); | |
1358 | ||
1359 | return (0); | |
1360 | } | |
1361 | ||
c29fdfc1 WD |
1362 | #ifdef CONFIG_BZIP2 |
1363 | void bz_internal_error(int errcode) | |
1364 | { | |
1365 | printf ("BZIP2 internal error %d\n", errcode); | |
1366 | } | |
1367 | #endif /* CONFIG_BZIP2 */ | |
1368 | ||
d791b1dc WD |
1369 | static void |
1370 | do_bootm_rtems (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[], | |
1371 | ulong addr, ulong *len_ptr, int verify) | |
1372 | { | |
1373 | DECLARE_GLOBAL_DATA_PTR; | |
1374 | image_header_t *hdr = &header; | |
1375 | void (*entry_point)(bd_t *); | |
1376 | ||
dc013d46 | 1377 | entry_point = (void (*)(bd_t *)) ntohl(hdr->ih_ep); |
d791b1dc WD |
1378 | |
1379 | printf ("## Transferring control to RTEMS (at address %08lx) ...\n", | |
1380 | (ulong)entry_point); | |
1381 | ||
1382 | SHOW_BOOT_PROGRESS (15); | |
1383 | ||
1384 | /* | |
1385 | * RTEMS Parameters: | |
1386 | * r3: ptr to board info data | |
1387 | */ | |
1388 | ||
1389 | (*entry_point ) ( gd->bd ); | |
1390 | } | |
1391 | ||
47d1a6e1 WD |
1392 | #if (CONFIG_COMMANDS & CFG_CMD_ELF) |
1393 | static void | |
1394 | do_bootm_vxworks (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[], | |
1395 | ulong addr, ulong *len_ptr, int verify) | |
1396 | { | |
1397 | image_header_t *hdr = &header; | |
1398 | char str[80]; | |
1399 | ||
dc013d46 | 1400 | sprintf(str, "%x", ntohl(hdr->ih_ep)); /* write entry-point into string */ |
47d1a6e1 WD |
1401 | setenv("loadaddr", str); |
1402 | do_bootvx(cmdtp, 0, 0, NULL); | |
1403 | } | |
1404 | ||
1405 | static void | |
1406 | do_bootm_qnxelf (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[], | |
1407 | ulong addr, ulong *len_ptr, int verify) | |
1408 | { | |
1409 | image_header_t *hdr = &header; | |
1410 | char *local_args[2]; | |
1411 | char str[16]; | |
1412 | ||
dc013d46 | 1413 | sprintf(str, "%x", ntohl(hdr->ih_ep)); /* write entry-point into string */ |
47d1a6e1 WD |
1414 | local_args[0] = argv[0]; |
1415 | local_args[1] = str; /* and provide it via the arguments */ | |
1416 | do_bootelf(cmdtp, 0, 2, local_args); | |
1417 | } | |
1418 | #endif /* CFG_CMD_ELF */ | |
1f4bb37d WD |
1419 | |
1420 | #ifdef CONFIG_LYNXKDI | |
1421 | static void | |
1422 | do_bootm_lynxkdi (cmd_tbl_t *cmdtp, int flag, | |
1423 | int argc, char *argv[], | |
1424 | ulong addr, | |
1425 | ulong *len_ptr, | |
1426 | int verify) | |
1427 | { | |
1428 | lynxkdi_boot( &header ); | |
1429 | } | |
1430 | ||
1431 | #endif /* CONFIG_LYNXKDI */ |