xref: /openbmc/u-boot/arch/powerpc/lib/bootm.c (revision 9637c4b2)
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 static ulong get_sp (void);
34 extern void ft_fixup_num_cores(void *blob);
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 #ifdef CONFIG_BOOTSTAGE_FDT
57 	bootstage_fdt_add_report();
58 #endif
59 #ifdef CONFIG_BOOTSTAGE_REPORT
60 	bootstage_report();
61 #endif
62 
63 #if defined(CONFIG_SYS_INIT_RAM_LOCK) && !defined(CONFIG_E500)
64 	unlock_ram_in_cache();
65 #endif
66 
67 #if defined(CONFIG_OF_LIBFDT)
68 	if (of_flat_tree) {	/* device tree; boot new style */
69 		/*
70 		 * Linux Kernel Parameters (passing device tree):
71 		 *   r3: pointer to the fdt
72 		 *   r4: 0
73 		 *   r5: 0
74 		 *   r6: epapr magic
75 		 *   r7: size of IMA in bytes
76 		 *   r8: 0
77 		 *   r9: 0
78 		 */
79 		debug ("   Booting using OF flat tree...\n");
80 		WATCHDOG_RESET ();
81 		(*kernel) ((bd_t *)of_flat_tree, 0, 0, EPAPR_MAGIC,
82 			   getenv_bootm_mapsize(), 0, 0);
83 		/* does not return */
84 	} else
85 #endif
86 	{
87 		/*
88 		 * Linux Kernel Parameters (passing board info data):
89 		 *   r3: ptr to board info data
90 		 *   r4: initrd_start or 0 if no initrd
91 		 *   r5: initrd_end - unused if r4 is 0
92 		 *   r6: Start of command line string
93 		 *   r7: End   of command line string
94 		 *   r8: 0
95 		 *   r9: 0
96 		 */
97 		ulong cmd_start = images->cmdline_start;
98 		ulong cmd_end = images->cmdline_end;
99 		ulong initrd_start = images->initrd_start;
100 		ulong initrd_end = images->initrd_end;
101 		bd_t *kbd = images->kbd;
102 
103 		debug ("   Booting using board info...\n");
104 		WATCHDOG_RESET ();
105 		(*kernel) (kbd, initrd_start, initrd_end,
106 			   cmd_start, cmd_end, 0, 0);
107 		/* does not return */
108 	}
109 	return ;
110 }
111 
112 void arch_lmb_reserve(struct lmb *lmb)
113 {
114 	phys_size_t bootm_size;
115 	ulong size, sp, bootmap_base;
116 
117 	bootmap_base = getenv_bootm_low();
118 	bootm_size = getenv_bootm_size();
119 
120 #ifdef DEBUG
121 	if (((u64)bootmap_base + bootm_size) >
122 	    (CONFIG_SYS_SDRAM_BASE + (u64)gd->ram_size))
123 		puts("WARNING: bootm_low + bootm_size exceed total memory\n");
124 	if ((bootmap_base + bootm_size) > get_effective_memsize())
125 		puts("WARNING: bootm_low + bootm_size exceed eff. memory\n");
126 #endif
127 
128 	size = min(bootm_size, get_effective_memsize());
129 	size = min(size, (ulong)CONFIG_SYS_LINUX_LOWMEM_MAX_SIZE);
130 
131 	if (size < bootm_size) {
132 		ulong base = bootmap_base + size;
133 		printf("WARNING: adjusting available memory to %lx\n", size);
134 		lmb_reserve(lmb, base, bootm_size - size);
135 	}
136 
137 	/*
138 	 * Booting a (Linux) kernel image
139 	 *
140 	 * Allocate space for command line and board info - the
141 	 * address should be as high as possible within the reach of
142 	 * the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused
143 	 * memory, which means far enough below the current stack
144 	 * pointer.
145 	 */
146 	sp = get_sp();
147 	debug ("## Current stack ends at 0x%08lx\n", sp);
148 
149 	/* adjust sp by 4K to be safe */
150 	sp -= 4096;
151 	lmb_reserve(lmb, sp, (CONFIG_SYS_SDRAM_BASE + get_effective_memsize() - sp));
152 
153 #ifdef CONFIG_MP
154 	cpu_mp_lmb_reserve(lmb);
155 #endif
156 
157 	return ;
158 }
159 
160 static void boot_prep_linux(bootm_headers_t *images)
161 {
162 #ifdef CONFIG_MP
163 	/*
164 	 * if we are MP make sure to flush the device tree so any changes are
165 	 * made visibile to all other cores.  In AMP boot scenarios the cores
166 	 * might not be HW cache coherent with each other.
167 	 */
168 	flush_cache((unsigned long)images->ft_addr, images->ft_len);
169 #endif
170 }
171 
172 static int boot_cmdline_linux(bootm_headers_t *images)
173 {
174 	ulong of_size = images->ft_len;
175 	struct lmb *lmb = &images->lmb;
176 	ulong *cmd_start = &images->cmdline_start;
177 	ulong *cmd_end = &images->cmdline_end;
178 
179 	int ret = 0;
180 
181 	if (!of_size) {
182 		/* allocate space and init command line */
183 		ret = boot_get_cmdline (lmb, cmd_start, cmd_end);
184 		if (ret) {
185 			puts("ERROR with allocation of cmdline\n");
186 			return ret;
187 		}
188 	}
189 
190 	return ret;
191 }
192 
193 static int boot_bd_t_linux(bootm_headers_t *images)
194 {
195 	ulong of_size = images->ft_len;
196 	struct lmb *lmb = &images->lmb;
197 	bd_t **kbd = &images->kbd;
198 
199 	int ret = 0;
200 
201 	if (!of_size) {
202 		/* allocate space for kernel copy of board info */
203 		ret = boot_get_kbd (lmb, kbd);
204 		if (ret) {
205 			puts("ERROR with allocation of kernel bd\n");
206 			return ret;
207 		}
208 		set_clocks_in_mhz(*kbd);
209 	}
210 
211 	return ret;
212 }
213 
214 static int boot_body_linux(bootm_headers_t *images)
215 {
216 	int ret;
217 
218 	/* allocate space for kernel copy of board info */
219 	ret = boot_bd_t_linux(images);
220 	if (ret)
221 		return ret;
222 
223 	ret = image_setup_linux(images);
224 	if (ret)
225 		return ret;
226 
227 	return 0;
228 }
229 
230 noinline
231 int do_bootm_linux(int flag, int argc, char * const argv[], bootm_headers_t *images)
232 {
233 	int	ret;
234 
235 	if (flag & BOOTM_STATE_OS_CMDLINE) {
236 		boot_cmdline_linux(images);
237 		return 0;
238 	}
239 
240 	if (flag & BOOTM_STATE_OS_BD_T) {
241 		boot_bd_t_linux(images);
242 		return 0;
243 	}
244 
245 	if (flag & BOOTM_STATE_OS_PREP) {
246 		boot_prep_linux(images);
247 		return 0;
248 	}
249 
250 	boot_prep_linux(images);
251 	ret = boot_body_linux(images);
252 	if (ret)
253 		return ret;
254 	boot_jump_linux(images);
255 
256 	return 0;
257 }
258 
259 static ulong get_sp (void)
260 {
261 	ulong sp;
262 
263 	asm( "mr %0,1": "=r"(sp) : );
264 	return sp;
265 }
266 
267 static void set_clocks_in_mhz (bd_t *kbd)
268 {
269 	char	*s;
270 
271 	if ((s = getenv ("clocks_in_mhz")) != NULL) {
272 		/* convert all clock information to MHz */
273 		kbd->bi_intfreq /= 1000000L;
274 		kbd->bi_busfreq /= 1000000L;
275 #if defined(CONFIG_CPM2)
276 		kbd->bi_cpmfreq /= 1000000L;
277 		kbd->bi_brgfreq /= 1000000L;
278 		kbd->bi_sccfreq /= 1000000L;
279 		kbd->bi_vco	/= 1000000L;
280 #endif
281 #if defined(CONFIG_MPC5xxx)
282 		kbd->bi_ipbfreq /= 1000000L;
283 		kbd->bi_pcifreq /= 1000000L;
284 #endif /* CONFIG_MPC5xxx */
285 	}
286 }
287 
288 #if defined(CONFIG_BOOTM_VXWORKS)
289 void boot_prep_vxworks(bootm_headers_t *images)
290 {
291 #if defined(CONFIG_OF_LIBFDT)
292 	int off;
293 	u64 base, size;
294 
295 	if (!images->ft_addr)
296 		return;
297 
298 	base = (u64)gd->bd->bi_memstart;
299 	size = (u64)gd->bd->bi_memsize;
300 
301 	off = fdt_path_offset(images->ft_addr, "/memory");
302 	if (off < 0)
303 		fdt_fixup_memory(images->ft_addr, base, size);
304 
305 #if defined(CONFIG_MP)
306 #if defined(CONFIG_MPC85xx)
307 	ft_fixup_cpu(images->ft_addr, base + size);
308 	ft_fixup_num_cores(images->ft_addr);
309 #elif defined(CONFIG_MPC86xx)
310 	off = fdt_add_mem_rsv(images->ft_addr,
311 			determine_mp_bootpg(NULL), (u64)4096);
312 	if (off < 0)
313 		printf("## WARNING %s: %s\n", __func__, fdt_strerror(off));
314 	ft_fixup_num_cores(images->ft_addr);
315 #endif
316 	flush_cache((unsigned long)images->ft_addr, images->ft_len);
317 #endif
318 #endif
319 }
320 
321 void boot_jump_vxworks(bootm_headers_t *images)
322 {
323 	/* PowerPC VxWorks boot interface conforms to the ePAPR standard
324 	 * general purpuse registers:
325 	 *
326 	 *	r3: Effective address of the device tree image
327 	 *	r4: 0
328 	 *	r5: 0
329 	 *	r6: ePAPR magic value
330 	 *	r7: shall be the size of the boot IMA in bytes
331 	 *	r8: 0
332 	 *	r9: 0
333 	 *	TCR: WRC = 0, no watchdog timer reset will occur
334 	 */
335 	WATCHDOG_RESET();
336 
337 	((void (*)(void *, ulong, ulong, ulong,
338 		ulong, ulong, ulong))images->ep)(images->ft_addr,
339 		0, 0, EPAPR_MAGIC, getenv_bootm_mapsize(), 0, 0);
340 }
341 #endif
342