ot1200: add sata support
[karo-tx-uboot.git] / arch / arm / lib / bootm.c
1 /* Copyright (C) 2011
2  * Corscience GmbH & Co. KG - Simon Schwarz <schwarz@corscience.de>
3  *  - Added prep subcommand support
4  *  - Reorganized source - modeled after powerpc version
5  *
6  * (C) Copyright 2002
7  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
8  * Marius Groeger <mgroeger@sysgo.de>
9  *
10  * Copyright (C) 2001  Erik Mouw (J.A.K.Mouw@its.tudelft.nl)
11  *
12  * SPDX-License-Identifier:     GPL-2.0+
13  */
14
15 #include <common.h>
16 #include <command.h>
17 #include <image.h>
18 #include <u-boot/zlib.h>
19 #include <asm/byteorder.h>
20 #include <libfdt.h>
21 #include <fdt_support.h>
22 #include <asm/bootm.h>
23 #include <asm/secure.h>
24 #include <linux/compiler.h>
25 #include <bootm.h>
26 #include <vxworks.h>
27
28 #if defined(CONFIG_ARMV7_NONSEC) || defined(CONFIG_ARMV7_VIRT)
29 #include <asm/armv7.h>
30 #endif
31
32 DECLARE_GLOBAL_DATA_PTR;
33
34 static struct tag *params;
35
36 static ulong get_sp(void)
37 {
38         ulong ret;
39
40         asm("mov %0, sp" : "=r"(ret) : );
41         return ret;
42 }
43
44 void arch_lmb_reserve(struct lmb *lmb)
45 {
46         ulong sp;
47
48         /*
49          * Booting a (Linux) kernel image
50          *
51          * Allocate space for command line and board info - the
52          * address should be as high as possible within the reach of
53          * the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused
54          * memory, which means far enough below the current stack
55          * pointer.
56          */
57         sp = get_sp();
58         debug("## Current stack ends at 0x%08lx ", sp);
59
60         /* adjust sp by 4K to be safe */
61         sp -= 4096;
62         lmb_reserve(lmb, sp,
63                     gd->bd->bi_dram[0].start + gd->bd->bi_dram[0].size - sp);
64 }
65
66 /**
67  * announce_and_cleanup() - Print message and prepare for kernel boot
68  *
69  * @fake: non-zero to do everything except actually boot
70  */
71 static void announce_and_cleanup(int fake)
72 {
73         printf("\nStarting kernel ...%s\n\n", fake ?
74                 "(fake run for tracing)" : "");
75         bootstage_mark_name(BOOTSTAGE_ID_BOOTM_HANDOFF, "start_kernel");
76 #ifdef CONFIG_BOOTSTAGE_FDT
77         bootstage_fdt_add_report();
78 #endif
79 #ifdef CONFIG_BOOTSTAGE_REPORT
80         bootstage_report();
81 #endif
82
83 #ifdef CONFIG_USB_DEVICE
84         udc_disconnect();
85 #endif
86         cleanup_before_linux();
87 }
88
89 static void setup_start_tag (bd_t *bd)
90 {
91         params = (struct tag *)bd->bi_boot_params;
92
93         params->hdr.tag = ATAG_CORE;
94         params->hdr.size = tag_size (tag_core);
95
96         params->u.core.flags = 0;
97         params->u.core.pagesize = 0;
98         params->u.core.rootdev = 0;
99
100         params = tag_next (params);
101 }
102
103 static void setup_memory_tags(bd_t *bd)
104 {
105         int i;
106
107         for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
108                 params->hdr.tag = ATAG_MEM;
109                 params->hdr.size = tag_size (tag_mem32);
110
111                 params->u.mem.start = bd->bi_dram[i].start;
112                 params->u.mem.size = bd->bi_dram[i].size;
113
114                 params = tag_next (params);
115         }
116 }
117
118 static void setup_commandline_tag(bd_t *bd, char *commandline)
119 {
120         char *p;
121
122         if (!commandline)
123                 return;
124
125         /* eat leading white space */
126         for (p = commandline; *p == ' '; p++);
127
128         /* skip non-existent command lines so the kernel will still
129          * use its default command line.
130          */
131         if (*p == '\0')
132                 return;
133
134         params->hdr.tag = ATAG_CMDLINE;
135         params->hdr.size =
136                 (sizeof (struct tag_header) + strlen (p) + 1 + 4) >> 2;
137
138         strcpy (params->u.cmdline.cmdline, p);
139
140         params = tag_next (params);
141 }
142
143 static void setup_initrd_tag(bd_t *bd, ulong initrd_start, ulong initrd_end)
144 {
145         /* an ATAG_INITRD node tells the kernel where the compressed
146          * ramdisk can be found. ATAG_RDIMG is a better name, actually.
147          */
148         params->hdr.tag = ATAG_INITRD2;
149         params->hdr.size = tag_size (tag_initrd);
150
151         params->u.initrd.start = initrd_start;
152         params->u.initrd.size = initrd_end - initrd_start;
153
154         params = tag_next (params);
155 }
156
157 static void setup_serial_tag(struct tag **tmp)
158 {
159         struct tag *params = *tmp;
160         struct tag_serialnr serialnr;
161
162         get_board_serial(&serialnr);
163         params->hdr.tag = ATAG_SERIAL;
164         params->hdr.size = tag_size (tag_serialnr);
165         params->u.serialnr.low = serialnr.low;
166         params->u.serialnr.high= serialnr.high;
167         params = tag_next (params);
168         *tmp = params;
169 }
170
171 static void setup_revision_tag(struct tag **in_params)
172 {
173         u32 rev = 0;
174
175         rev = get_board_rev();
176         params->hdr.tag = ATAG_REVISION;
177         params->hdr.size = tag_size (tag_revision);
178         params->u.revision.rev = rev;
179         params = tag_next (params);
180 }
181
182 static void setup_end_tag(bd_t *bd)
183 {
184         params->hdr.tag = ATAG_NONE;
185         params->hdr.size = 0;
186 }
187
188 __weak void setup_board_tags(struct tag **in_params) {}
189
190 #ifdef CONFIG_ARM64
191 static void do_nonsec_virt_switch(void)
192 {
193         smp_kick_all_cpus();
194         flush_dcache_all();     /* flush cache before swtiching to EL2 */
195         armv8_switch_to_el2();
196 #ifdef CONFIG_ARMV8_SWITCH_TO_EL1
197         armv8_switch_to_el1();
198 #endif
199 }
200 #endif
201
202 /* Subcommand: PREP */
203 static void boot_prep_linux(bootm_headers_t *images)
204 {
205         char *commandline = getenv("bootargs");
206
207         if (IMAGE_ENABLE_OF_LIBFDT && images->ft_len) {
208 #ifdef CONFIG_OF_LIBFDT
209                 debug("using: FDT\n");
210                 if (image_setup_linux(images)) {
211                         printf("FDT creation failed! hanging...");
212                         hang();
213                 }
214 #endif
215         } else if (BOOTM_ENABLE_TAGS) {
216                 debug("using: ATAGS\n");
217                 setup_start_tag(gd->bd);
218                 if (BOOTM_ENABLE_SERIAL_TAG)
219                         setup_serial_tag(&params);
220                 if (BOOTM_ENABLE_CMDLINE_TAG)
221                         setup_commandline_tag(gd->bd, commandline);
222                 if (BOOTM_ENABLE_REVISION_TAG)
223                         setup_revision_tag(&params);
224                 if (BOOTM_ENABLE_MEMORY_TAGS)
225                         setup_memory_tags(gd->bd);
226                 if (BOOTM_ENABLE_INITRD_TAG) {
227                         if (images->rd_start && images->rd_end) {
228                                 setup_initrd_tag(gd->bd, images->rd_start,
229                                                  images->rd_end);
230                         }
231                 }
232                 setup_board_tags(&params);
233                 setup_end_tag(gd->bd);
234         } else {
235                 printf("FDT and ATAGS support not compiled in - hanging\n");
236                 hang();
237         }
238 }
239
240 /* Subcommand: GO */
241 static void boot_jump_linux(bootm_headers_t *images, int flag)
242 {
243 #ifdef CONFIG_ARM64
244         void (*kernel_entry)(void *fdt_addr, void *res0, void *res1,
245                         void *res2);
246         int fake = (flag & BOOTM_STATE_OS_FAKE_GO);
247
248         kernel_entry = (void (*)(void *fdt_addr, void *res0, void *res1,
249                                 void *res2))images->ep;
250
251         debug("## Transferring control to Linux (at address %lx)...\n",
252                 (ulong) kernel_entry);
253         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
254
255         announce_and_cleanup(fake);
256
257         if (!fake) {
258                 do_nonsec_virt_switch();
259                 kernel_entry(images->ft_addr, NULL, NULL, NULL);
260         }
261 #else
262         unsigned long machid = gd->bd->bi_arch_number;
263         char *s;
264         void (*kernel_entry)(int zero, int arch, uint params);
265         unsigned long r2;
266         int fake = (flag & BOOTM_STATE_OS_FAKE_GO);
267
268         kernel_entry = (void (*)(int, int, uint))images->ep;
269
270         s = getenv("machid");
271         if (s) {
272                 strict_strtoul(s, 16, &machid);
273                 printf("Using machid 0x%lx from environment\n", machid);
274         }
275
276         debug("## Transferring control to Linux (at address %08lx)" \
277                 "...\n", (ulong) kernel_entry);
278         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
279         announce_and_cleanup(fake);
280
281         if (IMAGE_ENABLE_OF_LIBFDT && images->ft_len)
282                 r2 = (unsigned long)images->ft_addr;
283         else
284                 r2 = gd->bd->bi_boot_params;
285
286         if (!fake) {
287 #if defined(CONFIG_ARMV7_NONSEC) || defined(CONFIG_ARMV7_VIRT)
288                 armv7_init_nonsec();
289                 secure_ram_addr(_do_nonsec_entry)(kernel_entry,
290                                                   0, machid, r2);
291 #else
292                 kernel_entry(0, machid, r2);
293 #endif
294         }
295 #endif
296 }
297
298 /* Main Entry point for arm bootm implementation
299  *
300  * Modeled after the powerpc implementation
301  * DIFFERENCE: Instead of calling prep and go at the end
302  * they are called if subcommand is equal 0.
303  */
304 int do_bootm_linux(int flag, int argc, char * const argv[],
305                    bootm_headers_t *images)
306 {
307         /* No need for those on ARM */
308         if (flag & BOOTM_STATE_OS_BD_T || flag & BOOTM_STATE_OS_CMDLINE)
309                 return -1;
310
311         if (flag & BOOTM_STATE_OS_PREP) {
312                 boot_prep_linux(images);
313                 return 0;
314         }
315
316         if (flag & (BOOTM_STATE_OS_GO | BOOTM_STATE_OS_FAKE_GO)) {
317                 boot_jump_linux(images, flag);
318                 return 0;
319         }
320
321         boot_prep_linux(images);
322         boot_jump_linux(images, flag);
323         return 0;
324 }
325
326 #ifdef CONFIG_CMD_BOOTZ
327
328 struct zimage_header {
329         uint32_t        code[9];
330         uint32_t        zi_magic;
331         uint32_t        zi_start;
332         uint32_t        zi_end;
333 };
334
335 #define LINUX_ARM_ZIMAGE_MAGIC  0x016f2818
336
337 int bootz_setup(ulong image, ulong *start, ulong *end)
338 {
339         struct zimage_header *zi;
340
341         zi = (struct zimage_header *)map_sysmem(image, 0);
342         if (zi->zi_magic != LINUX_ARM_ZIMAGE_MAGIC) {
343                 puts("Bad Linux ARM zImage magic!\n");
344                 return 1;
345         }
346
347         *start = zi->zi_start;
348         *end = zi->zi_end;
349
350         printf("Kernel image @ %#08lx [ %#08lx - %#08lx ]\n", image, *start,
351               *end);
352
353         return 0;
354 }
355
356 #endif  /* CONFIG_CMD_BOOTZ */
357
358 #if defined(CONFIG_BOOTM_VXWORKS)
359 void boot_prep_vxworks(bootm_headers_t *images)
360 {
361 #if defined(CONFIG_OF_LIBFDT)
362         int off;
363
364         if (images->ft_addr) {
365                 off = fdt_path_offset(images->ft_addr, "/memory");
366                 if (off < 0) {
367                         if (arch_fixup_fdt(images->ft_addr))
368                                 puts("## WARNING: fixup memory failed!\n");
369                 }
370         }
371 #endif
372         cleanup_before_linux();
373 }
374 void boot_jump_vxworks(bootm_headers_t *images)
375 {
376         /* ARM VxWorks requires device tree physical address to be passed */
377         ((void (*)(void *))images->ep)(images->ft_addr);
378 }
379 #endif