blob: e5d8eea4b892ff69029eba0babaf457d85a5a6df [file] [log] [blame]
wdenk2262cfe2002-11-18 00:14:45 +00001/*
2 * (C) Copyright 2002
3 * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
4 * Marius Groeger <mgroeger@sysgo.de>
5 *
6 * Copyright (C) 2001 Erik Mouw (J.A.K.Mouw@its.tudelft.nl)
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>
wdenk2262cfe2002-11-18 00:14:45 +000026#include <image.h>
27#include <zlib.h>
28#include <asm/byteorder.h>
29#include <asm/zimage.h>
30
wdenk8bde7f72003-06-27 21:31:46 +000031/*cmd_boot.c*/
32extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
wdenk2262cfe2002-11-18 00:14:45 +000033
34extern image_header_t header; /* from cmd_bootm.c */
35
36
37image_header_t *fake_header(image_header_t *hdr, void *ptr, int size)
38{
39 /* try each supported image type in order */
40 if (NULL != fake_zimage_header(hdr, ptr, size)) {
41 return hdr;
42 }
wdenk8bde7f72003-06-27 21:31:46 +000043
wdenk2262cfe2002-11-18 00:14:45 +000044 return NULL;
45}
46
47
48void do_bootm_linux(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[],
49 ulong addr, ulong *len_ptr, int verify)
50{
wdenkea909b72002-11-21 23:11:29 +000051 void *base_ptr;
wdenk8bde7f72003-06-27 21:31:46 +000052
wdenk2262cfe2002-11-18 00:14:45 +000053 ulong len = 0, checksum;
54 ulong initrd_start, initrd_end;
55 ulong data;
56 image_header_t *hdr = &header;
wdenk8bde7f72003-06-27 21:31:46 +000057
wdenk2262cfe2002-11-18 00:14:45 +000058 /*
59 * Check if there is an initrd image
60 */
61 if (argc >= 3) {
62 addr = simple_strtoul(argv[2], NULL, 16);
wdenk8bde7f72003-06-27 21:31:46 +000063
wdenk2262cfe2002-11-18 00:14:45 +000064 printf ("## Loading Ramdisk Image at %08lx ...\n", addr);
wdenk8bde7f72003-06-27 21:31:46 +000065
wdenk2262cfe2002-11-18 00:14:45 +000066 /* Copy header so we can blank CRC field for re-calculation */
67 memcpy (&header, (char *)addr, sizeof(image_header_t));
wdenk8bde7f72003-06-27 21:31:46 +000068
wdenk2262cfe2002-11-18 00:14:45 +000069 if (ntohl(hdr->ih_magic) != IH_MAGIC) {
70 printf ("Bad Magic Number\n");
71 do_reset (cmdtp, flag, argc, argv);
72 }
wdenk8bde7f72003-06-27 21:31:46 +000073
wdenk2262cfe2002-11-18 00:14:45 +000074 data = (ulong)&header;
75 len = sizeof(image_header_t);
wdenk8bde7f72003-06-27 21:31:46 +000076
wdenk2262cfe2002-11-18 00:14:45 +000077 checksum = ntohl(hdr->ih_hcrc);
78 hdr->ih_hcrc = 0;
wdenk8bde7f72003-06-27 21:31:46 +000079
wdenk2262cfe2002-11-18 00:14:45 +000080 if (crc32 (0, (char *)data, len) != checksum) {
81 printf ("Bad Header Checksum\n");
82 do_reset (cmdtp, flag, argc, argv);
83 }
wdenk8bde7f72003-06-27 21:31:46 +000084
wdenk2262cfe2002-11-18 00:14:45 +000085 print_image_hdr (hdr);
wdenk8bde7f72003-06-27 21:31:46 +000086
wdenk2262cfe2002-11-18 00:14:45 +000087 data = addr + sizeof(image_header_t);
88 len = ntohl(hdr->ih_size);
wdenk8bde7f72003-06-27 21:31:46 +000089
wdenk2262cfe2002-11-18 00:14:45 +000090 if (verify) {
91 ulong csum = 0;
wdenk8bde7f72003-06-27 21:31:46 +000092
wdenk2262cfe2002-11-18 00:14:45 +000093 printf (" Verifying Checksum ... ");
94 csum = crc32 (0, (char *)data, len);
95 if (csum != ntohl(hdr->ih_dcrc)) {
96 printf ("Bad Data CRC\n");
97 do_reset (cmdtp, flag, argc, argv);
98 }
99 printf ("OK\n");
100 }
wdenk8bde7f72003-06-27 21:31:46 +0000101
wdenk2262cfe2002-11-18 00:14:45 +0000102 if ((hdr->ih_os != IH_OS_LINUX) ||
103 (hdr->ih_arch != IH_CPU_I386) ||
104 (hdr->ih_type != IH_TYPE_RAMDISK) ) {
105 printf ("No Linux i386 Ramdisk Image\n");
106 do_reset (cmdtp, flag, argc, argv);
107 }
wdenk8bde7f72003-06-27 21:31:46 +0000108
wdenk2262cfe2002-11-18 00:14:45 +0000109 /*
110 * Now check if we have a multifile image
111 */
112 } else if ((hdr->ih_type==IH_TYPE_MULTI) && (len_ptr[1])) {
113 ulong tail = ntohl(len_ptr[0]) % 4;
114 int i;
wdenk8bde7f72003-06-27 21:31:46 +0000115
wdenk2262cfe2002-11-18 00:14:45 +0000116 /* skip kernel length and terminator */
117 data = (ulong)(&len_ptr[2]);
118 /* skip any additional image length fields */
119 for (i=1; len_ptr[i]; ++i)
120 data += 4;
121 /* add kernel length, and align */
122 data += ntohl(len_ptr[0]);
123 if (tail) {
124 data += 4 - tail;
125 }
wdenk8bde7f72003-06-27 21:31:46 +0000126
wdenk2262cfe2002-11-18 00:14:45 +0000127 len = ntohl(len_ptr[1]);
wdenk8bde7f72003-06-27 21:31:46 +0000128
wdenk2262cfe2002-11-18 00:14:45 +0000129 } else {
130 /*
131 * no initrd image
132 */
133 data = 0;
134 }
wdenk8bde7f72003-06-27 21:31:46 +0000135
wdenk2262cfe2002-11-18 00:14:45 +0000136#ifdef DEBUG
137 if (!data) {
138 printf ("No initrd\n");
139 }
140#endif
wdenk8bde7f72003-06-27 21:31:46 +0000141
wdenk2262cfe2002-11-18 00:14:45 +0000142 if (data) {
143 initrd_start = data;
144 initrd_end = initrd_start + len;
145 printf (" Loading Ramdisk to %08lx, end %08lx ... ",
146 initrd_start, initrd_end);
147 memmove ((void *)initrd_start, (void *)data, len);
148 printf ("OK\n");
149 } else {
150 initrd_start = 0;
151 initrd_end = 0;
152 }
wdenk8bde7f72003-06-27 21:31:46 +0000153
154 base_ptr = load_zimage((void*)addr + sizeof(image_header_t), ntohl(hdr->ih_size),
wdenk2262cfe2002-11-18 00:14:45 +0000155 initrd_start, initrd_end-initrd_start, 0);
156
157 if (NULL == base_ptr) {
158 printf ("## Kernel loading failed ...\n");
159 do_reset(cmdtp, flag, argc, argv);
wdenk8bde7f72003-06-27 21:31:46 +0000160
wdenk2262cfe2002-11-18 00:14:45 +0000161 }
wdenk8bde7f72003-06-27 21:31:46 +0000162
wdenk2262cfe2002-11-18 00:14:45 +0000163#ifdef DEBUG
164 printf ("## Transferring control to Linux (at address %08x) ...\n",
165 (u32)base_ptr);
166#endif
wdenk8bde7f72003-06-27 21:31:46 +0000167
wdenk2262cfe2002-11-18 00:14:45 +0000168 /* we assume that the kernel is in place */
169 printf("\nStarting kernel ...\n\n");
wdenk8bde7f72003-06-27 21:31:46 +0000170
wdenk2262cfe2002-11-18 00:14:45 +0000171 boot_zimage(base_ptr);
wdenk8bde7f72003-06-27 21:31:46 +0000172
wdenk2262cfe2002-11-18 00:14:45 +0000173}