]>
git.ipfire.org Git - people/ms/u-boot.git/blob - lib_mips/mips_linux.c
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
5 * See file CREDITS for list of people who contributed to this
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.
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.
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
28 #include <asm/byteorder.h>
29 #include <asm/addrspace.h>
31 #define LINUX_MAX_ENVS 256
32 #define LINUX_MAX_ARGS 256
34 #ifdef CONFIG_SHOW_BOOT_PROGRESS
35 # include <status_led.h>
36 # define SHOW_BOOT_PROGRESS(arg) show_boot_progress(arg)
38 # define SHOW_BOOT_PROGRESS(arg)
41 extern image_header_t header
; /* from cmd_bootm.c */
43 extern int do_reset (cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[]);
45 static int linux_argc
;
46 static char ** linux_argv
;
48 static char ** linux_env
;
49 static char * linux_env_p
;
50 static int linux_env_idx
;
52 static void linux_params_init (ulong start
, char * commandline
);
53 static void linux_env_set (char * env_name
, char * env_val
);
56 void do_bootm_linux(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[],
57 ulong addr
, ulong
*len_ptr
, int verify
)
59 DECLARE_GLOBAL_DATA_PTR
;
61 ulong len
= 0, checksum
;
62 ulong initrd_start
, initrd_end
;
64 void (*theKernel
)(int, char **, char **, int *);
65 image_header_t
*hdr
= &header
;
66 char *commandline
= getenv("bootargs");
69 theKernel
= (void (*)(int, char **, char **, int *))ntohl(hdr
->ih_ep
);
72 * Check if there is an initrd image
75 SHOW_BOOT_PROGRESS (9);
77 addr
= simple_strtoul(argv
[2], NULL
, 16);
79 printf ("## Loading Ramdisk Image at %08lx ...\n", addr
);
81 /* Copy header so we can blank CRC field for re-calculation */
82 memcpy (&header
, (char *)addr
, sizeof(image_header_t
));
84 if (ntohl(hdr
->ih_magic
) != IH_MAGIC
) {
85 printf ("Bad Magic Number\n");
86 SHOW_BOOT_PROGRESS (-10);
87 do_reset (cmdtp
, flag
, argc
, argv
);
90 data
= (ulong
)&header
;
91 len
= sizeof(image_header_t
);
93 checksum
= ntohl(hdr
->ih_hcrc
);
96 if (crc32 (0, (char *)data
, len
) != checksum
) {
97 printf ("Bad Header Checksum\n");
98 SHOW_BOOT_PROGRESS (-11);
99 do_reset (cmdtp
, flag
, argc
, argv
);
102 SHOW_BOOT_PROGRESS (10);
104 print_image_hdr (hdr
);
106 data
= addr
+ sizeof(image_header_t
);
107 len
= ntohl(hdr
->ih_size
);
112 printf (" Verifying Checksum ... ");
113 csum
= crc32 (0, (char *)data
, len
);
114 if (csum
!= ntohl(hdr
->ih_dcrc
)) {
115 printf ("Bad Data CRC\n");
116 SHOW_BOOT_PROGRESS (-12);
117 do_reset (cmdtp
, flag
, argc
, argv
);
122 SHOW_BOOT_PROGRESS (11);
124 if ((hdr
->ih_os
!= IH_OS_LINUX
) ||
125 (hdr
->ih_arch
!= IH_CPU_MIPS
) ||
126 (hdr
->ih_type
!= IH_TYPE_RAMDISK
) ) {
127 printf ("No Linux MIPS Ramdisk Image\n");
128 SHOW_BOOT_PROGRESS (-13);
129 do_reset (cmdtp
, flag
, argc
, argv
);
133 * Now check if we have a multifile image
135 } else if ((hdr
->ih_type
==IH_TYPE_MULTI
) && (len_ptr
[1])) {
136 ulong tail
= ntohl(len_ptr
[0]) % 4;
139 SHOW_BOOT_PROGRESS (13);
141 /* skip kernel length and terminator */
142 data
= (ulong
)(&len_ptr
[2]);
143 /* skip any additional image length fields */
144 for (i
=1; len_ptr
[i
]; ++i
)
146 /* add kernel length, and align */
147 data
+= ntohl(len_ptr
[0]);
152 len
= ntohl(len_ptr
[1]);
158 SHOW_BOOT_PROGRESS (14);
165 printf ("No initrd\n");
171 initrd_end
= initrd_start
+ len
;
177 SHOW_BOOT_PROGRESS (15);
180 printf ("## Transferring control to Linux (at address %08lx) ...\n",
184 linux_params_init (PHYSADDR(gd
->bd
->bi_boot_params
), commandline
);
186 sprintf (env_buf
, "%lu", gd
->ram_size
>> 20);
187 linux_env_set ("memsize", env_buf
);
189 sprintf (env_buf
, "0x%08X", (uint
)PHYSADDR(initrd_start
));
190 linux_env_set ("initrd_start", env_buf
);
192 sprintf (env_buf
, "0x%X", (uint
)(initrd_end
- initrd_start
));
193 linux_env_set ("initrd_size", env_buf
);
195 sprintf (env_buf
, "0x%08X", (uint
)(gd
->bd
->bi_flashstart
));
196 linux_env_set ("flash_start", env_buf
);
198 sprintf (env_buf
, "0x%X", (uint
)(gd
->bd
->bi_flashsize
));
199 linux_env_set ("flash_size", env_buf
);
201 /* we assume that the kernel is in place */
202 printf("\nStarting kernel ...\n\n");
204 theKernel(linux_argc
, linux_argv
, linux_env
, 0);
207 static void linux_params_init (ulong start
, char * line
)
209 char * next
, * quote
, * argp
;
212 linux_argv
= (char **) start
;
214 argp
= (char *)(linux_argv
+ LINUX_MAX_ARGS
);
218 while (line
&& *line
&& linux_argc
< LINUX_MAX_ARGS
)
220 quote
= strchr (line
, '"');
221 next
= strchr (line
, ' ');
223 while (next
!= NULL
&& quote
!= NULL
&& quote
< next
)
225 /* we found a left quote before the next blank
226 * now we have to find the matching right quote
228 next
= strchr (quote
+ 1, '"');
231 quote
= strchr (next
+ 1, '"');
232 next
= strchr (next
+ 1, ' ');
238 next
= line
+ strlen (line
);
241 linux_argv
[linux_argc
] = argp
;
242 memcpy (argp
, line
, next
- line
);
243 argp
[next
- line
] = 0;
245 argp
+= next
- line
+ 1;
253 linux_env
= (char **)(((ulong
)argp
+ 15) & ~15);
255 linux_env_p
= (char *)(linux_env
+ LINUX_MAX_ENVS
);
259 static void linux_env_set (char * env_name
, char * env_val
)
261 if (linux_env_idx
< LINUX_MAX_ENVS
- 1)
263 linux_env
[linux_env_idx
] = linux_env_p
;
265 strcpy (linux_env_p
, env_name
);
266 linux_env_p
+= strlen (env_name
);
268 strcpy (linux_env_p
, "=");
271 strcpy (linux_env_p
, env_val
);
272 linux_env_p
+= strlen (env_val
);
275 linux_env
[++ linux_env_idx
] = 0;