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