arch/mips/lib/bootm.c

   1 /*
   2  * (C) Copyright 2003
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   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 <u-boot/zlib.h>
  28 #include <asm/byteorder.h>
  29 #include <asm/addrspace.h>
  30
  31 DECLARE_GLOBAL_DATA_PTR;
  32
  33 #define LINUX_MAX_ENVS          256
  34 #define LINUX_MAX_ARGS          256
  35
  36 static int linux_argc;
  37 static char **linux_argv;
  38
  39 static char **linux_env;
  40 static char *linux_env_p;
  41 static int linux_env_idx;
  42
  43 static void linux_params_init(ulong start, char *commandline);
  44 static void linux_env_set(char *env_name, char *env_val);
  45
  46 static void boot_prep_linux(bootm_headers_t *images)
  47 {
  48         char *commandline = getenv("bootargs");
  49         char env_buf[12];
  50         char *cp;
  51
  52         linux_params_init(UNCACHED_SDRAM(gd->bd->bi_boot_params), commandline);
  53
  54 #ifdef CONFIG_MEMSIZE_IN_BYTES
  55         sprintf(env_buf, "%lu", (ulong)gd->ram_size);
  56         debug("## Giving linux memsize in bytes, %lu\n", (ulong)gd->ram_size);
  57 #else
  58         sprintf(env_buf, "%lu", (ulong)(gd->ram_size >> 20));
  59         debug("## Giving linux memsize in MB, %lu\n",
  60                 (ulong)(gd->ram_size >> 20));
  61 #endif /* CONFIG_MEMSIZE_IN_BYTES */
  62
  63         linux_env_set("memsize", env_buf);
  64
  65         sprintf(env_buf, "0x%08X", (uint) UNCACHED_SDRAM(images->rd_start));
  66         linux_env_set("initrd_start", env_buf);
  67
  68         sprintf(env_buf, "0x%X", (uint) (images->rd_end - images->rd_start));
  69         linux_env_set("initrd_size", env_buf);
  70
  71         sprintf(env_buf, "0x%08X", (uint) (gd->bd->bi_flashstart));
  72         linux_env_set("flash_start", env_buf);
  73
  74         sprintf(env_buf, "0x%X", (uint) (gd->bd->bi_flashsize));
  75         linux_env_set("flash_size", env_buf);
  76
  77         cp = getenv("ethaddr");
  78         if (cp)
  79                 linux_env_set("ethaddr", cp);
  80
  81         cp = getenv("eth1addr");
  82         if (cp)
  83                 linux_env_set("eth1addr", cp);
  84 }
  85
  86 static void boot_jump_linux(bootm_headers_t *images)
  87 {
  88         void (*theKernel) (int, char **, char **, int *);
  89
  90         /* find kernel entry point */
  91         theKernel = (void (*)(int, char **, char **, int *))images->ep;
  92
  93         debug("## Transferring control to Linux (at address %08lx) ...\n",
  94                 (ulong) theKernel);
  95
  96         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
  97
  98         /* we assume that the kernel is in place */
  99         printf("\nStarting kernel ...\n\n");
 100
 101         theKernel(linux_argc, linux_argv, linux_env, 0);
 102 }
 103
 104 int do_bootm_linux(int flag, int argc, char * const argv[],
 105                         bootm_headers_t *images)
 106 {
 107         /* No need for those on MIPS */
 108         if (flag & BOOTM_STATE_OS_BD_T || flag & BOOTM_STATE_OS_CMDLINE)
 109                 return -1;
 110
 111         if (flag & BOOTM_STATE_OS_PREP) {
 112                 boot_prep_linux(images);
 113                 return 0;
 114         }
 115
 116         if (flag & BOOTM_STATE_OS_GO) {
 117                 boot_jump_linux(images);
 118                 return 0;
 119         }
 120
 121         boot_prep_linux(images);
 122         boot_jump_linux(images);
 123
 124         /* does not return */
 125         return 1;
 126 }
 127
 128 static void linux_params_init(ulong start, char *line)
 129 {
 130         char *next, *quote, *argp;
 131
 132         linux_argc = 1;
 133         linux_argv = (char **) start;
 134         linux_argv[0] = 0;
 135         argp = (char *) (linux_argv + LINUX_MAX_ARGS);
 136
 137         next = line;
 138
 139         while (line && *line && linux_argc < LINUX_MAX_ARGS) {
 140                 quote = strchr(line, '"');
 141                 next = strchr(line, ' ');
 142
 143                 while (next && quote && quote < next) {
 144                         /* we found a left quote before the next blank
 145                          * now we have to find the matching right quote
 146                          */
 147                         next = strchr(quote + 1, '"');
 148                         if (next) {
 149                                 quote = strchr(next + 1, '"');
 150                                 next = strchr(next + 1, ' ');
 151                         }
 152                 }
 153
 154                 if (!next)
 155                         next = line + strlen(line);
 156
 157                 linux_argv[linux_argc] = argp;
 158                 memcpy(argp, line, next - line);
 159                 argp[next - line] = 0;
 160
 161                 argp += next - line + 1;
 162                 linux_argc++;
 163
 164                 if (*next)
 165                         next++;
 166
 167                 line = next;
 168         }
 169
 170         linux_env = (char **) (((ulong) argp + 15) & ~15);
 171         linux_env[0] = 0;
 172         linux_env_p = (char *) (linux_env + LINUX_MAX_ENVS);
 173         linux_env_idx = 0;
 174 }
 175
 176 static void linux_env_set(char *env_name, char *env_val)
 177 {
 178         if (linux_env_idx < LINUX_MAX_ENVS - 1) {
 179                 linux_env[linux_env_idx] = linux_env_p;
 180
 181                 strcpy(linux_env_p, env_name);
 182                 linux_env_p += strlen(env_name);
 183
 184                 strcpy(linux_env_p, "=");
 185                 linux_env_p += 1;
 186
 187                 strcpy(linux_env_p, env_val);
 188                 linux_env_p += strlen(env_val);
 189
 190                 linux_env_p++;
 191                 linux_env[++linux_env_idx] = 0;
 192         }
 193 }