arch/ppc/boot/openfirmware/coffmain.c

   1 /*
   2  * Copyright (C) Paul Mackerras 1997.
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License
   6  * as published by the Free Software Foundation; either version
   7  * 2 of the License, or (at your option) any later version.
   8  */
   9 #include <linux/string.h>
  10 #include <asm/processor.h>
  11 #include <asm/page.h>
  12
  13 #include "nonstdio.h"
  14 #include "of1275.h"
  15 #include "zlib.h"
  16
  17 /* Passed from the linker */
  18 extern char __image_begin, __image_end;
  19 extern char __ramdisk_begin[], __ramdisk_end;
  20 extern char _start, _end;
  21
  22 extern char image_data[], initrd_data[];
  23 extern int initrd_len, image_len;
  24 extern unsigned int heap_max;
  25 extern void flush_cache(void *start, unsigned int len);
  26 extern void gunzip(void *, int, unsigned char *, int *);
  27 extern void make_bi_recs(unsigned long addr, char *name, unsigned int mach,
  28                 unsigned int progend);
  29 extern void setup_bats(unsigned long start);
  30
  31 char *avail_ram;
  32 char *begin_avail, *end_avail;
  33 char *avail_high;
  34
  35 #define SCRATCH_SIZE    (128 << 10)
  36
  37 static char heap[SCRATCH_SIZE];
  38
  39 static unsigned long ram_start = 0;
  40 static unsigned long ram_end = 0x1000000;
  41
  42 static unsigned long prog_start = 0x900000;
  43 static unsigned long prog_size = 0x700000;
  44
  45 typedef void (*kernel_start_t)(int, int, void *);
  46
  47 void boot(int a1, int a2, void *prom)
  48 {
  49     unsigned sa, len;
  50     void *dst;
  51     unsigned char *im;
  52     unsigned initrd_start, initrd_size;
  53
  54     printf("coffboot starting: loaded at 0x%p\n", &_start);
  55     setup_bats(ram_start);
  56
  57     initrd_size = (char *)(&__ramdisk_end) - (char *)(&__ramdisk_begin);
  58     if (initrd_size) {
  59         initrd_start = (ram_end - initrd_size) & ~0xFFF;
  60         a1 = initrd_start;
  61         a2 = initrd_size;
  62         claim(initrd_start, ram_end - initrd_start, 0);
  63         printf("initial ramdisk moving 0x%x <- 0x%p (%x bytes)\n\r",
  64                initrd_start, (char *)(&__ramdisk_begin), initrd_size);
  65         memcpy((char *)initrd_start, (char *)(&__ramdisk_begin), initrd_size);
  66         prog_size = initrd_start - prog_start;
  67     } else
  68         a2 = 0xdeadbeef;
  69
  70     im = (char *)(&__image_begin);
  71     len = (char *)(&__image_end) - (char *)(&__image_begin);
  72     /* claim 4MB starting at PROG_START */
  73     claim(prog_start, prog_size, 0);
  74     map(prog_start, prog_start, prog_size);
  75     dst = (void *) prog_start;
  76     if (im[0] == 0x1f && im[1] == 0x8b) {
  77         /* set up scratch space */
  78         begin_avail = avail_high = avail_ram = heap;
  79         end_avail = heap + sizeof(heap);
  80         printf("heap at 0x%p\n", avail_ram);
  81         printf("gunzipping (0x%p <- 0x%p:0x%p)...", dst, im, im+len);
  82         gunzip(dst, prog_size, im, &len);
  83         printf("done %u bytes\n", len);
  84         printf("%u bytes of heap consumed, max in use %u\n",
  85                avail_high - begin_avail, heap_max);
  86     } else {
  87         memmove(dst, im, len);
  88     }
  89
  90     flush_cache(dst, len);
  91     make_bi_recs(((unsigned long) dst + len), "coffboot", _MACH_Pmac,
  92                     (prog_start + prog_size));
  93
  94     sa = (unsigned long)prog_start;
  95     printf("start address = 0x%x\n", sa);
  96
  97     (*(kernel_start_t)sa)(a1, a2, prom);
  98
  99     printf("returned?\n");
 100
 101     pause();
 102 }