Introduce virt_to_phys()
[oweals/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 int do_bootm_linux(int flag, int argc, char *argv[], bootm_headers_t *images)
47 {
48         void    (*theKernel) (int, char **, char **, int *);
49         char    *commandline = getenv ("bootargs");
50         char    env_buf[12];
51         char    *cp;
52
53         if ((flag != 0) && (flag != BOOTM_STATE_OS_GO))
54                 return 1;
55
56         /* find kernel entry point */
57         theKernel = (void (*)(int, char **, char **, int *))images->ep;
58
59         show_boot_progress (15);
60
61 #ifdef DEBUG
62         printf ("## Transferring control to Linux (at address %08lx) ...\n",
63                 (ulong) theKernel);
64 #endif
65
66         linux_params_init (UNCACHED_SDRAM (gd->bd->bi_boot_params), commandline);
67
68 #ifdef CONFIG_MEMSIZE_IN_BYTES
69         sprintf (env_buf, "%lu", (ulong)gd->ram_size);
70         debug ("## Giving linux memsize in bytes, %lu\n", (ulong)gd->ram_size);
71 #else
72         sprintf (env_buf, "%lu", (ulong)(gd->ram_size >> 20));
73         debug ("## Giving linux memsize in MB, %lu\n", (ulong)(gd->ram_size >> 20));
74 #endif /* CONFIG_MEMSIZE_IN_BYTES */
75
76         linux_env_set ("memsize", env_buf);
77
78         sprintf (env_buf, "0x%08X", (uint) UNCACHED_SDRAM (images->rd_start));
79         linux_env_set ("initrd_start", env_buf);
80
81         sprintf (env_buf, "0x%X", (uint) (images->rd_end - images->rd_start));
82         linux_env_set ("initrd_size", env_buf);
83
84         sprintf (env_buf, "0x%08X", (uint) (gd->bd->bi_flashstart));
85         linux_env_set ("flash_start", env_buf);
86
87         sprintf (env_buf, "0x%X", (uint) (gd->bd->bi_flashsize));
88         linux_env_set ("flash_size", env_buf);
89
90         cp = getenv("ethaddr");
91         if (cp != NULL) {
92                 linux_env_set("ethaddr", cp);
93         }
94
95         cp = getenv("eth1addr");
96         if (cp != NULL) {
97                 linux_env_set("eth1addr", cp);
98         }
99
100         /* we assume that the kernel is in place */
101         printf ("\nStarting kernel ...\n\n");
102
103         theKernel (linux_argc, linux_argv, linux_env, 0);
104         /* does not return */
105         return 1;
106 }
107
108 static void linux_params_init (ulong start, char *line)
109 {
110         char *next, *quote, *argp;
111
112         linux_argc = 1;
113         linux_argv = (char **) start;
114         linux_argv[0] = 0;
115         argp = (char *) (linux_argv + LINUX_MAX_ARGS);
116
117         next = line;
118
119         while (line && *line && linux_argc < LINUX_MAX_ARGS) {
120                 quote = strchr (line, '"');
121                 next = strchr (line, ' ');
122
123                 while (next != NULL && quote != NULL && quote < next) {
124                         /* we found a left quote before the next blank
125                          * now we have to find the matching right quote
126                          */
127                         next = strchr (quote + 1, '"');
128                         if (next != NULL) {
129                                 quote = strchr (next + 1, '"');
130                                 next = strchr (next + 1, ' ');
131                         }
132                 }
133
134                 if (next == NULL) {
135                         next = line + strlen (line);
136                 }
137
138                 linux_argv[linux_argc] = argp;
139                 memcpy (argp, line, next - line);
140                 argp[next - line] = 0;
141
142                 argp += next - line + 1;
143                 linux_argc++;
144
145                 if (*next)
146                         next++;
147
148                 line = next;
149         }
150
151         linux_env = (char **) (((ulong) argp + 15) & ~15);
152         linux_env[0] = 0;
153         linux_env_p = (char *) (linux_env + LINUX_MAX_ENVS);
154         linux_env_idx = 0;
155 }
156
157 static void linux_env_set (char *env_name, char *env_val)
158 {
159         if (linux_env_idx < LINUX_MAX_ENVS - 1) {
160                 linux_env[linux_env_idx] = linux_env_p;
161
162                 strcpy (linux_env_p, env_name);
163                 linux_env_p += strlen (env_name);
164
165                 strcpy (linux_env_p, "=");
166                 linux_env_p += 1;
167
168                 strcpy (linux_env_p, env_val);
169                 linux_env_p += strlen (env_val);
170
171                 linux_env_p++;
172                 linux_env[++linux_env_idx] = 0;
173         }
174 }