Merge branch 'next' of git://git.denx.de/u-boot-avr32
[platform/kernel/u-boot.git] / lib_mips / bootm.c
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 <zlib.h>
28 #include <asm/byteorder.h>
29 #include <asm/addrspace.h>
30
31 DECLARE_GLOBAL_DATA_PTR;
32
33 #define LINUX_MAX_ENVS          256
34 #define LINUX_MAX_ARGS          256
35
36 static int      linux_argc;
37 static char **  linux_argv;
38
39 static char **  linux_env;
40 static char *   linux_env_p;
41 static int      linux_env_idx;
42
43 static void linux_params_init (ulong start, char * commandline);
44 static void linux_env_set (char * env_name, char * env_val);
45
46 extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
47
48 void do_bootm_linux (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[],
49                      bootm_headers_t *images)
50 {
51         ulong   initrd_start, initrd_end;
52         ulong   ep = 0;
53         void    (*theKernel) (int, char **, char **, int *);
54         char    *commandline = getenv ("bootargs");
55         char    env_buf[12];
56         int     ret;
57         char    *cp;
58
59         /* find kernel entry point */
60         if (images->legacy_hdr_valid) {
61                 ep = image_get_ep (&images->legacy_hdr_os_copy);
62 #if defined(CONFIG_FIT)
63         } else if (images->fit_uname_os) {
64                 ret = fit_image_get_entry (images->fit_hdr_os,
65                                 images->fit_noffset_os, &ep);
66                 if (ret) {
67                         puts ("Can't get entry point property!\n");
68                         goto error;
69                 }
70 #endif
71         } else {
72                 puts ("Could not find kernel entry point!\n");
73                 goto error;
74         }
75         theKernel = (void (*)(int, char **, char **, int *))ep;
76
77         ret = boot_get_ramdisk (argc, argv, images, IH_ARCH_MIPS,
78                         &initrd_start, &initrd_end);
79         if (ret)
80                 goto error;
81
82         show_boot_progress (15);
83
84 #ifdef DEBUG
85         printf ("## Transferring control to Linux (at address %08lx) ...\n",
86                 (ulong) theKernel);
87 #endif
88
89         linux_params_init (UNCACHED_SDRAM (gd->bd->bi_boot_params), commandline);
90
91 #ifdef CONFIG_MEMSIZE_IN_BYTES
92         sprintf (env_buf, "%lu", (ulong)gd->ram_size);
93         debug ("## Giving linux memsize in bytes, %lu\n", (ulong)gd->ram_size);
94 #else
95         sprintf (env_buf, "%lu", (ulong)(gd->ram_size >> 20));
96         debug ("## Giving linux memsize in MB, %lu\n", (ulong)(gd->ram_size >> 20));
97 #endif /* CONFIG_MEMSIZE_IN_BYTES */
98
99         linux_env_set ("memsize", env_buf);
100
101         sprintf (env_buf, "0x%08X", (uint) UNCACHED_SDRAM (initrd_start));
102         linux_env_set ("initrd_start", env_buf);
103
104         sprintf (env_buf, "0x%X", (uint) (initrd_end - initrd_start));
105         linux_env_set ("initrd_size", env_buf);
106
107         sprintf (env_buf, "0x%08X", (uint) (gd->bd->bi_flashstart));
108         linux_env_set ("flash_start", env_buf);
109
110         sprintf (env_buf, "0x%X", (uint) (gd->bd->bi_flashsize));
111         linux_env_set ("flash_size", env_buf);
112
113         cp = getenv("ethaddr");
114         if (cp != NULL) {
115                 linux_env_set("ethaddr", cp);
116         }
117
118         cp = getenv("eth1addr");
119         if (cp != NULL) {
120                 linux_env_set("eth1addr", cp);
121         }
122
123         /* we assume that the kernel is in place */
124         printf ("\nStarting kernel ...\n\n");
125
126         theKernel (linux_argc, linux_argv, linux_env, 0);
127         /* does not return */
128         return;
129
130 error:
131         do_reset (cmdtp, flag, argc, argv);
132         return;
133 }
134
135 static void linux_params_init (ulong start, char *line)
136 {
137         char *next, *quote, *argp;
138
139         linux_argc = 1;
140         linux_argv = (char **) start;
141         linux_argv[0] = 0;
142         argp = (char *) (linux_argv + LINUX_MAX_ARGS);
143
144         next = line;
145
146         while (line && *line && linux_argc < LINUX_MAX_ARGS) {
147                 quote = strchr (line, '"');
148                 next = strchr (line, ' ');
149
150                 while (next != NULL && quote != NULL && quote < next) {
151                         /* we found a left quote before the next blank
152                          * now we have to find the matching right quote
153                          */
154                         next = strchr (quote + 1, '"');
155                         if (next != NULL) {
156                                 quote = strchr (next + 1, '"');
157                                 next = strchr (next + 1, ' ');
158                         }
159                 }
160
161                 if (next == NULL) {
162                         next = line + strlen (line);
163                 }
164
165                 linux_argv[linux_argc] = argp;
166                 memcpy (argp, line, next - line);
167                 argp[next - line] = 0;
168
169                 argp += next - line + 1;
170                 linux_argc++;
171
172                 if (*next)
173                         next++;
174
175                 line = next;
176         }
177
178         linux_env = (char **) (((ulong) argp + 15) & ~15);
179         linux_env[0] = 0;
180         linux_env_p = (char *) (linux_env + LINUX_MAX_ENVS);
181         linux_env_idx = 0;
182 }
183
184 static void linux_env_set (char *env_name, char *env_val)
185 {
186         if (linux_env_idx < LINUX_MAX_ENVS - 1) {
187                 linux_env[linux_env_idx] = linux_env_p;
188
189                 strcpy (linux_env_p, env_name);
190                 linux_env_p += strlen (env_name);
191
192                 strcpy (linux_env_p, "=");
193                 linux_env_p += 1;
194
195                 strcpy (linux_env_p, env_val);
196                 linux_env_p += strlen (env_val);
197
198                 linux_env_p++;
199                 linux_env[++linux_env_idx] = 0;
200         }
201 }