332 lines
7.2 KiB
C
332 lines
7.2 KiB
C
// SPDX-License-Identifier: GPL-2.0+
|
|
/*
|
|
* (C) Copyright 2008 Semihalf
|
|
*
|
|
* (C) Copyright 2000-2006
|
|
* Wolfgang Denk, DENX Software Engineering, wd@denx.de.
|
|
*/
|
|
|
|
|
|
#include <common.h>
|
|
#include <bootstage.h>
|
|
#include <cpu_func.h>
|
|
#include <env.h>
|
|
#include <init.h>
|
|
#include <lmb.h>
|
|
#include <log.h>
|
|
#include <watchdog.h>
|
|
#include <command.h>
|
|
#include <image.h>
|
|
#include <malloc.h>
|
|
#include <asm/global_data.h>
|
|
#include <u-boot/zlib.h>
|
|
#include <bzlib.h>
|
|
#include <asm/byteorder.h>
|
|
#include <asm/mp.h>
|
|
#include <bootm.h>
|
|
#include <vxworks.h>
|
|
|
|
#if defined(CONFIG_OF_LIBFDT)
|
|
#include <linux/libfdt.h>
|
|
#include <fdt_support.h>
|
|
#endif
|
|
|
|
#ifdef CONFIG_SYS_INIT_RAM_LOCK
|
|
#include <asm/cache.h>
|
|
#endif
|
|
|
|
DECLARE_GLOBAL_DATA_PTR;
|
|
|
|
static ulong get_sp (void);
|
|
extern void ft_fixup_num_cores(void *blob);
|
|
static void set_clocks_in_mhz (struct bd_info *kbd);
|
|
|
|
#ifndef CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE
|
|
#define CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE (768*1024*1024)
|
|
#endif
|
|
|
|
static void boot_jump_linux(bootm_headers_t *images)
|
|
{
|
|
void (*kernel)(struct bd_info *, ulong r4, ulong r5, ulong r6,
|
|
ulong r7, ulong r8, ulong r9);
|
|
#ifdef CONFIG_OF_LIBFDT
|
|
char *of_flat_tree = images->ft_addr;
|
|
#endif
|
|
|
|
kernel = (void (*)(struct bd_info *, ulong, ulong, ulong,
|
|
ulong, ulong, ulong))images->ep;
|
|
debug("## Transferring control to Linux (at address %08lx) ...\n",
|
|
(ulong)kernel);
|
|
|
|
bootstage_mark(BOOTSTAGE_ID_RUN_OS);
|
|
|
|
#ifdef CONFIG_BOOTSTAGE_FDT
|
|
bootstage_fdt_add_report();
|
|
#endif
|
|
#ifdef CONFIG_BOOTSTAGE_REPORT
|
|
bootstage_report();
|
|
#endif
|
|
|
|
#if defined(CONFIG_SYS_INIT_RAM_LOCK) && !defined(CONFIG_E500)
|
|
unlock_ram_in_cache();
|
|
#endif
|
|
|
|
#if defined(CONFIG_OF_LIBFDT)
|
|
if (of_flat_tree) { /* device tree; boot new style */
|
|
/*
|
|
* Linux Kernel Parameters (passing device tree):
|
|
* r3: pointer to the fdt
|
|
* r4: 0
|
|
* r5: 0
|
|
* r6: epapr magic
|
|
* r7: size of IMA in bytes
|
|
* r8: 0
|
|
* r9: 0
|
|
*/
|
|
debug(" Booting using OF flat tree...\n");
|
|
WATCHDOG_RESET ();
|
|
(*kernel) ((struct bd_info *)of_flat_tree, 0, 0, EPAPR_MAGIC,
|
|
env_get_bootm_mapsize(), 0, 0);
|
|
/* does not return */
|
|
} else
|
|
#endif
|
|
{
|
|
/*
|
|
* Linux Kernel Parameters (passing board info data):
|
|
* r3: ptr to board info data
|
|
* r4: initrd_start or 0 if no initrd
|
|
* r5: initrd_end - unused if r4 is 0
|
|
* r6: Start of command line string
|
|
* r7: End of command line string
|
|
* r8: 0
|
|
* r9: 0
|
|
*/
|
|
ulong cmd_start = images->cmdline_start;
|
|
ulong cmd_end = images->cmdline_end;
|
|
ulong initrd_start = images->initrd_start;
|
|
ulong initrd_end = images->initrd_end;
|
|
struct bd_info *kbd = images->kbd;
|
|
|
|
debug(" Booting using board info...\n");
|
|
WATCHDOG_RESET ();
|
|
(*kernel) (kbd, initrd_start, initrd_end,
|
|
cmd_start, cmd_end, 0, 0);
|
|
/* does not return */
|
|
}
|
|
return ;
|
|
}
|
|
|
|
void arch_lmb_reserve(struct lmb *lmb)
|
|
{
|
|
phys_size_t bootm_size;
|
|
ulong size, bootmap_base;
|
|
|
|
bootmap_base = env_get_bootm_low();
|
|
bootm_size = env_get_bootm_size();
|
|
|
|
#ifdef DEBUG
|
|
if (((u64)bootmap_base + bootm_size) >
|
|
(CONFIG_SYS_SDRAM_BASE + (u64)gd->ram_size))
|
|
puts("WARNING: bootm_low + bootm_size exceed total memory\n");
|
|
if ((bootmap_base + bootm_size) > get_effective_memsize())
|
|
puts("WARNING: bootm_low + bootm_size exceed eff. memory\n");
|
|
#endif
|
|
|
|
size = min(bootm_size, get_effective_memsize());
|
|
size = min(size, (ulong)CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE);
|
|
|
|
if (size < bootm_size) {
|
|
ulong base = bootmap_base + size;
|
|
printf("WARNING: adjusting available memory to %lx\n", size);
|
|
lmb_reserve(lmb, base, bootm_size - size);
|
|
}
|
|
|
|
arch_lmb_reserve_generic(lmb, get_sp(), gd->ram_top, 4096);
|
|
|
|
#ifdef CONFIG_MP
|
|
cpu_mp_lmb_reserve(lmb);
|
|
#endif
|
|
|
|
return ;
|
|
}
|
|
|
|
static void boot_prep_linux(bootm_headers_t *images)
|
|
{
|
|
#ifdef CONFIG_MP
|
|
/*
|
|
* if we are MP make sure to flush the device tree so any changes are
|
|
* made visibile to all other cores. In AMP boot scenarios the cores
|
|
* might not be HW cache coherent with each other.
|
|
*/
|
|
flush_cache((unsigned long)images->ft_addr, images->ft_len);
|
|
#endif
|
|
}
|
|
|
|
static int boot_cmdline_linux(bootm_headers_t *images)
|
|
{
|
|
ulong of_size = images->ft_len;
|
|
struct lmb *lmb = &images->lmb;
|
|
ulong *cmd_start = &images->cmdline_start;
|
|
ulong *cmd_end = &images->cmdline_end;
|
|
|
|
int ret = 0;
|
|
|
|
if (!of_size) {
|
|
/* allocate space and init command line */
|
|
ret = boot_get_cmdline (lmb, cmd_start, cmd_end);
|
|
if (ret) {
|
|
puts("ERROR with allocation of cmdline\n");
|
|
return ret;
|
|
}
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
static int boot_bd_t_linux(bootm_headers_t *images)
|
|
{
|
|
ulong of_size = images->ft_len;
|
|
struct lmb *lmb = &images->lmb;
|
|
struct bd_info **kbd = &images->kbd;
|
|
|
|
int ret = 0;
|
|
|
|
if (!of_size) {
|
|
/* allocate space for kernel copy of board info */
|
|
ret = boot_get_kbd (lmb, kbd);
|
|
if (ret) {
|
|
puts("ERROR with allocation of kernel bd\n");
|
|
return ret;
|
|
}
|
|
set_clocks_in_mhz(*kbd);
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
static int boot_body_linux(bootm_headers_t *images)
|
|
{
|
|
int ret;
|
|
|
|
/* allocate space for kernel copy of board info */
|
|
ret = boot_bd_t_linux(images);
|
|
if (ret)
|
|
return ret;
|
|
|
|
ret = image_setup_linux(images);
|
|
if (ret)
|
|
return ret;
|
|
|
|
return 0;
|
|
}
|
|
|
|
noinline int do_bootm_linux(int flag, int argc, char *const argv[],
|
|
bootm_headers_t *images)
|
|
{
|
|
int ret;
|
|
|
|
if (flag & BOOTM_STATE_OS_CMDLINE) {
|
|
boot_cmdline_linux(images);
|
|
return 0;
|
|
}
|
|
|
|
if (flag & BOOTM_STATE_OS_BD_T) {
|
|
boot_bd_t_linux(images);
|
|
return 0;
|
|
}
|
|
|
|
if (flag & BOOTM_STATE_OS_PREP) {
|
|
boot_prep_linux(images);
|
|
return 0;
|
|
}
|
|
|
|
boot_prep_linux(images);
|
|
ret = boot_body_linux(images);
|
|
if (ret)
|
|
return ret;
|
|
boot_jump_linux(images);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static ulong get_sp (void)
|
|
{
|
|
ulong sp;
|
|
|
|
asm( "mr %0,1": "=r"(sp) : );
|
|
return sp;
|
|
}
|
|
|
|
static void set_clocks_in_mhz (struct bd_info *kbd)
|
|
{
|
|
char *s;
|
|
|
|
s = env_get("clocks_in_mhz");
|
|
if (s) {
|
|
/* convert all clock information to MHz */
|
|
kbd->bi_intfreq /= 1000000L;
|
|
kbd->bi_busfreq /= 1000000L;
|
|
#if defined(CONFIG_CPM2)
|
|
kbd->bi_cpmfreq /= 1000000L;
|
|
kbd->bi_brgfreq /= 1000000L;
|
|
kbd->bi_sccfreq /= 1000000L;
|
|
kbd->bi_vco /= 1000000L;
|
|
#endif
|
|
}
|
|
}
|
|
|
|
#if defined(CONFIG_BOOTM_VXWORKS)
|
|
void boot_prep_vxworks(bootm_headers_t *images)
|
|
{
|
|
#if defined(CONFIG_OF_LIBFDT)
|
|
int off;
|
|
u64 base, size;
|
|
|
|
if (!images->ft_addr)
|
|
return;
|
|
|
|
base = (u64)gd->ram_base;
|
|
size = (u64)gd->ram_size;
|
|
|
|
off = fdt_path_offset(images->ft_addr, "/memory");
|
|
if (off < 0)
|
|
fdt_fixup_memory(images->ft_addr, base, size);
|
|
|
|
#if defined(CONFIG_MP)
|
|
#if defined(CONFIG_MPC85xx)
|
|
ft_fixup_cpu(images->ft_addr, base + size);
|
|
ft_fixup_num_cores(images->ft_addr);
|
|
#elif defined(CONFIG_MPC86xx)
|
|
off = fdt_add_mem_rsv(images->ft_addr,
|
|
determine_mp_bootpg(NULL), (u64)4096);
|
|
if (off < 0)
|
|
printf("## WARNING %s: %s\n", __func__, fdt_strerror(off));
|
|
ft_fixup_num_cores(images->ft_addr);
|
|
#endif
|
|
flush_cache((unsigned long)images->ft_addr, images->ft_len);
|
|
#endif
|
|
#endif
|
|
}
|
|
|
|
void boot_jump_vxworks(bootm_headers_t *images)
|
|
{
|
|
/* PowerPC VxWorks boot interface conforms to the ePAPR standard
|
|
* general purpuse registers:
|
|
*
|
|
* r3: Effective address of the device tree image
|
|
* r4: 0
|
|
* r5: 0
|
|
* r6: ePAPR magic value
|
|
* r7: shall be the size of the boot IMA in bytes
|
|
* r8: 0
|
|
* r9: 0
|
|
* TCR: WRC = 0, no watchdog timer reset will occur
|
|
*/
|
|
WATCHDOG_RESET();
|
|
|
|
((void (*)(void *, ulong, ulong, ulong,
|
|
ulong, ulong, ulong))images->ep)(images->ft_addr,
|
|
0, 0, EPAPR_MAGIC, env_get_bootm_mapsize(), 0, 0);
|
|
}
|
|
#endif
|