1 /* 2 * (C) Copyright 2008 Semihalf 3 * 4 * (C) Copyright 2000-2006 5 * Wolfgang Denk, DENX Software Engineering, wd@denx.de. 6 * 7 * SPDX-License-Identifier: GPL-2.0+ 8 */ 9 10 11 #include <common.h> 12 #include <watchdog.h> 13 #include <command.h> 14 #include <image.h> 15 #include <malloc.h> 16 #include <u-boot/zlib.h> 17 #include <bzlib.h> 18 #include <environment.h> 19 #include <asm/byteorder.h> 20 #include <asm/mp.h> 21 22 #if defined(CONFIG_OF_LIBFDT) 23 #include <libfdt.h> 24 #include <fdt_support.h> 25 #endif 26 27 #ifdef CONFIG_SYS_INIT_RAM_LOCK 28 #include <asm/cache.h> 29 #endif 30 31 DECLARE_GLOBAL_DATA_PTR; 32 33 extern ulong get_effective_memsize(void); 34 static ulong get_sp (void); 35 static void set_clocks_in_mhz (bd_t *kbd); 36 37 #ifndef CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE 38 #define CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE (768*1024*1024) 39 #endif 40 41 static void boot_jump_linux(bootm_headers_t *images) 42 { 43 void (*kernel)(bd_t *, ulong r4, ulong r5, ulong r6, 44 ulong r7, ulong r8, ulong r9); 45 #ifdef CONFIG_OF_LIBFDT 46 char *of_flat_tree = images->ft_addr; 47 #endif 48 49 kernel = (void (*)(bd_t *, ulong, ulong, ulong, 50 ulong, ulong, ulong))images->ep; 51 debug ("## Transferring control to Linux (at address %08lx) ...\n", 52 (ulong)kernel); 53 54 bootstage_mark(BOOTSTAGE_ID_RUN_OS); 55 56 #if defined(CONFIG_SYS_INIT_RAM_LOCK) && !defined(CONFIG_E500) 57 unlock_ram_in_cache(); 58 #endif 59 60 #if defined(CONFIG_OF_LIBFDT) 61 if (of_flat_tree) { /* device tree; boot new style */ 62 /* 63 * Linux Kernel Parameters (passing device tree): 64 * r3: pointer to the fdt 65 * r4: 0 66 * r5: 0 67 * r6: epapr magic 68 * r7: size of IMA in bytes 69 * r8: 0 70 * r9: 0 71 */ 72 debug (" Booting using OF flat tree...\n"); 73 WATCHDOG_RESET (); 74 (*kernel) ((bd_t *)of_flat_tree, 0, 0, EPAPR_MAGIC, 75 getenv_bootm_mapsize(), 0, 0); 76 /* does not return */ 77 } else 78 #endif 79 { 80 /* 81 * Linux Kernel Parameters (passing board info data): 82 * r3: ptr to board info data 83 * r4: initrd_start or 0 if no initrd 84 * r5: initrd_end - unused if r4 is 0 85 * r6: Start of command line string 86 * r7: End of command line string 87 * r8: 0 88 * r9: 0 89 */ 90 ulong cmd_start = images->cmdline_start; 91 ulong cmd_end = images->cmdline_end; 92 ulong initrd_start = images->initrd_start; 93 ulong initrd_end = images->initrd_end; 94 bd_t *kbd = images->kbd; 95 96 debug (" Booting using board info...\n"); 97 WATCHDOG_RESET (); 98 (*kernel) (kbd, initrd_start, initrd_end, 99 cmd_start, cmd_end, 0, 0); 100 /* does not return */ 101 } 102 return ; 103 } 104 105 void arch_lmb_reserve(struct lmb *lmb) 106 { 107 phys_size_t bootm_size; 108 ulong size, sp, bootmap_base; 109 110 bootmap_base = getenv_bootm_low(); 111 bootm_size = getenv_bootm_size(); 112 113 #ifdef DEBUG 114 if (((u64)bootmap_base + bootm_size) > 115 (CONFIG_SYS_SDRAM_BASE + (u64)gd->ram_size)) 116 puts("WARNING: bootm_low + bootm_size exceed total memory\n"); 117 if ((bootmap_base + bootm_size) > get_effective_memsize()) 118 puts("WARNING: bootm_low + bootm_size exceed eff. memory\n"); 119 #endif 120 121 size = min(bootm_size, get_effective_memsize()); 122 size = min(size, CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE); 123 124 if (size < bootm_size) { 125 ulong base = bootmap_base + size; 126 printf("WARNING: adjusting available memory to %lx\n", size); 127 lmb_reserve(lmb, base, bootm_size - size); 128 } 129 130 /* 131 * Booting a (Linux) kernel image 132 * 133 * Allocate space for command line and board info - the 134 * address should be as high as possible within the reach of 135 * the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused 136 * memory, which means far enough below the current stack 137 * pointer. 138 */ 139 sp = get_sp(); 140 debug ("## Current stack ends at 0x%08lx\n", sp); 141 142 /* adjust sp by 4K to be safe */ 143 sp -= 4096; 144 lmb_reserve(lmb, sp, (CONFIG_SYS_SDRAM_BASE + get_effective_memsize() - sp)); 145 146 #ifdef CONFIG_MP 147 cpu_mp_lmb_reserve(lmb); 148 #endif 149 150 return ; 151 } 152 153 static void boot_prep_linux(bootm_headers_t *images) 154 { 155 #ifdef CONFIG_MP 156 /* 157 * if we are MP make sure to flush the device tree so any changes are 158 * made visibile to all other cores. In AMP boot scenarios the cores 159 * might not be HW cache coherent with each other. 160 */ 161 flush_cache((unsigned long)images->ft_addr, images->ft_len); 162 #endif 163 } 164 165 static int boot_cmdline_linux(bootm_headers_t *images) 166 { 167 ulong of_size = images->ft_len; 168 struct lmb *lmb = &images->lmb; 169 ulong *cmd_start = &images->cmdline_start; 170 ulong *cmd_end = &images->cmdline_end; 171 172 int ret = 0; 173 174 if (!of_size) { 175 /* allocate space and init command line */ 176 ret = boot_get_cmdline (lmb, cmd_start, cmd_end); 177 if (ret) { 178 puts("ERROR with allocation of cmdline\n"); 179 return ret; 180 } 181 } 182 183 return ret; 184 } 185 186 static int boot_bd_t_linux(bootm_headers_t *images) 187 { 188 ulong of_size = images->ft_len; 189 struct lmb *lmb = &images->lmb; 190 bd_t **kbd = &images->kbd; 191 192 int ret = 0; 193 194 if (!of_size) { 195 /* allocate space for kernel copy of board info */ 196 ret = boot_get_kbd (lmb, kbd); 197 if (ret) { 198 puts("ERROR with allocation of kernel bd\n"); 199 return ret; 200 } 201 set_clocks_in_mhz(*kbd); 202 } 203 204 return ret; 205 } 206 207 static int boot_body_linux(bootm_headers_t *images) 208 { 209 int ret; 210 211 /* allocate space for kernel copy of board info */ 212 ret = boot_bd_t_linux(images); 213 if (ret) 214 return ret; 215 216 ret = image_setup_linux(images); 217 if (ret) 218 return ret; 219 220 return 0; 221 } 222 223 noinline 224 int do_bootm_linux(int flag, int argc, char * const argv[], bootm_headers_t *images) 225 { 226 int ret; 227 228 if (flag & BOOTM_STATE_OS_CMDLINE) { 229 boot_cmdline_linux(images); 230 return 0; 231 } 232 233 if (flag & BOOTM_STATE_OS_BD_T) { 234 boot_bd_t_linux(images); 235 return 0; 236 } 237 238 if (flag & BOOTM_STATE_OS_PREP) { 239 boot_prep_linux(images); 240 return 0; 241 } 242 243 boot_prep_linux(images); 244 ret = boot_body_linux(images); 245 if (ret) 246 return ret; 247 boot_jump_linux(images); 248 249 return 0; 250 } 251 252 static ulong get_sp (void) 253 { 254 ulong sp; 255 256 asm( "mr %0,1": "=r"(sp) : ); 257 return sp; 258 } 259 260 static void set_clocks_in_mhz (bd_t *kbd) 261 { 262 char *s; 263 264 if ((s = getenv ("clocks_in_mhz")) != NULL) { 265 /* convert all clock information to MHz */ 266 kbd->bi_intfreq /= 1000000L; 267 kbd->bi_busfreq /= 1000000L; 268 #if defined(CONFIG_CPM2) 269 kbd->bi_cpmfreq /= 1000000L; 270 kbd->bi_brgfreq /= 1000000L; 271 kbd->bi_sccfreq /= 1000000L; 272 kbd->bi_vco /= 1000000L; 273 #endif 274 #if defined(CONFIG_MPC5xxx) 275 kbd->bi_ipbfreq /= 1000000L; 276 kbd->bi_pcifreq /= 1000000L; 277 #endif /* CONFIG_MPC5xxx */ 278 } 279 } 280