2 * (C) Copyright 2008 Semihalf
4 * (C) Copyright 2000-2006
5 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
7 * See file CREDITS for list of people who contributed to this
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.
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.
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,
35 #include <environment.h>
36 #include <asm/byteorder.h>
38 #if defined(CONFIG_OF_LIBFDT)
41 #include <fdt_support.h>
42 #elif defined(CONFIG_OF_FLAT_TREE)
46 #ifdef CONFIG_LOGBUFFER
50 #ifdef CFG_INIT_RAM_LOCK
51 #include <asm/cache.h>
54 DECLARE_GLOBAL_DATA_PTR;
56 extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
58 #if defined(CONFIG_CMD_BDI)
59 extern int do_bdinfo(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
62 void __attribute__((noinline))
63 do_bootm_linux(cmd_tbl_t *cmdtp, int flag,
64 int argc, char *argv[],
69 int initrd_copy_to_ram = 1;
70 ulong initrd_start, initrd_end;
71 ulong rd_data, rd_len;
72 image_header_t *rd_hdr;
74 ulong cmd_start, cmd_end;
80 void (*kernel)(bd_t *, ulong, ulong, ulong, ulong);
82 #if defined(CONFIG_OF_FLAT_TREE) || defined(CONFIG_OF_LIBFDT)
83 image_header_t *fdt_hdr;
84 char *of_flat_tree = NULL;
88 if ((s = getenv ("initrd_high")) != NULL) {
89 /* a value of "no" or a similar string will act like 0,
90 * turning the "load high" feature off. This is intentional.
92 initrd_high = simple_strtoul(s, NULL, 16);
93 if (initrd_high == ~0)
94 initrd_copy_to_ram = 0;
95 } else { /* not set, no restrictions to load high */
99 #ifdef CONFIG_LOGBUFFER
101 /* Prevent initrd from overwriting logbuffer */
102 if (initrd_high < (kbd->bi_memsize-LOGBUFF_LEN-LOGBUFF_OVERHEAD))
103 initrd_high = kbd->bi_memsize-LOGBUFF_LEN-LOGBUFF_OVERHEAD;
104 debug ("## Logbuffer at 0x%08lX ", kbd->bi_memsize-LOGBUFF_LEN);
108 * Booting a (Linux) kernel image
110 * Allocate space for command line and board info - the
111 * address should be as high as possible within the reach of
112 * the kernel (see CFG_BOOTMAPSZ settings), but in unused
113 * memory, which means far enough below the current stack
117 asm( "mr %0,1": "=r"(sp) : );
119 debug ("## Current stack ends at 0x%08lX ", sp);
121 sp -= 2048; /* just to be sure */
122 if (sp > CFG_BOOTMAPSZ)
126 debug ("=> set upper limit to 0x%08lX\n", sp);
128 cmdline = (char *)((sp - CFG_BARGSIZE) & ~0xF);
129 kbd = (bd_t *)(((ulong)cmdline - sizeof(bd_t)) & ~0xF);
131 if ((s = getenv("bootargs")) == NULL)
136 cmd_start = (ulong)&cmdline[0];
137 cmd_end = cmd_start + strlen(cmdline);
142 printf ("## cmdline at 0x%08lX ... 0x%08lX\n", cmd_start, cmd_end);
144 #if defined(CONFIG_CMD_BDI)
145 do_bdinfo (NULL, 0, 0, NULL);
149 if ((s = getenv ("clocks_in_mhz")) != NULL) {
150 /* convert all clock information to MHz */
151 kbd->bi_intfreq /= 1000000L;
152 kbd->bi_busfreq /= 1000000L;
153 #if defined(CONFIG_MPC8220)
154 kbd->bi_inpfreq /= 1000000L;
155 kbd->bi_pcifreq /= 1000000L;
156 kbd->bi_pevfreq /= 1000000L;
157 kbd->bi_flbfreq /= 1000000L;
158 kbd->bi_vcofreq /= 1000000L;
160 #if defined(CONFIG_CPM2)
161 kbd->bi_cpmfreq /= 1000000L;
162 kbd->bi_brgfreq /= 1000000L;
163 kbd->bi_sccfreq /= 1000000L;
164 kbd->bi_vco /= 1000000L;
166 #if defined(CONFIG_MPC5xxx)
167 kbd->bi_ipbfreq /= 1000000L;
168 kbd->bi_pcifreq /= 1000000L;
169 #endif /* CONFIG_MPC5xxx */
172 kernel = (void (*)(bd_t *, ulong, ulong, ulong, ulong))image_get_ep (hdr);
175 * Check if there is an initrd image
178 #if defined(CONFIG_OF_FLAT_TREE) || defined(CONFIG_OF_LIBFDT)
179 /* Look for a '-' which indicates to ignore the ramdisk argument */
180 if (argc >= 3 && strcmp(argv[2], "-") == 0) {
181 debug ("Skipping initrd\n");
182 rd_len = rd_data = 0;
187 debug ("Not skipping initrd\n");
188 show_boot_progress (9);
190 rd_hdr = (image_header_t *)simple_strtoul (argv[2], NULL, 16);
191 printf ("## Loading RAMDisk Image at %08lx ...\n", (ulong)rd_hdr);
193 if (!image_check_magic (rd_hdr)) {
194 puts ("Bad Magic Number\n");
195 show_boot_progress (-10);
196 do_reset (cmdtp, flag, argc, argv);
199 if (!image_check_hcrc (rd_hdr)) {
200 puts ("Bad Header Checksum\n");
201 show_boot_progress (-11);
202 do_reset (cmdtp, flag, argc, argv);
204 show_boot_progress (10);
206 print_image_hdr (rd_hdr);
209 puts (" Verifying Checksum ... ");
211 if (!image_check_dcrc_wd (rd_hdr, CHUNKSZ)) {
212 puts ("Bad Data CRC\n");
213 show_boot_progress (-12);
214 do_reset (cmdtp, flag, argc, argv);
219 show_boot_progress (11);
221 if (!image_check_os (rd_hdr, IH_OS_LINUX) ||
222 !image_check_arch (rd_hdr, IH_ARCH_PPC) ||
223 !image_check_type (rd_hdr, IH_TYPE_RAMDISK)) {
224 puts ("No Linux PPC Ramdisk Image\n");
225 show_boot_progress (-13);
226 do_reset (cmdtp, flag, argc, argv);
229 rd_data = image_get_data (rd_hdr);
230 rd_len = image_get_data_size (rd_hdr);
233 * Now check if we have a multifile image
235 } else if (image_check_type (hdr, IH_TYPE_MULTI)) {
237 * Get second entry data start address and len
239 image_multi_getimg (hdr, 1, &rd_data, &rd_len);
240 show_boot_progress (13);
245 show_boot_progress (14);
247 rd_len = rd_data = 0;
250 #if defined(CONFIG_OF_FLAT_TREE) || defined(CONFIG_OF_LIBFDT)
252 of_flat_tree = (char *) simple_strtoul(argv[3], NULL, 16);
253 fdt_hdr = (image_header_t *)of_flat_tree;
254 #if defined(CONFIG_OF_FLAT_TREE)
255 if (*((ulong *)(of_flat_tree)) == OF_DT_HEADER) {
256 #elif defined(CONFIG_OF_LIBFDT)
257 if (fdt_check_header (of_flat_tree) == 0) {
260 if (addr2info((ulong)of_flat_tree) != NULL)
261 of_data = (ulong)of_flat_tree;
263 } else if (image_check_magic (fdt_hdr)) {
264 ulong image_start, image_end;
265 ulong load_start, load_end;
267 printf ("## Flat Device Tree at %08lX\n", fdt_hdr);
268 print_image_hdr (fdt_hdr);
270 image_start = (ulong)fdt_hdr;
271 image_end = image_get_image_end (fdt_hdr);
273 load_start = image_get_load (fdt_hdr);
274 load_end = load_start + image_get_data_size (fdt_hdr);
276 if ((load_start < image_end) && (load_end > image_start)) {
277 puts ("ERROR: fdt overwritten - "
278 "must RESET the board to recover.\n");
279 do_reset (cmdtp, flag, argc, argv);
282 puts (" Verifying Checksum ... ");
283 if (!image_check_hcrc (fdt_hdr)) {
284 puts ("ERROR: fdt header checksum invalid - "
285 "must RESET the board to recover.\n");
286 do_reset (cmdtp, flag, argc, argv);
289 if (!image_check_dcrc (fdt_hdr)) {
290 puts ("ERROR: fdt checksum invalid - "
291 "must RESET the board to recover.\n");
292 do_reset (cmdtp, flag, argc, argv);
296 if (!image_check_type (fdt_hdr, IH_TYPE_FLATDT)) {
297 puts ("ERROR: uImage is not a fdt - "
298 "must RESET the board to recover.\n");
299 do_reset (cmdtp, flag, argc, argv);
301 if (image_get_comp (fdt_hdr) != IH_COMP_NONE) {
302 puts ("ERROR: uImage is compressed - "
303 "must RESET the board to recover.\n");
304 do_reset (cmdtp, flag, argc, argv);
306 #if defined(CONFIG_OF_FLAT_TREE)
307 if (*((ulong *)(of_flat_tree + image_get_header_size ())) != OF_DT_HEADER) {
308 #elif defined(CONFIG_OF_LIBFDT)
309 if (fdt_check_header (of_flat_tree + image_get_header_size ()) != 0) {
311 puts ("ERROR: uImage data is not a fdt - "
312 "must RESET the board to recover.\n");
313 do_reset (cmdtp, flag, argc, argv);
316 memmove ((void *)image_get_load (fdt_hdr),
317 (void *)(of_flat_tree + image_get_header_size ()),
318 image_get_data_size (fdt_hdr));
320 of_flat_tree = (char *)image_get_load (fdt_hdr);
322 puts ("Did not find a flat Flat Device Tree.\n"
323 "Must RESET the board to recover.\n");
324 do_reset (cmdtp, flag, argc, argv);
326 printf (" Booting using the fdt at 0x%x\n",
328 } else if (image_check_type (hdr, IH_TYPE_MULTI)) {
329 ulong fdt_data, fdt_len;
331 image_multi_getimg (hdr, 2, &fdt_data, &fdt_len);
334 of_flat_tree = (char *)fdt_data;
337 /* move the blob if it is in flash (set of_data to !null) */
338 if (addr2info ((ulong)of_flat_tree) != NULL)
339 of_data = (ulong)of_flat_tree;
342 #if defined(CONFIG_OF_FLAT_TREE)
343 if (*((ulong *)(of_flat_tree)) != OF_DT_HEADER) {
344 #elif defined(CONFIG_OF_LIBFDT)
345 if (fdt_check_header (of_flat_tree) != 0) {
347 puts ("ERROR: image is not a fdt - "
348 "must RESET the board to recover.\n");
349 do_reset (cmdtp, flag, argc, argv);
352 #if defined(CONFIG_OF_FLAT_TREE)
353 if (((struct boot_param_header *)of_flat_tree)->totalsize != fdt_len) {
354 #elif defined(CONFIG_OF_LIBFDT)
355 if (be32_to_cpu (fdt_totalsize (of_flat_tree)) != fdt_len) {
357 puts ("ERROR: fdt size != image size - "
358 "must RESET the board to recover.\n");
359 do_reset (cmdtp, flag, argc, argv);
365 debug ("No initrd\n");
369 if (!initrd_copy_to_ram) { /* zero-copy ramdisk support */
370 initrd_start = rd_data;
371 initrd_end = initrd_start + rd_len;
373 initrd_start = (ulong)kbd - rd_len;
374 initrd_start &= ~(4096 - 1); /* align on page */
380 * the inital ramdisk does not need to be within
381 * CFG_BOOTMAPSZ as it is not accessed until after
382 * the mm system is initialised.
384 * do the stack bottom calculation again and see if
385 * the initrd will fit just below the monitor stack
386 * bottom without overwriting the area allocated
387 * above for command line args and board info.
389 asm( "mr %0,1": "=r"(nsp) : );
390 nsp -= 2048; /* just to be sure */
392 if (nsp > initrd_high) /* limit as specified */
395 nsp &= ~(4096 - 1); /* align on page */
400 show_boot_progress (12);
402 debug ("## initrd at 0x%08lX ... 0x%08lX (len=%ld=0x%lX)\n",
403 rd_data, rd_data + rd_len - 1, rd_len, rd_len);
405 initrd_end = initrd_start + rd_len;
406 printf (" Loading Ramdisk to %08lx, end %08lx ... ",
407 initrd_start, initrd_end);
409 memmove_wd((void *)initrd_start,
410 (void *)rd_data, rd_len, CHUNKSZ);
419 #if defined(CONFIG_OF_LIBFDT)
423 * The blob must be within CFG_BOOTMAPSZ,
424 * so we flag it to be copied if it is not.
426 if (of_flat_tree >= (char *)CFG_BOOTMAPSZ)
427 of_data = (ulong)of_flat_tree;
430 /* move of_flat_tree if needed */
433 ulong of_start, of_len;
435 of_len = be32_to_cpu(fdt_totalsize(of_data));
437 /* position on a 4K boundary before the kbd */
438 of_start = (ulong)kbd - of_len;
439 of_start &= ~(4096 - 1); /* align on page */
440 debug ("## device tree at 0x%08lX ... 0x%08lX (len=%ld=0x%lX)\n",
441 of_data, of_data + of_len - 1, of_len, of_len);
443 of_flat_tree = (char *)of_start;
444 printf (" Loading Device Tree to %08lx, end %08lx ... ",
445 of_start, of_start + of_len - 1);
446 err = fdt_open_into((void *)of_data, (void *)of_start, of_len);
448 puts ("ERROR: fdt move failed - "
449 "must RESET the board to recover.\n");
450 do_reset (cmdtp, flag, argc, argv);
455 * Add the chosen node if it doesn't exist, add the env and bd_t
456 * if the user wants it (the logic is in the subroutines).
459 if (fdt_chosen(of_flat_tree, initrd_start, initrd_end, 0) < 0) {
460 puts ("ERROR: /chosen node create failed - "
461 "must RESET the board to recover.\n");
462 do_reset (cmdtp, flag, argc, argv);
464 #ifdef CONFIG_OF_HAS_UBOOT_ENV
465 if (fdt_env(of_flat_tree) < 0) {
466 puts ("ERROR: /u-boot-env node create failed - "
467 "must RESET the board to recover.\n");
468 do_reset (cmdtp, flag, argc, argv);
471 #ifdef CONFIG_OF_HAS_BD_T
472 if (fdt_bd_t(of_flat_tree) < 0) {
473 puts ("ERROR: /bd_t node create failed - "
474 "must RESET the board to recover.\n");
475 do_reset (cmdtp, flag, argc, argv);
478 #ifdef CONFIG_OF_BOARD_SETUP
479 /* Call the board-specific fixup routine */
480 ft_board_setup(of_flat_tree, gd->bd);
484 #elif defined(CONFIG_OF_FLAT_TREE)
488 * The blob must be within CFG_BOOTMAPSZ,
489 * so we flag it to be copied if it is not.
491 if (of_flat_tree >= (char *)CFG_BOOTMAPSZ)
492 of_data = (ulong)of_flat_tree;
495 /* move of_flat_tree if needed */
497 ulong of_start, of_len;
498 of_len = ((struct boot_param_header *)of_data)->totalsize;
500 /* provide extra 8k pad */
501 of_start = (ulong)kbd - of_len - 8192;
502 of_start &= ~(4096 - 1); /* align on page */
503 debug ("## device tree at 0x%08lX ... 0x%08lX (len=%ld=0x%lX)\n",
504 of_data, of_data + of_len - 1, of_len, of_len);
506 of_flat_tree = (char *)of_start;
507 printf (" Loading Device Tree to %08lx, end %08lx ... ",
508 of_start, of_start + of_len - 1);
509 memmove ((void *)of_start, (void *)of_data, of_len);
513 * Create the /chosen node and modify the blob with board specific
516 ft_setup(of_flat_tree, kbd, initrd_start, initrd_end);
517 /* ft_dump_blob(of_flat_tree); */
519 #endif /* #if defined(CONFIG_OF_LIBFDT) #elif defined(CONFIG_OF_FLAT_TREE) */
521 debug ("## Transferring control to Linux (at address %08lx) ...\n",
524 show_boot_progress (15);
526 #if defined(CFG_INIT_RAM_LOCK) && !defined(CONFIG_E500)
527 unlock_ram_in_cache();
530 #if defined(CONFIG_OF_FLAT_TREE) || defined(CONFIG_OF_LIBFDT)
531 if (of_flat_tree) { /* device tree; boot new style */
533 * Linux Kernel Parameters (passing device tree):
534 * r3: pointer to the fdt, followed by the board info data
535 * r4: physical pointer to the kernel itself
540 (*kernel) ((bd_t *)of_flat_tree, (ulong)kernel, 0, 0, 0);
541 /* does not return */
545 * Linux Kernel Parameters (passing board info data):
546 * r3: ptr to board info data
547 * r4: initrd_start or 0 if no initrd
548 * r5: initrd_end - unused if r4 is 0
549 * r6: Start of command line string
550 * r7: End of command line string
552 (*kernel) (kbd, initrd_start, initrd_end, cmd_start, cmd_end);
553 /* does not return */