1 /* 2 * (C) Copyright 2003 3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de. 4 * 5 * SPDX-License-Identifier: GPL-2.0+ 6 */ 7 8 #include <common.h> 9 #include <command.h> 10 #include <image.h> 11 #include <u-boot/zlib.h> 12 #include <asm/byteorder.h> 13 #include <asm/addrspace.h> 14 15 DECLARE_GLOBAL_DATA_PTR; 16 17 #define LINUX_MAX_ENVS 256 18 #define LINUX_MAX_ARGS 256 19 20 static int linux_argc; 21 static char **linux_argv; 22 static char *linux_argp; 23 24 static char **linux_env; 25 static char *linux_env_p; 26 static int linux_env_idx; 27 28 static ulong arch_get_sp(void) 29 { 30 ulong ret; 31 32 __asm__ __volatile__("move %0, $sp" : "=r"(ret) : ); 33 34 return ret; 35 } 36 37 void arch_lmb_reserve(struct lmb *lmb) 38 { 39 ulong sp; 40 41 sp = arch_get_sp(); 42 debug("## Current stack ends at 0x%08lx\n", sp); 43 44 /* adjust sp by 4K to be safe */ 45 sp -= 4096; 46 lmb_reserve(lmb, sp, CONFIG_SYS_SDRAM_BASE + gd->ram_size - sp); 47 } 48 49 static void linux_cmdline_init(void) 50 { 51 linux_argc = 1; 52 linux_argv = (char **)UNCACHED_SDRAM(gd->bd->bi_boot_params); 53 linux_argv[0] = 0; 54 linux_argp = (char *)(linux_argv + LINUX_MAX_ARGS); 55 } 56 57 static void linux_cmdline_set(const char *value, size_t len) 58 { 59 linux_argv[linux_argc] = linux_argp; 60 memcpy(linux_argp, value, len); 61 linux_argp[len] = 0; 62 63 linux_argp += len + 1; 64 linux_argc++; 65 } 66 67 static void linux_cmdline_dump(void) 68 { 69 int i; 70 71 debug("## cmdline argv at 0x%p, argp at 0x%p\n", 72 linux_argv, linux_argp); 73 74 for (i = 1; i < linux_argc; i++) 75 debug(" arg %03d: %s\n", i, linux_argv[i]); 76 } 77 78 static void boot_cmdline_linux(bootm_headers_t *images) 79 { 80 const char *bootargs, *next, *quote; 81 82 linux_cmdline_init(); 83 84 bootargs = getenv("bootargs"); 85 if (!bootargs) 86 return; 87 88 next = bootargs; 89 90 while (bootargs && *bootargs && linux_argc < LINUX_MAX_ARGS) { 91 quote = strchr(bootargs, '"'); 92 next = strchr(bootargs, ' '); 93 94 while (next && quote && quote < next) { 95 /* 96 * we found a left quote before the next blank 97 * now we have to find the matching right quote 98 */ 99 next = strchr(quote + 1, '"'); 100 if (next) { 101 quote = strchr(next + 1, '"'); 102 next = strchr(next + 1, ' '); 103 } 104 } 105 106 if (!next) 107 next = bootargs + strlen(bootargs); 108 109 linux_cmdline_set(bootargs, next - bootargs); 110 111 if (*next) 112 next++; 113 114 bootargs = next; 115 } 116 117 linux_cmdline_dump(); 118 } 119 120 static void linux_env_init(void) 121 { 122 linux_env = (char **)(((ulong) linux_argp + 15) & ~15); 123 linux_env[0] = 0; 124 linux_env_p = (char *)(linux_env + LINUX_MAX_ENVS); 125 linux_env_idx = 0; 126 } 127 128 static void linux_env_set(const char *env_name, const char *env_val) 129 { 130 if (linux_env_idx < LINUX_MAX_ENVS - 1) { 131 linux_env[linux_env_idx] = linux_env_p; 132 133 strcpy(linux_env_p, env_name); 134 linux_env_p += strlen(env_name); 135 136 *linux_env_p++ = '='; 137 138 strcpy(linux_env_p, env_val); 139 linux_env_p += strlen(env_val); 140 141 linux_env_p++; 142 linux_env[++linux_env_idx] = 0; 143 } 144 } 145 146 static void boot_prep_linux(bootm_headers_t *images) 147 { 148 char env_buf[12]; 149 const char *cp; 150 151 #ifdef CONFIG_MEMSIZE_IN_BYTES 152 sprintf(env_buf, "%lu", (ulong)gd->ram_size); 153 debug("## Giving linux memsize in bytes, %lu\n", (ulong)gd->ram_size); 154 #else 155 sprintf(env_buf, "%lu", (ulong)(gd->ram_size >> 20)); 156 debug("## Giving linux memsize in MB, %lu\n", 157 (ulong)(gd->ram_size >> 20)); 158 #endif /* CONFIG_MEMSIZE_IN_BYTES */ 159 160 linux_env_init(); 161 162 linux_env_set("memsize", env_buf); 163 164 sprintf(env_buf, "0x%08X", (uint) UNCACHED_SDRAM(images->rd_start)); 165 linux_env_set("initrd_start", env_buf); 166 167 sprintf(env_buf, "0x%X", (uint) (images->rd_end - images->rd_start)); 168 linux_env_set("initrd_size", env_buf); 169 170 sprintf(env_buf, "0x%08X", (uint) (gd->bd->bi_flashstart)); 171 linux_env_set("flash_start", env_buf); 172 173 sprintf(env_buf, "0x%X", (uint) (gd->bd->bi_flashsize)); 174 linux_env_set("flash_size", env_buf); 175 176 cp = getenv("ethaddr"); 177 if (cp) 178 linux_env_set("ethaddr", cp); 179 180 cp = getenv("eth1addr"); 181 if (cp) 182 linux_env_set("eth1addr", cp); 183 } 184 185 static void boot_jump_linux(bootm_headers_t *images) 186 { 187 typedef void __noreturn (*kernel_entry_t)(int, ulong, ulong, ulong); 188 kernel_entry_t kernel = (kernel_entry_t) images->ep; 189 190 debug("## Transferring control to Linux (at address %p) ...\n", kernel); 191 192 bootstage_mark(BOOTSTAGE_ID_RUN_OS); 193 194 /* we assume that the kernel is in place */ 195 printf("\nStarting kernel ...\n\n"); 196 197 kernel(linux_argc, (ulong)linux_argv, (ulong)linux_env, 0); 198 } 199 200 int do_bootm_linux(int flag, int argc, char * const argv[], 201 bootm_headers_t *images) 202 { 203 /* No need for those on MIPS */ 204 if (flag & BOOTM_STATE_OS_BD_T) 205 return -1; 206 207 if (flag & BOOTM_STATE_OS_CMDLINE) { 208 boot_cmdline_linux(images); 209 return 0; 210 } 211 212 if (flag & BOOTM_STATE_OS_PREP) { 213 boot_prep_linux(images); 214 return 0; 215 } 216 217 if (flag & BOOTM_STATE_OS_GO) { 218 boot_jump_linux(images); 219 return 0; 220 } 221 222 boot_cmdline_linux(images); 223 boot_prep_linux(images); 224 boot_jump_linux(images); 225 226 /* does not return */ 227 return 1; 228 } 229