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