lib_arm/armlinux.c

   1 /*
   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>
  26 #include <image.h>
  27 #include <zlib.h>
  28 #include <asm/byteorder.h>
  29 #ifdef CONFIG_HAS_DATAFLASH
  30 #include <dataflash.h>
  31 #endif
  32
  33 /*cmd_boot.c*/
  34 extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
  35
  36 #if defined (CONFIG_SETUP_MEMORY_TAGS) || \
  37     defined (CONFIG_CMDLINE_TAG) || \
  38     defined (CONFIG_INITRD_TAG) || \
  39     defined (CONFIG_SERIAL_TAG) || \
  40     defined (CONFIG_REVISION_TAG) || \
  41     defined (CONFIG_VFD)
  42 static void setup_start_tag (bd_t *bd);
  43
  44 # ifdef CONFIG_SETUP_MEMORY_TAGS
  45 static void setup_memory_tags (bd_t *bd);
  46 # endif
  47 static void setup_commandline_tag (bd_t *bd, char *commandline);
  48
  49 #if 0
  50 static void setup_ramdisk_tag (bd_t *bd);
  51 #endif
  52 # ifdef CONFIG_INITRD_TAG
  53 static void setup_initrd_tag (bd_t *bd, ulong initrd_start,
  54                               ulong initrd_end);
  55 # endif
  56 static void setup_end_tag (bd_t *bd);
  57
  58 # if defined (CONFIG_VFD)
  59 static void setup_videolfb_tag (gd_t *gd);
  60 # endif
  61
  62
  63 static struct tag *params;
  64 #endif /* CONFIG_SETUP_MEMORY_TAGS || CONFIG_CMDLINE_TAG || CONFIG_INITRD_TAG */
  65
  66 #ifdef CONFIG_SHOW_BOOT_PROGRESS
  67 # include <status_led.h>
  68 # define SHOW_BOOT_PROGRESS(arg)        show_boot_progress(arg)
  69 #else
  70 # define SHOW_BOOT_PROGRESS(arg)
  71 #endif
  72
  73 extern image_header_t header;   /* from cmd_bootm.c */
  74
  75
  76 void do_bootm_linux (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[],
  77                      ulong addr, ulong *len_ptr, int verify)
  78 {
  79         DECLARE_GLOBAL_DATA_PTR;
  80
  81         ulong len = 0, checksum;
  82         ulong initrd_start, initrd_end;
  83         ulong data;
  84         void (*theKernel)(int zero, int arch, uint params);
  85         image_header_t *hdr = &header;
  86         bd_t *bd = gd->bd;
  87
  88 #ifdef CONFIG_CMDLINE_TAG
  89         char *commandline = getenv ("bootargs");
  90 #endif
  91
  92         theKernel = (void (*)(int, int, uint))ntohl(hdr->ih_ep);
  93
  94         /*
  95          * Check if there is an initrd image
  96          */
  97         if (argc >= 3) {
  98                 SHOW_BOOT_PROGRESS (9);
  99
 100                 addr = simple_strtoul (argv[2], NULL, 16);
 101
 102                 printf ("## Loading Ramdisk Image at %08lx ...\n", addr);
 103
 104                 /* Copy header so we can blank CRC field for re-calculation */
 105 #ifdef CONFIG_HAS_DATAFLASH
 106                 if (addr_dataflash (addr)) {
 107                         read_dataflash (addr, sizeof (image_header_t),
 108                                         (char *) &header);
 109                 } else
 110 #endif
 111                         memcpy (&header, (char *) addr,
 112                                 sizeof (image_header_t));
 113
 114                 if (ntohl (hdr->ih_magic) != IH_MAGIC) {
 115                         printf ("Bad Magic Number\n");
 116                         SHOW_BOOT_PROGRESS (-10);
 117                         do_reset (cmdtp, flag, argc, argv);
 118                 }
 119
 120                 data = (ulong) & header;
 121                 len = sizeof (image_header_t);
 122
 123                 checksum = ntohl (hdr->ih_hcrc);
 124                 hdr->ih_hcrc = 0;
 125
 126                 if (crc32 (0, (char *) data, len) != checksum) {
 127                         printf ("Bad Header Checksum\n");
 128                         SHOW_BOOT_PROGRESS (-11);
 129                         do_reset (cmdtp, flag, argc, argv);
 130                 }
 131
 132                 SHOW_BOOT_PROGRESS (10);
 133
 134                 print_image_hdr (hdr);
 135
 136                 data = addr + sizeof (image_header_t);
 137                 len = ntohl (hdr->ih_size);
 138
 139 #ifdef CONFIG_HAS_DATAFLASH
 140                 if (addr_dataflash (addr)) {
 141                         read_dataflash (data, len, (char *) CFG_LOAD_ADDR);
 142                         data = CFG_LOAD_ADDR;
 143                 }
 144 #endif
 145
 146                 if (verify) {
 147                         ulong csum = 0;
 148
 149                         printf ("   Verifying Checksum ... ");
 150                         csum = crc32 (0, (char *) data, len);
 151                         if (csum != ntohl (hdr->ih_dcrc)) {
 152                                 printf ("Bad Data CRC\n");
 153                                 SHOW_BOOT_PROGRESS (-12);
 154                                 do_reset (cmdtp, flag, argc, argv);
 155                         }
 156                         printf ("OK\n");
 157                 }
 158
 159                 SHOW_BOOT_PROGRESS (11);
 160
 161                 if ((hdr->ih_os != IH_OS_LINUX) ||
 162                     (hdr->ih_arch != IH_CPU_ARM) ||
 163                     (hdr->ih_type != IH_TYPE_RAMDISK)) {
 164                         printf ("No Linux ARM Ramdisk Image\n");
 165                         SHOW_BOOT_PROGRESS (-13);
 166                         do_reset (cmdtp, flag, argc, argv);
 167                 }
 168
 169 #ifdef CONFIG_B2
 170                 /*
 171                  *we need to copy the ramdisk to SRAM to let Linux boot
 172                  */
 173                 memmove ((void *) ntohl(hdr->ih_load), (uchar *)data, len);
 174                 data = ntohl(hdr->ih_load);
 175 #endif /* CONFIG_B2 */
 176
 177                 /*
 178                  * Now check if we have a multifile image
 179                  */
 180         } else if ((hdr->ih_type == IH_TYPE_MULTI) && (len_ptr[1])) {
 181                 ulong tail = ntohl (len_ptr[0]) % 4;
 182                 int i;
 183
 184                 SHOW_BOOT_PROGRESS (13);
 185
 186                 /* skip kernel length and terminator */
 187                 data = (ulong) (&len_ptr[2]);
 188                 /* skip any additional image length fields */
 189                 for (i = 1; len_ptr[i]; ++i)
 190                         data += 4;
 191                 /* add kernel length, and align */
 192                 data += ntohl (len_ptr[0]);
 193                 if (tail) {
 194                         data += 4 - tail;
 195                 }
 196
 197                 len = ntohl (len_ptr[1]);
 198
 199         } else {
 200                 /*
 201                  * no initrd image
 202                  */
 203                 SHOW_BOOT_PROGRESS (14);
 204
 205                 len = data = 0;
 206         }
 207
 208 #ifdef  DEBUG
 209         if (!data) {
 210                 printf ("No initrd\n");
 211         }
 212 #endif
 213
 214         if (data) {
 215                 initrd_start = data;
 216                 initrd_end = initrd_start + len;
 217         } else {
 218                 initrd_start = 0;
 219                 initrd_end = 0;
 220         }
 221
 222         SHOW_BOOT_PROGRESS (15);
 223
 224         debug ("## Transferring control to Linux (at address %08lx) ...\n",
 225                (ulong) theKernel);
 226
 227 #if defined (CONFIG_SETUP_MEMORY_TAGS) || \
 228     defined (CONFIG_CMDLINE_TAG) || \
 229     defined (CONFIG_INITRD_TAG) || \
 230     defined (CONFIG_SERIAL_TAG) || \
 231     defined (CONFIG_REVISION_TAG) || \
 232     defined (CONFIG_VFD)
 233         setup_start_tag (bd);
 234 #ifdef CONFIG_SERIAL_TAG
 235         setup_serial_tag (&params);
 236 #endif
 237 #ifdef CONFIG_REVISION_TAG
 238         setup_revision_tag (&params);
 239 #endif
 240 #ifdef CONFIG_SETUP_MEMORY_TAGS
 241         setup_memory_tags (bd);
 242 #endif
 243 #ifdef CONFIG_CMDLINE_TAG
 244         setup_commandline_tag (bd, commandline);
 245 #endif
 246 #ifdef CONFIG_INITRD_TAG
 247         if (initrd_start && initrd_end)
 248                 setup_initrd_tag (bd, initrd_start, initrd_end);
 249 #endif
 250 #if defined (CONFIG_VFD)
 251         setup_videolfb_tag ((gd_t *) gd);
 252 #endif
 253         setup_end_tag (bd);
 254 #endif
 255
 256         /* we assume that the kernel is in place */
 257         printf ("\nStarting kernel ...\n\n");
 258
 259         cleanup_before_linux ();
 260
 261         theKernel (0, bd->bi_arch_number, bd->bi_boot_params);
 262 }
 263
 264
 265 #if defined (CONFIG_SETUP_MEMORY_TAGS) || \
 266     defined (CONFIG_CMDLINE_TAG) || \
 267     defined (CONFIG_INITRD_TAG) || \
 268     defined (CONFIG_SERIAL_TAG) || \
 269     defined (CONFIG_REVISION_TAG) || \
 270     defined (CONFIG_VFD)
 271 static void setup_start_tag (bd_t *bd)
 272 {
 273         params = (struct tag *) bd->bi_boot_params;
 274
 275         params->hdr.tag = ATAG_CORE;
 276         params->hdr.size = tag_size (tag_core);
 277
 278         params->u.core.flags = 0;
 279         params->u.core.pagesize = 0;
 280         params->u.core.rootdev = 0;
 281
 282         params = tag_next (params);
 283 }
 284
 285
 286 #ifdef CONFIG_SETUP_MEMORY_TAGS
 287 static void setup_memory_tags (bd_t *bd)
 288 {
 289         int i;
 290
 291         for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
 292                 params->hdr.tag = ATAG_MEM;
 293                 params->hdr.size = tag_size (tag_mem32);
 294
 295                 params->u.mem.start = bd->bi_dram[i].start;
 296                 params->u.mem.size = bd->bi_dram[i].size;
 297
 298                 params = tag_next (params);
 299         }
 300 }
 301 #endif /* CONFIG_SETUP_MEMORY_TAGS */
 302
 303
 304 static void setup_commandline_tag (bd_t *bd, char *commandline)
 305 {
 306         char *p;
 307
 308         /* eat leading white space */
 309         for (p = commandline; *p == ' '; p++);
 310
 311         /* skip non-existent command lines so the kernel will still
 312          * use its default command line.
 313          */
 314         if (*p == '\0')
 315                 return;
 316
 317         params->hdr.tag = ATAG_CMDLINE;
 318         params->hdr.size =
 319                 (sizeof (struct tag_header) + strlen (p) + 1 + 4) >> 2;
 320
 321         strcpy (params->u.cmdline.cmdline, p);
 322
 323         params = tag_next (params);
 324 }
 325
 326
 327 #ifdef CONFIG_INITRD_TAG
 328 static void setup_initrd_tag (bd_t *bd, ulong initrd_start, ulong initrd_end)
 329 {
 330         /* an ATAG_INITRD node tells the kernel where the compressed
 331          * ramdisk can be found. ATAG_RDIMG is a better name, actually.
 332          */
 333         params->hdr.tag = ATAG_INITRD;
 334         params->hdr.size = tag_size (tag_initrd);
 335
 336         params->u.initrd.start = initrd_start;
 337         params->u.initrd.size = initrd_end - initrd_start;
 338
 339         params = tag_next (params);
 340 }
 341 #endif /* CONFIG_INITRD_TAG */
 342
 343
 344 #if defined (CONFIG_VFD)
 345 static void setup_videolfb_tag (gd_t *gd)
 346 {
 347         /* An ATAG_VIDEOLFB node tells the kernel where and how large
 348          * the framebuffer for video was allocated (among other things).
 349          * Note that a _physical_ address is passed !
 350          *
 351          * We only use it to pass the address and size, the other entries
 352          * in the tag_videolfb are not of interest.
 353          */
 354         params->hdr.tag = ATAG_VIDEOLFB;
 355         params->hdr.size = tag_size (tag_videolfb);
 356
 357         params->u.videolfb.lfb_base = (u32) gd->fb_base;
 358         /* 7168 = 256*4*56/8 - actually 2 pages (8192 bytes) are allocated */
 359         params->u.videolfb.lfb_size = 7168;
 360
 361         params = tag_next (params);
 362 }
 363 #endif
 364
 365 static void setup_end_tag (bd_t *bd)
 366 {
 367         params->hdr.tag = ATAG_NONE;
 368         params->hdr.size = 0;
 369 }
 370
 371 #endif /* CONFIG_SETUP_MEMORY_TAGS || CONFIG_CMDLINE_TAG || CONFIG_INITRD_TAG */