xref: /openbmc/u-boot/arch/m68k/lib/bootm.c (revision 33971937)
1 /*
2  * (C) Copyright 2003
3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307	 USA
21  *
22  */
23 
24 #include <common.h>
25 #include <command.h>
26 #include <image.h>
27 #include <u-boot/zlib.h>
28 #include <bzlib.h>
29 #include <watchdog.h>
30 #include <environment.h>
31 #include <asm/byteorder.h>
32 #ifdef CONFIG_SHOW_BOOT_PROGRESS
33 # include <status_led.h>
34 #endif
35 
36 DECLARE_GLOBAL_DATA_PTR;
37 
38 #define PHYSADDR(x) x
39 
40 #define LINUX_MAX_ENVS		256
41 #define LINUX_MAX_ARGS		256
42 
43 static ulong get_sp (void);
44 static void set_clocks_in_mhz (bd_t *kbd);
45 
46 void arch_lmb_reserve(struct lmb *lmb)
47 {
48 	ulong sp;
49 
50 	/*
51 	 * Booting a (Linux) kernel image
52 	 *
53 	 * Allocate space for command line and board info - the
54 	 * address should be as high as possible within the reach of
55 	 * the kernel (see CONFIG_SYS_BOOTMAPSZ settings), but in unused
56 	 * memory, which means far enough below the current stack
57 	 * pointer.
58 	 */
59 	sp = get_sp();
60 	debug ("## Current stack ends at 0x%08lx ", sp);
61 
62 	/* adjust sp by 1K to be safe */
63 	sp -= 1024;
64 	lmb_reserve(lmb, sp, (CONFIG_SYS_SDRAM_BASE + gd->ram_size - sp));
65 }
66 
67 int do_bootm_linux(int flag, int argc, char * const argv[], bootm_headers_t *images)
68 {
69 	ulong rd_len;
70 	ulong initrd_start, initrd_end;
71 	int ret;
72 
73 	ulong cmd_start, cmd_end;
74 	ulong bootmap_base;
75 	bd_t  *kbd;
76 	void  (*kernel) (bd_t *, ulong, ulong, ulong, ulong);
77 	struct lmb *lmb = &images->lmb;
78 
79 	if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
80 		return 1;
81 
82 	bootmap_base = getenv_bootm_low();
83 
84 	/* allocate space and init command line */
85 	ret = boot_get_cmdline (lmb, &cmd_start, &cmd_end, bootmap_base);
86 	if (ret) {
87 		puts("ERROR with allocation of cmdline\n");
88 		goto error;
89 	}
90 
91 	/* allocate space for kernel copy of board info */
92 	ret = boot_get_kbd (lmb, &kbd, bootmap_base);
93 	if (ret) {
94 		puts("ERROR with allocation of kernel bd\n");
95 		goto error;
96 	}
97 	set_clocks_in_mhz(kbd);
98 
99 	kernel = (void (*)(bd_t *, ulong, ulong, ulong, ulong))images->ep;
100 
101 	rd_len = images->rd_end - images->rd_start;
102 	ret = boot_ramdisk_high (lmb, images->rd_start, rd_len,
103 			&initrd_start, &initrd_end);
104 	if (ret)
105 		goto error;
106 
107 	debug("## Transferring control to Linux (at address %08lx) ...\n",
108 	      (ulong) kernel);
109 
110 	show_boot_progress (15);
111 
112 	/*
113 	 * Linux Kernel Parameters (passing board info data):
114 	 *   sp+00: Ignore, side effect of using jsr to jump to kernel
115 	 *   sp+04: ptr to board info data
116 	 *   sp+08: initrd_start or 0 if no initrd
117 	 *   sp+12: initrd_end - unused if initrd_start is 0
118 	 *   sp+16: Start of command line string
119 	 *   sp+20: End   of command line string
120 	 */
121 	(*kernel) (kbd, initrd_start, initrd_end, cmd_start, cmd_end);
122 	/* does not return */
123 error:
124 	return 1;
125 }
126 
127 static ulong get_sp (void)
128 {
129 	ulong sp;
130 
131 	asm("movel %%a7, %%d0\n"
132 	    "movel %%d0, %0\n": "=d"(sp): :"%d0");
133 
134 	return sp;
135 }
136 
137 static void set_clocks_in_mhz (bd_t *kbd)
138 {
139 	char *s;
140 
141 	if ((s = getenv("clocks_in_mhz")) != NULL) {
142 		/* convert all clock information to MHz */
143 		kbd->bi_intfreq /= 1000000L;
144 		kbd->bi_busfreq /= 1000000L;
145 	}
146 }
147