]>
git.ipfire.org Git - people/ms/u-boot.git/blob - lib_m68k/m68k_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>
30 DECLARE_GLOBAL_DATA_PTR
;
34 #define LINUX_MAX_ENVS 256
35 #define LINUX_MAX_ARGS 256
37 #ifdef CONFIG_SHOW_BOOT_PROGRESS
38 # include <status_led.h>
39 # define SHOW_BOOT_PROGRESS(arg) show_boot_progress(arg)
41 # define SHOW_BOOT_PROGRESS(arg)
44 extern image_header_t header
; /* from cmd_bootm.c */
46 extern int do_reset (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[]);
48 static int linux_argc
;
49 static char **linux_argv
;
51 static char **linux_env
;
52 static char *linux_env_p
;
53 static int linux_env_idx
;
55 static void linux_params_init (ulong start
, char *commandline
);
56 static void linux_env_set (char *env_name
, char *env_val
);
58 void do_bootm_linux (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[],
59 ulong addr
, ulong
* len_ptr
, int verify
)
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");
70 (void (*)(int, char **, char **, int *)) ntohl (hdr
->ih_ep
);
73 * Check if there is an initrd image
76 SHOW_BOOT_PROGRESS (9);
78 addr
= simple_strtoul (argv
[2], NULL
, 16);
80 printf ("## Loading Ramdisk Image at %08lx ...\n", addr
);
82 /* Copy header so we can blank CRC field for re-calculation */
83 memcpy (&header
, (char *) addr
, sizeof (image_header_t
));
85 if (ntohl (hdr
->ih_magic
) != IH_MAGIC
) {
86 printf ("Bad Magic Number\n");
87 SHOW_BOOT_PROGRESS (-10);
88 do_reset (cmdtp
, flag
, argc
, argv
);
91 data
= (ulong
) & header
;
92 len
= sizeof (image_header_t
);
94 checksum
= ntohl (hdr
->ih_hcrc
);
97 if (crc32 (0, (char *) data
, len
) != checksum
) {
98 printf ("Bad Header Checksum\n");
99 SHOW_BOOT_PROGRESS (-11);
100 do_reset (cmdtp
, flag
, argc
, argv
);
103 SHOW_BOOT_PROGRESS (10);
105 print_image_hdr (hdr
);
107 data
= addr
+ sizeof (image_header_t
);
108 len
= ntohl (hdr
->ih_size
);
113 printf (" Verifying Checksum ... ");
114 csum
= crc32 (0, (char *) data
, len
);
115 if (csum
!= ntohl (hdr
->ih_dcrc
)) {
116 printf ("Bad Data CRC\n");
117 SHOW_BOOT_PROGRESS (-12);
118 do_reset (cmdtp
, flag
, argc
, argv
);
123 SHOW_BOOT_PROGRESS (11);
125 if ((hdr
->ih_os
!= IH_OS_LINUX
) ||
126 (hdr
->ih_arch
!= IH_CPU_M68K
) ||
127 (hdr
->ih_type
!= IH_TYPE_RAMDISK
)) {
128 printf ("No Linux M68K Ramdisk Image\n");
129 SHOW_BOOT_PROGRESS (-13);
130 do_reset (cmdtp
, flag
, argc
, argv
);
134 * Now check if we have a multifile image
136 } else if ((hdr
->ih_type
== IH_TYPE_MULTI
) && (len_ptr
[1])) {
137 ulong tail
= ntohl (len_ptr
[0]) % 4;
140 SHOW_BOOT_PROGRESS (13);
142 /* skip kernel length and terminator */
143 data
= (ulong
) (&len_ptr
[2]);
144 /* skip any additional image length fields */
145 for (i
= 1; len_ptr
[i
]; ++i
)
147 /* add kernel length, and align */
148 data
+= ntohl (len_ptr
[0]);
153 len
= ntohl (len_ptr
[1]);
159 SHOW_BOOT_PROGRESS (14);
166 printf ("No initrd\n");
172 initrd_end
= initrd_start
+ len
;
178 SHOW_BOOT_PROGRESS (15);
181 printf ("## Transferring control to Linux (at address %08lx) ...\n",
185 linux_params_init (PHYSADDR (gd
->bd
->bi_boot_params
), commandline
);
187 sprintf (env_buf
, "%lu", gd
->ram_size
>> 20);
188 linux_env_set ("memsize", env_buf
);
190 sprintf (env_buf
, "0x%08X", (uint
) PHYSADDR (initrd_start
));
191 linux_env_set ("initrd_start", env_buf
);
193 sprintf (env_buf
, "0x%X", (uint
) (initrd_end
- initrd_start
));
194 linux_env_set ("initrd_size", env_buf
);
196 sprintf (env_buf
, "0x%08X", (uint
) (gd
->bd
->bi_flashstart
));
197 linux_env_set ("flash_start", env_buf
);
199 sprintf (env_buf
, "0x%X", (uint
) (gd
->bd
->bi_flashsize
));
200 linux_env_set ("flash_size", env_buf
);
202 /* we assume that the kernel is in place */
203 printf ("\nStarting kernel ...\n\n");
205 theKernel (linux_argc
, linux_argv
, linux_env
, 0);
208 static void linux_params_init (ulong start
, char *line
)
210 char *next
, *quote
, *argp
;
213 linux_argv
= (char **) start
;
215 argp
= (char *) (linux_argv
+ LINUX_MAX_ARGS
);
219 while (line
&& *line
&& linux_argc
< LINUX_MAX_ARGS
) {
220 quote
= strchr (line
, '"');
221 next
= strchr (line
, ' ');
223 while (next
!= NULL
&& quote
!= NULL
&& quote
< next
) {
224 /* we found a left quote before the next blank
225 * now we have to find the matching right quote
227 next
= strchr (quote
+ 1, '"');
229 quote
= strchr (next
+ 1, '"');
230 next
= strchr (next
+ 1, ' ');
235 next
= line
+ strlen (line
);
238 linux_argv
[linux_argc
] = argp
;
239 memcpy (argp
, line
, next
- line
);
240 argp
[next
- line
] = 0;
242 argp
+= next
- line
+ 1;
251 linux_env
= (char **) (((ulong
) argp
+ 15) & ~15);
253 linux_env_p
= (char *) (linux_env
+ LINUX_MAX_ENVS
);
257 static void linux_env_set (char *env_name
, char *env_val
)
259 if (linux_env_idx
< LINUX_MAX_ENVS
- 1) {
260 linux_env
[linux_env_idx
] = linux_env_p
;
262 strcpy (linux_env_p
, env_name
);
263 linux_env_p
+= strlen (env_name
);
265 strcpy (linux_env_p
, "=");
268 strcpy (linux_env_p
, env_val
);
269 linux_env_p
+= strlen (env_val
);
272 linux_env
[++linux_env_idx
] = 0;