]>
git.ipfire.org Git - people/ms/u-boot.git/blob - lib_ppc/ppc_linux.c
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 */